FIRE & 1986 H.S. SOFTWARE 0:0:7:1:47999:23659k\,0:"":1:1:1:22,0;:"":22,0;:"" FIRESCREEN PPPPPPPPPPPPPPPPPPPPPPUUUUUUUUUUUUUUUUUUUUUUUUUUUוUUUUUUUUUUUUUUUUUUUUUUUUU] ] ] ] ]PPPPPPPPPPPPPPPPPPPPPP] ] ] ] ]PPPPPPPPPPPPPPPPPPPPPPUUUUUUUUUUUUUUUUUUUUUUUUUU] ] ] ] ] ]PPPPPPPPPPPPPPPPPPPPPPUUUUUUUUUUUUUUUUUUUUUUUUUU] ] ] ] ] ]PPPP? PPq`` PP ] ] ]? ] ] ]  ] ]PPPP PoPo   PP ] ] ]Ì ] ]? ]`` `  ] ]PPPP P Pq?P`?? P ] ] ] ] Ï ]` ]`  ] ]PPPP P P`??PP ] ] ] Ï ] ]` qq  ] ] ]<P``PPPPPPPPPPPPPPPPPPPB ]```a ] ]<|~<~|fcf~|<~""# 0  00p00  ?<<=|Dpp0000  U0000  =<" `00pp00  0000ǃ<<<<<>""# `|77|0qq0 А @@@@ǃ<<<<<>""# 0|77|0qq0 А @@@@` 00p0 ǃ00pp00  <<<=|Dpp0000  U0000  0000ǃp000  <<" `00pp00~<<<<$~<$$$f<~$$$f~<~<<~<<<$$$$f$$$f~<<~$$$f~<<~$$$f0000303003333330333333 00 <<<<003   0000  0000  0000  0000~<<<~<<~<$$$$f$$$f  0000  =<" `00pp00  0000  ?<><0990 `8p`?qac`c`f`f`l`|`x?>vf?p`````?p``?p``````p?````cccc```````p??p```op````p?`8000?p``p??p````p??p````p?````p? ?p````?pf`i`a`g`i`o``p??p``````````````````````````?p`````````p?``````````````````````````````````?````````aa````?````````````````````````````````````p?``acg~|~gca````````````````pyo`f```````````````p`p`x`x`l`l`f`g`c`aa``?p``````````````p?````````````?p````````````l`v?a``angca`8008p000p?````````````````````p?````````````````p9````````````````f`o`yp``p0990p``````````p98p`p8`6f` ` `  `?q```q?````oq```qo8@0008@?q```q??q``?`````00007?800000011?0000037><>7316f`f`f`f`f`f`op``````?q```q?oq```qo```?q```q?` ?0?0? ?? 0000009```11f`f`f`f`f`f`6`q;;q`0000091?8?p``o`y`x`x`y`o```p? HHPPPP ( X@@  @@@ ``P P  x00 @pp` ppppp pppp @ppppxp   @ pp@  @p ppppppp pبȨppppppp pP P PP  @x@@@@@x@ xx p 0H@@hpxxppxxpx0H@@@@xxp ` pH0@P``PH 𨨨ppxx pp p xPP pP Pxp H80``08`080`PpȨplll66666 ?h> ~`f 0f8ll8mf; 0 000 0 0~<~~ ~ 0` 80 0`0 ~~0  0 l8flxpxlf``````~cwkkccffv~nff><~60|00~:fff:```|ff|ff>ff><```|fff ,,006<8<66kkc|ffffff>lv```<`<<~ffff>fff<ckk6f<<~ 0~ 0 0 0(|T2v!~2r#~2s#~2t"ɷ~ !~2r#~2s#~2t#++w#w#:r[sz 07{02.w#:tW:z(z2t:sW:yz2s:w2t#NO/NS/NL/WE/IM/AO/OS/LP!i! !!!"{NF͞ x *{~'''2m#~2l#~<'''=2o#~2n#~2u~|((O:m:ow:m:ow:m:o:lO}o:n2v?G APPE2v VERI! !!(!8?~ ~(5/~ݾ(@5~w~ݾ(4~ݾ( 46?F x ~~(z2s{2tz2t{2s~O ~2r"[sz 0@{0;.:v(w#:tW:z(z2t:sW:yz2s:w2t#j!zT~G##~2p#~2q#N#~ &o))))) [p.A ~I(/#I(7I(~????O#~I(/O#:p<2p:p2py5ͯs:H\&.U\RR}8=g= x #:G*[͵K[JR8 :G*[͵KB0[[ q###2G*[͵KJ"Ɏ*"ss*.5"!*[͵KB">t(`t  `t}='^#V:t2w2z#:s2y#&o){@{_WV^~(Q*K\~( Ÿ(͸#H:5 0![ ~̀tw*"X>2r̀tT]>(#O 2*"Åit̀t![ [>Oa{˯t08 :A8[!u(7#_.?@%$u*p~(:###CV˺~t( 8 ~#(# ~( C#^#V++7C~# [pRXDM*pR*xR:b*VR:b*pSpx(6#6#6#~tw## +~t# *p~u###~#(*p~v(uuKpBDM+(Spvsw:U(vx\v͊w:U(vx(\v͊w÷w>2ìw͊w*Gw>$2!v~X#:T*p~G^V###~X~#(>02x>UXx>L(x>M(X>N2(w͊wTOTAL ERRORS 2*l:|8*}(w>2:U8>GO*V~-w#"V*l "l:U2U|-w}????:w0:8X!iw^V R0y0X##'d >T2͐i>x͏w>͏w>͏w> X2F#x 8 ͬw:~XHHHHhο:bp¢RÜ0ĒXź~BǤhȊxxxx BAD LABELMULTIPLE DEFINITION BAD OPCODEMULTIPLY DEFINED SYMBOLDIVISION BY ZEROFIELD OVERFLOWBRANCH OUT OF RANGE  P P P 3MOaO\GWq !v>>BB<DHpHDB@@@@@~BfZBBBBbRJFB\:A,2:A+1,233  'S$=" " #T$=S$+S$:U$=T$+T$ (A(X)=(X/256) -B(X)=X-A(X)*256 2R(X)=1+(*X) 7P(2):G(4) <W(2):M(2) A(S(4,9 ):R(4,3) F PUS=1000:GES=1100L K SCS=1200:SPS=1300 P TWS=1400x:FOS=1500 U WHS=1600@:SOS=1700 ZINS=1800 _ UD1A=168:UD1B=222 d UD2A=112p:UD2B=223 i AT1A=192:AT1B=217 nAT2A=0:AT2B=60< 236066\,AT1A 236077\,AT1B 23675{\,UD1A 23676|\,UD1B ,$W(4):D(4):V(8) -2I$(36$):M$(24):F$(6,16) @6O$="":P$="slsmsnspstswblbrclcrdrdwflfrglgrplprtrtw" AA=05:B=010 :F$(A+1,B+1)=(A*11 +B+32 ):B:F$(A+1,12 )=+F$(A+1,15):A JNM=1:RESC=0 K AT3A=128:AT3B=186 ^INST=3000 :GETK=3100 :WORD=3150N :TIME=3250 :FIRE=3300 :MOVR=3350 :MOVL=3360 :MOVU=3370* :MOVD=33804 `"FREE=3500 :RETU=3550  4000 W8,"ip","sn","ap","sn","op","","ug","smsn","ag","sn","ow","sn","it","sp","im","" 2,"ug","slsn","og","sl" E6,"ag","sl","ow","sl","ub","","ap","sl","ip","sl","ug","slsm" +4,"it","sl","an","","ar","","in","" U8,"ay","swbr","op","","ar","","ir","","un","","ub","","ow","blbr","ew","blbr" )3,"ay","stbr","an","br","ig","br" )3,"ob","","ow","stbr","ew","brst" 74,"an","sw","ow","stbl","ew","stbl","ag","swst" C6,"ip","dr","ot","","an","","og","","am","crdr","op","crdr" 44,"am","cldr","op","cldr","y","dr","ew","dr" 24,"ip","cl","op","crcl","y","cr","ew","cr" 2,"arf","","ell","" T8,"ow","glgr","ip","gr","op","","ap","","y","fr","ag","","at","","og","frgr" &3,"y","fl","et","","og","flgr" 2,"ow","flgr","ad","" '3,"ow","flgl","ip","fl","ey","" D6,"op","pr","ot","tr","an","","um","","y","prtr","ay","prtr" >5,"op","pl","y","pltr","ay","pltr","am","tr","im","tr" F6,"ot","pl","y","plpr","ay","prpl","am","pr","im","pr","ip","" 2,"o","","in","" l3,"The aim of the game is to rescue a girl from a burning building before the flames get to her !" p6,"Each of the four floors of the building ismade from a word with the first two letters missing." 9 ,"Using your fireman , you have to choose a pair of letters (from the stack alongside the building) that would fit each of the words." 13 ,"If you choose the right pair of letters , the fireman will carry them into the buil-ding , drop them into place , and climb nearer to rescuing the girl !" >3,"At the beginning of the game , you can choose :" {6," A) The SKILL LEVEL 1-5 (1 = Easy): As the level gets higher you are allowed less time and less mistakes." M10 ," B) Which pairs of letters you would like used in each game." a13 ,"1) Move the fireman up and down the ladder using the cursor keys - Down = 6 Up = 7" 16,"2) Press ENTER when the fireman's hands are underneath the pair of letters that would fit the word that is on fire !" @20,"3) When the game is over , press P to play again."  4000 PUT SPRITE P(1)=60900 P(2)=58000 2000+PUR:A #A0P(2)=58010 L=02:A P(1)+L,A:L A=P(2): LGET SPRITE NG(1)=60903 PG(2)=58050 R21004+GER TL=04:A VG(1)+L,A:L XA=G(2): SCROLL SCREEN *S(OPT,1)=60901+(OPT*7) *S(OPT,2)=58195S+(OPT*5) 2200+SCR L=06:A S(OPT,1)+L,A:L A=S(OPT,2): SPRITE ROUTINES 2300+SPR:A +R(OPT,1)=60920+(OPT*16) *R(OPT,2)=58695G+(OPT*5) 'A=0R(OPT,2)=58740t *R(OPT,3)=58745y+(OPT*5)  L=07:A "R(OPT,1)+L,A:L $%L=1̾(R(OPT,1)+5) &A:R(OPT,1)+7+L,A (L:A=R(OPT,2) *A=R(OPT,3): x20CPL PRINTING zA=59000x: 42CPL PRINTING A=59200@: @WHITE NOISE BW(1)=59400 DW(2)=59400 FW(1)+11 ,B(WHR) HW(1)+12 ,A(WHR) JA=W(2): SOUND ROUTINES 2400` +SOR:A M(1)=60890 %M(2)=59400+(A*502) A:M(1),A L=03:A 60891+(L*2),B(A) 60892+(L*2),A(A) L:A=M(2)  PUT SPRITE DATA #0,21,21,8 #0,22,21,8 #0,21,15,8 #0,22,15,8 "0,21,9 ,8 "0,22,9 ,8 "0,21,3,8 "0,22,3,8 #1,7,20,16 #0,20,1,11 #0,19,1,11 #1,26,1,12 $0,17,19,15 $0,18,19,15 #0,5,20,27 $0,25,18,29 $0,37%,18,25 80,37%,V(3)-2,V(1)-1 80,37%,V(3)-2,V(1)-2 4GET SPRITE DATA 5)1,8,2,3,4 6,37%,16,25,4,4 SCROLL SCREEN DATA :8,2,18,5,4,4,1 :8,2,18,5,3,4,1 :8,2,19,5,2,4,1 90,0,1,1,1,2,1 A6,24,21,31,130,134,10 J15-DG*3,25,19,28,2,24,10 c15-DG*3,25,19,28,2,16+(24*(POS-1)),10 QV(3)-2,8,V(3)-1,12 ,3,16,1 SV(3)-2,8,V(3)+3,10 ,130,32 ,1 QV(3)-2,6,V(3)-1,10 ,4,12 ,1 SPRITE ROUTINE DATA c0,128,120x,120x,120x,120x,2,1,1,5,6 \1,4,5,20,10 ,7,2,1,20,1,2 `SOUND ROUTINE DATA a52,1,1000,1,20,0 b61,1,60<,150,1,100d c81,1,4000,1,15,5000 d62,1,1000,1,400,0 e42,1,200,20,1,0 SPRITE DATA 900 :F=4:B=0 '3,0;6;U$;U$;u$;T$ ;0,0;2;S$;1,0;7;S$ 1Q$=0+8+0+"FIRE FIGHT":TWS .L=1F:A,Q$:Q$=A+0+Q$:FOS:L Z#0;1,0;1;1;7;" PRESS THE ENTER KEY TO CONTINUE"; 13 3030 .2~L,20: B=999 Z3,0;4;T$;U$;U$;6;U$;U$;S$:F=6:B=999:3012 23658j\,0 A$=:A$=""3102 !(B=1̱B$:A$B$(B)B:3100 &.2~L,20: N8CK=0:K$="":R$=" ":D$=R$:X=03 S&Y=R(4):R$(Y)="1"3155S XR$(Y)="1":D(X+1)=W(Y) ]#(700+W(Y)+CAT*4):NUM btW=R(NUM):Q$=(20+W(Y)*10 +W):Z=1W*2-1:A$:Z:A=1̱K$:K$(A)=Q$3165] gA:K$=K$+Q$:B$:I$(1+X*9 4+X*9 )=B$:I$(5+X*9 6+X*9 )=P$(W(Y)*2+CAT*8+1W(Y)*2+CAT*8+2) l6M$(1+X*65+X*6)=" "+A$:X: 23672x\502RESC m2,29-(TIMR);TIMR:TIMR=TIMR+1:FP=FP+((TIMR/LEVEL)=(TIMR/LEVEL)):23672x\,0 u236066\,AT3A:236077\,AT3B:FA=(FA=0):A=(FP/4):C=FA*12 +(FP-A*4)*3:2 B=FA*3:1,21-A;(98b+C);F$(1+B,A);2,21-A;(99c+C);F$(2+B,A);3,21-A;(100d+C);F$(3+B,A); z8:236066\,AT1A:236077\,AT1B:BA=(BA=0):PUR=1+BA+FLOOR*2:PUS:FP40(5300   V(4)=1:3390> V(4)=2:3390> *IV(4)=8:V(5)=10 :V(6)=9 :3390> 4IV(4)=4:V(5)=9 :V(6)=27:3390> >A=R(1,1):A,128+V(4):A+2,V(2):A+3,V(3):A+4,V(1):A+6,1:A+8,V(5):A+9 ,V(6):SOR=4 ?(V(2)=18PUR=17:PUS @A=58740t:SOS:M=V(1)V(2).5-(V(4)=2V(4)=8):A=58750~:A=M(2):M:TIME: 2,11 ;" ";3,11 ;" ":V(1)=10 :V(2)=3:V(3)=1:V(5)=12 :V(6)=11 :MOVL V(4)=2:3584:V(1)=2:V(2)=18.5:V(3)=7:V(5)=13 :V(6)=14:MOVR V(4)=2:3582 :V(1)=19:V(2)=3:V(3)=13 :V(5)=12 :V(6)=11 :MOVL ŎV(4)=2:3580 :V(1)=2:V(2)=14:V(3)=19:V(5)=13 :V(6)=14:MOVR vM=15.5:PUR=13 :PUS:A=M(2):PUR=14:PUS:A=M(2):M:SCR=5:SCS: ϵQ$=9 +24+1+"press":TWS:Q$=12 +25+1+"P to":TWS:Q$=15+24+1+"play":TWS:Q$=18+24+1+"again":TWS "P"Ʀ"p"3540  ސV(4)=2:3582 :V(1)=19.5:V(2)=3:V(3)=14:V(5)=6:V(6)=5:MOVL: V(4)=2:3580 :V(1)=3:V(2)=27:V(3)=20:V(5)=7:V(6)=8:MOVR: nV(1)=27:V(2)=3.5`:V(3)=20:3586:V(4)=1:3580 : nV(1)=3:V(2)=18.5:V(3)=14:3588:V(4)=1:3582 : mV(1)=20:V(2)=3.5`:V(3)=8:3586:V(4)=1:3584: 7V(1)=12 :V(2)=2:3595 : 7V(1)=6:V(2)=19:3595 : 6V(1)=0:V(2)=2:3595 : V(4)=2:V(5)=6:V(6)=5:V(7)=27+POS*2:V(8)=28+POS*2:3590: V(4)=1:V(5)=7:V(6)=8:V(7)=27+POS*2:V(8)=28+POS*2:3590: A=R(1,1):A,128+V(4):A+2,V(2):A+3,V(3):A+4,V(1):A+6,1:A+8,V(5):A+9 ,V(6) B=R(3,1):B,128+V(4):B+2,V(2):B+3,V(3)-2:B+4,V(1)-(V(1)>V(2)):B+6,1:B+8,V(7):B+9 ,V(8)  PUR=18+(V(4)=2):PUS:A=58700L:A=58710V:M=V(1)V(2).5-(V(4)=2):A=58760:A=58750~:A=M(2):M:TIME:  A=S(4,1):A,V(1):A+1,V(2):A+2,V(1)+11 :A+3,V(2)+2:A+4,128+V(4):V(4)=23599  bL=16:V(1)=12 #0;1,3;8;8;8;""  CV(1)12 V(1)+11 ,V(2)+1;""; XM=14:A=S(4,2):.003xD,L*8+M*2:M:L:TIME: }L=61-1:M=41-1:A=S(4,2):.003xD,L*8+M*2:M:L:TIME: &5:0:0:1: Q$=4+3+0+"Would you like to":tws:Q$=10 +0+0+"see the instructions?":TWS:Q$=16+7+0+"(Y-yes/N-no)":TWS "B$="YyNn":GETK:B2INST o:Q$=6+6+0+"Please choose":TWS:Q$=12 +3+0+"skill level (1-5)":TWS #B$="12345":GETK:LEVEL=7-B q:Q$=2+0+0+"Please choose one of":TWS:Q$=4+0+0+"these groups:":TWS Y8,0;2;T$:Q$=8+1+0+"1 - for sl,sm,sn,sp":TWS [10 ,0;3;T$:Q$=10 +1+0+"2 - for st,sw,bl,br":TWS [12 ,0;4;T$:Q$=12 +1+0+"3 - for cl,cr,dr,dw":TWS [14,0;5;T$:Q$=14+1+0+"4 - for fl,fr,gl,gr":TWS [16,0;6;T$:Q$=16+1+0+"5 - for pl,pr,tr,tw":TWS 9Q$=20+3+0+"Press a key (1-5)":TWS !B$="12345":GETK:CAT=B-1 u:Q$=0+0+0+"Please pick 2-4 of":TWS:Q$=2+0+0+"the following , and":TWS pQ$=4+0+0+"press ENTER when you":TWS:Q$=6+0+0+"have finished.":TWS #DG=0:X=0:Z=10 C$=P$(X*2+CAT*8+1X*2+CAT*8+2):Z,0;(Z/2)-2;T$;:Q$=Z+0+0+"choose '"+C$+"' (y/n) ?":TWS 2B$="YyNn"+13 :GETK:B=54085 gQ$=Z+27+0+A$:TWS:Z=Z+2:X=X+1:B2DG=DG+1:W(DG)=X-1 Z184065 DG<24050 #DG=3W(4)=W(3) :DG=2W(3)=W(1):W(4)=W(2) j0::6,0;5;T$:Q$=6+3+0+"one moment please":TWS:8 M=0DG-1:Q$=(8+M*3)+2+2+P$(1+W(M+1)*2+CAT*82+W(M+1)*2+CAT*8):TWS:M zGER=1:GES:M=0DG-1:60903,29+M*2:60904,8+M*3:A=58050:M  OPT=1:SCR=1:SCS:M=0DG-1:60903,30+M*2:60904,8+M*3:A=58050:M  GER=2:GES  OPT=4:SCR=4:SCS uWORD:DG=DG-1:END=0:BURN=0:LTIM=502-LEVEL*4:TIMR=0:FM=0:DONE=0 1OPT=1:SPR=1:SPS:OPT=3:SPS 3E$="     ":D$=" ":B$=" ":C$="    ":A$="  ": 2A$=A$+A$:B$=B$+B$:C$=C$+C$:D$=D$+D$:E$=E$+E$ o:1:A$;A$;C$;A$;A$;E$;A$;A$;C$;B$;B$;#0;0,0;1;D$;:8:8:8 0;7;10 ,2;"";16,19;"";#0;0,2;1;0;7;;"" "sL=05+DG*3:21-L,29;7;0;"";:.01z# =,(35#-(21-L)):L 'SOR=1:M=03:SOS:Q$=(4+M*6)+11 +2+M$(3+M*65+M*6):TWS:M ,0,25;6;" ";1,25;" ";2,26;5;" 0":Q$=0+25+0+"time":TWS @3FLOOR=0:FP=4:BA=0:FA=0 M21,8;2;" "::FIRE:PUR=9 :PUS:SOR=4:SOS ZM=15:PUR=11 :PUS:A=M(2):PUR=10 :PUS:A=M(2):M zOPT=1:V(1)=16:V(2)=27:V(3)=20:V(5)=7:V(6)=8:MOVR M=0DG:15-M*3,26;" ":Q$=(16-M*3)+26+2+P$(1+W(M+1)*2+CAT*82+W(M+1)*2+CAT*8):TWS:M TVP=18:V(1)=18.5:V(2)=18:V(3)=29:MOVU F= F=13 5100 SF=546VP18V(1)=VP:V(2)=VP+2:VP=VP+3:MOVD `F=557VP18-3*DGV(1)=VP:V(2)=VP-2.5 :VP=VP-3:MOVU TIME:5025 RT=0:POS=(21-VP)/3:R$=P$(W(POS)*2+CAT*8+1W(POS)*2+CAT*8+2):A$=R$+M$(3+(3-FLOOR)*65+(3-FLOOR)*6) fA=18:R$I$(A+(3-FLOOR)*9 1+A+(3-FLOOR)*9 )A:5120 7A=1̱O$5:O$(AA+4)=A$5120 A:RT=1:O$=O$+A$ BRTSOR=3:SOS:FP=FP+(7-LEVEL)*2:5045  wSOR=5:SOS:V(1)=VP:V(2)=19:V(3)=29:MOVD:PUR=16:PUS:PUR=15:PUS 4SCR=7:SCS:SCR=6:POS1M=1POS-1:SCS:M zFLOOR=0V(1)=27:V(2)=11.58:V(3)=20:3586:SCR=8:SCS:5200P #FLOOR=13560 :V(1)=2.5 :V(2)=6:V(3)=14:3588:SCR=10 :SCS:5200P (FLOOR=23560 :3562 :V(1)=20:V(2)=11.58:V(3)=8:3586:SCR=8:SCS:5200P -FLOOR=33560 :3562 :3564 :V(1)=3:V(2)=6:V(3)=2:3588:SCR=10 :SCS:5200P PSCR=9 :SCS:SOR=1:SOS:FLOOR21,8;7;" ";#0;1;5;1;1;0,8;" ";1,8;" " UFLOORA=21-FLOOR*6:A,8;1;7;" ";5;1;;A+1,8;" ";A+2,8;" " XZFLOOR=FLOOR+1:FLOOR421-FLOOR*6,8;2;" ":TIME Z|FLOOR=1V(1)=10 :V(2)=27:V(3)=20:V(5)=7:V(6)=8:MOVR _FLOOR=2V(1)=6:V(2)=3.5`:V(3)=14:V(5)=6:V(6)=5:MOVL:3552 dFLOOR=3V(1)=11 :V(2)=19:V(3)=8:V(5)=7:V(6)=8:MOVR:3550 :3552 iFLOOR=4RESC=1:V(1)=6:V(2)=9 :V(3)=2:V(5)=7:V(6)=8:MOVR:FREE  5015 |<SOR=2:SOS:SCR=5:SCS:3535 :3535