@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr iA X DZZZZ hh} 縵 d*********************}n* ATARI COLOR CHART *x* by Graham Potter ********************** A -@!}@76-$@%@C6-@M APY6-Avc APy6-$@%@6-@ AP6-@s} APO/-$@%@$@%@;,@G/AuK O GG216,72,173,19,6,24,105,16, }141,19,6,141,10,212,141,26,208,104,64,0S #A!-A6AU%"+/ AASA@ }!6-%$AV!6-%@c-AuN+&@,'@"P:+&@,'@,*!@ c%F:%,%A }(1#F:%,"@y)F:%,"A16-%@ BBA+AY7A`CAaUA }#@do0@AY@4B2y@4F:B2y,"@*@w4 AA }- AF:A,%@*+-+#A%$@ +-@+",%%P:O:,,+ }A"/%%P:,"P:,A`"   $, 62,8.5,-1,-9.5,2,8.5@ J-2,-9.5,1,9.5,-9.5}T ^##-2,7,9.5,-1,5,6,-9.5,2,4,-9.5h r&&-1,-5,-9.5,-1,4,5,-9.5,1,3,6,8.5| 1,5.5,-5.5,2,9.5} $$1,5,-9.5,-1,-5,-9.5,-1,6,8.5,0 2,8.5,-1,-5,-9.5,-2,6,8.5 -1.5,-1,5,9.5,1,5.5 }$$2,4,6,8.5,-1,-5,-9.5,2,4,6,8.5 2,4,-8.5,-1,-5,-9.5,2,8.5 (10)3,9.5,1,3,-7.5,3,9.5 } (11) 1,9.5,-1,-5,-9.5,2,4,6,8.5à (12)&2,8.5,-1,-9.5,-2,-8.50Ġ (13):1,9.5,-1,-9.5,2,8.5D} (14)N1,9.5,-1,-5,-9.5,-1,-9.5XƠ (15)b1,9.5,-1,-5.5,-1.5l +@'0A0@}[0@u0@6-F:A`,6-F:Aa,vm-@@4(@}analog computingF-@@[(@proudlym-@@::(@presents>:@,>:@},>:@,O6-%$AV'%@@;%@@O%@$@s-@@ ?(@} >:AA, Q-@ @s(@By Graham L. Pottert-@@.(@ PLEASE W}AIT@-@ t(@&Press START, SELECT, or OPTION to ExitZ AF:A,&@*+@ 96-F:A}`,H6-F:Aa,ZA#D6-F:@,!A',6-&A(8@DB7tA`}Aa50@@O0@@@i0@0@@@0@}$D2:COLOR256.BASffffffffffffffffffffffffffqopqlk`jZj0  j FL`HE MODULE; BACKTRAK.ACT ; by Sam TeagueBYTE Stick0=$278, Trig0=$D010, ChBas=$2F4, Time=$14, MemTop=$6A, Colo}r0=$2C4, Color1=$2C5, Color2=$2C6, Color3=$2C7, Color4=$2C8, GraCtl=$D01D, GPrior=$26F, SDmaCtl=$22F, PMB}ase=$D407, Nmien=$D40E, WSync=$D40A, Con=$D01F, Atract=$4D, HPos0=$D000, HPos1=$D001, HPos2=$D002, HPo}s3=$D003, PMColor0=$2C0, PMColor1=$2C1, PMColor2=$2C2, PMColor3=$2C3, P0PF=$D004, P2PF=$D006, P3PF=$D007, } P0PL=$D00C, HPosM0=$D004, HPosM1=$D005, HPosM2=$D006, HPosM3=$D007, HitClr=$D01E, CrSinh=$2F0, StickFlag!}, SpaceFlag, Dots, OldMemTop, Screen, Speed, X, Y, X0, Y0, X1, Y1, X2, Y2, X3, Y3, OldX0, OldY0, OldX2, O"}ldY2, OldX3, OldY3, RobotCount1, RobotCount2, BirdCount, Image0, Image1, DotSound, BonusSound, DoorSound,#} Lives, StartSpeed INT RobotSpeed1, RobotSpeed2, BirdDist, RobotDist1, RobotDist2, Score, HighScore CARD $}VDsLst=$200, SDLst=$230, ScRam=$58 BYTE POINTER PMRam, Player0, Player1, Player2, Player3, M%}issleBaseBYTE ARRAY String(10); GOOD GUY PLAYERBYTE ARRAY Player0Data0= ;DOWN [0 0 0 24 36 36 36 24 60 24 0 0 0 0], P&}layer0Data1= ;UP [0 0 0 24 60 60 60 24 60 24 0 0 0 0], Player0Data2= ;LEFT [0 0 0 24 44 44 44 24 56 24 0 0 0 0], Player0D'}ata3= ;RIGHT [0 0 0 24 52 52 52 24 28 24 0 0 0 0] ; BIRD PLAYERBYTE ARRAY Player1Data0= [0 0 0 24 36 60 24 219 126 6(}0 36 0 0 0], Player1Data1= [0 0 0 24 36 60 24 24 126 255 36 0 0 0], Player1Data2= [0 0 0 24 36 60 24 24 255 60 36 0 0)} 0]; ROBOT PLAYERBYTE ARRAY Player2Data0= [0 0 0 255 152 60 102 219 189 36 66 0 0 0], Player2Data1= [0 0 0 60 56 60 *}102 219 189 36 24 0 0 0], Player2Data2= [0 0 0 255 29 60 102 219 189 36 24 0 0 0], Player2Data3= [0 0 0 60 28 60 102 +}219 189 36 36 0 0 0];FACE, HANDS & FEET PLAYERBYTE ARRAY Player3Data0= [0 0 0 0 36 36 36 0 189 0 153 0 0 0], Player3D,}ata1= [0 0 0 0 36 36 36 0 189 0 153 0 0 0], Player3Data2= [0 0 0 0 36 36 36 0 1 0 44 0 0 0], Player3Data3= [0 0 0 0 36 3-}6 36 0 128 0 52 0 0 0]CARD ARRAY PMData0(4), PMData1(4), PMData2(4), PMData3(4), MissleData(4)PROC .}Move_Set() BYTE i, chnum, bit BYTE POINTER base, dest BYTE ARRAY chars= [ 255 255 255 255 255 255 255 255 127 127 12/}7 127 127 127 127 0 0 254 254 254 254 254 254 254 254 254 254 254 254 254 254 0 0 127 127 127 127 127 127 127 0} 0 255 255 255 255 255 255 255 127 127 127 127 127 127 127 127 254 254 254 254 254 254 254 254 0 90 60 66 66 60 91}0 0 0 255 231 129 129 231 255 0 0 254 254 254 254 254 254 0 0 0 0 24 36 24 0 0 0 126 126 126 122}6 126 126 126 126 126 126 126 126 126 126 0 0 127 127 127 127 127 127 0 0 255 255 255 255 255 255 0 126 126 13}26 126 126 126 126 126 255 255 255 255 255 255 255 0 0 24 24 126 24 60 102 0] MemTop==-8 Graphics(17) SDmaCtl4}=0 base=(MemTop)*$100 MoveBlock(base,$E000,$400) bit=0 chnum=1 DO dest=base+8*chnum FOR i=0 TO 7 5}DO dest^=chars(bit) dest==+1 bit==+1 OD IF chnum=1 THEN chnum=3 ELSEIF chnum<12 THEN ch6}num==+1 ELSEIF chnum=12 THEN chnum=14 ELSEIF chnum=14 THEN chnum=15 ELSEIF chnum=15 THEN chnum=26 ELSEIF chnum=267} THEN chnum=27 ELSEIF chnum=27 THEN chnum=29 ELSEIF chnum=29 THEN chnum=30 ELSEIF chnum=30 THEN chnum=32 ELSEIF c8}hnum=32 THEN chnum=56 ELSEIF chnum=56 THEN chnum=57 FI UNTIL chnum>56 ODRETURNPROC Dl9}i=*() BYTE color1=$D017, color2=$D018 [$48 ; PHA $8D WSync] ; STA WSync color1=14 ; Luminance color2=4 :}; Gray background [$68 ; PLA $40] ; RTIPROC SetDLI() VDsLst=Dli Nmien=$C0RETURNPROC Delay(BYTE jif;}fies) jiffies==+Time DO UNTIL jiffies=Time ODRETURNBYTE FUNC CheckLocate(BYTE x0,y0) BYTE errflag errflag=0 IF x0<}>53 AND x0<200 AND y0>26 AND y0<200 THEN errflag=1 FIRETURN(errflag)PROC Song() BYTE ctr FOR ctr=1 TO 2 DO =} Sound(0,108,10,8) Delay(18) Sound(0,96,10,8) Delay(9) Sound(0,91,10,8) Delay(9) Sound(0,8>}1,10,8) Delay(18) Sound(0,91,10,8) Delay(9) Sound(0,96,10,8) Delay(9) OD Sound(0,121,10,8) Delay(18) Sou?}nd(0,108,10,8) Delay(9) Sound(0,96,10,8) Delay(9) Sound(0,91,10,8) Delay(18) Sound(0,96,10,8) Delay(9) Sou@}nd(0,108,10,8) Delay(9) Sound(0,121,10,8) Delay(54) Sound(0,0,0,0) Delay(10)RETURNPROC Color(BYTE C0, BYTE C1, BYA}TE C2, BYTE C3, BYTE C4) Color0=C0 Color1=C1 Color2=C2 Color3=C3 ColB}or4=C4 RETURNPROC Sype(BYTE ARRAY temp_str BYTE POINTER address) BYTE i BYTE ARRAY ataint=[$40 $00 $2C}0 $60] FOR i=1 TO temp_str(0) DO IF temp_str(i)#155 THEN address^=ataint((temp_str(i) RSH 5)&3)%(temp_str(D}i)&$9F) address==+1 FI ODRETURN PROC High_Score() StrI(HighScore,String) Sype(String,ScRam+493) Sype(" E} ",ScRam+468)RETURNPROC BGNoise() BYTE N=[40], S=[50], bgcount=[0] bgcount==+1 IF bgcount=5 THEN SouF}nd(0,N,10,2) N==+2 IF N>=S THEN N==-4 S=N IF S=40 THEN S=50 FI FI bgcount=0 FIG}RETURNPROC Inst() Graphics(0) CrSinh=1 Color(0,8,0,8,0) SDmaCtl=$00 Position(0,1) Print(" ") Sype(H}"",ScRam+14) Sype("Your Mission is to get all of the",ScRam+81) Sype("pulsating globules in the maze witI}h",ScRam+121) Sype("as little backtracking as possible.",ScRam+161) Sype("Each globule is worth one point. Each",J}ScRam+201) Sype("empty space will cost you one point.",ScRam+241) Sype("You have 3 lives. If you touch one of",ScK}Ram+281) Sype("the robots you lose a life. An extra ",ScRam+321) Sype("life is awarded at 3,000 points. If",ScRaL}m+361) Sype("you touch the bird it will cost you 50",ScRam+401) Sype("points. If you open one of the doors",ScRamM}+441) Sype("in the walls you will recieve 100 extra",ScRam+481) Sype("points. If you touch a multi-color ",ScRamN}+521) Sype("bonus globule your score is increased",ScRam+561) Sype("by the number of globules you've ",ScRam+60O}1) Sype("already gotten on that maze. You must ",ScRam+641) Sype("return to home base after getting all ",ScRam+P}681) Sype("the globules. There are 3 screens. ",ScRam+721) Sype("When you finish screen 3 you are ",ScRam+761)Q} Sype("returned to screen 1 and the action ",ScRam+801) Sype("speeds up. Press the fire button to ",ScRam+841) R} Sype("pause. Move the stick to resume play.",ScRam+881) Sype(" PRESS FOR GAME.",ScRam+921) SDmaS}Ctl=62 DO UNTIL Con=6 OD DO UNTIL Con#6 ODRETURNPROC Title() Graphics(17) Color(118,50T},22,8,0) Sype("BACK TRACK",ScRam+65) Sype("by",ScRam+149) Sype("sam teague",ScRam+165) Sype("",ScRam+304)U} Sype("Ҡ",ScRam+325) Sype("",ScRam+364) Sype("Ҡ",ScRam+382) Sype("",SV}cRam+424) Sype("Ϡ",ScRam+446) Speed=3 DO UNTIL Con#6 OD DO Delay(10) IF Con=3 THEN SypeW}(" ",ScRam+244) Speed==-1 IF Speed=0 THEN Speed=3 FI FI IF Speed=3 THEN X} Sype("BEGINNER",ScRam+246) ELSEIF Speed=2 THEN Sype("INTERMEDIATE",ScRam+244) ELSEIF Speed=1 THEN SypY}e("ADVANCED",ScRam+246) FI IF Con=5 THEN Inst() EXIT FI UNTIL Con=6 OR Trig0=0 OD StartSpeed=Speed DO Z}UNTIL Con#6 AND Trig0#0 ODRETURNPROC Reset() Zero(PMRam+$300,$500) X0=64 Y0=197 X1=47 Y1=29 X2=88 Y2=101 X3=160 Y[}3=101 RobotSpeed1=4 RobotSpeed2=4 RobotDist1=0 RobotDist2=0 RobotCount1=7 RobotCount2=7 OldX0=X0 OldY0=Y0 OldX2=X2 O\}ldY2=Y2 OldX3=X3 OldY3=Y3 BirdCount=0 BirdDist=0 StickFlag=7 Image0=0 Image1=0 DotSound=0 BonusSound=0 DoorSound=0RE]}TURNPROC Hit_Bad_Guy() SndRst() DoorSound=0 BonusSound=0 Sound(0,81,10,8) Delay(5) Sound(0,91,10,8) Delay(5) Soun^}d(0,96,10,8) Delay(5) Sound(0,108,10,8) Delay(5) Sound(0,121,10,8) Delay(10) SndRst()RETURNPROC Modify_Display_List(_}) CARD dlistaddr=$230 BYTE POINTER dlistpntr dlistpntr=dlistaddr+26 dlistpntr^==+128 ; Set DLI dlistpntr=dlistaddr+28`} dlistpntr^=2 ; Graphics 0 lineRETURNPROC Init() Screen=1 Lives=3 Score=0 Dots=0 PMData0(0)=Player0Data0 PMData0(1a})=Player0Data1 PMData0(2)=Player0Data2 PMData0(3)=Player0Data3 PMData1(0)=Player1Data0 PMData1(1)=Player1Data2 PMDab}ta1(2)=Player1Data1 PMData1(3)=Player1Data2 PMData2(0)=Player2Data0 PMData2(1)=Player2Data1 PMData2(2)=Player2Data2 c} PMData2(3)=Player2Data3 PMData3(0)=Player2Data0 PMData3(1)=Player2Data1 PMData3(2)=Player2Data2 PMData3(3)=Player2Dad}ta3 MissleData(0)=Player3Data0 MissleData(1)=Player3Data1 MissleData(2)=Player3Data2 MissleData(3)=Player3Data3 PMRe}am=(MemTop)*$100 MissleBase=PMRam+$300 Player0=PMRam+$400 Player1=PMRam+$500 Player2=PMRam+$600 Player3=PMRam+$700f} Zero(PMRam+$300,$500) ChBas=MemTop PMBase=MemTop Modify_Display_List() GPrior=17 GraCtl=3 PMColor0=66 PMColor1=34 g} PMColor2=6 PMColor3=162 Reset() High_Score()RETURNPROC Maze1() SDmaCtl=$00Sype("!@@@@@@@@@@@@@@@@@@!",ScRam)Syh}pe(")(",ScRam+20)Sype(")&'''$&'''$(",ScRam+40)Sype(")#!!!%&''$#!!!%(",ScRam+60)Sype(")(!)i}(!!)(!)(",ScRam+80)Sype("!$#@%&!!!!$#@%&!",ScRam+100)Sype("!)(!!!!)(!",ScRam+120)Sype("!!$&!!!!!!$j}&!!",ScRam+140)Sype("@@@,;@@@@@@@@,;@@@",ScRam+160)Sype("  ",ScRam+180)Sype("$;==========,&",Sck}Ram+200)Sype(")(",ScRam+220)Sype(")&''',;'''$(",ScRam+240)Sype(")(!@%&''$#@!)(",ScRam+260)l}Sype(")()&!!!!$()(",ScRam+280)Sype(")()&'!!!!!!'$()(",ScRam+300)Sype(")()(!!!!!!!!)()(",ScRam+320)Sype(")m}#%#@@@@@@@@%#%(",ScRam+340)Sype(")(",ScRam+360)Sype("!==='==,;==''''!",ScRam+380)Sype(") #n}(!!!!",ScRam+400)Sype(") (!!!!",ScRam+420)Sype("!''''''''''''''!!!!!",ScRam+440)SDmaCtl=62RETURNPROCo} Maze2()SDmaCtl=$00Sype("!@@@@@@@@@@@@@@@@@@!",ScRam)Sype(")(",ScRam+20)Sype(")&'$&''=====''$(",ScRp}am+40)Sype(")#@%#@%(!)(",ScRam+60)Sype(")&''$(!)(",ScRam+80)Sype("!'===''$#@@%#@)(",ScRam+100)Sypq}e("!%(!%:(",ScRam+120)Sype(")&$()&'''=,(",ScRam+140)Sype("%;@%#%;@@@%/#",ScRam+160)Sype(" r}&') ",ScRam+180)Sype("'$&''''''====@@)&",ScRam+200)Sype("!)#!!!@@%>(",ScRam+220)Sype("!)(!%&=s}==,>(",ScRam+240)Sype("!!$#%&'')>(",ScRam+260)Sype("!!)&!!!)&',>(",ScRam+280)Sype("!@@===@@@@%()>("t},ScRam+300)Sype(")()&)(",ScRam+320)Sype(");=======,()()(",ScRam+340)Sype(")()()(",ScRam+3u}60)Sype("!=='''''''$(%#)(",ScRam+380)Sype(") #@@@@@@%::(",ScRam+400)Sype(") /(",ScRam+420)Sypev}("!''''''''''''''!'''!",ScRam+440)SDmaCtl=62RETURNPROC Maze3()SDmaCtl=$00Sype("!@@@@@@@@@@@@@@@@@@!",ScRam)Sype(")w}(",ScRam+20)Sype(")(",ScRam+40)Sype(")(",ScRam+60)Sype(")x}(",ScRam+80)Sype("%#",ScRam+100)Sype("  ",ScRam+120)Sype("$&",ScRy}am+140)Sype(")(",ScRam+160)Sype(")(",ScRam+180)Sype(")(",ScRam+200)z}Sype(")(",ScRam+220)Sype("!''''',;'''''!",ScRam+240)Sype(" #!@%&''$#@!% ",ScRam+260)Sype(" {} )&!!!!$( ",ScRam+280)Sype(" )&'!!!!!!'$( ",ScRam+300)Sype(" )(!!!!!!!!)( ",ScRam+320)Sype(" )#@@@@|}@@@@%( ",ScRam+340)Sype(" &)($ ",ScRam+360)Sype("!@@@'==,;=='!!!!",ScRam+380)Sype(") :(!!}}!!",ScRam+400)Sype(") (!!!!",ScRam+420)Sype("!''''''''''''''!!!!!",ScRam+440)SDmaCtl=62RETURNPROC Life_Dis~}play() BYTE ctr Sype(" ",ScRam+477) FOR ctr=1 TO Lives DO Sype("X",ScRam+476+ctr) ODRETURNPROC Over}() Sype("**************",ScRam+103) Sype("* *",ScRam+123) Sype("* *",ScRam+143) Sype("*********}*****",ScRam+163) DO UNTIL Con=6 OR Trig0=0 OD IF Score>HighScore THEN HighScore=Score FI Score=0 Dots}=0 Lives=3 High_Score() Screen=1 Speed=StartSpeed Color(194,10,240,246,0) Maze1() Life_Display() DO UNT}IL Trig0#0 AND Con#6 ODRETURNPROC NextMaze() Reset() SndRst() Song() Dots=0 Screen==+1 IF Screen=2 THEN } Color(114,8,240,246,0) Maze2() ELSEIF Screen=3 THEN Color(20,10,240,246,0) Maze3() ELSEIF Screen=4 THEN } Speed==-1 IF Speed<1 THEN Speed=1 FI Color(194,10,240,246,0) Screen=1 Maze1() FIRETURN}PROC PosPlayer() HitClr=0 HPosM0=X0 HPosM1=X0+2 HPosM2=X0+4 HPosM3=X0+6 HPos0=X0 MoveBlock(Player0+Y0,PMDat}a0(Image1) ,14) HPos1=X1 MoveBlock(Player1+Y1,PMData1(Image0) ,14) HPos2=X2 MoveBlock(Playe}r2+Y2,PMData2(Image0) ,14) HPos3=X3 MoveBlock(Player3+Y3,PMData3(Image0) ,14) MoveBlock(Missle}Base+Y0, MissleData(Image1),14)RETURNPROC Score_Display() StrI(Score,String) Sype(" ",ScRam+468) Sy}pe(String,ScRam+468)RETURNPROC Flash() BYTE blink blink==+1 IF blink>7 THEN IF Color1>10 THEN Color1=10 EL}SE Color1=54 FI Color2=Rand(255) blink=0 FIRETURNPROC Sounds() IF DoorSound THEN DoorSound==-1 IF} DoorSound<15 THEN Sound(2,72,10,8) Sound(3,60,10,8) ELSE Sound(2,60,10,8) Sound(3,47,10,8) FI }ELSEIF BonusSound THEN BonusSound==-1 IF BonusSound<15 THEN Sound(2,29,10,8) Sound(3,35,10,8) ELSE }Sound(2,35,10,8) Sound(3,45,10,8) FI ELSE Sound(2,0,0,0) Sound(3,0,0,0) FI IF DotSound T}HEN DotSound==-1 Sound(1,125,10,8) ELSE Sound(1,0,0,0) FIRETURNPROC Pause() SndRst() DO UNTIL Stick(}0)<>15 ODRETURN PROC Animate() BYTE count count==+1 IF count>4 THEN count=0 Image0==+1 IF Image0=4} THEN Image0=0 FI FIRETURNPROC Move_Stick() BYTE stickdir StickFlag==+1 IF StickFlag>7 THEN ; Go} through tunnel IF X0<48 THEN X0=200 ELSEIF X0>200 THEN X0=48 FI OldX0=X0 OldY0=Y0 stickdir=Stick0 } StickFlag=0 IF SpaceFlag=1 THEN X=(X0-46)/8 Y=(Y0-24)/8 IF X0<80 AND Y0>184 THEN Score==+1 FI } IF CheckLocate(X0,Y0)=1 THEN IF Locate(X,Y)=' THEN Score==-1 FI FI FI IF stickdir=1}5 OR stickdir=10 OR stickdir=6 OR stickdir=9 OR stickdir=5 THEN SpaceFlag=0 ELSE SpaceFlag=1 Atract=0 } FI FI IF stickdir=14 THEN Y0==-1 Image1=1 ELSEIF stickdir=7 THEN X0==+1 Image1=3 ELSEIF stickdir=13 THE}N Y0==+1 Image1=0 ELSEIF stickdir=11 THEN X0==-1 Image1=2 FIRETURNPROC Move_Bird() BYTE dir, time, count=[0}] count==+1 IF BirdCount THEN BirdCount==-1 FI IF count=Speed THEN IF BirdDist<1 THEN dir=Rand(9) } BirdDist=Rand(40) FI IF BirdCount=0 THEN IF dir=1 THEN Y1==-1 ELSEIF dir=2 THEN X1==+1 Y1==-1} ELSEIF dir=3 THEN X1==+1 ELSEIF dir=4 THEN X1==+1 Y1==+1 ELSEIF dir=5 THEN Y1==+1 ELSEIF dir=6 THEN X}1==-1 Y1==+1 ELSEIF dir=7 THEN X1==-1 ELSEIF dir=8 THEN X1==-1 Y1==-1 FI FI BirdDist==-1 cou}nt=0 FIRETURNINT FUNC ABS(INT i) IF i<0 THEN i=-i FIRETURN(i)PROC Move_Robot1() BYTE robotdir INT disx, disy }RobotSpeed1==+1 IF RobotSpeed1>Speed-1 THEN RobotSpeed1=0 RobotCount1==+1 IF RobotCount1>7 THEN RobotCo}unt1=0 IF X2<48 THEN X2=200 ELSEIF X2>200 THEN X2=48 FI OldX2=X2 OldY2=Y2 RobotDist1==-1 } IF RobotDist1<1 THEN RobotDist1=Rand(8) IF Rand(3)#2 THEN disx=ABS(X0-X2) disy=ABS(}Y0-Y2) IF disx>disy THEN IF X2>X0 THEN robotdir=4 ELSE } robotdir=2 FI ELSE IF Y2>Y0 THEN robotdir=1 } ELSE robotdir=3 FI FI ELSE robotdir=Rand(5) FI FI FI } ;Adjust coordinates for robot IF robotdir=1 THEN Y2==-1 ELSEIF robotdir=2 THEN X2==+1 ELSEIF robotdir=}3 THEN Y2==+1 ELSEIF robotdir=4 THEN X2==-1 FI FIRETURNPROC Move_Robot2() BYTE robotdir INT disx, disy R}obotSpeed2==+1 IF RobotSpeed2>Speed-1 THEN RobotSpeed2=0 RobotCount2==+1 IF RobotCount2>7 THEN RobotCou}nt2=0 IF X3<48 THEN X3=200 ELSEIF X3>200 THEN X3=48 FI OldX3=X3 OldY3=Y3 RobotDist2==-1 } IF RobotDist2<1 THEN RobotDist2=Rand(8) IF Rand(3)#2 THEN disx=ABS(X0-X3) } disy=ABS(Y0-Y3) IF disx>disy THEN IF X3>X0 THEN robotdir=4 } ELSE robotdir=2 FI ELSE IF Y3>Y0 THEN } robotdir=1 ELSE robotdir=3 FI FI ELSE robotdir=Rand(5) } FI FI FI ;Adjust coordinates for robot IF robotdir=1 THEN Y3==-1 ELSEIF robotdir=2 THEN X3}==+1 ELSEIF robotdir=3 THEN Y3==+1 ELSEIF robotdir=4 THEN X3==-1 FI FIRETURNBYTE FUNC Hit_Man(BYTE playf}ield)RETURN(P0PF&playfield)BYTE FUNC Hit_Robot1(BYTE playfield)RETURN(P2PF&playfield) BYTE FUNC Hit_Robot2(BYTE playfi}eld)RETURN(P3PF&playfield) PROC Collisions() CARD offset X=(X0-46)/8 Y=(Y0-24)/8 offset=(Y*20)+X ;Man hits super} globule IF CheckLocate(X0,Y0)=1 THEN IF Hit_Man(4) THEN IF Locate(X,Y)=' THEN Sype(" ",ScRam+offset) } Score==+Dots BonusSound=30 FI ;Man hits door ELSEIF Hit_Man(8) THEN IF Locate(X,Y)=' THEN Scor}e==+101 Sype(" ",ScRam+offset) DoorSound=30 FI ;Man hits dot ELSEIF Hit_Man(2) THEN IF Locate(X,Y})=' THEN Sype(" ",ScRam+offset) Score==+2 Dots==+1 DotSound=2 FI FI FI ;Man hits wall} IF Hit_Man(1) THEN X0=OldX0 Y0=OldY0 StickFlag=7 Score==+1 IF X0<80 AND Y0>184 THEN Score==-1} FI FI ;Robot1 hits wall IF Hit_Robot1(1) THEN X2=OldX2 Y2=OldY2 RobotCount1=7 RobotDist1=1 FI ;Rob}ot1 hits door IF Hit_Robot1(8) THEN X=(X2-46)/8 Y=(Y2-24)/8 IF Locate(X,Y)=' THEN offset=(Y*20)+X S}ype(" ",ScRam+offset) FI FI ;Robot2 hits wall IF Hit_Robot2(1) THEN X3=OldX3 Y3=OldY3 RobotCount2=7 Robo}tDist2=1 FI ;Robot2 hits door IF Hit_Robot2(8) THEN X=(X3-46)/8 Y=(Y3-24)/8 IF Locate(X,Y)=' THEN of}fset=(Y*20)+X Sype(" ",ScRam+offset) FI FI ;Man hits bird IF P0PL=2 THEN Zero(PMRam+$500,$100) Sc}ore==-50 X1=47 Y1=29 BirdCount=100 Hit_Bad_Guy() FI ;Man hits a robot IF P0PL=4 OR P0PL=8 THEN Lives==-1} Life_Display() Hit_Bad_Guy() Reset() FI ;Bird hits boundry IF X1>192 THEN X1==-2 BirdDist=0 FI IF X1<}47 THEN X1==+2 BirdDist=0 FI IF Y1>200 THEN Y1==-2 BirdDist=0 FI IF Y1<29 THEN Y1==+2 BirdDist=0 FIRETURNPROC Chec}ks() BYTE extra_life IF Score=0 THEN extra_life=0 FI IF Trig0=0 THEN Pause() FI IF Dots>172 AND X0<74 AN}D Y0>192 AND Screen=1 THEN NextMaze() ELSEIF Dots>177 AND X0<74 AND Y0>192 AND Screen=2 THE}N NextMaze() ELSEIF Dots>252 AND X0<74 AND Y0>192 AND Screen=3 THEN NextMaze() FI IF} extra_life=0 AND Score>2999 THEN Lives==+1 Life_Display() extra_life=1 FI IF Lives<1 THEN Life_}Display() Over() FIRETURNPROC Game() Reset() DO Flash() BGNoise() Collisions() Move_Stick() Move}_Bird() Move_Robot1() Move_Robot2() Animate() Sounds() PosPlayer() Score_Display() Checks() Delay(1)} IF Con=6 THEN EXIT FI ODRETURNPROC Main() HighScore=0 DO OldMemTop=MemTop Title() SDmaCtl=0 Move_Set() In}it() SetDLI() Color(194,8,240,246,0) Maze1() Sype("SCORE",ScRam+462) Sype("HIGH SCORE",ScRam+482) Life_Display()} PosPlayer() SndRst() Game() IF Score>HighScore THEN HighScore=Score FI HPos0=0 HPos1=0 HPos2=0 HPos3=0 HP}osM0=0 HPosM1=0 HPosM2=0 HPosM3=0 SndRst() MemTop=OldMemTop ODRETURNTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT20,10x(J BdZQjAUAUUDA@ @/IL =IL*=`L8= J. &}2v 5L\= BACK TRACKXiAYi=Q 6Lx=byXiYi=u 6L= sam teagueXiYi= 6L= '}Xi0Yi= 6L= ҠXiEYi= 6L > XilYi= 6L6>ҠXi~ (}Yi>% 6L\> XiYi>O 6L~>ϠXiYi>u 60IL> q4IL>L> )} Xi􅢥Yi> 68000L>00IL?L?BEGINNERXiYi> 6L|?0ILP?L7? INTERMEDIA *}TEXi􅢥Yi?* 6L|?0IL|?Lf?ADVANCEDXiYi?] 6IL? i7L?IL>01IL?L +}?`L?1i1i /@0ō0/00X0e00e0 11 1 11111000000 ,}000000000 1 1000000`Lh@ /00 Q . q4 [ . q4 ` . q4 -} l . q4 y . q4 /`L@0i@1i@@@i0i@1i@@@`LA01 .}11022;1ȑ:1 m2*(m2K1ȑJ1 m2*(m2[1ȑZ1 m2*(m2k1ȑj1 /}2!2{1ȑz1 m 2*(m!21ȑ1 m 2*(m!21ȑ1 m 2*(m!21ȑ1$2%2 0}1ȑ1 m$2*(m%21ȑ1 m$2*(m%21ȑ1 m$2*(m%21ȑ1(2)21ȑ1 1} m(2*(m)21ȑ1 m(2*(m)21ȑ1 m(2*(m)21ȑ1,2-21ȑ1 m,2 2}*(m-21ȑ1 m,2*(m-2 2ȑ 2 m,2*(m-22ȑ2j d*111i 11i!1 3}1i11i11i11i11i11i11i11i11i1i /jj @oЩB" 4} ? 6`L,D/LID!@@@@@@@@@@@@@@@@@@!YXD4 6LnD)(XiYiDY 6LD)&'''$ 5}&'''$(Xi(YiD 6LD)#!!!%&''$#!!!%(Xi/`LSH/LpH!@@@@@@@@@@@@@@@@@@!YXH[  =}6LH)(XiYiH 6LH)&'$&''=====''$(Xi(YiH 6LH)#@%#@%(!)(Xi< >}YiH 6LI)&''$(!)(XiPYiI 6LMI!'===''$#@@%#@)(XidYiI8 6L{I!%(!% ?}:(XixYiIf 6LI)&$()&'''=,(XiYiI 6LI%;@%#%;@@@%/#XiYiI 6LJ  @}&') XiYiI 6L3J'$&''''''====@@)&XiȅYiJ 6LaJ!)#!!!@@%>(Xi܅Yi A}JL 6LJ!)(!%&===,>(XiYiJz 6LJ!!$#%&'')>(XiYiJ 6LJ!!)&!!!)&',>( B}XiYiJ 6LK!@@===@@@@%()>(Xi,YiK 6LGK)()&)(Xi@YiK2 6LuK);===== C}==,()()(XiTYiK` 6LK)()()(XihYiK 6LK!=='''''''$(%#)(Xi|YiK 6 D}LK) #@@@@@@%::(XiYiK 6L-L) /(XiYiL 6L[L!''''''''''''''!'''!XiY E}iLF 6>/`LzL/LL!@@@@@@@@@@@@@@@@@@!YXL 6LL)(XiYiL 6LL) F}(Xi(YiL 6LM)(Xi/`LPLP Xi݅YiP 6P1 N}PP͞PLQLPXXi܅YimPiP 6PLP`L QLQ**************XigYiQ 6LDQ* * O}Xi{YiQ5 6LlQ* *XiYiQ] 6LQ**************XiYiQ 6ILQ111 P}10LQ11111101 6010 5 )D PLRIL R`L!R ? / 4000ILSR Q}r 5 PHLR0ILtR  5 wLLR0ILR8000LRȌ0 50 )D`LRЭ0 R}0i0i0iЭ01m01i0 m2*(m2ȱ /01m01i0 m S} 2*(m!2 /01m01i0 m$2*(m%2 /01m0 T}1i0 m(2*(m)2 / 1m0!1i0 m,2*(m-2 /`L3T U}1"11 ,LLT XiԅYiTE 6XiԅYi1" 6`L}TyTyTLT LT LT6 .yT` V}LT0L U8000LT H . < .LU < . / .LxU0L^U8000LAU  W} . # .L[U # . - .LxU . .0LU800 } .LU .`LU X}/ C/ILU`LUUͼULUU00ILU0`LU0͈0LV00LVȍ0LVͨ0LV000000xU Y}00ILV80. *080 *00PLVͬ0LV1100 4ILV00 . Z}I LV81111UIUI UIUI UILV0LV0MUILW8000LPWUIL#W00LP [}WUI L8W00LPWUI LPW8000`LWWSW0LkW800SWM0LiX 1 10LW .QW( . 1 1 \}0LSXQWILW800LSXQWILW0800LSXQWILW0LSXQWILW00LSXQWILX0LSXQWIL!X800 ]}0LSXQWIL7X800LSXQWILSX8008008 1 1 1 1SW`LoXkXjXjXkX0LX8jXjXkXkXkX ^}jX`LX1 1801 10LZ 1100LY000LXȍ0LY͸0LY000000811 _}11110LY .11 .ILY800 lXXX800 lXXXX͡XXX0 `}LY0͸0LYXLYXLY0ͼ0LYXLYXLY .XXILY800LZXILY0LZXIL Z0LZXI a}LZ800`L(Z 1 180 1 10L[ 1 100LV[000LqZȍ0LZ0LZ0000008 b}1111110LV[ .11 .ILL[800 lX"Z!Z800 lX$Z#Z#Z! c}Z$Z"Z0L1[00L)[ ZL.[ ZLI[00LD[ ZLI[ ZLV[ . Z ZILl[800L[ ZIL|[0L[ ZIL[ d}0L[ ZIL[800`L[[-[`L[[-[`L[[-[`L[80. *080 e}*00 d*m0[i[00 4ILC] [L\00 .IL\Le\ Xm[Ym[\c 61 f}m011i10LC] [L\00 .IL\1ie11i1L\ Xm[Ym[\ 60LC] [LC]0 g}0 .ILC]L] Xm[Ym[] 61i11i100 [L]00000110PL]ͬ0L q}B256 XMOBBAKACT XMOB8BAKERC XMOBuBAKTRK XMOB{BARBOZ XMOB#BASEDR XMOB>BDBEAR XMOB4PBEEHIV XMOBBILL XMOB!BLAST XMO]81111 [L]000001Ȍ1 [LI^80. *080 *00 r}0 .ILI^0 d*m0[i[L1^ Xm[Ym[^/ 6 [Lo^000001Ȍ1 [ s}L_80. *080 *000 .IL_0 d*m0[i[L^ Xm t}[Ym[^ 6 ILN_1i1i /812111/00d0 e@ I ILq_811 P e@ u}?Ͱ0L_800 1 10/L_0i0 1 1ʹ0L_800 1 10L_0i0 1 1`L_1 1L v}__L_ U͐0L+`0JL+`ͬ0L+`0IL+` RL`͐0LY`0JLY`ͬ0LY`0ILY` RL`͐0L`0J w}L`ͬ0L`0IL` R_L`1 10L`1 P_1L` P Q`L` ? zT 7 [ U TW X %Z U T R 0T _ q4 x}IL`L`L``L`11j0 5=/ 2 A ]4 5 )DL5aSCOREXi΅Yia/ 6LYa HIGH SCOREXiⅢYi y}aN 6 P R / `11110La1111ЌЌЌЌЌЌЌ /0jLa``` z}   = A, \oRRCSTMCCCCDLIC1C71C70C1C1XFC1C1COKLOOCLSCDHC1AC1CLFLANOUNKVCNDVERBDN|}CCC1TREASURSCBOOCOINUGGEPAWEACLOOK }} ~} !"#$%&'(})*+,-./012345678}9򸶒粵 AuV+6.7A<A,,6-@:7<,,@@S:J @}VA-@(V6-?:C:,(Inside a }nest.$?!(Snow-covered ledge.!$@( Icy cave.$A( Bat cave.$B"(Subterranian cavern."$C}( Powder room.$D@( Small room.=(There's a stone slab above you.@$E(Old mine shaft.$F(}Medusa's lair.$G( Deep chasm.$H' +IM @-((Congratulations!+(M(You have recovered }all of theJ'$(treasure for a score of 100!'KW' + @ AR&-4( AAIIEEE!!W( You fell to }your death.L AMi' + @ ARI($Stalagmites and stalagtites close ini( to seal your d}oom!N AOg' + @ ARI($ A loud shriek causes an avalanche!g( You are dead.P } AQf' + @ ARH(# The sharp thorns are poisonous!f( You are dead.R AS}a' + @ AR>( The dragon wakesa( and burns you to a crisp!T AUR' + @} ARH(# Medusa's gaze turns you to stone!R AVT'(>>>>> What next% @ / @3= B}F6-B:,T"@W "6. AX(6-?::,6-&@dbAR}AwAAA'ASApAxAAAA'A8ABAHASA}`AfApc @dC6.7<,#6-?:C:,:,< @#I6.7<%,n*( -$}(Your location:*-o%6-&@d%!@$Ap@8@9@@@@@9@A@A}@C@D@E@H@G@G@I@P@F@Q@R@S@T@U@V@}W@Hq Ar%6-&@$!@%6-&s@X@`@a@b@a@`@X}@X@`@c@d@e@f@g@h@X@i@p@f@f@X@f@f}@q@ft* SHOW LEGAL EXITS *u$ -( You can go: $6-vD -+7%<%,0?*7%<%,0*}<(7<, D6-%w!  "!( Nowhere (?)xQ -6-?:C:,<, 36-?:C:,<@,9-K( Yo}u see: Q6-yQ -%6-@:7%<%,,&@d,68#A$%<"B-I(Q6-%z4  "-@4(}Nothing interesting{6-@:7<,,|"A @)}"A @2~"A @6 "}6- A0 @ * I*( @-*( You have: S 6--'6-@:7<,,&@d.6}:#A$%>"D-K(S6-%(  "-@((Nothing1"@#-@A' 1 @r} @ * Q?'(Type to save to quit+30Y8<+?VAY@4<(Position }Save: isk or ape@V0D*0T@Q A8)(Enter # of Save (0-9)-QA:, )A:,!@ @}< A7 6. D1:SAVE .DAT+67<,.34T<6.C:TAYBBr&=67A<A,.G} @#T67<%,.U-A6"(7<%,& =-A!6@UQ(7<%@T,U 4 ((}((&(-(4(6AY@4,BBA6 @ * H??:(Troll won't let you.A$7!4u*+"@t)"@,-6-@y7} Av7!4X*+"@)"@,-6-@7 Av--4D*"@i*?:<}6-?:<$ 4z6._ 4{6.a @"@}8*?:6-?:<$}* 4V'(He's much too powerful.*$4[@l67%<%,.L-67Aq<Aq,.?F67AC<AC,}.?_67@p<@p,.Lb'l A* VERB H0H@ @ "@"+((You're alre}ady wearing them.+$ 6- $* VERB I0e*0t@S @ @ !4t*6(Watch your step!}P(One false move and...S$4t@ " ($ < "6-9(%Some potions are good, while others..<$}!1 "6-.(My name holds great power.1$"M 6-0("To retrieve a seemingly lost item,J(magic word's 'RETURN'M$}#* VERB J$ @ "($%0B@&##(You hear a whistling noise.'7<,0a*7<,0c$}(r'(A griffon fledgling flies away.@67A<A,.WY7Ax<Ax,4Tr67Ax<Ax,.?)96-?:<}P 6. 6.7AE<Ab},(-P7%<%,4J)7%<%,4?A!?46-?:<6-?:<$`D67<,.k!67%<%,.?:6}7A<A,.kD @(a* VERB Pb?(?:<6-?:<$mY67<,.^67<,.M667AE<AE},.^O67@u<@u,.MY @(n* VERB RoD6-@:7<,,' @v)!@wA(I can't do that here.D$}p*"@v6-%@ '* A q6-&@' A r* VERB Ss""( You stored  treasuret }(su (.v+((That's a score of $@.+$w--"xd @}AR>( } Chris Smith'sd(! ŠӠƠڠyA((  (C)1985 ANALOG Computing.}-A(Ǡz;A,;@,;@#,;@,;@,;@C,;A5,;Av,;@ },;@,;@d,;@B,;@v,{c<;@,;@ ,;@,;@,;@v,H6.Okay.c6.}You don't have that.|nn6.dGO!!ACLIMBGET!CDROPDLOOKEEXAMECHOPFCUT!FHIT!FKILLGWEARHREADIBLOWJSAY!KDRINLJUMPMTIE!NUNTIOTICKP}WASHQ}5567B:,%,.#CLEAQRUB!QSWIMRSCORSINVETQUITUHELPV~H6. NSEWUDIQH6-C:,%6-C:,-6-%66-C:,?6-C:,H6}-C:,E-@v"!67,.>:,% E67@<@,.>:@(,O #A -@v"+67,.>:,/ O6}7@<@,.>:@V,%-@C"!67,.>:,% %-@d"!67,.>:,% %-@B"!}67,.>:,% nn6.dNORT@SOUT@EAST@WEST@LIMBASTICBUNDECHOLEDSWORECOINGGLOVHPIT!ISLABJTROLKFLASMGLASONUGGPPAN!QCHESRBUSHS}gg67B:,%,.UFEATTFLEDVEGGSWNESTXICE!YCAVEZDRAG[WARR\SHIE]VIAL_GOBLaAMULcSTAFdBOOKeBOULfDIAMgBUCKhgg67B:,%,.UKEG!j}ROPEkMEDUlSTATmPICKnROCKoGEMSqDOORrGLOWsSIGNtBRIDuPATHvSTAIwTUNNxPOWDyLIQUzPOTI{67B:,%,.WATE| #A"}P67,.?67A,.?(67,.8-Ae<"L67<%B:,,.P ,!67A<A,.?????A,6. }7<,_ -.( Press Ԡ to begin new game.Z(' Press Π to restore old game._F:B2y,"@ }F:B2y,"A A]AY@4&-@ C(Load from isk or apeG]0D*0 }TAK A/( Enter # of load (0-9)3KA:, )A:,!ATAYBBr% A86 }. D1:SAVE .DATC67<,.K4TT6.C: B'gJ-A6@!.67<%,.2 J67A }<A,.W-A!6@U!467<%@T,.8 P67Av<Av,.W + }&+M6.7A<A,$ @#16.7<%,CAY@4M @990,1,2,3,4,5},6,7,8,9,10,11,12,14,15,16,17,18,709,710cc104,104,133,206,104,133,205,104,133,204,104,133,203,169,0,133,213,162,0,202,240},49,24,165,205bb105,5,133,205,165,206,105,0,133,206,24,160,0,177,203,209,205,208,231,200,177,203,209,205,208ii224,200},177,203,209,205,208,217,200,177,203,209,205,208,210,200,177,205,133,212,96,169,0,133,212,96gg104,104,133,206,104,133,205},104,133,204,104,133,203,169,0,168,133,213,177,203,133,207,104,104,168GG136,48,10,165,207,209,205,208,247,200,132,212,96,}169,0,133,212,96ZZ104,104,141,1,2,104,141,0,2,173,48,2,133,203,173,49,2,133,204,160,24,169,130,145,203ZZ169,0,141,243},2,96,0,72,138,72,169,0,162,10,141,10,212,141,24,208,142,23,208,230,20855165,208,41,16,74,74,74,141,1,212,104,170,104,64}cc104,104,104,170,165,88,133,203,165,89,133,204,216,24,202,48,15,165,203,105,40,133,203,165,204CC105,0,133,204,24,144,}238,160,159,169,0,145,203,136,208,251,960,0,0,0,0,0,0iiAAABA,B?CEA???A,CB?D????E,DE??C???G,E?DIBH??C,F????G??HD,G??}???F,H?????E,I??JE???I,J???I???Kuv,KJ?LiiL???????vM,MN??????Q,N?M?????KR,O??PJ,P??Q????Ku,Q?R?P???Sv,RQ??????r,S?VWT???r,}T?US????_,UT?V????aggVS??U???cd,W???S???e,X?QY????t,Y*?ZX,Z*a*Y,aZ?*????XT,bac*????V,c?d*????X,dc**e,e?*d?,f?*?g,gh*f*}ggh*g?*???Y,i?h?????[,j???????fx,k?w?l???hx,l??k????jrw,m???????r,n???????wr,o???????rJk,pw??????lx@@q?tur?s?x,r??q,s???}?q??o,tq,u???q???n,v???????qp,wkp?????sLow-hanging limbHollow stickThick underbrushSmall holeRu}sty sword*Jewel-encrusted sword**Gold coin*Gloves of strengthBottomless pitStone slabGree}dy trollDead trollEmpty flaskFlask of waterPieces of glass*Gold nugget*Shallow pan*}Treasure chest*Thorny bushFeather in side of nest FeatherGriffon fledgling*Griffon eggs*La}rge nestOpaque sheet of iceIcy caveSleeping white dragonFrozen warriorBlack shield*Silver} shield*Glass vialEmpty vial*Golden goblet**Golden goblet**Ancient amulet*Long enchanted  }staffBook of magicLarge boulders*Huge diamond* BucketBucket of powderWooden keg Rope!} MedusaStone statue of MedusaPick-axe RockRope tied to a rock*Precious gems* Door"}Strange green glow SignTressle bridgeSmall pathStaircase Tunnel D2:BARBOZ.BAS|||| ` u45` v LC1C2BARETRBACKSESCAPDLLCHKSUCHHL$} $ B&$%}Z<<;A,;@,;@,;@8,;@,\467@,. %67@8,. 467@,.^'6-&}AU6-A&'6-@'`m +Af1ARC@@m6-F:A`,%AV$F:A'}a,%@b&@@p+%@@?%@AS%@Ag%@A{%@(}A%@#AdW%@$@e.%@%F:A`,E%@&F:Aa,WAYfv-)}@ -(?-@l((Ǡנv(:hm-*}@ B((ŠנT-@@m(:i&-@'@&( +}Ԡ:j\AY@4'-@@9( >:@0,@6.L6-@V B&H\6.l4QB&tm ,}4B+ng-@@'( >:@0,36-A= B&HI6-U6-gAf@p-}OAR@)-@@5-@9(= O-@@q.-B:,@6@*7<,4 . r.}'6.7@<,s2-@B:,"6-%@26-%$@:7,,t!"@9!-@@v!"@w!-@/}@x (7<, zw 6-&+P:'Av,$Av,16-P:'@&,C6-&+$@&,]67@,.>:%@e,w60}7@,.>:%@e,|#Af#0B&B~ +AY1Af@C-@@1}G(Y-@@b(CONTt-@AB@&(AB@6-A:,( B&qA@2}P72@u@@K-@@@O q2#-@@( 3}#6.]-@@#-@'(+ =ARO-@7@S(] B&6-+ B&4}++")",*"B&P " $"B&f "(>:, B&P6-%@!$:!@5}8* @v:-&P:'@8,$@8@:!@v* A:-&P:'@8,$@8@#67<,.>:,6}(>:,# B&PK6-&@"@7/-@8@A( >:@0,K B&r="@u!-@8@7}3( >:@0,= B&r( (>:,"6.( B&P)6.7@:@0,>:@0,:}>:@0,\? B&*@@5@? B&@B& +>#;}@@K:0)@;@>$I(FILE ALREADY EXISTS!+(ERASE IT/9 B&I4YB&<}5-@@#-'(+ 5 B&D2:BASICED.BAS=}6$ 0& * 6-3$ D:N(5_B\YjjUZZ4??Z jZ1??j j1 ?j?}V. ?Zj0 <jjZ- Zjj-*ZZ,Zj@}ZjjVj3jjj 2ZjZZj 2-2V-# j-"Zj.Zj%A}j=jZZjZjVUjjjUijZB}VUV jPZVUV Z@jj @Pjj @P0V j@/j UC}VUDT+Z PYQQ, U@ TDfV D U U QUYQD} U j  DefUfefVFETEUVUiUVZ P U UYQUjVUjZj DTE}DEQUfVgfVefVEDEDTZVUVjZj T QYYYUQVUVj @  DUfF}vfU~fUDUVfVET j jQQQUQYQ ZjZj EDEDEDEfG}eUfeVfedTDfefUDTTDjZjTUYQUYEQQUjZ TDTefVfU DEH}jVfeTDjj EQQYQ UZQQjZ PDEDPTEe fEDUVefUfUDTEDj@U U I}YYUQ UPTdedPTDEVfffeTDEDTDTD@PYYYUQQUU@PDEJ}DT fTDTDUEFZ@PQQQUQjU!UDTdedE DU% QQU j$U UDEj@ QK}VTPU @TEDtDEZVFEVP@@ PZj@@P@ DEDTPTL}P@ @P P!QPd@ @ @!@PTD@ @@@!P @@P@M}V]Q ??D@T??D@DQ ?.?DT -?DQ N}/.0Q 2 3Q^XXXV@O}@[@@@````````````````````````````````A BASIC demo using theAtari to present computer "slides".(Steve Wright, 3 =uFJTTXYTTMNAMELENGTHOUSTBDDSPCTAEHEVSHSVSPHHVVLHCCLRTTCDDFLECNQ}AA@@ @ R}@@@@@@@S}@ !"#$%&'()*+,-T}./01234 )A@ A ) @6- A`F7U}6-@&R:,%A($+T:,",C!A'F$("@027@w6-!6-,6V}-%8,76-%8,<55 @)!@) @)!@@0F/ 6-6-6-% A`/ @0P W}A0 Ap }Zt1;@0,;@0,;@@,9@,E-@@@R67<,. V h-@@X}t BEEHIVEd@-@@< ENTER YOUR NAME PLAYER  @e 46. i)B:,!@)6.7@Y}<@,j68,-B:,nO?67+&@,$@%@<+&@,$@%B:,,.C O6-@x= A6-Z}@%6-@16-@=6-@D6. YOUR TURN  A@DAAP&@$+"@,V @ /[}1$@&%@%@O-$@&%@%@V >:,u@212@A@@E-\}@@PI k2@u A@G68<,-.-$@&%@%@= >:@B%,]}G A% A6-@&% A@4-A#0BEv%F:BsD%,4 '-BVBXV#^}' %-BFBG"!% 3-@"&68,-/68,-3 `BBy@d'_}B2w@9AY@bKA#@]A`$!!231,126,24,24,24,24,126,2310,0,0,0,0,0,126`},231231,126,0,0,0,0,0,07,30,24,24,24,24,126,2317,30,24,24,24,24,30,7!!224,120,24,24,24,24,120,224"!!a}231,126,24,24,24,24,120,224,""195,36,126,219,255,126,36,24-0,40,170,170,170,170,40,0.0,20,85,85,85,85,20,0/b}2,2,8,8,32,32,128,128085,0,0,0,0,0,0,010,0,0,0,0,0,0,856330,0,0,-1,0,1,0,0,-1,0,0,0,0,0,0,0,1,0,0,0,0,0{ A c}AV@1AR@S6-F:A`,%AV$F:Aa,g%@@{%@@qT-@d}%  * BEEHIVE *7-@@T ////////////////////////C 7@<@,-1-@@9 e}$ = C --@@L! 7@<@&,-& 5-@@= # A H )-L 3 - f} -@@( % , 3 -S ........................2-@@8 'J-@6@P (S$g}9@<@5,9@a,9@a,9@<@,9@P,9@P,;@ ,9@,9@,;@ h},9@,9@,7AR@'-@@7  PLEASE WAITB A0!-@@ .67<,.i}-;67<,. ? B$06-F:@,!6-F:@,3AR@E@Aa@$@%@s-j}  Au:p3B2H$@%+@&,$@%@aO@$@%@a-k}p  ()и,&# ?$@@!6-$$NC -@6?@<2@A@@ l}C$bD 6-6-6-'6-<-6@@D6-%l'6-&@%+"@,' Av 6-%+!6@m}, A 9-"@*"@)"@*"@96-@9-"@*"@)"@*"@n}96-@4 6-%"@*68<,-%@4 AP"Ap-6-68,--68o},-"6@Ap# 6-8,6-8,#6-&@68<,-% -6@@ 6-%'6-&p}@%+"@,' A  6-%+!6@, A   A 6-6-6-@& $ 0- @)q}!@) @)!@0$"8<,"%@"6-@ "8<,"%@"6-@*$40- @)!r}@) @)!@0$>.8<,"6-%@%68,-.68,-H$R_6-@ A`(6.YOU WIN 2 s}A@O-AU6@[A_ \?-@ ? % SEARCHING fe-@t}@#6-@/6-@>68@,-M68@,-Y6-e6-@p 6-"@6-zF-"u}@*"@)"@*"@<68,-F A  6-6- 6-8,6-8,e-6@@ 6v}-%:6-&@%+"@,D AW6-%+!6@,a Ae "@A +",A p)6-w}%@"@a)6-@ A /6-%@6-#"@a/6-@6-%@ A V x}-@@$6-8,-6-8,B6-8<$@%,V"A@3#-$@&%@%@) *3 y}A"@A@e-6@@ 6-%:6-&@%+"@,D A`W6-%+!6@,a A`z}e '6-&@6-6-' A7 '-$@&%@%@- *7 A A`$0- @{})!@) @)!@0$., 8<$@%,"&@&6-,6-8$B0- @)!@) @)!@|}0$L,)8<,%)8<$@%,,$V>68<$@%,-&6-%@2"@a>6-@` 68,-}}68,-j 6-"@6-tK-"@*"@)"@*"@96-@B68,-K68,-~$>-~}@ > $ PRESS FIREBUTTON  T:,AeR-@ > $ } H A0R A | +A@1A CA@EUBBy@}gAY@byAA|$ $] 6.]67B:,%@??>????????>??>??????????<<??&}cccgg ``~ppppw``~f`ccg>66wwcc&}Uw]>66www~ffssg```c~ccsss~``pp``pppc`pws666wwwgg333|sss000pppKKkkkk&}s{owwwwccgggccpppcccco|~ffsss``cccssscccwvv~CCCkkkggg,3H,3 `HF##i&h`a%^R,&}2e`#*18?0愥S ƄŎuɎ`k%8` % $k%` 5&}0)) ҹ/H/h % d&~&L & o%, %ĭm%))&Ң/l%m%m%Y [$m%`L$ ' )&}&`, % [$k%&` ~&n%}&&O`ƊKn%%}&  )il%m%n%&}&&}  @&}&'e`(PxxP(|Ƌ}ɐ拥i0`',΁'΁'΁''ҩ111111 a'i&}'i0Щ^'č`'111111'` y$/ '<0"1Щ֍'&} e./`H ԍЩ h@`PҩHҤ % ' ' ' ' '捥P` a'(ҭ%(8 % ' &}' '%(%(8 0Ŏ٩ 5%PҢ( ` ' ' ' dҩ` (-27