Fire Pen! B *********************** * FIRE ELECTRIC PEN * * * * By Joe Mackay * * for the CSS * *Crap Games Compo 2001* ***********************  %hsc=500:h$="Wandering Beech" 300,  250  200 ( 10 N"Difficulty specification (0-9)? ";hard:hard<0hard>9 15 li=3:sc=0 500  "Welcome to Fire Electric Pen! Based on classic Japanese Nintendo game, here freshly we bring you new version of this classical game for British computer!" f"We have pluckily brought you English transuration, lacking which was impedence of original gaming." w"INSTRUCTION! Guide hoop of electric pen over our wire, never inducing contact. It will help to using keys O and P." \"Fulfil! Go and collect your goodness. Current best good is "+h$+" who has "+hsc+" good." -250:n=03:m$:1,n  Mm$=" "+m$+" " m=1̱m$-31 /#0;1,0;n;m$(mm+31) ,.01z# =,n:.01z# =,n+12 :1  ="s" m:n  260 +Intro ,7:7:7: 66n=070F10 :128,88X,n:n ; 350^ @bm$:ov=1:pap=2:nk=3:papinc=0:nkinc=0:incln=1:400 E'' Jbm$:ov=0:pap=1:nk=2:papinc=2:nkinc=0:incln=0:400 O'' Tcm$:ov=1:pap=1:nk=6:papinc=1:nkinc=-1:incln=1:400 Y7:0 Z5#0;0,8;"S FOR STARTING!" [ ^" " h" " r" " Jov:8:8:z=0̱m$-132 :x=132 m$(z+x)""" ";:430 "pap;nk;" ";:incln450 x:incln450 z:0: /pap=pap+papinc-(6(pap+papinc>6)) *nk=nk+nkinc-(7(nk+nkinc>8))   Start game lev=(hard/2)+1  left=lev 'hx=502:hy=90Z:die=0 :1000 die=1570: ,left=left-1:left>0505 pt=*250+500:"CONGRATURATION!"''"You have beaten our wire."'"Please accept bonus goodness of"'2;pt;0;"!" !sz=03:x=02:.1}L,z:.1}L,z+4:.1}L,z+7:x:z:1,z+7 &sc=sc+pt:lev=lev+1 +0hard=hard+.5:hard9 hard=9 0 501 :&li=li-1:li=0600X D 505 W End game XL#0;1,10 ;"CURTAIN ENDS",:5,-5.63333 b schsc l$:"YES!":2,502 vN''"You have been more good than "'h$'"who was ";hsc;" good!" "Give us your name!"'h$  hsc=sc:  Start screen Ablop=255:<(hard*.1}L)blop=(*200)+502 hx=20:hy=90Z :2000 LR#0;0,0;"PEN: ";li;" GOOD: ";sc,'"LEFT: ";left, Qinv=0:9000(# V!k$=:k$"o"k$"p"1110V [inv=1:9000(# `,hx=hx+25*(-1+(2k$="p")) e hx(blop-15)1140t j<sc=sc+ (*20)*(1-(2k$="o")):1100L t inv=2 ~%blop<255hx=blop:1300 +z=0255:.1}L,z:z  die=0  2:9000(#:0 (Tz=030:*7:.01z# =,-5:.01z# =,-10 :z:7 2 "bzzzt." <1:100d:1500:1400x:ڥ*7;9 ;1;17,0;s$:.25~,1:.25~,13 Ft1:100d:1510:1400x:ڥ*7;9 ;1;s$:.25~,2:.25~,14 Pt1:100d:1520:1400x:ڥ*7;9 ;1;s$:.25~,20:.25~,0 Z1:100d d die=1 n xs:n=0̺(*s):s$:n   Bad news ܛ6,"Fire pen contact inclusion!","Electric infusion!","Graceful hand buzzing!","You have failed our wire!","Unhappy pen encounter!","Startled hand!" Encouragement 5,"Bold wayman, do not enrage.","Remember wisely saying:","Let us refresh yourself.","Rest your pen at our toes.","We don't scold your fingers."  Wise words 5,"Pray revisit unfeeble valiance!","Heroes may also be famously!","Drifting season narrowly finds.","Used palms bring you wasting.","Pluck."  Draw "course" 7z=hy+14hy+17:0,z:blop,0:z Mblop<255z=blop-3blop:z,hy+14:0,161-hy:z  #& #' Draw hoop #2Sinv11:z=hy+14hy+17:hx-9 ,z:3,0:z #<(inv=1) #Bhx,hy:0,30,/2:0,-30,/1.5@ #Jhx,hy+5:0,20,/2:0,-20,/1.5@ #5z=hx-2hx+1:z,hy:0,-30:z #-hx,hy-30:-hx,30-hy, -/8 # 0 #ginv<2z=hy+14hy+17:hx-5-(5inv),z:11 +(5inv),0:z #