@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr ; 糳; Sneak Attack by David PlotkinMODULEBYTE ChrBase=756,Max,Bkgrnd=710, Fate=53770,Level=[1],Cur}sIn=752, Stick=632,Ps,Loud=[0],Indx=[0], DownL=[0],DownR=[0],Loud1=[0], Snd1=$D208,Snd2=$D20F,Freq=[169], Wsync=$D40A},Colbk=$D018, Nmien=$D40E,Hard=[15], Consol=53279CARD Scrn=88,RamSet,HiMem=$2E5, Score=[0],Comp=[300],Sdlst=560, }Vdslst=512CARD ARRAY Linept(24)BYTE ARRAY Charset,Chopperstatus(30), Chopperx(30),Choppery(30), Expx(60),Expy(60),E}xpStatus(60), TrStatus(30),Trx(30),Try(30), MisStatus(30),Misx(30),Misy(30), Ll(20),Rr(20),Dlist, ShapeTable(0)= }[254 16 124 71 127 12 62 0 127 8 62 226 254 24 126 0 96 96 48 48 24 60 231 255 24 24 24 }24 24 60 231 255 6 6 12 12 24 60 231 255 128 85 17 66 24 170 91 131 60 126 255 255 195 66 36 } 24 60 36 24 255 60 24 36 102 0 0 0 0 0 0 0 0 60 36 24 255 60 24 36 102 60 } 36 219 255 60 24 36 102 60 60 24 60 60 24 24 28 60 60 24 60 60 60 102 195]PROC Download();Step } back HiMem and move the;character set into RAMCARD IndexBYTE Val RamSet=(HiMem-$400)&$FC00 ChrBase=RamSet RSH 8 HiM}em=RamSet FOR Index=0 TO 1023 DO Val=Peek(57344+Index) Poke(RamSet+Index,Val) OD Charset=RamSetRETURNPROC Dl}int();the display list interrupt routine [$48 $8A $48 $98 $48] Wsync=1 Colbk=50 [$68 $A8 $68 $AA $68 $40]PROC Scor}eline();set up the dli Dlist=Sdlst Vdslst=Dlint Dlist(27)=130 Nmien=$C0RETURNPROC Update();print score and level} Position(1,23) Print("Score: ") Position(8,23) PrintC(Score) Position(18,23) Print("Level: ") Position(25,23)} PrintB(Level)RETURNPROC Title()BYTE colpf0=53270,colpf1=53271, colpf2=53273,colpf3=53273, rtclock=20,vcount=5}4283 Graphics(18) Position(3,4) PrintD(6,"SNEAK ATTACK") Position(8,5) PrintD(6,"BY") Position(3,7) PrintD(6,"d}avid plotkin") Position(3,9) PrintD(6," ") WHILE Consol<>6 DO colpf3=Fate Wsync=0 colpf0=128-vcou}nt+rtclock RSH 2 colpf1=vcount+rtclock RSH 2 ODRETURNPROC Gr0Init();Set up the address of each screen;line and ini}tializeCARD xx Graphics(0) CursIn=1 Print(" ") FOR xx=0 TO 23 DO Linept(xx)=Scrn+(40*xx) OD FOR xx=0 TO 29 D}O Chopperstatus(xx)=0 Chopperx(xx)=0 Choppery(xx)=0 Misx(xx)=0 Misy(xx)=0 MisStatus(xx)=0 TrStatu}s(xx)=0 OD FOR xx=0 TO 59 DO ExpStatus(xx)=0 OD FOR xx=0 TO 19 DO Ll(xx)=0 Rr(xx)=0 OD Bkgrnd=0 Upd}ate()RETURNPROC Plot0(BYTE x,y,ch);Plot a char at location x,yBYTE ARRAY line line=Linept(y) line(x)=chRETURNBYTE} FUNC Locate0(BYTE x,y);Returns the value of the char at x,yBYTE ARRAY line line=Linept(y)RETURN(line(x))PROC Noise()};the explosion noises IF Loud=0 AND Loud1=0 AND Freq=169 THEN RETURN FI IF Loud THEn Loud==-2 S}ound(0,90,8,Loud) FI IF Loud1 THEN Loud1==-2 Sound(1,150,8,Loud1) FI IF Freq<168 THEN Freq==+8 Sound(}2,Freq,10,4) ELSE Freq=169 Sound(2,0,0,0) FIRETURNPROC HitChute(BYTE wh);see which chute was hit by missile w}hBYTE lp FOR lp=0 TO 29 DO IF Misx(wh)=Trx(lp) AND (Misy(wh)=Try(lp) OR Misy(wh)=Try(lp)+1) THEN } TrStatus(lp)=2 Plot0(trx(lp),Try(lp),0) Plot0(Trx(lp),Try(lp)+1,10) Plot0(Trx(lp),Try(lp)+2,0) EX }IT FI OD IF Try(lp) LSH 3 < Freq THEN Freq=Try(lp) LSH 3 FIRETURNPROC HitMan(BYTE wh);see which man was hit!} by missile whBYTE lp FOR lp=0 TO 29 DO IF Misx(wh)=Trx(lp) AND (Misy(wh)=Try(lp)+1 OR Misy(wh)=Try"}(lp)+2) THEN TrStatus(lp)=3 Plot0(Trx(lp),Try(lp)+1,6) Plot0(Trx(lp),Try(lp),0) Plot0(Trx(lp),Try(lp)#}+2,0) FI OD Loud1=12RETURNPROC ExplodeChopper(BYTE lp);explosions in place of Chopper lpBYTE lq FOR lq=0 TO 59$} STEP 2 DO ;find empty IF ExpStatus(lq)=0 THEN ExpStatus(lq)=1 ExpStatus(lq+1)=1 Expx(lq)=Chopperx%}(lp) Expx(lq+1)=Chopperx(lp)+1 Expy(lq)=Choppery(lp) Expy(lq+1)=Choppery(lp) Chopperstatus(lp)=0 &} Plot0(Expx(lq),Expy(lq),6) Plot0(Expx(lq+1),Expy(lq+1),6) EXIT FI ODRETURNPROC HitChopper(BYTE wh);wh'}ich chopper was hit by missile whBYTE lp FOR lp=0 TO 29 DO IF Misy(wh)=Choppery(lp) AND (Misx(wh)=Chopperx(lp) (}OR Misx(wh)=Chopperx(lp)+1) THEN ExplodeChopper(lp) EXIT FI OD Loud=12RETURNPROC MissileHit(BY)}TE wh);see if missile wh hit anythingBYTE dum dum=Locate0(Misx(wh),Misy(wh)) IF dum=0 THEN Plot0(Misx(wh),Misy(wh),*}84) RETURN FI MisStatus(wh)=0 IF dum=1 OR dum=2 THEN HitChopper(wh) Score==+1 ELSEIF (dum=7 AND Indx<6 OR+} dum=8 AND Indx>3) THEN HitChute(wh) Score==+2 ELSEIF (dum=8 AND Indx<4 OR dum=9 AND Indx>1) TH,}EN HitMan(wh) Score==+1 FIRETURNPROC Modify();Modify the RAM character setCARD xx FOR xx=0 TO 103 DO Cha-}rset(xx+8)=ShapeTable(xx) ODRETURNPROC LaunchTrooper(BYTE wh);drop a paratrooper from chopper whBYTE lp IF Fate>240-.}(Level LSH 1) THEN FOR lp=0 TO 29 DO ;find MT trooper IF TrStatus(lp)=0 THEN ;got one TrStatus(lp)=1 /} Trx(lp)=Chopperx(wh) IF Trx(lp)=0 THEN Trx(lp)=1 FI Try(lp)=Choppery(wh)+1 Plot0(0}Trx(lp),Try(lp),7) Plot0(Trx(lp),Try(lp)+1,8) Plot0(Trx(lp),Try(lp)+2,9) EXIT FI OD FIRE1}TURNPROC EraseChopper(BYTE wh);erase chopper number wh Plot0(Chopperx(wh),Choppery(wh),0) Plot0(Chopperx(wh)+1,Chopper2}y(wh),0) Chopperstatus(wh)=0 Chopperx(wh)=0 Choppery(wh)=0RETURNPROC DrawChopper(BYTE wh);draw chopper number wh 3}Plot0(Chopperx(wh),Choppery(wh),1) Plot0(Chopperx(wh)+1,Choppery(wh),2)RETURNPROC ClearScreen();clear the screenBYTE l4}p FOR lp=0 TO 29 DO IF Chopperstatus(lp) THEN EraseChopper(lp) FI IF TrStatus(lp) THEN TrStatus(l5}p)=0 Plot0(Trx(lp),Try(lp),0) Plot0(Trx(lp),Try(lp)+1,0) Plot0(Trx(lp),Try(lp)+2,0) FI IF MisStatus6}(lp)=1 THEN MisStatus(lp)=0 Plot0(Misx(lp),Misy(lp),0) FI OD FOR lp=0 TO 59 STEP 2 DO IF ExpStatus(lp7})=1 THEN ExpStatus(lp)=0 ExpStatus(lp+1)=0 Plot0(Expx(lp),Expy(lp),0) Plot0(Expx(lp+1),Expy(lp+1),0)8} FI ODRETURNPROC MoveChopper();move the choppersBYTE lp,ps=[0] FOR lp=0 TO 29 DO IF Chopperstatus(lp)=1 THEN 9};right IF Chopperx(lp)=38 THEN EraseChopper(lp) ELSE Plot0(Chopperx(lp), Choppery(l:}p),0) Chopperx(lp)==+1 DrawChopper(lp) LaunchTrooper(lp) FI FI IF Chopperstatus(lp)=2 T;}HEN ;left IF Chopperx(lp)=0 THEN EraseChopper(lp) ELSE Plot0(Chopperx(lp)+1, Choppe<}ry(lp),0) Chopperx(lp)==-1 DrawChopper(lp) LaunchTrooper(lp) FI FI OD IF ps=0 THEN =} Charset(8)=56 Charset(16)=28 ps=1 ELSE ps=0 Charset(8)=254 Charset(16)=127 FIRETURNPROC LaunchCho>}pper();Decide whether to send off a new;chopper, which side, how high upBYTE lp IF Fate>230-(Level LSH 1) THEN FOR l?}p=0 TO 29 DO ;find MT chopper IF Chopperstatus(lp)=0 THEN Choppery(lp)=Rand(Hard) IF Fate>128 THEN @} Chopperx(lp)=38 ;right side Chopperstatus(lp)=2 ELSE Chopperx(lp)=0 ;left side ChA}opperstatus(lp)=1 FI DrawChopper(lp) EXIT FI OD FIRETURNPROC DrawBase();draw the baseB}BYTE lp FOR lp=19 TO 21 DO Plot0(lp,22,128) OD Plot0(20,21,4)RETURNPROC AimGun();read the joystick and move thC}e base IF Stick=11 THEN Ps=3 ELSEIF Stick=7 THEN Ps=5 ELSE Ps=4 FI Plot0(20,21,Ps)RETURNPROC Shoot()D};send off a bulletBYTE trig=644,lp,flg=[0] IF trig=1 OR flg=0 THEN flg=1 RETURN FI FOR lp=0 TO 29 DO ;find emE}pty shot IF MisStatus(lp)=0 THEN ;got one MisStatus(lp)=1 Misy(lp)=20 IF Ps=3 THEN Misx(lp)=19F} ELSEIF Ps=5 THEN Misx(lp)=21 ELSE MISX(lp)=20 FI MissileHit(lp) EXIT FI OG}D flg=0RETURNPROC MoveShots();move the fired bulletsBYTE lp FOR lp=0 TO 29 DO ;for each shot IF MisStatus(lp)=1 H}THEN Plot0(Misx(lp),Misy(lp),0) IF Stick=11 THEN Misx(lp)==-1 ELSEIF Stick=7 THEN Misx(lp)=I}=+1 ELSE Misy(lp)==-1 FI IF (Misx(lp)<>39 AND Misy(lp)<>255 AND Misx(lp)<>0) THJ}EN MissileHit(lp) ELSE MisStatus(lp)=0 FI FI ODRETURNPROC MoveExplosions();move the expK}losionsBYTE lp FOR lp=0 TO 59 STEP 2 DO IF ExpStatus(lp)=1 THEN Plot0(Expx(lp),Expy(lp),0) Plot0(Expx(lp+1L}),Expy(lp+1),0) Expy(lp)==+1 Expy(lp+1)==+1 Expx(lp)==-1 Expx(lp+1)==+1 IF Expy(lp)<>22 AND ExpM}x(lp)<>0 AND Expx(lp+1)<>39 THEN Plot0(Expx(lp),Expy(lp),6) Plot0(Expx(lp+1),Expy(lp+1),6) ELSN}E ExpStatus(lp)=0 ExpStatus(lp+1)=0 FI FI ODRETURNPROC BaseExplode();explode the baseBYTE ARO}RAY endx(0)=[16 24 17 23 20], endy(0)=[22 22 19 19 17]BYTE lp,time=20 color=38 FOR lp=0 TO 4 DO Plot(20,2P}2) DrawTo(endx(lp),endy(lp)) OD FOR lp=0 TO 16 DO Sound(0,Fate,8,16-lp) Sound(1,Fate,8,16-lp) time=0 Q}DO UNTIL time=15 OD OD SndRst() color=32 FOR lp=0 TO 4 DO Plot(20,22) DrawTo(endx(lp),endy(lp)) OR}DRETURNPROC EndRight();move the troopers from the right;to the baseBYTE lp,lq,nn,time=20 FOR lp=0 TO 19 DO IF Rr(S}lp)=1 THEN lq=21+lp WHILE lq>20 DO IF nn=12 THEN nn=13 ELSE nn=12 FIT} Plot0(lq,22,nn) time=0 DO UNTIL time=10 OD Plot0(lq,22,0) lq==-1 U} OD Plot0(21,22,11) FI OD FOR lp=0 TO 3 DO Plot0(21,22-lp,11) time=0 DO UNTIL time=10 V}OD OD BaseExplode()RETURNPROC EndLeft();Move the troopers from the left to;the baseBYTE lp,lq,lc,nn,time=20 FOR lW}p=0 TO 19 DO lq=19-lp IF Ll(lq)=1 THEN FOR lc=lq TO 19 DO IF nn=12 THEN nn=13 ELSE X} nn=12 FI Plot0(lc,22,nn) time=0 DO UNTIL time=10 OD Plot0(lY}c,22,0) OD Plot0(19,22,11) FI OD FOR lp=0 TO 3 DO Plot0(19,22-lp,11) time=0 DO UNTIL tiZ}me=10 OD OD BaseExplode()RETURNPROC EndPrint();print the end of game message and;test for new gameBYTE trig=644[},lp Position(10,7) Print("Game Over...Final Score:") Position(15,8) PrintC(Score) Position(15,9) Print("FINAL LEV\}EL :") PrintB(Level) Position(10,20) Print("Press to play again") DO UNTIL trig=0 OD DownL=0 DownR=0 ]} Put(125) FOR lp=0 TO 19 DO Ll(lp)=0 Rr(lp)=0 OD Score=0 Level=1 DrawBase() Update() Hard=15RETURNPR^}OC GameOverTwo();game over when four troopers downBYTE lp SndRst() ClearScreen() Loud=0 Loud1=0 Freq=169 FOR lp_}=0 TO 19 DO IF Ll(lp)=1 THEN Plot0(lp,22,11) FI IF Rr(lp)=1 THEN Plot0(lp+21,22,11) FI OD IF `}DownL=4 THEN EndLeft() ELSE EndRight() FI EndPrint()RETURNPROC GameOverOne();game over when trooper lands oa}n baseBYTE lp SndRst() ClearScreen() Loud=0 Loud1=0 Freq=169 FOR lp=0 TO 19 DO IF Ll(lp)=1 THEN Plot0(b}lp,22,11) FI IF Rr(lp)=1 THEN Plot0(lp+21,22,11) FI OD BaseExplode() EndPrint()RETURNPROC TrooperDc}own(BYTE wh);redraw trooper wh at bottom of screenBYTE cc TrStatus(wh)=0 cc=Trx(wh) Plot0(Trx(wh),Try(wh),0) ;erase cd}hute Plot0(Trx(wh),Try(wh)+1,11) ;replace IF Trx(wh)<20 AND Ll(cc)=0 THEN Ll(cc)=1 DownL==+1 ELSEIF Trx(wh)>20 e}AND Rr(cc-21)=0 THEN Rr(cc-21)=1 DownR==+1 ELSEIF Trx(wh)=20 THEN GameOverOne() FI IF DownL=4 OR Df}ownR=4 THEN GameOverTwo() FIRETURNPROC TrooperFall();make trooper fall when chute hitBYTE lp,qq,cc FOR lp=0 TO 2g}9 DO IF TrStatus(lp)=2 THEN Plot0(Trx(lp),Try(lp)+1,0) Try(lp)==+1 If Try(lp)=21 THEN cc=Trx(lph}) IF Trx(lp)<20 AND Ll(cc)=1 THEN DownL==-1 Ll(cc)=0 ELSEIF Trx(lp)>20 AND i} Rr(cc-21)=1 THEN Rr(cc-21)=0 DownR==-1 FI FI IF (Try(lp)<22 AND Trx(lp)<>20) j} OR (Try(lp)<20 AND Trx(lp)=20) THEN Plot0(Trx(lp),Try(lp)+1,10) ELSE TrStatus(lp)=0 k}FI FI ODRETURNPROC MoveTroopers();move paratroopers down screenBYTE lp,qqBYTE ARRAY Trooper(0)= [60 126 255 l}255 195 66 36 24 60 36 24 255 60 24 36 102 0 0 0 0 0 0 0 0] FOR lp=0 TO Indx DO Charm}set(56+lp)=0 OD MoveBlock(Charset+56+Indx+1, Trooper,16) Indx==+1 IF Indx<8 THEN RETURN FI Indx=0n} FOR lp=0 TO 29 DO IF TrStatus(lp)=1 THEN Plot0(Trx(lp),Try(lp),0) Try(lp)==+1 IF Try(lp)=21 THEN o} TrooperDown(lp) FI FI IF TrStatus(lp)=3 THEN TrStatus(lp)=0 Plot0(Trx(lp),Try(lp)+1,0) FIp} OD MoveBlock(Charset+56,Trooper,24) FOR lp=0 TO 29 DO IF TrStatus(lp)=1 THEN Plot0(Trx(lp),Try(lp),7) Pq}lot0(Trx(lp),Try(lp)+1,8) Plot0(Trx(lp),Try(lp)+2,9) FI ODRETURNPROC NewLevel();go to higher levelBYTE lp,tir}me=20 Level==+1 IF Level>100 THEN Level=100 FI SndRst() Loud=0 Loud1=0 Freq=169 Comp==+300 FOR lp=10 TOs} 150 STEP 10 DO Sound(0,lp,10,4) Sound(1,lp+10,10,4) time=0 DO UNTIL time=2 OD OD Position(25,2t}3) PrintB(Level) IF Level>8 THEN Hard=19 FI SndRst()RETURNPROC Main()BYTE time=20,lp,ch=764 Title() Gr0Inu}it() Snd1=0 Snd2=3 Download() Modify() DrawBase() ScoreLine() DO LaunchChopper() MoveChopper() Movev}Explosions() Noise() TrooperFall() MoveTroopers() Position(8,23) PrintC(Score) IF Score>Comp THEN w} NewLevel() FI time=0 FOR lp=2 TO 6 STEP 2 DO AimGun() Shoot() MoveShots() DO Ux}NTIL time=lp OD OD ODRETURN OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO6-%AV$+&@,T(@\mʏD"#143"$CDCDCEDC3|ʏd3""#C4""#CDCD343#2lʏܽR"""#"43"!#DDDDCDC23z}lʏ۽2"""""C""!D44DC4CC2|ʏܽB"""""C2"""DD4DDDCD3mʏۭC"""""42"$3DCC4C##{}mʏ˽S"""""DB"""$DDDDDC33}ʏۭC2""""D""!"CD3CDC2#}ˏܭ3""""#S"2!""CDDDDC4D蝭ڏ|}ܽd5"""""c""!CD424C33؎ˏܮb&2""$S"!""DDDDDD33؎ʏ̭B'3"#"42""34C443C"؎̭̏B}}7C"""%2"""!#4DDDD32מۏܭ2VD"323""!!"3C4D32"؞ۏˮ3wR#"#2"""!4DDC3C2Ȟˏ̭%C$C4~}3""!!!DD4DC"2Ȟˏ̮7S%C432"""""DDDD3C3Ȯʏˮu8TFeTC"!!""CDD3222Ǟʏ˝FIVffUT3"""}!""DDDDC22֞ˏˮVHgwvUd2"!"C44D#2"ȭʏ̮UHeTC3""""DDD4D#3ǭڏ˭UHeUB""D4}C2C""ƽۏ̭TYfUS"""""D4D4C3"ǽʏ˝dIɻvUD""!""$43CB3"ͭʏtJ˘vUDC"""!4D44C3"}ͮʏ˭JʨvTS""!!"$C432""ʟ˞dK˙eDB1""$44DDC"έʟuKʨeC2"!!"#D433""}έʟK˨uTB"!#3D34B2ͮʟˮ\˹uT3"""#$323"2ޭ۟˾l˪TD3"!44343"}έʏʾm˪vD32!#33"2""ݭʟʿ}˩TC3"""CC33#!ɟʾ˪vD32!"232"""ɯ}˪vTC#""""332""!ɯ˺vTC""!""233""!ɟ˪vTDB"!"!4C23""ɿ}̹fdC2"!!232"""ϩ̺vTD2""3D33""g˺vTC2"!""3C3""!ϩg̺}UD3"""3C3"3!ϩi˺vdC2""""#2"""ϩ[ʘvTD3"""3C#"2!ϙl˻dD"!}!#2"""ߩ]ʩUDC"""32#22n˪TC#"""22""!n˩UD3"""3}2"2"˪U4C"!""""!ʏ̩eDC""""2""!ߪ˩weC3"!"""!}犯˩UD32""!##""!!ˬﺯ˩fTC3""!"#2"!ʚ﹯˨fU32"""4#"!ܩ}˻e32"!!""""!!۩奔˺d2"23!"!$#2!"ʨfںt3"""!"""""e}˹Ȩw3"B2""!!#"2!dggj#"R!"!!!#2"TUxeK$"""!!$B!S}t&efttgI#"B"!#2"vSf5DTRUJ"#2"""#2!!fSy2"CCRS8r"""!"!""2!wfC2"}2#BQFq""""""#2!!veCB"24SRH"""""!!""!feSyB"B%3RH#"""2"!$2!eURB# B%fB}I""""""""""eUSzB#C&VBHr2"4C2"!2eDCzB3C&HRGd"!"3"""!#"dDB{2#he&hB5T""3}4""2TDCy23Xu%B&T""$43""""TCBB3Ff&B6T""44B"2!!TCBi̻R4Ff6CwD""#CB""}#"DCBh̼rEwf6CfT2"4DB"!!!!DC2i̻|cFUEDET""$DB"#"DCBh̻RFfET#T2"4DB"!!#!!!}D3Bx̻|sFUWS3T2"$32"""""D32h˺ 7E[R"D3"4DC"#!!!C32h˺FF\TCEB#4CB"""!33"}h ˺FFlT"E2%DDC""!1!!433g̻FFnT$U"3DC2""""!4C#X̻VWT3#24DTC##!232#X}̻̻uXT3D#4TC2"$"2""D3#F̼vjTDT4EUD3#$!2!!C2#Fۭw~TDDDUTC2"$""!"32#F}ܼTDUUeeD3"$!"!!32#FUDVffTD22#"!3##FeEVfeUDC#D"!!!!3#"E}UEfvvUC343"!"!!32"FfVwwvUD3DD""!"!32"EfUwwvUD33D"!!3""E}fUvUDD4S"!"3""4y̺gfweCB4B""""32#4yʯXfxfeCC4B!!!"2""4i̺Egx}vdD34B"""!3!"4hʟFfxfUTCDB!!!!"""$hܺGVwfeC4D2"!""$hʮEWfUT3D}"""""#VʫDWwfeC23""""!"#FʫDEyeUD3"""!""#F˪SEhweeD2"""""}!!""E˩cEhgeUD3""#"#2!"""Ey˩eDWgeTC#""#"""!"4h˩eDFfeUCCB32#"""!"}"4h˩eTUefUC3""#23!"""4h˩DVUeUDC""44322"!"""4W˩︅DEEfTC#""23"2"!""""4W}ʜɖUUEeUD32#44C2"!!!"""#Gʫ˖UUEeDC"1"34C2""""""#FݻUUEUEC$2"D3CB"1!""2""F}ʻ캇feUTDC"2"233""!"22#"6̺˩UvUUTC$""433#"!##33"5i̪uefTUTB#2"DC""""#23#"5i}˫UUVdUU3#2$DD42"#"2342$iʫCCFeTDB3"$d4"""!#23#2"hʻDD5UTDC3"7vD322!!2#3D"#hݪ}dDEfTD2""7vT3""!343DB"H쪼fTUeTS232XwfD3#"3334B3&ܫƆUVfDS2"3xxD2""4CCD4#& ۬UV}eTTB3$xvdC""!334D4C$ڬʻeVeTC2#&wwvT""#CD4C3hʫeVeTS246xggeC"!"#3D43"XegeDC"#}7wwgd"!B"33DDDF˻UfUTC3#5gxuD"#344DD6ڻVfgfDB#"&wwwt""#44DD4YʻfffeDB32$xx}wwfC"3DD3CGʬ̖evgUCB#25wwwd"3DDDDEʭfvfeDB3B5xwwxvffB#DDDD4ʾfwfeD2"2$wf}#DDDDDi vfuUC33C3wvwf34DDDDH ͚wwffTD3#"#wf#DDD4EܚxffeC33"#wf}BDDDDD۪xffdB3#"#wvbDDTDDi xfUU43CC#wxwfDDDDTG٬vxeeS2#B#"xwf"DE}TEEvxܨfeT3CC##wgf2DDDDDHɨfxܘveD34B2#xxwvDC#DTEDUͪfxۘvUD4D4##Wwxwf4BCDEEDDo}hhܻvUD3D32"6xwfϞ$B24DDDD^̾efxz몘vUD4D4"35gvf3B"4DDTTO͘eVxꪘudD4T3"2$wve%""C3DDTO̖f}GꩈfTDED4"#%xxgfeڻT=""D4DDDOږfGw똈fD3DD32#$XxvTڬ3O"#DB4EDNfWz옇fUDUDD2#C(wgfS3"#DD#DEOfff|}wvD4UD322B&xwfBE"$DDCDDNܸvvfۘffTETTD"2R"xvfeB̲H"#3333D]ͦfffۨveDVDDB3#""xvffe!RN"C#3$#D^͗fwwfUETU}DC432#gffe#"O2CDC$BDL͈ffjܨvVvUUDC3$""Gvfvc3$CTCDD4LfwflݷVeVUD344""&vffc$#4BDCDCDLfff{ܹgudfdD33$"}"'ffeR$(4CDDED4LfgfۺfffTD24##"&ffeR4d.44CEED3)fgvɻ˩wfDC###""&fVdBET?R$CDUDB8vwzʝލweUC3C2##&ffU}BDTtC4UDDD6ffk͎]wfETC2#2#"%VET"DTτU4UDTEDYfef|]ggvUTC33B3"DVFT$DWtUeEDCFFff|MeCC222#"EUDCDdO}ֿyTDDCEEgg ::bcc v S16NFREQBOTOCTAVPITCSFRELOWOCWAIOCATAVVOJMBYTHOLPICOCTAAVLOWCO888AP @}@@@A@ @ B) @@@2@B)} SIXTEEN-BIT SOUND DEMOBY JERRY WHITE (C) 1985. ANTIC PUBLISHINGd#nh+@%@ (@}>(@ 16-BIT SOUNDI(@h(@ BY JERRY WHITEx&;@V,&HOLDS ML SUBROUTINE--@}@V")67<,.>:,- 7%27B7hA L#;@$,9@<@,B6.}B A#A G#G F#F E D#D C#C L A DISPLAY SUBROUTINEK-@@A(@ OCTAVES: &%@}K A.-@@.(@OCTAVE: 1-@@1(@PITCH:  Q6-$@&@}+-@@ N(@NOTE: 7<%@,Q$CREATE FREQUENCY ARRAY= -@@6@=-}@@6@"68<,-  '6-6-@'6-@MAIN SOUND LOOPS7-@}6@7-@@6@90@! A-6-@9A@'(6-?:C:,<8<,<},' A"))6-?:C:,<8<,<<8%@<,<,,(A 66-F:A@, A@ AJ   T*}(6-@ 6-@* A`^6-@@ @+-@6(@rI6-@6-@'6-}@36-@?6-@I A0|16-@6-@'6-1 A0=6-@6-@'6-@}36-= A0=6-@6-@'6-@36-= A016-@6-@'6-@}1 A016-@6-@'6-@21 A016-@6-@'6-@1 A016-@}6-@2'6-1 A0 +TIME DELAYA@F:A@,A$SUBROUTINE} TO CONTROLTWO 16-BIT SOUNDS5A@56-?:C:,<8<,<<8%@<,<,F:A@,A@&556-?:C:,}<8<,<<8%@<,<,0 A NDATA FOR M-L SUBROUTINE*N44104,201,2,240,33,201,4,240,12,170,224,}0,240,414N99202,104,104,240,247,208,245,104,141,2,210,104,141,0>N55210,104,104,41,15,9,160,141,3,210,104,141,6,210HN441}04,141,4,210,104,104,41,15,9,160,141,7,210,960u FREQUENCIES FOR FREQ ARRAY:uMM27357,25821,24372,23003,21712,20493,19342,}18256,17231,16264,15351,14489DuGG13675,12907,12182,11498,10852,10243,9668,9125,8612,8128,7626,7241NuAA6834,6450,6088,5746},5423,5118,4830,4559,4303,4061,3832,3617XuAA3414,3222,3040,2869,2708,2555,2412,2276,2148,2027,1913,1805bu??1703,1607,1517},1431,1350,1274,1202,1134,1070,1010,953,899lu55848,800,755,712,672,634,598,564,532,501,473,446vu55421,397,374,353,332,313},295,278,262,247,233,219u @ D:SOUND.BASh! )h}@F&&(ҠŠƠҠɠźP6-Hc{``LqA c``n%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% }%%%S6-G+!@d* @,)"@F)+!@G* @X,S6-@D -(>:,,67B:,%@ (B  :.:&7+;.>/?-=-=&6&6&6&6'7'7'7'7}&7)=%:)9.?/?-=-=&6&6&6&6'7'7'7'7mnvg{yUon~ykﾝnyڶy^}UZkہnfgw{ymnfvgwy~W[{穯_绛֟nZ{mzVjoۅnfw{y}ۄmnvw{y_տo^oۛ륿^jmmjkmnfw{{yۉmnfv}gwy^~UjֻZ廿jyWUZomvfwgyہmfnvgw~_Zkmٹ}mm֫ڙ~nݭU{UZZmff{g{ymvnfwfwyyU홞w{kݟ[_ۻy~Z}ommvfwgwymmnnww{y~~[շ姻Vwֶykۭ֭mfgwy}ymv۹mvfggyyz_Vۻy_[v[ykm_Zֽkmvvfwg{wy۟mnfffw}z駗WkۛyZmn]fnUV[mmvwwgyymnvnwwyy~UZmڗY{}j۪yֶ_o[m۶vnf{gywyymnfngwy_Uvw~ժfj[_uZUo}mnnww{wymmvmvv{w{_WVkZ^ڪwۯZֶm۶ݶvff{wyy}mnvfwwwyyjvy^{ffmZoy~UVkm۶nٶݷwywgymۓmnnf}y_mw篩_ywwn[_U֘mٷnffwwyyەmvvww޹瞹y~Zmfw}mV^gmU~_Ukm۷nvwg{y{ymvmnfngyg_nUyv[Wyf۫ݞUj}ەmٷnwwyymmnvv{{gyۛW^gyUZֽZmvnݻfw{wygyy}mmmnf{枙yz~饪ko[y~UZVokm۷fݻfwy{ymmmfnnfݻfy}z_Ujgݷm۵kտyw[jkmݪۻwnwywyymmnvwfݹwy_W[^޻f۶mֽj~}yv闥UZmvfٷgwgyyymmvvfݻwz~_Yvm[֪U_zwnVmmvf}wgwwywynnmnfݻfyUj{fݶoZU^ygWUVֽ[۪ٻwwy{yymnm}nٷnݙ{wyy^~wmfZkU~ynwZmmmnݙ{f{yymvfvݷnٻfw~_U}j{mkU~_wyfUk[nvݻw{{gymfmmnvݻvݙ^_{ւTUn}Zm[mٙfwyyyymݶٶݶf홻gfwyy_UW{փTVUn^Ukmmnvfݹwgww}ynmmn۶훷fݝyyvmۅZ饗ywgZom۶nwݹg{yyymݶٶݷmvnٻwg}wyy_~vfmې@p姟ygݙjkmkmnfݙ{gyggymmmn۶mٷf݇gyyݛm۶m[}(W~駟zywݻWkm۶mvwgy{yyym۶۶ݷm۶nݛw{矞~fm۶o_^y瞝yޙZm}m۷mݙ{ygwmmmm۶m۷fnݛgyy^ywm۵[[Z ~zyyw[mvnvwgyyyyv۶}m۶nݛw{^fݻm۶m۵oֽk_^^y޻fommޝ{ywyy۶m۶۷f݆f{wy^f۶۶oo֯}֭@ %) ~~yy٭ڶvݶnw{g枹gymn۶mmٛwyzݷmm۽۵k@ )% ]_zzwo}mnޙ{޹yyy۶۶nݻvnٙw{wݶ۶mmokZZ? U^~yywۉ۷nfywޙ{ymmf}fۻvfw{y{fmmk[ڽ֯֫* U]~zyy癶ۆvvfޝwwyymm۶m۶nf{m۶mۭk}ZUeeU~^yyymvmvfwywyyyٶm۶mٻfnfwggmmm[kZjUeU~y}y^mnnfwgޝyy瞶mm۷fmٛgyw{mm[[ZVUUieU__^^yۇnwޞygyy۶ٶ}nݛfmݞnww޹{wvm[[ZZVUYeeU_^^yy۠vwgwy{g瞙{wy۶m۶mۻvfvww枝nmo}kZkVUYeU_z^yy^fnݷwgޝyym۶m۶nwgޞmm[oZZUjUYieU~zy}{uffwywyym۶m۷nm݋nww޹wfۓmkZkVjUVZYZVU~zyٛvwg{yywyym۶m}ۻff{wmokZkVj]UVYVU~_~y۷nwޞ{y瞶m۶fmۛf杶ە[mko}ZjUVUu]z~yunw{ygy۶mۛvnmnfwfgޝmkoZkVjUy~y^fg}w玞yy۶m۷vfvngۋ[omZkVZjUV UVYe Uwfgymmۊffw}ہkoZjUV UVZiUyz^^ݻg{yym۷mًnv[omԂVZjUe}UVh@JUUՃUmۻvfڃ[khlUeUZUUՕmہnwm} ZUZ U۷mnvffֆ H`PXZj@hVUVh)UmfvuiU "Um}ۂvڂU) "Ummvf U% Umfok[U }Umvn U V  Uۊnmok[ځU Uہn[k VU}  Umvnok[ *VU  Ummvmo[kZ=  ]UV!Unֶk[ok }VUV#Umk[kֵkZ=/*  +*ZU  Umۅmfֵۤo[kZj  5?V}j  U۰mnok[ZZZUZUVUZ hV Ufvmkok[ZZZUZ}UU& Z Umnڵk֝[՟[V՝ZݟZV՟VߛZUߟUߚ ~^z]ngWYۦmo[ֵ[՝[Z֝Z՟[}V՟ZݟZUߚVUU 駟~ye_{y^ۨo[ֽoZֽZֽZֽZZZZUZUjU/*%/*)%/*%/*%'}~~umnkkkkVkVjVVUUU*%/*%/*%/.*%/.*__z^gymkڵ[ֽ}ZkVjZտVjUjUVUUUUUW_WW~_~~_zyֽoZkkֽZսkVjVZVU}jUUUUWUUW_W~_^~mnoZkֽZkֽZjտVZտUZUUUUUUWU_}W_~_~^gy[ֽkZսkZjVZjUVjUUUUUU_U_W_~_~_zu}kֽkֽZZjսkVVZjUUVUUUUWUU__W__~~^m[ֽkֽkZZտjֽVZZ}տjUUVjUUUUWUU_WW~__~~wyֽkֽkֽZZZZZZZտjտjUUUUUUU }UU______~~~kֽkֽkZZZZZZjտjտUUUUUUUUU______ }_~~ggggggggggggggggggggggggg(@*(@(@*(@(@(@(%`'s9(c)1986 Dynamic Computer Services Programed by Joe Lesko  B JKIH }iDiELV`LR` R` BLV`L``l L` &` Fj`8冨凪 }` `EӅӥ ``ʆǪƩ Ɛee` `ƦʆǢ &Ɛeǐ a aL` }`'&&&8儨児祂*L`&&*ń8&&L` pa`hihiHHȱȱ}L`c !#3`L`JJJJ`H `h`Hȩh `Lb `Lb :`Lb} B`Lb H`H8`HhHh tbLb BHI V䅠Lb Lb R`LbԆ }ؠPIPP` bP B`Lb cLb bLc cLbH- b8塪墨hLc 4cLb ;cL}b bȹP`텠8堨塪 b芨Oȩ-`PP bP棩 Ѥģ0-}ģ6000:,80H & &ehe&eģ0ʥ 8堅塅`$ b&*i0:0i bƦ`}¢ 护°ڱ%ȱ%E bLud担CS gbLudI 4cLudH /dLud cLud &}B V bNLMȑ` MLN%B VLbS:eE:eH ab e e *b abh)0IeeL*b[\ZUV}T` Ueee` \eLb OeLb UeLb) ` \eLb ;a` 0d `}ҥ `2)2ҩ`p`0)9f`@0)ӈJJJJ)`Ѕ`ȱ`}` Jfȥ`HhƣĢ`ƥĤ`Ѣ f`ȱѢ}Ħ`膡``ťƤe8夰Lf Ƥ8`ŦeѠ}e桊Lf(s `g `g(`g(`g }Lggg`g`ggLgg abgLg ``Lh_g bgg)g_gL'hg)_gg b bg`LCh a6}h 6hȄQۅڅHH栥ۅڅee ܐeޅܥe߅ݐ hhƠ`hu}ܐƠ`8墅壅eeeeمե؅ԠԥѮD8eڅeۅ*Ќ}ūŪ԰襤ۅեڅԠԦġн8) BHIJ}KED V䌚i`Hh`h iHI`H h`hLiLj bL0j Status Filenamej TbLMj } ------ --------j: Tb`LejVjUjLujD :*.*jng fUjg abg *b dgo!} i`j_j abgug fg bLkThe Current Directory is j gbg TbL2kSort This Directory (Y/N)? k"} gb gajajIY ajINLjajINLk bLk!Use the CWD command of Sparta Doskb TbLk$To change to the directory you want#}.k TbLk Press any keyk gb gaj` abg *b d ag`g i`j_j ab`giWjagi$}Xj`j\j_j[j\j[j pa[j\j\j[j ;a[j\j.[j\jLqaj j^j]j8[j.l\jll]jl^j%}LamWjm]jXjm^jii gp f ogajWjm]jYjXjm^jZjYjZj Lm bL(m %U %S%E&}YjZjgom Xd]ji]j^ji^jLl bLmTotal files on disk is mg gbaj c bVjIYLn^j]j8[j'}.m\jmm]jm^jLnWjm]jXjm^jii gp fWjm]jXjm^jiigx(} fWjm]jXjm^ji igp fWjm]jXjm^jii gp f og]ji]j^ji^jL)}m8[j\jXjWj  @haj b baj j^j]j8[j. o\jo o]jo^jL]pVjIYLoWj*}m]jXjm^jii gp fWjm]jXjm^jiigs fWjm]jXjm^jii+}gp fWjm]jXjm^jii gp f ogajWjm]jYjXjm^jZjYjZj Lp bL$p ,} %U %S%EYjZjgop Xd]ji]j^ji^jLn bL{pTotal files on disk is pc gbaj c bLpWrite-} this Back to the Disk ? p gb gajajIY ajINLpajIYLq abg *b d\j[jag`g i.} ab`Lq !e`g`gg`g`qqLSqq abqL=q_g abL_qK:q\_g *b :fILLq i= i/}qq TfLq b bLq!Need Sparta Dos To Use this File.q TbLqPress any key q gb gq `} b b bL-r$0}r TbL\r$r7 Tb b bL}rType '0' to Exitrl Tb bL1}rEnter Drive Number> r gb gqq0Lrq9Lr bqI0LrL#sLr!Alphabetize by Extentions First? r gb g2}qqIY qINLrqq bjLq ```q4444444444444444444444444444444444444444444444444444444444444444444444444444;Au9:ZB+Y+HHHTXYXYXYXYAAAALXYXY4} 5} !"#塒6}򸵒紲 @0# AVF:A,%@#$_ AF:A,&@*+@4 @ F-@7}@ _(@ PLEASE WAIT($$6-+F:A,%@,$AV2.-A*%F:BsD%,. <A3-%8}@$@%@$@ %@7"=A FHH0,8,20,34,73,34,20,8,0,0,8,20,42,20,8,0,24,60,106,126,102,60,24,69}0P@@24,60,86,126,102,60,24,102,255,219,165,219,219,165,219,255Z,,136,33,0,148,1,72,2,16,8,8,8,8,8,8,8,8d6-@:}6-@nL(@}$-@@:(@level:LAApx-%(@ ;}9-@@[(@>:@9,>:Ag,_ u(@>:@9,-@(@ -@<}@9(@>:@9,>:Ag,= S(@>:@9,e-@#u(@ -@@=}}%(@>:Ag,>:@9,) ?(@>:Ag,[-@#@g-@}(@>:@9,>}}-@%(@>:Ag,9-@%@O(@>:Ag,c-@%@y(@>:@9,} ?}O-@@((@space:-@ @O(@cavernsw-@@P)A;A@}ApE A0WAA0iAs A0w  A-@@0(@ higA}h scores:B-@@O(@a-@@n(@-@@(@w-@@PB})A;AApE A0WAA0iAs A0w  A A`C} F:B2y,"@A0 T:,"A0F:B2y,@$)6-%@!@)6-@D}"-@@"(@ F:B2y,@A"$,E-@@#-@A(@E} E 6E-@@#-@A(@ E @$J +@ @ T=6F}-6-@'6-36-= A0^6-R:,h:F:B2y,@$6-06-: AG}0r%%2A@@|S"@*!!6-&@/-%@>(@ D-S(@$H}["@* @ &)6-%@7-&@F(@ L-[(@$@wG"@I}* @&)6-%@7-&@G(@ $|!A*"%6-@36-%@E-@@!J}^(@ eta hpr-A | A@?"@*!@%)6-&@/-?(@$ K}!A@ T:,"A`e -(@>:Af,%-4(@&:-P(@>:AL}f,V-e(@&++!@*"@*"@A 7!@!-@@7(@>:Af,M}%%2A @@++!@*"@*"@A 0!@!-@@0(@N}%U!* @&*"-6-%@;-&@U(@ >:Ae,K!* @&*"-6-%O}@;-&@K(@ %U!* @&*"-6-%@;-&@U(@ >:Ae,&P}K!* @&*"-6-%@;-&@K(@ %0M *!@%*"-6-&@3-MQ}(@>:Ae, : -(@#DC *!@%*"-6-&@3-C(@% NM *R}!@%*"-6-&@3-M(@>:Ae, X%%2bC *!@%S}*"-6-&@3-C(@% l^ *!*"%6-&@3-%@B(@ H-^(@T}>:Ae,vW *!*"%6-&@3-%@B(@ H-W(@%^ *!*"U}%6-&@3-%@B(@ H-^(@>:Ae,W *!*"%6-&@3-%@B(V}@ H-W(@%f!* @ &*"-6-%@;-&@J(@ P-f(@W}>:Ae,_!* @&*"-6-%@;-&@J(@ P-_(@%f!* @&X}*"-6-%@;-&@J(@ P-f(@>:Ae,_!* @&*"-6-%@Y};-&@J(@ P-_(@%%%2@7-"@*"@*"@*Z}"@7 AP--"*")"*")"*")"*"A A-@327 A A[}Pz%2A@@A2@@E W-@@!p(@ z A0\}AA0.-@&@.(@ roomo--&(@:-@@]}g2H:,$@P@@k o  "-&@6@(-8(@# L-@@^}y2H:,$@P@@}  =%29-@=  l_}-@##-D(@ h2$@@@l *)6-%@!`}A)6-@4[6-%+$A%$@P,1-@@[(@ : $A%$@P>"@a}APH5"$@6-%@+6-5 AR++"A)"A)"AA\6-%@ffb}-@@-(@level : ?-@@Z(@ room : f6-p#A#A%c}@2zS -@6?P=-AA6@S2@   G%6-P:H:,$@d},%@G6-P:H:,$@,%@c6-%@6-%6-%@36-@ &A6-@ &O6-@&e}]6-@&c6-36-6-'6-36--@@/(@ :(@f}L-@@h(@ z-@@(@ 5-@@"5(@g}score: MEN:u-&@1-@%@&7-M(@>:Ag,[-@ &q(@q}BuSNKATK XMOB?ySONNY XMOBSOUN16 XMOBSOUND XMOB8SPACED XMOB( SPALP XMOBX3SPCCAV XMOB5SPCESH XMOB SPDDOC XMOBSPDROM XMOBSPDSKY XMOBASPEEDE XMOB;SPIRIT XMOB>SPOCK1 XMOBSSPOCK2 XMOBfSPSKI1 XMOBSQRPRO XMOBSSBMID XMOB"START XMO>:Ag,u c-@ &!-%@7(@>:@9,E-@&[(@>:@9,_ c $r}6-&@ 6-6-6-6-h -A@6@HA@d&++&@,'@,d2s}@@ h =-@@=2@ $@%@)6-&@ )6-t})6-%@!@)6-@)6-&@ )6-$)6-%@!@#)6-@#.B u}-(@(--(@(3-B(@(8B -(@(--(@(3-B(@v}(BB -(@(--(@(3-B(@(LA@d&V) )2w}`-@A jH-@##-D(@ H t"Ax}P~ Ap AP""@6-6@"6-)"@6-@)6-@ &*"@6-6@y}*6-@%)"@6-@)6-@&!!"@)"@A0!!"@)"@A@z}A-@327 A APH%2@@@/-5-D(@{}H & --"(@ & l"6@**"&6-%@PH2@@P@@T|}6-@`6-@#l6-@l"6@**"&6-%AH2@A@@T6-@`6-@}}#l6-@l"6@**"&6-%APH2@AP@@T6-@`6-@#l6-@~}l"6@**"&6-%AH2@A@@T6-@`6-@#l6-@ u!"@*}* @ *"/6-%@PQ2@@P@@]6-@i6-@#u6-@u!"@** @ }*"/6-%AQ2@A@@]6-@i6-@#u6-@u!"@** @ *"}/6-%APQ2@AP@@]6-@i6-@#u6-@(u!"@** @ *"/6-%}AQ2@A@@]6-@i6-@#u6-@2?-@@"5(@score: ME}N:? A`<H%2@@@/-5-D(@H F& --"(@ & }Pl"6@*"*&6-%@PH2@@P@@T6-@`6-@#l6-@Zl"6@*}"*&6-%AH2@A@@T6-@`6-@#l6-@dl"6@*"*&6-%AP}H2@AP@@T6-@`6-@#l6-@nl"6@*"*&6-%AH2@A}@@T6-@`6-@#l6-@xk"@*"*%6-%@PG2@@P@@}S6-@_6-@#k6-@k"@*"*%6-%AG2@A@@S6-@_6}-@#k6-@k"@*"*%6-%APG2@AP@@S6-@_6-@#k6-@}k"@*"*%6-%AG2@A@@S6-@_6-@#k6-@ A`}% !6-6-6-% A !6-6- A !6-,-@@,(@ GAME OVER}%-@A % A6-A%$@`;2M-@@#f(@} bonus z-@~ 6-6-@6-@6-6-6-@AAp'-@};-@@ ](@>:Ag,>:@9,a l(@-@@Z$(@ ' } D(@ 'H Z-@@ =-@@ 9(@>:Ag,>:@9,= s}6-&@#-@@!4(@ K(@score :W"]6-i6-@s A{ "*"/}2@@@76-%Y6-P:H:,$@,%@{6-P:H:,$@,%@b -(@}#-4(@>:Af,X2'@@@b APD2:SPACECAV.BASgggggggggggggggggggg}ggggg `67A(,.>:AU,FQQ67A),.>`RɥPee`/(  Lꪺjkjnzꍵ꯫ 﫯ꮪ^o{n} P麗jjfkVzvg뮿}jznZnugZZZךZv﫿 WnkUz_jv麿ꪯ} [@njooVj몿 V[}jgofgkkj{gU꺻 jjUijZjֿ꾻}  ETUjjfku[kzk nUfUQU@}ZUk絛eeUEUfo۪֮ꮺ}UPU  iYeUQUڿj֫foE  iUVUUP}ꧮi~Y类`@P@  ZU@ޫkiih`P@}PTY f^뾪]~Uk@P@鮪娠 [ZUj}_n٫eZ驪ĕA@@ VUEj߯eP@DP }feQAi eUAjin橙Q@D@@AeUA@] feaA@}jեTA@P@ejU}jPt UUTꧺnviՕUADQQj}UiU@p믿 ՁjVUꪺWEUQU@Q UUU^UQA@EYUQA}ꪫUQUTA@@jiU`TjUYeUA@DAUUjQA@UTPUP@ WfZmg}@ XYߪYDUU@ VfYjYQ YfVY}뽪UT i~Zo曾꾪ZYFEV DfU隟TAUT f[kny[隯} ֕YU껪UVUQKf꺫jꯛYVE Xm UVY~맪}UkUkڻکTTn^@ VEY[UVUTUU~U}EVF@ ZUnU Un zkT@ UUiZUEU}EAVU ITD zUjUa@QEfU Y `D}jjZ UVUUVZjV ￫jVEB{UY UUVUZfjYeZV}XUUUVUYZjkyfQ@A@@Uj UYZjZj}֕fVAAFV@@?Tej^ UeUiZkޙFHEUTP@ZAUZn}UZeeneeEDh@UUjkeUYUTUTEjzUQT}PyQ@UuUV UQ QPEU@eaYUjZUEW[Z@@PU}iZmTVZU jUP[UPPTZkeWVP@ VAYVV﮿V}UU @U jZ٧d`E@U` eUUj@ U xiVUP$`D`@}o U@UZUAU @UT몶bwd)AAT efnZUU T}af٦ZU٩ETD@ eUEUUETߚeꢶTv@QUQ@A[ } j{efeUDydUUaR uUekieUQQ}PDVmiYXFU)@AEdeP WkTVjiYUPEeQ@jiVi)Ee@@ie`P}odY`ﮯjZYUAQeUYUDAeUى@%UPAUTPfZUVf믮껯ZYVU}VUUVUU`dUIQHQUT@+ YY$@jfeUZV UPTT@ /} Vꪾ篪j[VUji UEUPTUP oVUU﮻﮾Zk[VUEPP}@ oVh"P@@랪kk[VUE@T VPP@@}oZUUZkoYVUo 껿ZjojefUF_} ZVUP@fUVo A꿪jZV}Ujfږk﫿nkﯺ￫ nUZ}kn jEj請} UeZeUﯿ jVZVU諸 }ꪯꪮ jYUUU 꺯 UjjUU}꿪 ﯾ UZfVUEﮪ  UVVUI}꺿 UVYU뭾껺}  ^UiUUUfZ UYUUU}꫿ߪjn뺯UUVUz꿥z^֪몾} ꮯi^VUeeޮff}ުeYUZUUkZf櫿껺믪ZYfUi}jꫯkZefUUUڮwfꦙꦛ}YViUQP橫UUyﹾꮯ}UiEUjfUTPꯪj֥efmծꮺꇪ꺾ꪮꪮn@PP}jjZښujjvj꺪YE@PP`MMMMMMMMMMMMMMMMMMMMMMM}MMMMMMMMMMMMMMMMMMMMMMMMMMMM@,$@$%+"@,$@&5 6-%+2@@@5 A @2@ HISPDROM.XMO This file is an overlay for the 800XL OS that will!} enable ICD modified 1050's to run at high speed without SpartaDOS. You need to load the XL OS from addres!}s $C000 to $DFFF into memory at $4000. Overlay this with HISPDROM to create the modified file. The area i!}n the OS from $E000 to $FFF is not altered and can be used as is. Burn an EPROM with the new OS and plug !}it in - you now have high speed I/O any time you go to a modified drive. ***** I used locations $24A-$24!}D as flags. If this causes a problem on any of your favorite programs, it can be moved. I used a Pr!}oBurner ( Thompson Electronics -- GREAT!! ) to produce my EPROM: a. Move 800XL OS $C000-$DFFF into $40!}00-$5FFF. b. Go to DOS. c. Load HISPDROM from D: - this will overlay parts of $4000-$5FFF!}. d. Burn EPROM from $4000 at $0000 to $1FFF in chip. e. Move 800XL OS $E000-$FFFF into $4000-$5FFF!}. f. Burn EPROM from $4000 at $2000 to $3FFF in chip. Other types of programmers should require si!}milar steps. BOB WOOLLEY [DAD] [75126.3446]MMMMMMMMMMMMMMMMMM!}MMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMM%<%,4  6-@,6-@,B:,!% 7%<%,4aj,6-@ ,7%< !CC[I]I LL1LqJ(J 4άJ(ҩmi:; < =x:23%}454 ̐Μ , ̰  PͰ ,P ͐νе #X0`234 5` ͠21 ,350 2 %}4 2 LLM̥1 ͭ)ҢLPͩ1,350 Ͱ&2 4 Ͱ2 1`08` ͩ< Ͱ%}ACE,0ɋ8` `&͍'0L\`e1i1`,07 ,ߍҩҭҍ )  `_ҩҩ,,%},8`H)ҩh MsN`#,ҍ ҩ(ҩҩ`jj)?j)`Ң`H?ʎ @%} +0Jh`%}6AU6-(6%+"@(,AA6-"@ A! 6-%6-$+!,! A$ i. AP@PP@@@@@@@@@@@@@@@@@TAAUDAAQQQQQQ)}~ggggg?<|~gpss~g?g?3~`~gg?~g`~gg?~g~gggg?~ggg?UUU@@P@PTTU)}UUUUUUUU??UUUUUU@PTU<<0 *  *)}UUUUUUUUUUPTUUUUPTUUUUUUUUUUUUUUUUUUUU@PTU)}@ ****@PPPTTTUUUUUTUUUU@?00< "$@D"x8(@L"A`X:-"BB4(05*1)}7,3`9)16+28-4`:@;X7$Y8$xX$40$1$XC$X )}ҩҩЩ &(ov./n $X=$0>$ʆx$j ')};$M &Ѝ &e$ &拥HJJJҍҢ &L%Эx ƉL&  ƉL& L&Ɖ 'ƉL&)}ЍЭ 'L% ' &L"' 'L&``( _L\䦋ʈ` '抩}$ )}'ƊM$ҩ  &LO& 'e$ҩ㥉AƉ`` &L& &yҩҢ &`ҩyҩҍҢ &)}Qҩ`ҩҍҢ &<ҩQҩҍ & &ҍҭjL%名ҥiƐ &ᩕ$ & &)}$ & & & &e$L&xXO`/`Ɗ`nJJJJ懥Qԅ=$i(=$>$&)}>$51=$ɠ*0>$=$接 >$: =$P急*恥 惥 愥憠WiБXL_2)}3456FEF789:;<=ABCD"# !GHIJEF()*+%&'()*+)@GHIJ,-.)}/01,-./01ABCDKLM)@)@"#$ENOPABCDEFABCՀ%&'GHIJGHIJE)})@()*+ !"#$GHIJABCD,-./01 !%&'()*+)@"#$EF,-./01)}FABCD%&'GHIJGHIJGHIJ"#$KLM23456EF)@%&'EFNOP789:;<=GH)}IJABCD !GHI)@)@KLM()*+ !ABCDABCDNOP,-./0123456EFF)}"#$)@789:;<="#$GHIJ !%&'ABCD"#%&()*+EF%&',-./01GHIJGH)}IJF)@F)@ !ABCD ! !KLMABCDEFF()*+NOPGHIJ)} !,-./01)@KLMKLMABCD !)@NOPEFNOP"#$)@EAB)}CDFGHIJ"#$%&'ABCDGHIJGHIJ%&'EF()*+GHIJKLM./01)} !)@,-./01)@NOPABCDABCDGHIJ)@Ҁ23456 !ABCD)}789:;<=FF"#$()*+EF)@ !GHIJ%&',-./01GHIJABCD)*+"#)@KLM)})@,-./01%&ABCDOPABCD$vvvvvvvvvv2[-(% oad Sve memory xit (W&bE@:7cEp;K&&L&M&N& + 5J&&&© M2 -L*J&˜ ' 5&0& M2&-}& $+L*& & M2 H-ƅ& & M2 H- 1- *`RUNTIME ERROR AT LINE &&L*, ,L&-}` '' &L&PROGRAM STOPPED&&Ńł ȱ`iL 'HH Z*L/ * . M2 + Q. .-} @. M2 @. ' M2 + @. 'hhL@.ʥ`HHhh`8L'u-}`Huh` L*L' L*L' ) .. ( .. ' * @.L-}* ) .. ' :, ( .. ' + ' * ' + M2 :, @. *L* ) ' ' :, ( .. ' + ' * .}' + M2 :, .. /( @. *L* ' Z* Q.L/` ) * ..L.. ) . .. + ' .. ' :,L' ) .}' :, ' .. + 'L'K&L&M& ) M2 M2,M&eK&iL&`M&8LV& .. .}Q.M&`ʔȱȱȱ Z*Șe惠 惨65*66* L*jem#6m$6 ..вH.}Hhh```L*ʱ` +⅄* &JL&J *HHl .}JLw TO BOOT FOR DOS TO RERUNp B V8,` 3+ȱL*&&8#6$68凅刐S.}Jj)ee`ффiiLL+8LL+ LV&uuuL*8.}` ,L*iL*豂Hȱh`p ,L*,H, BHI, 5 ?-N&h`8`.} :,L, :,#` :,0 :,0L, :,0` :,0L,L,`޵` `Ȕ`.}ʔ惥u`, BHI DEH 5 ?-HyN&N&hL* , ?-N&`,JJJJ`-. },- +- -0 -L* t-L*` -H t-h 0 -`L,8 0ƅ`66&L-HH` B VhH)Kh. })0 IJD-EB 5hL*S:,L*TUVL* -`,,L, ?-N&8ɰɅ ,`ʱȱȱ`ȵ. }ȵL*L* Q. @. @.ʥ @. .. Q. @.L3 Q. .. . . Z*uȱuȱu * Z* ... }0 j,L3 ȱL* ~,L.ʵ`eeLV&HHhh`ؐHH Z*L. }/ *HH . .6 +i i .i i @.hh @. @. 'hh @.`HH Z*% *.}HH `2LQ/ Z* Q. LV& .6 + .. +` Z* Q.ޠ .. `2 +L/ L0H, B Vh`ҩ2ҵ ҵ.}  *L*H,BHI 5,h,LM2,DuEu *,IHKJBH 5h.} *L* -,H`B 5h`00LM2L*L* +`H *hLM21HZH e.}HHƆeiH Q.lꦆ M2Օ`0  L,`8`1-1- R- M201LM21.}01`K2 * Q.J2L2 M29 Ɔ채+K-J2L7280L2 .9K22K2LV& L2, Y2 . Y2 Y2 +.}, M2 +ƆеJ2 +`ʕ`66`HHH66666uuuhhhL.}* +愵 ' + 'I M2 380/66&&&`uuu` 3 3.}Ј 3 * +` 4B3C3 .A3B3A3B3C3 LV&ȥC3iA3B3 4`L$+3B3.} 3`LV&C38A3ƅ3 ȱC3A3B3` 3L33L3H 4 G3h`1+ %  .}88L 4 * *` * *`  * *` 4$' 4"0 40 4L, {4L, t4L,L.}M2LM25 M2 Q. .5555`H,? ,,HI5D55E5B 5H5h` VLV&5` .}45 M2555 M2L5 45LV&55, 555 M258e555 M2K2L1 .} 'L*hh iL* 5LD3 5L$+5B3&&ȱ0 6L5 6#6$6&& L5&&`.}i`K&&L&M&` 3+ȱ&&%8e慱HȱhױM&iK&iL&L*, B.}H Vh M2L*,&BH 5hN M2 *L M2ML*,%BNLMH 5hL*)*Z*w***`2`2+:,2+,,,j,Y.},~,c,r,S,*$++++,,,1-.H----.`..0////D331000 1)&0001K0k04444{4t40&K'G(m(()0)])5555$155}1g1.}53%636&6661 @:@:@:(@:2@:<@:F@:Z@:d@:nF:x`:t::::::::::;;!;@;N;"^.};,i;6m;@;J;T;^;h:l>Dl>N>X>. }b?lR?v?????@8@T@n@@@@@@A A&A ?A*?A4CA>AHARA\AfApAzAAB.!}3B8B8BfBjBnBrBBBBBBBB$C.C8.CBJCLUCVUC`CjCtC~CDDD4D_DDD."}DDDDDD DEE(E2E< EF EPaEbE.#} "JOHN MAGDZIARZ "PRESENTS ".$} SPEED DEMON!:9p:$:%d:$:%+ /K:79jj 9j9.%};9:$:%0;9 $;$91,9@:$91,:%$;%;!1,136.&},136,255,255,255,255,136,136;;2,60,60,190,190,60,60,190,190;;3,34,34,191,191,191,191,34,34;;4,190,190,60,60,190,1.'}90,60,60<<9,0,0,20,20,20,20,0,0<<<10,204,204,51,51,204,204,51,51?<^<11,255,85,255,170,60,20,60,0a<<12,0,60,20,60,.(}170,255,85,255<<13,8,42,168,42,170,170,168,40= /901D<9<$<%.)}<$91,<%!= 26,0,198,72,6=}-(9@9@9@/}-&R9b=9'V.*}=$9 -CV=%<$9 -C9-C9-C<%R:$91,91,91,91,"9F:%.+}8>K0,0,1,39,28,3,1,9,3,6,1,20,25,6,1,8,0,9,1,19,3,12,1,13,15,15,1,22,0,18,1,39o>:$91,91,91,91,"9.,}F:%>30,0,1,30,0,10,1,22,3,1,1,1,3,3,1,12,6,3,1,9,9,1,1,9>>913,3,1,9,17,1,1,12,21,3,1,9,25,1,1,28,25,11,1,6,29,9,1,1.-}8>?032,7,1,18,36,4,1,6,35,6,1,21,36,13,1,6,38,1,1,30?R?238,11,1,24,19,10,1,6,15,13,1,6,12,14,1,12,9,13,1,9U??/6,14,1,1..}2,3,13,1,9,22,7,1,6,21,9,1,12,22,13,1,6"| DRIVER |TIME|LAP|" "|PLAYER #1| 0 | 0 |./}" "|---|---|---|-"- SPEED -"- DEMON -.0}"-"-<$9-C<%9 9:::"9F : :/".1}2" ̠Ҡ?:61A:-: 2&A" *RA:.2} FA$"( 2A9tA$tA%2*FA%" U2".3}< bAAAfB:x      3B:9 LLL.4}LLLLLLL..ff:":%:.ff: ":%:  Bf.:".5}:%::": %:   C:"+:6".:1:JC"  :.6} : UC" "9F}C=:PqC$qC%CF*4: : : C92 .7} 2*"2D" 2 **f9   <$d2*<%FA$.8}<$"9F:fdqC$qC%<%FA%:"9F9  D*+"7:6 D.9}"-+"++" GAME OVER!" 9E+ 2  2AE::.:}d5E$5E%22+&ooooooooooooooooo2@$+-,@>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>2=}>>>>>>OW@-@@   "-@@6$ 0& * 6-3$ D:0(  UjUUUUUUUUU JKJPE JKJ6?}B,UW}U]uU]U]U%T&YQT-_UwuWwU]UiQPU U6@}U]u]UWUUUՁUTUEAA U U]WuwU]W_UWUWUUUUՕTUEA  6A}UU _}uWUU]u]UW]UWUe@ @RP@B@PPT U ]uWUWUuW]UuUՃ}uUE@6B} @H@PRB@PPTU_}uU]uWu_w]Uwu U*" (@@PTU]UUWUU]]6C}u U  ( @@PTUuW UW]UuUUW_U]uUTUB @@PTU6D} UW]}UU]} UPUUPB  *@@RUU}_}UU_U_U]U@TU* %&H% 6E}RU]WUu UW_]U@PUU &"@! UVYijuUu UW}U]uWuUPU" "(6F}&`()54t " @jZYeuU U]uՈWu]UuU@U &@5<` `P%U_]6G}uUu UW]}UUEQU  (` @E ( :@TW]uUu UW_]UUuUUUP"( U6H}  +  BUV]'U@PUTյ uW'U@@RUPUU]WwuwUeU ! 6I}U (@UUUVUu]U]_U]]חWwu UUPUU@*UVU]UׂuUu U6J}UUU5U -U *UUu]U]WuUuUUUU U#U)%UUՈuU]WwUj U6K}PTUUUVUWUu]uU UTPTU U%YUVUUuU] UUA @PTUYTUZUU}U] UV6L}+UA@PTUQTUjVU]UWUuUP fUUTUZUWUkU]UT UUTUV UjVUW_]W]]Uu] UxUV6M}UQ UTPRJ EUW U ZUw]_W]wUXUVU)%UTPRB EUW U jVUUuu}U6N} Uu}jZPTUUTUTPPRIEFfUUV ZVUuՁU] UuojZPTU%TUPPAIAFfUUVU jZ6O}VU5AEUZj jZjjZVU5AEVZj jZjUjZVUVUVZUVZjZj<jZVUVUVYUVZ6P}jZj#U'jYj1UUW^UVfj\fjUVei\eUVVYUVjjZZWUVV6Q}ieeWiVieeUVWUViiiiWU6R} Splash colors on a Gr.7+screen. ACTION. (ANTIC, 4/85)4. SWAN.4<(   K D0 <030< < 6 00 ?:T} 20< 003-   000< 2 0H 0M:U}800 9 0(0<  (0   ,  :V}0.  0% 0ĕUgiŬ<, 0ÁUՆdiUUU:W})g}~ggggg?<|~gpss~g?g?3~`~gg?~g`~gg?~g~gggg?~ggg?UUU@@P@PTTU>h}UUUUUUUU??UUUUUU@PTU<<0 *  *>i}UUUUUUUUUUPTUUUUPTUUUUUUUUUUUUUUUUUUUU@PTU>j}@ ****@PPPTTTUUUUUTUUUU@?00<k}<<<l}X*%*U```````X `Xh*%&&&&%*UU`>m}bbbbbbVh*%*UbbbbbbbifZfijbbbVAQQTTTTDDDT>n}@TDDDXYZ[\]^_hijklmno`abcdefgpqrstuvw xyz{|ppDe@%%%%%%%%%%A4$ <|08D$H>o}H"D <$ "$@D"x8(@L"A`X:-"BB4(05*1>p}7,3`9)16+28-4`:@;X7$Y8$xX$40$1$XC$X >q}ҩҩЩ &(ov./n $X=$0>$ʆx$j '>r};$M &Ѝ &e$ &拥HJJJҍҢ &L%Эx ƉL&  ƉL& L&Ɖ 'ƉL&>s}ЍЭ 'L% ' &L"' 'L&``( _L\䦋ʈ` '抩}$ >t}'ƊM$ҩ  &LO& 'e$ҩ㥉AƉ`` &L& &yҩҢ &`ҩyҩҍҢ &>u}Qҩ`ҩҍҢ &<ҩQҩҍ & &ҍҭjL%名ҥiƐ &ᩕ$ & &>v}$ & & & &e$L&xXO`/`Ɗ`nJJJJ懥Qԅ=$i(=$>$&>w}>$51=$ɠ*0>$=$接 >$: =$P急*恥 惥 愥憠WiБXL_2>x}3456FEF789:;<=ABCD"# !GHIJEF()*+%&'()*+)@GHIJ,-.>y}/01,-./01ABCDKLM)@)@"#$ENOPABCDEFABCՀ%&'GHIJGHIJE>z})@()*+ !"#$GHIJABCD,-./01 !%&'()*+)@"#$EF,-./01>{}FABCD%&'GHIJGHIJGHIJ"#$KLM23456EF)@%&'EFNOP789:;<=GH>|}IJABCD !GHI)@)@KLM()*+ !ABCDABCDNOP,-./0123456EFF>}}"#$)@789:;<="#$GHIJ !%&'ABCD"#%&()*+EF%&',-./01GHIJGH>~}IJF)@F)@ !ABCD ! !KLMABCDEFF()*+NOPGHIJ>} !,-./01)@KLMKLMABCD !)@NOPEFNOP"#$)@EAB>}CDFGHIJ"#$%&'ABCDGHIJGHIJ%&'EF()*+GHIJKLM./01>} !)@,-./01)@NOPABCDABCDGHIJ)@Ҁ23456 !ABCD>}789:;<=FF"#$()*+EF)@ !GHIJ%&',-./01GHIJABCD)*+"#)@KLM>})@,-./01%&ABCDOPABCD$vvvvvvvvvv<W^ppptu^ux^^$~~$$~~$$.kk:f6 fb0zO]7rP<~fBBf~<*>>*>>`B}```0 ~~RJ~~@F~~@@vvRR^^bbJJ~~>> `xxnnJJzz~~JJzx~~~~JJ~~ ~~lll6cA$B}$$$$$Ac6RZ~~BZ^^~~~~~~JJ~v~~BBff~~BB~<~~JJJB~~ ~~BRrr~~~~BB~~BB``@@~~~~``>~~00~~f~~fxxbrZNFB~~BB B}0`@BB~~  @@@@@@@@<~~<ptTT||@~~HHxx||DDDxxHH~~||TT\\~~ ~~xxHzz@~~hhB}B~~@||8||||||||DD||$$<<<<$$|| \\TTtt~~DD||@@||<<``<<||`0`||ll88llDdt\LD\~~\B}>^ppwtB}@JK AISINISOUMGEMPUSTMIDENMIDIMIDIBUOBUV1V2PPTTDITVRBBF}BdBuB! Bu @AA gAL`@@A@F}@AB7s@JJRequires Midimate and CZ-101 Greg kopchak 70357,2312 11/86 <F};Ap,"AR@<0@<#(} Star Spangled Banner<(initializing...67@F}<A,.dhH Ҥqhh@hH r Lphh@gq`Lphx X`rȄX8`hx<Ӎ67F}A<A,.dө p  p 9ҩҍҍҍҩҩҭ2) 2ҍ ҥ) 0X4өsaa6F}7A<Ap,.Fs`hS<ӥ)xҠ q Xss`h  qss`#9-BrBA5@:7&F}Bq<&Bq,,9 ('6-Bd6-Bu'6-B!-))( almost done now 2 6-?:,7++9AF}<@,9@<@,<h-@A".68<@,-?68<@,-C h(GregF} Kopchak AC-@@".68<@,-?68<@,-C F9,($by Francis Scott Key9F}6-6@K?6-@6-@'6-36-?6-B7sP6-%@ APU 6-?:,ZCAvF}A&'3A9C A_,AD 8<@,,@dd/AF 8<@F},,@d/$i,AE 8<@,,@dn/AG 8<@,,@d/$s @F} Ax-@@0 }6-%@8"8<@, 6-.6-%@8 @6-%@F}8"8<@, 6-.6-%@8 AAA -@A cA@F}@h'3?AK@fW@ecAGcA@@h'3F}?AK@fW@cAG 6-?:,  @@u + ++48,3,45,1,41,4,45,4,4F}8,4,53,8,57,3,55**1,53,4,45,4,47,4,48,8,48,2,48,2,57,6((55,2,53,4,52,8,50,3,52,1,53,4,53,4((48,4,45,4,41,4,48,3,4F}5,1,41,4,45,4++48,4,53,8,57,3,55,1,53,4,45,4,47,4,48**8,48,2,48,2,57,6,55,2,53,4,52,8,50,3++52,1,53,4,53,4,48,4,4F}5,4,41,4,57,3,57//1,57,4,58,4,60,4,60,8,58,2,57,2,55,4,57,4--58,4,58,8,58,4,57,6,55,2,53,4,52,8,50,3((52,1,53,4,4F}5,4,47,4,48,8,48,4,41,4##41,4,41,2,52,2,50,4,50,4,50,4--55,2,57,2,58,2,57,2,55,2,53,2,53,4,52,4--48,2,48,2,53,6,5F}5,2,57,2,58,2,60,8,53,2--55,2,57,4,58,4,55,4,53,8,0,16,50,8,49,3##49,1,50,4,53,4,53,4,52,8,48,2((48,2,53,6,52,2,5F}0,4,48,8,48,2,48,2++53,4,53,4,52,4,53,4,53,4,0,16,50,8,49**3,49,1,50,4,53,4,53,4,52,8,48,2,48,2 ((53,6,52,2,50,4,4F}8,8,48,2,48,2,53,4++53,4,52,4,53,4,53,4,0,16,41,4,45,4,47))4,48,8,0,4,48,4,50,4,52,4,53,6,52,2((50,2,47,2,48,8,46F},3,48,1,45,4,50,4--55,4,60,2,62,2,60,2,58,2,57,2,55,2,53,4"--53,4,57,2,53,2,58,4,57,4,54,4,55,2,50,2'((43,2,45,2,46F},2,43,2,48,4,48,4,48,2,++48,2,53,6,52,2,53,2,55,2,57,8,58,2,5512,53,4,55,4,52,4,41,8 D:SSBMIDI.BAS'''''''''''F}''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''DN0de /A4@@@@A&J}@ Af @ @@@AAVAU@A0G6-@J}6-%#6-AV/6-AU;6-A0G6-@W6-6-%6-%'6-%/6-$;6-@G6-AJ}O&W6-%+F:Ap,"@h*+F:Aq,"@X)F:Ar,"@X,,)+F:Ap,"@2*F:Aq,"@2*F:J}Ar,"@2,AqAy!AxA-Ai;Ar'MAsA(_Ap@q6-J}?:C:h S`,,IF PEEK(771)=V1 THEN NEW)#-AAA"%) __173,9,210,205,242,2,208,5,173,241,2J},208,33,173,9,210,201,159,208,7,169,0,141,255,2,176,19\\201,154,240,15,141,242,2,141,252,2,169,3,141,241,2,169,0,133,77,1J}69,48,141,43,2,104,64!A!!A @S%-A&Ai"!% SS104,104,133,204,104,133,203,J}104,133,206,104,133,205,104,104,133,209,160,0,177__203,145,205,200,196,209,208,247,164,209,192,15,240,9,169,32,145,205,20J}0,192,15,208,249,96%-AiA"!% (TT104,169,7,160,144,162,6,32,92,228,96,165,16,41,127,133,16,141,1J}4,210,76,98,228*SS104,162,16,169,11,157,66,3,169,205,157,68,3,169,0,157,69,3,169,1,157,72,3,169+VV0,157,73,3,104,104,13J}3,205,160,100,132,206,32,86,228,164,206,136,208,246,104,133,SS204,104,133,203,160,0,177,203,133,205,132,206,32,86,228,201,J}3,208,3,32,86,228-UU164,206,200,208,235,230,204,177,203,133,205,132,206,32,86,228,201,3,208,3,32,86.XX228,164,206,200,1J}92,64,208,233,169,3,133,205,32,86,228,169,14,133,205,32,86,228,96206-?:Ai,A0A@<F:AJ}, &Ade Bi6Ap@366-?:A&<Ap<Ap<,n#+AR0#0J}x -( *********** -( * B/GRAPH * -( ***********!-@!( Release 1.1.1" -"(J}A -"(Select printer type.(-A( X -%( CENTRONICS(-@ ;(J} EPSON/GEMINIG-@X( C.ITOH/NEC%-@%( SEIKOSHA AT/100 -( OKIDATA 92-@(J} EPSON FXJ-%@!( Written by J($ Michael Reichmann & Robert Wilson--(% J} A-@"3((c) 1983 - Irata Press Limited.AK:..(%  F:J}Ap,@3A0%-A6AX"!% TT104,201,1,208,10,104,104,141,114,3,162,48,32,86,228,133,21J}3,169,0,133,212,96,0%-AA%"!% jj104,166,106,202,134,205,162,155,169,0,133,204,168,145,204,198,J}204,208,250,198,205,228,205,208,244,966Ap@266-?:A&<Ap<Ap<,A)$"@IJ}$ A$"@P$ A$"@Q$ A $"@R$J} A$"@S$ A,"@T&", A' -B2y% ' A0J}"= A(}-%2(Loading Main Menu.=%D:MENU6 (}-@@6(ˠ AJ}S (}-%%0(렣8-%S(Hit when ready.7K:"A))J}7"A A'g +@AA@1A@`7-Q(BATTERIES INCLUDEDW-g(J}PRESENTS'AA '# -#(__________________' - ( 'A A"'" -J}%"( b/graph '" -%"( $' B$*@ @*%-A!A3J}"!% +(F:@,B +$d}F:&&,%F:&,$%'D:START* B!:%,$F:%,%F:%,$J}+/ Af@**,%F:%,$+/ d}*F:&&,%F:&,$%'D:START* J}A% 6-6-"@ % J}===================================================================Hc