BeebDisk/Wally

Home » Archimedes archive » Acorn Computing » 1994 11 subscription disc.adf » 9411s » BeebDisk/Wally

BeebDisk/Wally

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk:	Home » Archimedes archive » Acorn Computing » 1994 11 subscription disc.adf » 9411s
Filename:	BeebDisk/Wally
Read OK:	✔
File size:	18FE bytes
Load address:	0000
Exec address:	0000

Duplicates

There is 1 duplicate copy of this file in the archive:

Archimedes archive » Acorn Computing » 1994 11 subscription disc.adf » 9411s » BeebDisk/Wally
AEW website » mu » mu_5_25_discs_Micro_User_12_09_D-MU12_09.ssd » Wally

File contents

   10REM" �WALL WALLY         by G.Leng
   20 
   30DIM code 300:PROCassemble
   40IFK%<>999Z%=0:K%=999
   50MODE7:VDU23;8202;0;0;0;:PROCtitles
   60DIMA%(19,75),C%(4,2),N%(4,2)
   70MODE5
   80VDU15,23;8202;0;0;0;
   90FLAG=0:targ%=5000:liv%=3:col%=0:screen%=1:sc%=0
  100REPEAT
  110PROCstart
  120dead%=0
  130PROCscreen
  140COLOUR3:COLOUR128
  150TIME=0:B%=0:CASH%=0:S%=0
  160M%=0:m%=10-screen%:IFm%<1m%=1
  170IFscreen%=1m%=-1
  180REPEAT
  190IFINKEY-74ANDB%<6G%=1
  200IFINKEY-98PROCleft
  210IFINKEY-67PROCright
  220PROCcheck
  230IFINKEY-73PROCup
  240IFINKEY-105PROCdown
  250PROCcheck
  260M%=M%+1:IFM%=m%M%=0:PROCmeanie
  270G%=0
  280IFy%=72PROChalf
  290UNTILy%=1ANDQ%=1ANDX%=1ORdead%=1
  300IFdead%=1PROClife
  310IFFLAG=1FLAG=0:Q%=0:X%=1:Y%=28:y%=1:MX%=19:MY%=0:NX%=19:NY%=0:GOTO120
  320*FX15,1
  330IFFLAG=2PROCend:RUN
  340DATA95,131,95,91,127,91,87,123,87
  350 
  360REM WIN
  370SOUND1,1,101,4:SOUND1,1,117,4:SOUND1,1,129,4:SOUND1,1,149,8
  380PROCscore
  390col%=1
  400IFscreen%<10:?&72=?&73
  410screen%=screen%+1:FORI%=1TO5000:NEXT
  420UNTIL0
  430 
  440DEFPROCmeanie
  450IFTIME MOD2=1NX%=MX%+SGN(X%-MX%) ELSENY%=MY%+SGN(Y%-MY%)
  460IFNY%>30ORNY%<0MX%=NX%:MY%=NY%:ENDPROC
  470IFNX%=X%ANDNY%=Y%PROCmeanmove:SOUND1,-15,50,8:PRINTTAB(8,Y%+1)"DEAD!":dead%=1:ENDPROC
  480PRINTTAB(NX%,NY%);
  490CALL code
  500IF?&70=32PROCmeanmove
  510ENDPROC
  520 
  530DEFPROCmeanmove
  540PRINTTAB(MX%,MY%)" ";
  550MX%=NX%:MY%=NY%
  560COLOUR1
  570PRINTTAB(MX%,MY%)CHR$mean%
  580COLOUR3
  590mean%=mean%+1:IFmean%=230mean%=226
  600SOUND&13,-8,mean%,1
  610ENDPROC
  620 
  630DEFPROCcol
  640A%=RND(7):B%=RND(7):C%=RND(7)
  650IFA%=B%ORB%=C%ORA%=C%GOTO640
  660VDU19,1,A%;0;19,2,B%;0;19,3,C%;0;
  670ENDPROC
  680 
  690DEFPROCend
  700RESTORE:FORN%=1TO9:READI%:SOUND1,1,I%,6:NEXT:SOUND&101,1,115,8:SOUND&102,1,83,8
  710IFsc%>Z%PRINT'"HI-SCORE!"':Z%=sc%
  720I%=GET
  730ENDPROC
  740 
  750DEFPROClife
  760FORN%=1TO5000:NEXT
  770liv%=liv%-1:PROCscore
  780IFliv%=0PRINT'"GAME OVER":FLAG=2 ELSEFLAG=1
  790ENDPROC
  800 
  810DEFPROCscore
  820IFdead%=0T%=TIME DIV100:S%=(200-T%)*10+(6-B%)*100
  830S%=S%+CASH%
  840sc%=sc%+S%
  850COLOUR1
  860PRINTTAB(0,31):FORN%=1TO12:PRINT:NEXT
  870IFdead%=0PRINTTAB(0,31)'"SCREEN ";screen%;" COMPLETED."'
  880IFdead%=0PRINT'"Blasters: ";6-B%;" x100=";(6-B%)*100
  890IFdead%=0PRINT"Time:   ";200-T%;" x10=";(200-T%)*10
  900PRINT"Cash:   `";CASH%''
  910PRINT"Score:";S%''"TOTAL SCORE=";sc%'
  920IFsc%>=targ% liv%=liv%+1:PRINT'"EXTRA LIFE!":SOUND3,-15,160,4:targ%=targ%+5000
  930PRINT'"Lives left:";liv%
  940FORN%=1TO10:PRINT:NEXT
  950COLOUR3
  960ENDPROC
  970 
  980DEFPROChalf
  990SOUND1,1,129,4:SOUND1,1,157,4:SOUND1,1,177,8
 1000VDU30:CALLmess
 1010FORN%=0TO10000:NEXT
 1020PRINTTAB(0,0)"Time taken : ";INT(TIME/100);"sec";SPC(20);
 1030FORN%=0TO10000:NEXT
 1040Q%=1:y%=y%-1
 1050PRINTTAB(X%,Y%)" ";TAB(0,0)SPC(40);:Y%=Y%+1:PRINTTAB(X%,Y%);CHR$230;
 1060ENDPROC
 1070 
 1080DEFPROCstart
 1090R%=RND(-screen%)
 1100ENVELOPE1,1,0,0,0,0,0,0,120,-5,0,0,120,0
 1110VDU23,224,&40,&40,&FF,4,4,4,&FF,&40
 1120VDU23,225,0,&7E,&42,&5A,&5A,&42,&7E,0
 1130VDU23,226,0,8,8,8,8,8,8,0
 1140VDU23,227,0,0,4,8,16,32,0,0
 1150VDU23,228,0,0,0,0,&3C,0,0,0
 1160VDU23,229,0,0,32,16,8,4,0,0
 1161VDU23,230,&C3,&24,&3C,&E7,&18,&66,&81,&81
 1170VDU19,3,6,0,0,0
 1180RESTORE1250
 1190FORI%=0TO19
 1200READA%:SOUND2,1,A%+(screen%*8),8
 1210PRINTTAB(0,0);20-I%;" ";:FORJ%=0TO72
 1220A%(I%,J%)=RND(3)-1
 1230NEXT:NEXT
 1240SOUND2,1,17+(screen%*8),8
 1250DATA65,81,73,85,81,93,85,101,93,81,85,73,81,65,73,61,65,45,33,45
 1260X%=1:Y%=28:y%=1
 1270MX%=19:MY%=0
 1280NX%=19:NY%=0
 1290mean%=226
 1300A%(X%,y%)=0
 1310FORN%=0TO4:F%=RND(18):G%=RND(70):A%(F%,G%)=3:C%(N%,1)=F%:C%(N%,2)=G%
 1320NEXT
 1330FORN%=0TO4:F%=RND(18):G%=RND(70):A%(F%,G%)=4:N%(N%,1)=F%:N%(N%,2)=G%
 1340NEXT
 1350Q%=0
 1360?&75=F%
 1370IFscreen%>10?&75=8
 1380ENDPROC
 1390 
 1400DEFPROCscreen
 1410*FX15,1
 1420PRINTTAB(0,31)'"Press key.";:I%=GET
 1430CLS:IFcol%=1PROCcol
 1440col%=0
 1450COLOUR1:COLOUR130
 1460FORI%=0TO29
 1470PRINTTAB(0,I%)CHR$224;TAB(19,I%)CHR$224;
 1480NEXT
 1490PRINTTAB(1,29)STRING$(18,CHR$224);
 1500FORI%=0TO2:FORJ%=0TO2
 1510IFA%(I%,J%)=1PRINTTAB(I%,29-J%)CHR$224;
 1520NEXT:NEXT
 1530COLOUR3:COLOUR128
 1540FORN%=0TO4:G%=C%(N%,2):IFG%<28F%=C%(N%,1):PRINTTAB(F%,29-G%)"`";
 1550NEXT
 1560FORN%=0TO4:G%=N%(N%,2):IFG%<28F%=N%(N%,1):PRINTTAB(F%,29-G%)CHR$225;
 1570NEXT
 1580PRINTTAB(X%,Y%);CHR$230;
 1590COLOUR1:COLOUR130:PRINTTAB(X%-1,Y%+1)CHR$224;:COLOUR3:COLOUR128
 1600ENDPROC
 1610 
 1620DEFPROCcheck
 1630P%=A%(X%,y%)
 1640IFP%=3PROCcash
 1650IFP%=4PROCnasty
 1660IFY%=1PROCfind1
 1670IFY%=29PROCfind2
 1680IFTIME>20000SOUND1,-15,15,8:PRINTTAB(0,Y%)"OUT OF TIME!":dead%=1
 1690ENDPROC
 1700 
 1710DEFPROCfind1
 1720FORN%=0TO4
 1730IFC%(N%,2)=y%+1ANDY%=1PRINTTAB(C%(N%,1),Y%-1)"`"
 1740IFN%(N%,2)=y%+1ANDY%=1PRINTTAB(N%(N%,1),Y%-1)CHR$225;
 1750NEXT:ENDPROC
 1760 
 1770DEFPROCfind2
 1780FORN%=0TO4
 1790IFC%(N%,2)=y%-1ANDY%=29PRINTTAB(C%(N%,1),Y%+1)"`"
 1800IFN%(N%,2)=y%-1ANDY%=29PRINTTAB(N%(N%,1),Y%+1)CHR$225
 1810NEXT:ENDPROC
 1820 
 1830DEFPROCcash
 1840N%=RND(100)+100
 1850CASH%=CASH%+N%
 1860PRINTTAB(X%-1,Y%+1);N%;
 1870SOUND1,-10,200,4
 1880A%(X%,y%)=0
 1890N%=-1:REPEAT:N%=N%+1:UNTILC%(N%,1)=X%ANDC%(N%,2)=y%
 1900C%(N%,1)=0:C%(N%,2)=75
 1910ENDPROC
 1920 
 1930DEFPROCnasty
 1940dead%=1
 1950PRINTTAB(8,Y%)"DEAD!"
 1960SOUND1,-15,15,8
 1970ENDPROC
 1980 
 1990DEFPROCleft
 2000IFX%=1ORA%(X%-1,y%)=1ENDPROC
 2010PRINTTAB(X%,Y%)" ";
 2020X%=X%-1
 2030PRINTTAB(X%,Y%);CHR$230;
 2040D%=y%-(30-Y%)
 2050COLOUR1:COLOUR130
 2060FORI%=y%-1TOy%+1
 2070C%=A%(X%-1,I%)
 2080IFC%=1PRINTTAB(X%-1,30-(I%-D%))CHR$224
 2090NEXT
 2100COLOUR3:COLOUR128
 2110SOUND&12,-8,100+X%,1
 2120ENDPROC
 2130 
 2140DEFPROCright
 2150IFX%=18ORA%(X%+1,y%)=1ENDPROC
 2160PRINTTAB(X%,Y%)" ";
 2170X%=X%+1
 2180PRINTTAB(X%,Y%);CHR$230;
 2190D%=y%-(30-Y%)
 2200COLOUR1:COLOUR130
 2210FORI%=y%-1TOy%+1
 2220IFA%(X%+1,I%)=1PRINTTAB(X%+1,30-(I%-D%))CHR$224;
 2230NEXT:COLOUR3:COLOUR128
 2240SOUND&12,-8,100+X%,1
 2250ENDPROC
 2260 
 2270DEFPROCup
 2280IFy%=124OR(A%(X%,y%+1)=1ANDG%=0)ENDPROC
 2290IFG%=1ANDA%(X%,y%+1)=1B%=B%+1:SOUND&10,1,6,8:G%=0:A%(X%,y%+1)=0:COLOUR1:COLOUR130:FORN%=0TO60:PRINTTAB(X%,Y%-1)CHR$224;TAB(X%,Y%-1)" ";:NEXT:COLOUR3:COLOUR128
 2300PRINTTAB(X%,Y%)" ";
 2310Y%=Y%-1:y%=y%+1
 2320IFY%=0Y%=1:VDU30,11:COLOUR1:COLOUR130:PRINTTAB(0,0)CHR$224;TAB(19,0)CHR$224;:COLOUR3:COLOUR128:MY%=MY%+1
 2330PRINTTAB(X%,Y%);CHR$230;
 2340COLOUR1:COLOUR130
 2350FORI%=X%-1TOX%+1
 2360IFA%(I%,y%+1)=1PRINTTAB(I%,Y%-1)CHR$224;
 2370NEXT
 2380COLOUR3:COLOUR128
 2390ENDPROC
 2400 
 2410DEFPROCdown
 2420IFy%=1ENDPROC
 2430IFA%(X%,y%-1)=1:ENDPROC
 2440PRINTTAB(X%,Y%)" ";
 2450Y%=Y%+1:y%=y%-1
 2460IFY%=30Y%=29:PRINTTAB(0,31):COLOUR1:COLOUR130:PRINTTAB(0,Y%)CHR$224;TAB(19,Y%)CHR$224;:COLOUR3:COLOUR128:MY%=MY%-1
 2470IFy%=1COLOUR1:COLOUR130:PRINTTAB(0,Y%+1)STRING$(20,CHR$224);:COLOUR3:COLOUR128
 2480PRINTTAB(X%,Y%);CHR$230;
 2490COLOUR1:COLOUR130
 2500FORI%=X%-1TOX%+1
 2510IFA%(I%,y%-1)=1PRINTTAB(I%,Y%+1)CHR$224;
 2520NEXT:COLOUR3:COLOUR128
 2530ENDPROC
 2540 
 2550DEFPROCtitles
 2560FORN%=1TO2:PRINTCHR$141CHR$131"     ***   WALL   WALLY   ***":NEXT
 2570RESTORE2660
 2580REPEAT
 2590READD$
 2600IFD$<>" "PRINTD$
 2610UNTILD$=" "
 2620IFZ%<>0PRINTTAB(25,10);"Hi-score:"TAB(27,11)"�";;Z%;
 2630VDU30
 2640I%=GET:ENDPROC
 2650 
 2660DATA"          � By Graham Leng"
 2661DATA,,"�Use keys:"
 2670DATA,,"�      Z _ left"
 2680DATA"�      X _ right"
 2690DATA"�      * _ up"
 2700DATA"�      ? _ down"
 2710DATA"�    RTN _ blaster"
 2720DATA,,"�Explore maze        �   SCORE FOR:"
 2730DATA"�Avoid nasties"
 2740DATA"�Collect cash           �Cash collected"
 2750 DATA"�Blast up only (max 6)  �Blasters left"
 2760DATA"�Time limit 200 secs    �Time left"
 2770DATA"�Three lives"
 2780DATA,"�Press key"
 2790DATA" "
 2800ENDPROC
 2810 
 2820DEFPROCassemble
 2830RESTORE3130
 2840OSBYTE=&FFF4:OSASCI=&FFE3
 2850?&72=0
 2860FORN%=0TO3STEP3
 2870P%=code
 2880[OPT0       \ OR OPTN%
 2890LDA#&87:JSR OSBYTE
 2900STX&70
 2910RTS
 2920 
 2930.mess LDX&72
 2940.loop LDA data,X
 2950BEQ end
 2960CMP#32:BEQ over
 2970SEC:SBC&75
 2980.over JSR OSASCI
 2990INX:JMP loop
 3000.end INX
 3010STX&73
 3020RTS
 3030.data
 3040]:NEXT
 3050FORN%=1TO10
 3060READ A$
 3070[OPT0
 3080EQUS A$
 3090EQUB 0
 3100]
 3110NEXT
 3120ENDPROC
 3130DATA ZHOO GRQH1 QRZ ILQG \RXU ZD\ EDFN
 3140DATA UV[ IHK I\[ [OPZ PZ [OL LHZ` IP[
 3150DATA bLWW bLWWd NLOP_
 3160DATA bcPh R^^[= ZTT_ ^]  V^X]V
 3170DATA XBMM XBMMZ XJ[
 3180DATA \JQQ ITSJ \FQQ \FQQ^J]UJWY
 3190DATA RWWW888 aKVV aKVVc  ]WK\^ K]]+
 3200DATA V^^S U^a P QTVX]]Ta
 3210DATA ]IEL% [LEX E TPE]IV
 3220DATA OZMI\ [\]NN)  []XMZ IKM __ KPIUX


$�" �WALL WALLY         by G.Leng
 
� code 300:�assemble
(�K%<>999Z%=0:K%=999
2�7:�23;8202;0;0;0;:�titles
<�A%(19,75),C%(4,2),N%(4,2)
F�5
P�15,23;8202;0;0;0;
Z3FLAG=0:targ%=5000:liv%=3:col%=0:screen%=1:sc%=0
d�
n
�start
xdead%=0
��screen
��3:�128
��=0:B%=0:CASH%=0:S%=0
� M%=0:m%=10-screen%:�m%<1m%=1
��screen%=1m%=-1
��
��-74�B%<6G%=1
��-98�left
��-67�right
�
�check
��-73�up
��-105�down
�
�check
M%=M%+1:�M%=m%M%=0:�meanie
G%=0
�y%=72�half
"�y%=1�Q%=1�X%=1�dead%=1
,�dead%=1�life
6F�FLAG=1FLAG=0:Q%=0:X%=1:Y%=28:y%=1:MX%=19:MY%=0:NX%=19:NY%=0:�Dx@
@*FX15,1
J�FLAG=2�end:�
T"�95,131,95,91,127,91,87,123,87
^ 
h	� WIN
r/�1,1,101,4:�1,1,117,4:�1,1,129,4:�1,1,149,8
|
�score
�
col%=1
��screen%<10:?&72=?&73
�"screen%=screen%+1:�I%=1�5000:�
��0
� 
���meanie
�/� �2=1NX%=MX%+�(X%-MX%) �NY%=MY%+�(Y%-MY%)
�"�NY%>30�NY%<0MX%=NX%:MY%=NY%:�
�B�NX%=X%�NY%=Y%�meanmove:�1,-15,50,8:�8,Y%+1)"DEAD!":dead%=1:�
��NX%,NY%);
�
� code
��?&70=32�meanmove
��
 
��meanmove
�MX%,MY%)" ";
&MX%=NX%:MY%=NY%
0�1
:�MX%,MY%)�mean%
D�3
N%mean%=mean%+1:�mean%=230mean%=226
X�&13,-8,mean%,1
b�
l 
v	��col
�A%=�(7):B%=�(7):C%=�(7)
��A%=B%�B%=C%�A%=C%�t@B
�#�19,1,A%;0;19,2,B%;0;19,3,C%;0;
��
� 
�	��end
�8�:�N%=1�9:�I%:�1,1,I%,6:�:�&101,1,115,8:�&102,1,83,8
� �sc%>Z%�'"HI-SCORE!"':Z%=sc%
�I%=�
��
� 
�
��life
��N%=1�5000:�
liv%=liv%-1:�score
'�liv%=0�'"GAME OVER":FLAG=2 �FLAG=1
�
  
*��score
4/�dead%=0T%=� �100:S%=(200-T%)*10+(6-B%)*100
>S%=S%+CASH%
Hsc%=sc%+S%
R�1
\�0,31):�N%=1�12:�:�
f4�dead%=0�0,31)'"SCREEN ";screen%;" COMPLETED."'
p3�dead%=0�'"Blasters: ";6-B%;" x100=";(6-B%)*100
z2�dead%=0�"Time:   ";200-T%;" x10=";(200-T%)*10
��"Cash:   `";CASH%''
�%�"Score:";S%''"TOTAL SCORE=";sc%'
�I�sc%>=targ% liv%=liv%+1:�'"EXTRA LIFE!":�3,-15,160,4:targ%=targ%+5000
��'"Lives left:";liv%
��N%=1�10:�:�
��3
��
� 
�
��half
�$�1,1,129,4:�1,1,157,4:�1,1,177,8
�
�30:�mess
��N%=0�10000:�
�/�0,0)"Time taken : ";�(�/100);"sec";�(20);
�N%=0�10000:�
Q%=1:y%=y%-1
2�X%,Y%)" ";�0,0)�(40);:Y%=Y%+1:�X%,Y%);�230;
$�
. 
8��start
BR%=�(-screen%)
L%�1,1,0,0,0,0,0,0,120,-5,0,0,120,0
V%�23,224,&40,&40,&FF,4,4,4,&FF,&40
`'�23,225,0,&7E,&42,&5A,&5A,&42,&7E,0
j�23,226,0,8,8,8,8,8,8,0
t�23,227,0,0,4,8,16,32,0,0
~�23,228,0,0,0,0,&3C,0,0,0
��23,229,0,0,32,16,8,4,0,0
�+�23,230,&C3,&24,&3C,&E7,&18,&66,&81,&81
��19,3,6,0,0,0
�	��dbD
��I%=0�19
��A%:�2,1,A%+(screen%*8),8
��0,0);20-I%;" ";:�J%=0�72
�A%(I%,J%)=�(3)-1
��:�
��2,1,17+(screen%*8),8
�A�65,81,73,85,81,93,85,101,93,81,85,73,81,65,73,61,65,45,33,45
�X%=1:Y%=28:y%=1
�MX%=19:MY%=0
NX%=19:NY%=0


mean%=226
A%(X%,y%)=0
A�N%=0�4:F%=�(18):G%=�(70):A%(F%,G%)=3:C%(N%,1)=F%:C%(N%,2)=G%
(�
2A�N%=0�4:F%=�(18):G%=�(70):A%(F%,G%)=4:N%(N%,1)=F%:N%(N%,2)=G%
<�
FQ%=0
P?&75=F%
Z�screen%>10?&75=8
d�
n 
x��screen
�*FX15,1
��0,31)'"Press key.";:I%=�
��:�col%=1�col
�
col%=0
��1:�130
��I%=0�29
��0,I%)�224;�19,I%)�224;
��
��1,29)�18,�224);
��I%=0�2:�J%=0�2
� �A%(I%,J%)=1�I%,29-J%)�224;
��:�
��3:�128
9�N%=0�4:G%=C%(N%,2):�G%<28F%=C%(N%,1):�F%,29-G%)"`";
�
:�N%=0�4:G%=N%(N%,2):�G%<28F%=N%(N%,1):�F%,29-G%)�225;
"�
,�X%,Y%);�230;
6%�1:�130:�X%-1,Y%+1)�224;:�3:�128
@�
J 
T��check
^P%=A%(X%,y%)
h�P%=3�cash
r�P%=4�nasty
|�Y%=1�find1
��Y%=29�find2
�5�>20000�1,-15,15,8:�0,Y%)"OUT OF TIME!":dead%=1
��
� 
���find1
��N%=0�4
�*�C%(N%,2)=y%+1�Y%=1�C%(N%,1),Y%-1)"`"
�,�N%(N%,2)=y%+1�Y%=1�N%(N%,1),Y%-1)�225;
��:�
� 
���find2
��N%=0�4
�+�C%(N%,2)=y%-1�Y%=29�C%(N%,1),Y%+1)"`"
,�N%(N%,2)=y%-1�Y%=29�N%(N%,1),Y%+1)�225
�:�
 
&
��cash
0N%=�(100)+100
:CASH%=CASH%+N%
D�X%-1,Y%+1);N%;
N�1,-10,200,4
XA%(X%,y%)=0
b,N%=-1:�:N%=N%+1:�C%(N%,1)=X%�C%(N%,2)=y%
lC%(N%,1)=0:C%(N%,2)=75
v�
� 
���nasty
�dead%=1
��8,Y%)"DEAD!"
��1,-15,15,8
��
� 
�
��left
��X%=1�A%(X%-1,y%)=1�
��X%,Y%)" ";
�X%=X%-1
��X%,Y%);�230;
�D%=y%-(30-Y%)
�1:�130
�I%=y%-1�y%+1
C%=A%(X%-1,I%)
 �C%=1�X%-1,30-(I%-D%))�224
*�
4�3:�128
>�&12,-8,100+X%,1
H�
R 
\��right
f�X%=18�A%(X%+1,y%)=1�
p�X%,Y%)" ";
zX%=X%+1
��X%,Y%);�230;
�D%=y%-(30-Y%)
��1:�130
��I%=y%-1�y%+1
�)�A%(X%+1,I%)=1�X%+1,30-(I%-D%))�224;
�
�:�3:�128
��&12,-8,100+X%,1
��
� 
���up
�!�y%=124�(A%(X%,y%+1)=1�G%=0)�
�t�G%=1�A%(X%,y%+1)=1B%=B%+1:�&10,1,6,8:G%=0:A%(X%,y%+1)=0:�1:�130:�N%=0�60:�X%,Y%-1)�224;�X%,Y%-1)" ";:�:�3:�128
��X%,Y%)" ";
	Y%=Y%-1:y%=y%+1
	E�Y%=0Y%=1:�30,11:�1:�130:�0,0)�224;�19,0)�224;:�3:�128:MY%=MY%+1
	�X%,Y%);�230;
	$�1:�130
	.�I%=X%-1�X%+1
	8!�A%(I%,y%+1)=1�I%,Y%-1)�224;
	B�
	L�3:�128
	V�
	` 
	j
��down
	t
�y%=1�
	~�A%(X%,y%-1)=1:�
	��X%,Y%)" ";
	�Y%=Y%+1:y%=y%-1
	�J�Y%=30Y%=29:�0,31):�1:�130:�0,Y%)�224;�19,Y%)�224;:�3:�128:MY%=MY%-1
	�,�y%=1�1:�130:�0,Y%+1)�20,�224);:�3:�128
	��X%,Y%);�230;
	��1:�130
	��I%=X%-1�X%+1
	�!�A%(I%,y%-1)=1�I%,Y%+1)�224;
	�
�:�3:�128
	��
	� 
	���titles
6�N%=1�2:�141�131"     ***   WALL   WALLY   ***":�

	��DdJ
�
�D$
(�D$<>" "�D$
2�D$=" "
<-�Z%<>0�25,10);"Hi-score:"�27,11)"�";;Z%;
F�30
P
I%=�:�
Z 
d!�"          � By Graham Leng"
e�,,"�Use keys:"
n�,,"�      Z _ left"
x�"�      X _ right"
��"�      * _ up"
��"�      ? _ down"
��"�    RTN _ blaster"
�,�,,"�Explore maze        �   SCORE FOR:"
��"�Avoid nasties"
�.�"�Collect cash           �Cash collected"
�. �"�Blast up only (max 6)  �Blasters left"
�)�"�Time limit 200 secs    �Time left"
��"�Three lives"
��,"�Press key"
��" "
��
� 
��assemble
	��TzL
OSBYTE=&FFF4:OSASCI=&FFE3
"
?&72=0
,
�N%=0�3�3
6P%=code
@[OPT0       \ � OPTN%
JLDA#&87:JSR OSBYTE
T
STX&70
^RTS
h 
r.mess LDX&72
|.loop LDA data,X
�BEQ end
�CMP#32:BEQ over
�SEC:SBC&75
�.over JSR OSASCI
�INX:JMP loop
�.end INX
�
STX&73
�RTS
�	.data
�]:�
��N%=1�10
�� A$
�	[OPT0
EQUS A$

EQUB 0
]
&�
0�
:'� ZHOO GRQH1 QRZ ILQG \RXU ZD\ EDFN
D&� UV[ IHK I\[ [OPZ PZ [OL LHZ` IP[
N� bLWW bLWWd NLOP_
X� bcPh R^^[= ZTT_ ^]  V^X]V
b� XBMM XBMMZ XJ[
l � \JQQ ITSJ \FQQ \FQQ^J]UJWY
v$� RWWW888 aKVV aKVVc  ]WK\^ K]]+
�� V^^S U^a P QTVX]]Ta
�� ]IEL% [LEX E TPE]IV
�&� OZMI\ [\]NN)  []XMZ IKM __ KPIUX
�

00000000  0d 00 0a 24 f4 22 20 83  57 41 4c 4c 20 57 41 4c  |...$." .WALL WAL|
00000010  4c 59 20 20 20 20 20 20  20 20 20 62 79 20 47 2e  |LY         by G.|
00000020  4c 65 6e 67 0d 00 14 05  20 0d 00 1e 18 de 20 63  |Leng.... ..... c|
00000030  6f 64 65 20 33 30 30 3a  f2 61 73 73 65 6d 62 6c  |ode 300:.assembl|
00000040  65 0d 00 28 17 e7 4b 25  3c 3e 39 39 39 5a 25 3d  |e..(..K%<>999Z%=|
00000050  30 3a 4b 25 3d 39 39 39  0d 00 32 1e eb 37 3a ef  |0:K%=999..2..7:.|
00000060  32 33 3b 38 32 30 32 3b  30 3b 30 3b 30 3b 3a f2  |23;8202;0;0;0;:.|
00000070  74 69 74 6c 65 73 0d 00  3c 1e de 41 25 28 31 39  |titles..<..A%(19|
00000080  2c 37 35 29 2c 43 25 28  34 2c 32 29 2c 4e 25 28  |,75),C%(4,2),N%(|
00000090  34 2c 32 29 0d 00 46 06  eb 35 0d 00 50 16 ef 31  |4,2)..F..5..P..1|
000000a0  35 2c 32 33 3b 38 32 30  32 3b 30 3b 30 3b 30 3b  |5,23;8202;0;0;0;|
000000b0  0d 00 5a 33 46 4c 41 47  3d 30 3a 74 61 72 67 25  |..Z3FLAG=0:targ%|
000000c0  3d 35 30 30 30 3a 6c 69  76 25 3d 33 3a 63 6f 6c  |=5000:liv%=3:col|
000000d0  25 3d 30 3a 73 63 72 65  65 6e 25 3d 31 3a 73 63  |%=0:screen%=1:sc|
000000e0  25 3d 30 0d 00 64 05 f5  0d 00 6e 0a f2 73 74 61  |%=0..d....n..sta|
000000f0  72 74 0d 00 78 0b 64 65  61 64 25 3d 30 0d 00 82  |rt..x.dead%=0...|
00000100  0b f2 73 63 72 65 65 6e  0d 00 8c 0b fb 33 3a fb  |..screen.....3:.|
00000110  31 32 38 0d 00 96 19 d1  3d 30 3a 42 25 3d 30 3a  |128.....=0:B%=0:|
00000120  43 41 53 48 25 3d 30 3a  53 25 3d 30 0d 00 a0 20  |CASH%=0:S%=0... |
00000130  4d 25 3d 30 3a 6d 25 3d  31 30 2d 73 63 72 65 65  |M%=0:m%=10-scree|
00000140  6e 25 3a e7 6d 25 3c 31  6d 25 3d 31 0d 00 aa 13  |n%:.m%<1m%=1....|
00000150  e7 73 63 72 65 65 6e 25  3d 31 6d 25 3d 2d 31 0d  |.screen%=1m%=-1.|
00000160  00 b4 05 f5 0d 00 be 12  e7 a6 2d 37 34 80 42 25  |..........-74.B%|
00000170  3c 36 47 25 3d 31 0d 00  c8 0e e7 a6 2d 39 38 f2  |<6G%=1......-98.|
00000180  6c 65 66 74 0d 00 d2 0f  e7 a6 2d 36 37 f2 72 69  |left......-67.ri|
00000190  67 68 74 0d 00 dc 0a f2  63 68 65 63 6b 0d 00 e6  |ght.....check...|
000001a0  0c e7 a6 2d 37 33 f2 75  70 0d 00 f0 0f e7 a6 2d  |...-73.up......-|
000001b0  31 30 35 f2 64 6f 77 6e  0d 00 fa 0a f2 63 68 65  |105.down.....che|
000001c0  63 6b 0d 01 04 1e 4d 25  3d 4d 25 2b 31 3a e7 4d  |ck....M%=M%+1:.M|
000001d0  25 3d 6d 25 4d 25 3d 30  3a f2 6d 65 61 6e 69 65  |%=m%M%=0:.meanie|
000001e0  0d 01 0e 08 47 25 3d 30  0d 01 18 0f e7 79 25 3d  |....G%=0.....y%=|
000001f0  37 32 f2 68 61 6c 66 0d  01 22 1b fd 79 25 3d 31  |72.half.."..y%=1|
00000200  80 51 25 3d 31 80 58 25  3d 31 84 64 65 61 64 25  |.Q%=1.X%=1.dead%|
00000210  3d 31 0d 01 2c 11 e7 64  65 61 64 25 3d 31 f2 6c  |=1..,..dead%=1.l|
00000220  69 66 65 0d 01 36 46 e7  46 4c 41 47 3d 31 46 4c  |ife..6F.FLAG=1FL|
00000230  41 47 3d 30 3a 51 25 3d  30 3a 58 25 3d 31 3a 59  |AG=0:Q%=0:X%=1:Y|
00000240  25 3d 32 38 3a 79 25 3d  31 3a 4d 58 25 3d 31 39  |%=28:y%=1:MX%=19|
00000250  3a 4d 59 25 3d 30 3a 4e  58 25 3d 31 39 3a 4e 59  |:MY%=0:NX%=19:NY|
00000260  25 3d 30 3a e5 8d 44 78  40 0d 01 40 0b 2a 46 58  |%=0:..Dx@..@.*FX|
00000270  31 35 2c 31 0d 01 4a 11  e7 46 4c 41 47 3d 32 f2  |15,1..J..FLAG=2.|
00000280  65 6e 64 3a f9 0d 01 54  22 dc 39 35 2c 31 33 31  |end:...T".95,131|
00000290  2c 39 35 2c 39 31 2c 31  32 37 2c 39 31 2c 38 37  |,95,91,127,91,87|
000002a0  2c 31 32 33 2c 38 37 0d  01 5e 05 20 0d 01 68 09  |,123,87..^. ..h.|
000002b0  f4 20 57 49 4e 0d 01 72  2f d4 31 2c 31 2c 31 30  |. WIN..r/.1,1,10|
000002c0  31 2c 34 3a d4 31 2c 31  2c 31 31 37 2c 34 3a d4  |1,4:.1,1,117,4:.|
000002d0  31 2c 31 2c 31 32 39 2c  34 3a d4 31 2c 31 2c 31  |1,1,129,4:.1,1,1|
000002e0  34 39 2c 38 0d 01 7c 0a  f2 73 63 6f 72 65 0d 01  |49,8..|..score..|
000002f0  86 0a 63 6f 6c 25 3d 31  0d 01 90 19 e7 73 63 72  |..col%=1.....scr|
00000300  65 65 6e 25 3c 31 30 3a  3f 26 37 32 3d 3f 26 37  |een%<10:?&72=?&7|
00000310  33 0d 01 9a 22 73 63 72  65 65 6e 25 3d 73 63 72  |3..."screen%=scr|
00000320  65 65 6e 25 2b 31 3a e3  49 25 3d 31 b8 35 30 30  |een%+1:.I%=1.500|
00000330  30 3a ed 0d 01 a4 06 fd  30 0d 01 ae 05 20 0d 01  |0:......0.... ..|
00000340  b8 0c dd f2 6d 65 61 6e  69 65 0d 01 c2 2f e7 91  |....meanie.../..|
00000350  20 83 32 3d 31 4e 58 25  3d 4d 58 25 2b b4 28 58  | .2=1NX%=MX%+.(X|
00000360  25 2d 4d 58 25 29 20 8b  4e 59 25 3d 4d 59 25 2b  |%-MX%) .NY%=MY%+|
00000370  b4 28 59 25 2d 4d 59 25  29 0d 01 cc 22 e7 4e 59  |.(Y%-MY%)...".NY|
00000380  25 3e 33 30 84 4e 59 25  3c 30 4d 58 25 3d 4e 58  |%>30.NY%<0MX%=NX|
00000390  25 3a 4d 59 25 3d 4e 59  25 3a e1 0d 01 d6 42 e7  |%:MY%=NY%:....B.|
000003a0  4e 58 25 3d 58 25 80 4e  59 25 3d 59 25 f2 6d 65  |NX%=X%.NY%=Y%.me|
000003b0  61 6e 6d 6f 76 65 3a d4  31 2c 2d 31 35 2c 35 30  |anmove:.1,-15,50|
000003c0  2c 38 3a f1 8a 38 2c 59  25 2b 31 29 22 44 45 41  |,8:..8,Y%+1)"DEA|
000003d0  44 21 22 3a 64 65 61 64  25 3d 31 3a e1 0d 01 e0  |D!":dead%=1:....|
000003e0  0f f1 8a 4e 58 25 2c 4e  59 25 29 3b 0d 01 ea 0a  |...NX%,NY%);....|
000003f0  d6 20 63 6f 64 65 0d 01  f4 15 e7 3f 26 37 30 3d  |. code.....?&70=|
00000400  33 32 f2 6d 65 61 6e 6d  6f 76 65 0d 01 fe 05 e1  |32.meanmove.....|
00000410  0d 02 08 05 20 0d 02 12  0e dd f2 6d 65 61 6e 6d  |.... ......meanm|
00000420  6f 76 65 0d 02 1c 12 f1  8a 4d 58 25 2c 4d 59 25  |ove......MX%,MY%|
00000430  29 22 20 22 3b 0d 02 26  13 4d 58 25 3d 4e 58 25  |)" ";..&.MX%=NX%|
00000440  3a 4d 59 25 3d 4e 59 25  0d 02 30 06 fb 31 0d 02  |:MY%=NY%..0..1..|
00000450  3a 14 f1 8a 4d 58 25 2c  4d 59 25 29 bd 6d 65 61  |:...MX%,MY%).mea|
00000460  6e 25 0d 02 44 06 fb 33  0d 02 4e 25 6d 65 61 6e  |n%..D..3..N%mean|
00000470  25 3d 6d 65 61 6e 25 2b  31 3a e7 6d 65 61 6e 25  |%=mean%+1:.mean%|
00000480  3d 32 33 30 6d 65 61 6e  25 3d 32 32 36 0d 02 58  |=230mean%=226..X|
00000490  13 d4 26 31 33 2c 2d 38  2c 6d 65 61 6e 25 2c 31  |..&13,-8,mean%,1|
000004a0  0d 02 62 05 e1 0d 02 6c  05 20 0d 02 76 09 dd f2  |..b....l. ..v...|
000004b0  63 6f 6c 0d 02 80 1b 41  25 3d b3 28 37 29 3a 42  |col....A%=.(7):B|
000004c0  25 3d b3 28 37 29 3a 43  25 3d b3 28 37 29 0d 02  |%=.(7):C%=.(7)..|
000004d0  8a 1b e7 41 25 3d 42 25  84 42 25 3d 43 25 84 41  |...A%=B%.B%=C%.A|
000004e0  25 3d 43 25 e5 8d 74 40  42 0d 02 94 23 ef 31 39  |%=C%..t@B...#.19|
000004f0  2c 31 2c 41 25 3b 30 3b  31 39 2c 32 2c 42 25 3b  |,1,A%;0;19,2,B%;|
00000500  30 3b 31 39 2c 33 2c 43  25 3b 30 3b 0d 02 9e 05  |0;19,3,C%;0;....|
00000510  e1 0d 02 a8 05 20 0d 02  b2 09 dd f2 65 6e 64 0d  |..... ......end.|
00000520  02 bc 38 f7 3a e3 4e 25  3d 31 b8 39 3a f3 49 25  |..8.:.N%=1.9:.I%|
00000530  3a d4 31 2c 31 2c 49 25  2c 36 3a ed 3a d4 26 31  |:.1,1,I%,6:.:.&1|
00000540  30 31 2c 31 2c 31 31 35  2c 38 3a d4 26 31 30 32  |01,1,115,8:.&102|
00000550  2c 31 2c 38 33 2c 38 0d  02 c6 20 e7 73 63 25 3e  |,1,83,8... .sc%>|
00000560  5a 25 f1 27 22 48 49 2d  53 43 4f 52 45 21 22 27  |Z%.'"HI-SCORE!"'|
00000570  3a 5a 25 3d 73 63 25 0d  02 d0 08 49 25 3d a5 0d  |:Z%=sc%....I%=..|
00000580  02 da 05 e1 0d 02 e4 05  20 0d 02 ee 0a dd f2 6c  |........ ......l|
00000590  69 66 65 0d 02 f8 10 e3  4e 25 3d 31 b8 35 30 30  |ife.....N%=1.500|
000005a0  30 3a ed 0d 03 02 16 6c  69 76 25 3d 6c 69 76 25  |0:.....liv%=liv%|
000005b0  2d 31 3a f2 73 63 6f 72  65 0d 03 0c 27 e7 6c 69  |-1:.score...'.li|
000005c0  76 25 3d 30 f1 27 22 47  41 4d 45 20 4f 56 45 52  |v%=0.'"GAME OVER|
000005d0  22 3a 46 4c 41 47 3d 32  20 8b 46 4c 41 47 3d 31  |":FLAG=2 .FLAG=1|
000005e0  0d 03 16 05 e1 0d 03 20  05 20 0d 03 2a 0b dd f2  |....... . ..*...|
000005f0  73 63 6f 72 65 0d 03 34  2f e7 64 65 61 64 25 3d  |score..4/.dead%=|
00000600  30 54 25 3d 91 20 81 31  30 30 3a 53 25 3d 28 32  |0T%=. .100:S%=(2|
00000610  30 30 2d 54 25 29 2a 31  30 2b 28 36 2d 42 25 29  |00-T%)*10+(6-B%)|
00000620  2a 31 30 30 0d 03 3e 0f  53 25 3d 53 25 2b 43 41  |*100..>.S%=S%+CA|
00000630  53 48 25 0d 03 48 0e 73  63 25 3d 73 63 25 2b 53  |SH%..H.sc%=sc%+S|
00000640  25 0d 03 52 06 fb 31 0d  03 5c 18 f1 8a 30 2c 33  |%..R..1..\...0,3|
00000650  31 29 3a e3 4e 25 3d 31  b8 31 32 3a f1 3a ed 0d  |1):.N%=1.12:.:..|
00000660  03 66 34 e7 64 65 61 64  25 3d 30 f1 8a 30 2c 33  |.f4.dead%=0..0,3|
00000670  31 29 27 22 53 43 52 45  45 4e 20 22 3b 73 63 72  |1)'"SCREEN ";scr|
00000680  65 65 6e 25 3b 22 20 43  4f 4d 50 4c 45 54 45 44  |een%;" COMPLETED|
00000690  2e 22 27 0d 03 70 33 e7  64 65 61 64 25 3d 30 f1  |."'..p3.dead%=0.|
000006a0  27 22 42 6c 61 73 74 65  72 73 3a 20 22 3b 36 2d  |'"Blasters: ";6-|
000006b0  42 25 3b 22 20 78 31 30  30 3d 22 3b 28 36 2d 42  |B%;" x100=";(6-B|
000006c0  25 29 2a 31 30 30 0d 03  7a 32 e7 64 65 61 64 25  |%)*100..z2.dead%|
000006d0  3d 30 f1 22 54 69 6d 65  3a 20 20 20 22 3b 32 30  |=0."Time:   ";20|
000006e0  30 2d 54 25 3b 22 20 78  31 30 3d 22 3b 28 32 30  |0-T%;" x10=";(20|
000006f0  30 2d 54 25 29 2a 31 30  0d 03 84 18 f1 22 43 61  |0-T%)*10....."Ca|
00000700  73 68 3a 20 20 20 60 22  3b 43 41 53 48 25 27 27  |sh:   `";CASH%''|
00000710  0d 03 8e 25 f1 22 53 63  6f 72 65 3a 22 3b 53 25  |...%."Score:";S%|
00000720  27 27 22 54 4f 54 41 4c  20 53 43 4f 52 45 3d 22  |''"TOTAL SCORE="|
00000730  3b 73 63 25 27 0d 03 98  49 e7 73 63 25 3e 3d 74  |;sc%'...I.sc%>=t|
00000740  61 72 67 25 20 6c 69 76  25 3d 6c 69 76 25 2b 31  |arg% liv%=liv%+1|
00000750  3a f1 27 22 45 58 54 52  41 20 4c 49 46 45 21 22  |:.'"EXTRA LIFE!"|
00000760  3a d4 33 2c 2d 31 35 2c  31 36 30 2c 34 3a 74 61  |:.3,-15,160,4:ta|
00000770  72 67 25 3d 74 61 72 67  25 2b 35 30 30 30 0d 03  |rg%=targ%+5000..|
00000780  a2 18 f1 27 22 4c 69 76  65 73 20 6c 65 66 74 3a  |...'"Lives left:|
00000790  22 3b 6c 69 76 25 0d 03  ac 10 e3 4e 25 3d 31 b8  |";liv%.....N%=1.|
000007a0  31 30 3a f1 3a ed 0d 03  b6 06 fb 33 0d 03 c0 05  |10:.:......3....|
000007b0  e1 0d 03 ca 05 20 0d 03  d4 0a dd f2 68 61 6c 66  |..... ......half|
000007c0  0d 03 de 24 d4 31 2c 31  2c 31 32 39 2c 34 3a d4  |...$.1,1,129,4:.|
000007d0  31 2c 31 2c 31 35 37 2c  34 3a d4 31 2c 31 2c 31  |1,1,157,4:.1,1,1|
000007e0  37 37 2c 38 0d 03 e8 0d  ef 33 30 3a d6 6d 65 73  |77,8.....30:.mes|
000007f0  73 0d 03 f2 11 e3 4e 25  3d 30 b8 31 30 30 30 30  |s.....N%=0.10000|
00000800  3a ed 0d 03 fc 2f f1 8a  30 2c 30 29 22 54 69 6d  |:..../..0,0)"Tim|
00000810  65 20 74 61 6b 65 6e 20  3a 20 22 3b a8 28 91 2f  |e taken : ";.(./|
00000820  31 30 30 29 3b 22 73 65  63 22 3b 89 28 32 30 29  |100);"sec";.(20)|
00000830  3b 0d 04 06 11 e3 4e 25  3d 30 b8 31 30 30 30 30  |;.....N%=0.10000|
00000840  3a ed 0d 04 10 10 51 25  3d 31 3a 79 25 3d 79 25  |:.....Q%=1:y%=y%|
00000850  2d 31 0d 04 1a 32 f1 8a  58 25 2c 59 25 29 22 20  |-1...2..X%,Y%)" |
00000860  22 3b 8a 30 2c 30 29 89  28 34 30 29 3b 3a 59 25  |";.0,0).(40);:Y%|
00000870  3d 59 25 2b 31 3a f1 8a  58 25 2c 59 25 29 3b bd  |=Y%+1:..X%,Y%);.|
00000880  32 33 30 3b 0d 04 24 05  e1 0d 04 2e 05 20 0d 04  |230;..$...... ..|
00000890  38 0b dd f2 73 74 61 72  74 0d 04 42 12 52 25 3d  |8...start..B.R%=|
000008a0  b3 28 2d 73 63 72 65 65  6e 25 29 0d 04 4c 25 e2  |.(-screen%)..L%.|
000008b0  31 2c 31 2c 30 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |1,1,0,0,0,0,0,0,|
000008c0  31 32 30 2c 2d 35 2c 30  2c 30 2c 31 32 30 2c 30  |120,-5,0,0,120,0|
000008d0  0d 04 56 25 ef 32 33 2c  32 32 34 2c 26 34 30 2c  |..V%.23,224,&40,|
000008e0  26 34 30 2c 26 46 46 2c  34 2c 34 2c 34 2c 26 46  |&40,&FF,4,4,4,&F|
000008f0  46 2c 26 34 30 0d 04 60  27 ef 32 33 2c 32 32 35  |F,&40..`'.23,225|
00000900  2c 30 2c 26 37 45 2c 26  34 32 2c 26 35 41 2c 26  |,0,&7E,&42,&5A,&|
00000910  35 41 2c 26 34 32 2c 26  37 45 2c 30 0d 04 6a 1b  |5A,&42,&7E,0..j.|
00000920  ef 32 33 2c 32 32 36 2c  30 2c 38 2c 38 2c 38 2c  |.23,226,0,8,8,8,|
00000930  38 2c 38 2c 38 2c 30 0d  04 74 1d ef 32 33 2c 32  |8,8,8,0..t..23,2|
00000940  32 37 2c 30 2c 30 2c 34  2c 38 2c 31 36 2c 33 32  |27,0,0,4,8,16,32|
00000950  2c 30 2c 30 0d 04 7e 1d  ef 32 33 2c 32 32 38 2c  |,0,0..~..23,228,|
00000960  30 2c 30 2c 30 2c 30 2c  26 33 43 2c 30 2c 30 2c  |0,0,0,0,&3C,0,0,|
00000970  30 0d 04 88 1d ef 32 33  2c 32 32 39 2c 30 2c 30  |0.....23,229,0,0|
00000980  2c 33 32 2c 31 36 2c 38  2c 34 2c 30 2c 30 0d 04  |,32,16,8,4,0,0..|
00000990  89 2b ef 32 33 2c 32 33  30 2c 26 43 33 2c 26 32  |.+.23,230,&C3,&2|
000009a0  34 2c 26 33 43 2c 26 45  37 2c 26 31 38 2c 26 36  |4,&3C,&E7,&18,&6|
000009b0  36 2c 26 38 31 2c 26 38  31 0d 04 92 11 ef 31 39  |6,&81,&81.....19|
000009c0  2c 33 2c 36 2c 30 2c 30  2c 30 0d 04 9c 09 f7 8d  |,3,6,0,0,0......|
000009d0  64 62 44 0d 04 a6 0c e3  49 25 3d 30 b8 31 39 0d  |dbD.....I%=0.19.|
000009e0  04 b0 1d f3 41 25 3a d4  32 2c 31 2c 41 25 2b 28  |....A%:.2,1,A%+(|
000009f0  73 63 72 65 65 6e 25 2a  38 29 2c 38 0d 04 ba 1e  |screen%*8),8....|
00000a00  f1 8a 30 2c 30 29 3b 32  30 2d 49 25 3b 22 20 22  |..0,0);20-I%;" "|
00000a10  3b 3a e3 4a 25 3d 30 b8  37 32 0d 04 c4 14 41 25  |;:.J%=0.72....A%|
00000a20  28 49 25 2c 4a 25 29 3d  b3 28 33 29 2d 31 0d 04  |(I%,J%)=.(3)-1..|
00000a30  ce 07 ed 3a ed 0d 04 d8  19 d4 32 2c 31 2c 31 37  |...:......2,1,17|
00000a40  2b 28 73 63 72 65 65 6e  25 2a 38 29 2c 38 0d 04  |+(screen%*8),8..|
00000a50  e2 41 dc 36 35 2c 38 31  2c 37 33 2c 38 35 2c 38  |.A.65,81,73,85,8|
00000a60  31 2c 39 33 2c 38 35 2c  31 30 31 2c 39 33 2c 38  |1,93,85,101,93,8|
00000a70  31 2c 38 35 2c 37 33 2c  38 31 2c 36 35 2c 37 33  |1,85,73,81,65,73|
00000a80  2c 36 31 2c 36 35 2c 34  35 2c 33 33 2c 34 35 0d  |,61,65,45,33,45.|
00000a90  04 ec 13 58 25 3d 31 3a  59 25 3d 32 38 3a 79 25  |...X%=1:Y%=28:y%|
00000aa0  3d 31 0d 04 f6 10 4d 58  25 3d 31 39 3a 4d 59 25  |=1....MX%=19:MY%|
00000ab0  3d 30 0d 05 00 10 4e 58  25 3d 31 39 3a 4e 59 25  |=0....NX%=19:NY%|
00000ac0  3d 30 0d 05 0a 0d 6d 65  61 6e 25 3d 32 32 36 0d  |=0....mean%=226.|
00000ad0  05 14 0f 41 25 28 58 25  2c 79 25 29 3d 30 0d 05  |...A%(X%,y%)=0..|
00000ae0  1e 41 e3 4e 25 3d 30 b8  34 3a 46 25 3d b3 28 31  |.A.N%=0.4:F%=.(1|
00000af0  38 29 3a 47 25 3d b3 28  37 30 29 3a 41 25 28 46  |8):G%=.(70):A%(F|
00000b00  25 2c 47 25 29 3d 33 3a  43 25 28 4e 25 2c 31 29  |%,G%)=3:C%(N%,1)|
00000b10  3d 46 25 3a 43 25 28 4e  25 2c 32 29 3d 47 25 0d  |=F%:C%(N%,2)=G%.|
00000b20  05 28 05 ed 0d 05 32 41  e3 4e 25 3d 30 b8 34 3a  |.(....2A.N%=0.4:|
00000b30  46 25 3d b3 28 31 38 29  3a 47 25 3d b3 28 37 30  |F%=.(18):G%=.(70|
00000b40  29 3a 41 25 28 46 25 2c  47 25 29 3d 34 3a 4e 25  |):A%(F%,G%)=4:N%|
00000b50  28 4e 25 2c 31 29 3d 46  25 3a 4e 25 28 4e 25 2c  |(N%,1)=F%:N%(N%,|
00000b60  32 29 3d 47 25 0d 05 3c  05 ed 0d 05 46 08 51 25  |2)=G%..<....F.Q%|
00000b70  3d 30 0d 05 50 0b 3f 26  37 35 3d 46 25 0d 05 5a  |=0..P.?&75=F%..Z|
00000b80  15 e7 73 63 72 65 65 6e  25 3e 31 30 3f 26 37 35  |..screen%>10?&75|
00000b90  3d 38 0d 05 64 05 e1 0d  05 6e 05 20 0d 05 78 0c  |=8..d....n. ..x.|
00000ba0  dd f2 73 63 72 65 65 6e  0d 05 82 0b 2a 46 58 31  |..screen....*FX1|
00000bb0  35 2c 31 0d 05 8c 1e f1  8a 30 2c 33 31 29 27 22  |5,1......0,31)'"|
00000bc0  50 72 65 73 73 20 6b 65  79 2e 22 3b 3a 49 25 3d  |Press key.";:I%=|
00000bd0  a5 0d 05 96 11 db 3a e7  63 6f 6c 25 3d 31 f2 63  |......:.col%=1.c|
00000be0  6f 6c 0d 05 a0 0a 63 6f  6c 25 3d 30 0d 05 aa 0b  |ol....col%=0....|
00000bf0  fb 31 3a fb 31 33 30 0d  05 b4 0c e3 49 25 3d 30  |.1:.130.....I%=0|
00000c00  b8 32 39 0d 05 be 1c f1  8a 30 2c 49 25 29 bd 32  |.29......0,I%).2|
00000c10  32 34 3b 8a 31 39 2c 49  25 29 bd 32 32 34 3b 0d  |24;.19,I%).224;.|
00000c20  05 c8 05 ed 0d 05 d2 15  f1 8a 31 2c 32 39 29 c4  |..........1,29).|
00000c30  31 38 2c bd 32 32 34 29  3b 0d 05 dc 13 e3 49 25  |18,.224);.....I%|
00000c40  3d 30 b8 32 3a e3 4a 25  3d 30 b8 32 0d 05 e6 20  |=0.2:.J%=0.2... |
00000c50  e7 41 25 28 49 25 2c 4a  25 29 3d 31 f1 8a 49 25  |.A%(I%,J%)=1..I%|
00000c60  2c 32 39 2d 4a 25 29 bd  32 32 34 3b 0d 05 f0 07  |,29-J%).224;....|
00000c70  ed 3a ed 0d 05 fa 0b fb  33 3a fb 31 32 38 0d 06  |.:......3:.128..|
00000c80  04 39 e3 4e 25 3d 30 b8  34 3a 47 25 3d 43 25 28  |.9.N%=0.4:G%=C%(|
00000c90  4e 25 2c 32 29 3a e7 47  25 3c 32 38 46 25 3d 43  |N%,2):.G%<28F%=C|
00000ca0  25 28 4e 25 2c 31 29 3a  f1 8a 46 25 2c 32 39 2d  |%(N%,1):..F%,29-|
00000cb0  47 25 29 22 60 22 3b 0d  06 0e 05 ed 0d 06 18 3a  |G%)"`";........:|
00000cc0  e3 4e 25 3d 30 b8 34 3a  47 25 3d 4e 25 28 4e 25  |.N%=0.4:G%=N%(N%|
00000cd0  2c 32 29 3a e7 47 25 3c  32 38 46 25 3d 4e 25 28  |,2):.G%<28F%=N%(|
00000ce0  4e 25 2c 31 29 3a f1 8a  46 25 2c 32 39 2d 47 25  |N%,1):..F%,29-G%|
00000cf0  29 bd 32 32 35 3b 0d 06  22 05 ed 0d 06 2c 12 f1  |).225;.."....,..|
00000d00  8a 58 25 2c 59 25 29 3b  bd 32 33 30 3b 0d 06 36  |.X%,Y%);.230;..6|
00000d10  25 fb 31 3a fb 31 33 30  3a f1 8a 58 25 2d 31 2c  |%.1:.130:..X%-1,|
00000d20  59 25 2b 31 29 bd 32 32  34 3b 3a fb 33 3a fb 31  |Y%+1).224;:.3:.1|
00000d30  32 38 0d 06 40 05 e1 0d  06 4a 05 20 0d 06 54 0b  |28..@....J. ..T.|
00000d40  dd f2 63 68 65 63 6b 0d  06 5e 10 50 25 3d 41 25  |..check..^.P%=A%|
00000d50  28 58 25 2c 79 25 29 0d  06 68 0e e7 50 25 3d 33  |(X%,y%)..h..P%=3|
00000d60  f2 63 61 73 68 0d 06 72  0f e7 50 25 3d 34 f2 6e  |.cash..r..P%=4.n|
00000d70  61 73 74 79 0d 06 7c 0f  e7 59 25 3d 31 f2 66 69  |asty..|..Y%=1.fi|
00000d80  6e 64 31 0d 06 86 10 e7  59 25 3d 32 39 f2 66 69  |nd1.....Y%=29.fi|
00000d90  6e 64 32 0d 06 90 35 e7  91 3e 32 30 30 30 30 d4  |nd2...5..>20000.|
00000da0  31 2c 2d 31 35 2c 31 35  2c 38 3a f1 8a 30 2c 59  |1,-15,15,8:..0,Y|
00000db0  25 29 22 4f 55 54 20 4f  46 20 54 49 4d 45 21 22  |%)"OUT OF TIME!"|
00000dc0  3a 64 65 61 64 25 3d 31  0d 06 9a 05 e1 0d 06 a4  |:dead%=1........|
00000dd0  05 20 0d 06 ae 0b dd f2  66 69 6e 64 31 0d 06 b8  |. ......find1...|
00000de0  0b e3 4e 25 3d 30 b8 34  0d 06 c2 2a e7 43 25 28  |..N%=0.4...*.C%(|
00000df0  4e 25 2c 32 29 3d 79 25  2b 31 80 59 25 3d 31 f1  |N%,2)=y%+1.Y%=1.|
00000e00  8a 43 25 28 4e 25 2c 31  29 2c 59 25 2d 31 29 22  |.C%(N%,1),Y%-1)"|
00000e10  60 22 0d 06 cc 2c e7 4e  25 28 4e 25 2c 32 29 3d  |`"...,.N%(N%,2)=|
00000e20  79 25 2b 31 80 59 25 3d  31 f1 8a 4e 25 28 4e 25  |y%+1.Y%=1..N%(N%|
00000e30  2c 31 29 2c 59 25 2d 31  29 bd 32 32 35 3b 0d 06  |,1),Y%-1).225;..|
00000e40  d6 07 ed 3a e1 0d 06 e0  05 20 0d 06 ea 0b dd f2  |...:..... ......|
00000e50  66 69 6e 64 32 0d 06 f4  0b e3 4e 25 3d 30 b8 34  |find2.....N%=0.4|
00000e60  0d 06 fe 2b e7 43 25 28  4e 25 2c 32 29 3d 79 25  |...+.C%(N%,2)=y%|
00000e70  2d 31 80 59 25 3d 32 39  f1 8a 43 25 28 4e 25 2c  |-1.Y%=29..C%(N%,|
00000e80  31 29 2c 59 25 2b 31 29  22 60 22 0d 07 08 2c e7  |1),Y%+1)"`"...,.|
00000e90  4e 25 28 4e 25 2c 32 29  3d 79 25 2d 31 80 59 25  |N%(N%,2)=y%-1.Y%|
00000ea0  3d 32 39 f1 8a 4e 25 28  4e 25 2c 31 29 2c 59 25  |=29..N%(N%,1),Y%|
00000eb0  2b 31 29 bd 32 32 35 0d  07 12 07 ed 3a e1 0d 07  |+1).225.....:...|
00000ec0  1c 05 20 0d 07 26 0a dd  f2 63 61 73 68 0d 07 30  |.. ..&...cash..0|
00000ed0  11 4e 25 3d b3 28 31 30  30 29 2b 31 30 30 0d 07  |.N%=.(100)+100..|
00000ee0  3a 12 43 41 53 48 25 3d  43 41 53 48 25 2b 4e 25  |:.CASH%=CASH%+N%|
00000ef0  0d 07 44 14 f1 8a 58 25  2d 31 2c 59 25 2b 31 29  |..D...X%-1,Y%+1)|
00000f00  3b 4e 25 3b 0d 07 4e 10  d4 31 2c 2d 31 30 2c 32  |;N%;..N..1,-10,2|
00000f10  30 30 2c 34 0d 07 58 0f  41 25 28 58 25 2c 79 25  |00,4..X.A%(X%,y%|
00000f20  29 3d 30 0d 07 62 2c 4e  25 3d 2d 31 3a f5 3a 4e  |)=0..b,N%=-1:.:N|
00000f30  25 3d 4e 25 2b 31 3a fd  43 25 28 4e 25 2c 31 29  |%=N%+1:.C%(N%,1)|
00000f40  3d 58 25 80 43 25 28 4e  25 2c 32 29 3d 79 25 0d  |=X%.C%(N%,2)=y%.|
00000f50  07 6c 1a 43 25 28 4e 25  2c 31 29 3d 30 3a 43 25  |.l.C%(N%,1)=0:C%|
00000f60  28 4e 25 2c 32 29 3d 37  35 0d 07 76 05 e1 0d 07  |(N%,2)=75..v....|
00000f70  80 05 20 0d 07 8a 0b dd  f2 6e 61 73 74 79 0d 07  |.. ......nasty..|
00000f80  94 0b 64 65 61 64 25 3d  31 0d 07 9e 12 f1 8a 38  |..dead%=1......8|
00000f90  2c 59 25 29 22 44 45 41  44 21 22 0d 07 a8 0f d4  |,Y%)"DEAD!".....|
00000fa0  31 2c 2d 31 35 2c 31 35  2c 38 0d 07 b2 05 e1 0d  |1,-15,15,8......|
00000fb0  07 bc 05 20 0d 07 c6 0a  dd f2 6c 65 66 74 0d 07  |... ......left..|
00000fc0  d0 18 e7 58 25 3d 31 84  41 25 28 58 25 2d 31 2c  |...X%=1.A%(X%-1,|
00000fd0  79 25 29 3d 31 e1 0d 07  da 10 f1 8a 58 25 2c 59  |y%)=1.......X%,Y|
00000fe0  25 29 22 20 22 3b 0d 07  e4 0b 58 25 3d 58 25 2d  |%)" ";....X%=X%-|
00000ff0  31 0d 07 ee 12 f1 8a 58  25 2c 59 25 29 3b bd 32  |1......X%,Y%);.2|
00001000  33 30 3b 0d 07 f8 11 44  25 3d 79 25 2d 28 33 30  |30;....D%=y%-(30|
00001010  2d 59 25 29 0d 08 02 0b  fb 31 3a fb 31 33 30 0d  |-Y%).....1:.130.|
00001020  08 0c 11 e3 49 25 3d 79  25 2d 31 b8 79 25 2b 31  |....I%=y%-1.y%+1|
00001030  0d 08 16 12 43 25 3d 41  25 28 58 25 2d 31 2c 49  |....C%=A%(X%-1,I|
00001040  25 29 0d 08 20 1f e7 43  25 3d 31 f1 8a 58 25 2d  |%).. ..C%=1..X%-|
00001050  31 2c 33 30 2d 28 49 25  2d 44 25 29 29 bd 32 32  |1,30-(I%-D%)).22|
00001060  34 0d 08 2a 05 ed 0d 08  34 0b fb 33 3a fb 31 32  |4..*....4..3:.12|
00001070  38 0d 08 3e 14 d4 26 31  32 2c 2d 38 2c 31 30 30  |8..>..&12,-8,100|
00001080  2b 58 25 2c 31 0d 08 48  05 e1 0d 08 52 05 20 0d  |+X%,1..H....R. .|
00001090  08 5c 0b dd f2 72 69 67  68 74 0d 08 66 19 e7 58  |.\...right..f..X|
000010a0  25 3d 31 38 84 41 25 28  58 25 2b 31 2c 79 25 29  |%=18.A%(X%+1,y%)|
000010b0  3d 31 e1 0d 08 70 10 f1  8a 58 25 2c 59 25 29 22  |=1...p...X%,Y%)"|
000010c0  20 22 3b 0d 08 7a 0b 58  25 3d 58 25 2b 31 0d 08  | ";..z.X%=X%+1..|
000010d0  84 12 f1 8a 58 25 2c 59  25 29 3b bd 32 33 30 3b  |....X%,Y%);.230;|
000010e0  0d 08 8e 11 44 25 3d 79  25 2d 28 33 30 2d 59 25  |....D%=y%-(30-Y%|
000010f0  29 0d 08 98 0b fb 31 3a  fb 31 33 30 0d 08 a2 11  |).....1:.130....|
00001100  e3 49 25 3d 79 25 2d 31  b8 79 25 2b 31 0d 08 ac  |.I%=y%-1.y%+1...|
00001110  29 e7 41 25 28 58 25 2b  31 2c 49 25 29 3d 31 f1  |).A%(X%+1,I%)=1.|
00001120  8a 58 25 2b 31 2c 33 30  2d 28 49 25 2d 44 25 29  |.X%+1,30-(I%-D%)|
00001130  29 bd 32 32 34 3b 0d 08  b6 0d ed 3a fb 33 3a fb  |).224;.....:.3:.|
00001140  31 32 38 0d 08 c0 14 d4  26 31 32 2c 2d 38 2c 31  |128.....&12,-8,1|
00001150  30 30 2b 58 25 2c 31 0d  08 ca 05 e1 0d 08 d4 05  |00+X%,1.........|
00001160  20 0d 08 de 08 dd f2 75  70 0d 08 e8 21 e7 79 25  | ......up...!.y%|
00001170  3d 31 32 34 84 28 41 25  28 58 25 2c 79 25 2b 31  |=124.(A%(X%,y%+1|
00001180  29 3d 31 80 47 25 3d 30  29 e1 0d 08 f2 74 e7 47  |)=1.G%=0)....t.G|
00001190  25 3d 31 80 41 25 28 58  25 2c 79 25 2b 31 29 3d  |%=1.A%(X%,y%+1)=|
000011a0  31 42 25 3d 42 25 2b 31  3a d4 26 31 30 2c 31 2c  |1B%=B%+1:.&10,1,|
000011b0  36 2c 38 3a 47 25 3d 30  3a 41 25 28 58 25 2c 79  |6,8:G%=0:A%(X%,y|
000011c0  25 2b 31 29 3d 30 3a fb  31 3a fb 31 33 30 3a e3  |%+1)=0:.1:.130:.|
000011d0  4e 25 3d 30 b8 36 30 3a  f1 8a 58 25 2c 59 25 2d  |N%=0.60:..X%,Y%-|
000011e0  31 29 bd 32 32 34 3b 8a  58 25 2c 59 25 2d 31 29  |1).224;.X%,Y%-1)|
000011f0  22 20 22 3b 3a ed 3a fb  33 3a fb 31 32 38 0d 08  |" ";:.:.3:.128..|
00001200  fc 10 f1 8a 58 25 2c 59  25 29 22 20 22 3b 0d 09  |....X%,Y%)" ";..|
00001210  06 13 59 25 3d 59 25 2d  31 3a 79 25 3d 79 25 2b  |..Y%=Y%-1:y%=y%+|
00001220  31 0d 09 10 45 e7 59 25  3d 30 59 25 3d 31 3a ef  |1...E.Y%=0Y%=1:.|
00001230  33 30 2c 31 31 3a fb 31  3a fb 31 33 30 3a f1 8a  |30,11:.1:.130:..|
00001240  30 2c 30 29 bd 32 32 34  3b 8a 31 39 2c 30 29 bd  |0,0).224;.19,0).|
00001250  32 32 34 3b 3a fb 33 3a  fb 31 32 38 3a 4d 59 25  |224;:.3:.128:MY%|
00001260  3d 4d 59 25 2b 31 0d 09  1a 12 f1 8a 58 25 2c 59  |=MY%+1......X%,Y|
00001270  25 29 3b bd 32 33 30 3b  0d 09 24 0b fb 31 3a fb  |%);.230;..$..1:.|
00001280  31 33 30 0d 09 2e 11 e3  49 25 3d 58 25 2d 31 b8  |130.....I%=X%-1.|
00001290  58 25 2b 31 0d 09 38 21  e7 41 25 28 49 25 2c 79  |X%+1..8!.A%(I%,y|
000012a0  25 2b 31 29 3d 31 f1 8a  49 25 2c 59 25 2d 31 29  |%+1)=1..I%,Y%-1)|
000012b0  bd 32 32 34 3b 0d 09 42  05 ed 0d 09 4c 0b fb 33  |.224;..B....L..3|
000012c0  3a fb 31 32 38 0d 09 56  05 e1 0d 09 60 05 20 0d  |:.128..V....`. .|
000012d0  09 6a 0a dd f2 64 6f 77  6e 0d 09 74 0a e7 79 25  |.j...down..t..y%|
000012e0  3d 31 e1 0d 09 7e 14 e7  41 25 28 58 25 2c 79 25  |=1...~..A%(X%,y%|
000012f0  2d 31 29 3d 31 3a e1 0d  09 88 10 f1 8a 58 25 2c  |-1)=1:.......X%,|
00001300  59 25 29 22 20 22 3b 0d  09 92 13 59 25 3d 59 25  |Y%)" ";....Y%=Y%|
00001310  2b 31 3a 79 25 3d 79 25  2d 31 0d 09 9c 4a e7 59  |+1:y%=y%-1...J.Y|
00001320  25 3d 33 30 59 25 3d 32  39 3a f1 8a 30 2c 33 31  |%=30Y%=29:..0,31|
00001330  29 3a fb 31 3a fb 31 33  30 3a f1 8a 30 2c 59 25  |):.1:.130:..0,Y%|
00001340  29 bd 32 32 34 3b 8a 31  39 2c 59 25 29 bd 32 32  |).224;.19,Y%).22|
00001350  34 3b 3a fb 33 3a fb 31  32 38 3a 4d 59 25 3d 4d  |4;:.3:.128:MY%=M|
00001360  59 25 2d 31 0d 09 a6 2c  e7 79 25 3d 31 fb 31 3a  |Y%-1...,.y%=1.1:|
00001370  fb 31 33 30 3a f1 8a 30  2c 59 25 2b 31 29 c4 32  |.130:..0,Y%+1).2|
00001380  30 2c bd 32 32 34 29 3b  3a fb 33 3a fb 31 32 38  |0,.224);:.3:.128|
00001390  0d 09 b0 12 f1 8a 58 25  2c 59 25 29 3b bd 32 33  |......X%,Y%);.23|
000013a0  30 3b 0d 09 ba 0b fb 31  3a fb 31 33 30 0d 09 c4  |0;.....1:.130...|
000013b0  11 e3 49 25 3d 58 25 2d  31 b8 58 25 2b 31 0d 09  |..I%=X%-1.X%+1..|
000013c0  ce 21 e7 41 25 28 49 25  2c 79 25 2d 31 29 3d 31  |.!.A%(I%,y%-1)=1|
000013d0  f1 8a 49 25 2c 59 25 2b  31 29 bd 32 32 34 3b 0d  |..I%,Y%+1).224;.|
000013e0  09 d8 0d ed 3a fb 33 3a  fb 31 32 38 0d 09 e2 05  |....:.3:.128....|
000013f0  e1 0d 09 ec 05 20 0d 09  f6 0c dd f2 74 69 74 6c  |..... ......titl|
00001400  65 73 0d 0a 00 36 e3 4e  25 3d 31 b8 32 3a f1 bd  |es...6.N%=1.2:..|
00001410  31 34 31 bd 31 33 31 22  20 20 20 20 20 2a 2a 2a  |141.131"     ***|
00001420  20 20 20 57 41 4c 4c 20  20 20 57 41 4c 4c 59 20  |   WALL   WALLY |
00001430  20 20 2a 2a 2a 22 3a ed  0d 0a 0a 09 f7 8d 44 64  |  ***":.......Dd|
00001440  4a 0d 0a 14 05 f5 0d 0a  1e 07 f3 44 24 0d 0a 28  |J..........D$..(|
00001450  0f e7 44 24 3c 3e 22 20  22 f1 44 24 0d 0a 32 0b  |..D$<>" ".D$..2.|
00001460  fd 44 24 3d 22 20 22 0d  0a 3c 2d e7 5a 25 3c 3e  |.D$=" "..<-.Z%<>|
00001470  30 f1 8a 32 35 2c 31 30  29 3b 22 48 69 2d 73 63  |0..25,10);"Hi-sc|
00001480  6f 72 65 3a 22 8a 32 37  2c 31 31 29 22 86 22 3b  |ore:".27,11)".";|
00001490  3b 5a 25 3b 0d 0a 46 07  ef 33 30 0d 0a 50 0a 49  |;Z%;..F..30..P.I|
000014a0  25 3d a5 3a e1 0d 0a 5a  05 20 0d 0a 64 21 dc 22  |%=.:...Z. ..d!."|
000014b0  20 20 20 20 20 20 20 20  20 20 83 20 42 79 20 47  |          . By G|
000014c0  72 61 68 61 6d 20 4c 65  6e 67 22 0d 0a 65 13 dc  |raham Leng"..e..|
000014d0  2c 2c 22 86 55 73 65 20  6b 65 79 73 3a 22 0d 0a  |,,".Use keys:"..|
000014e0  6e 18 dc 2c 2c 22 86 20  20 20 20 20 20 5a 20 5f  |n..,,".      Z _|
000014f0  20 6c 65 66 74 22 0d 0a  78 17 dc 22 86 20 20 20  | left"..x..".   |
00001500  20 20 20 58 20 5f 20 72  69 67 68 74 22 0d 0a 82  |   X _ right"...|
00001510  14 dc 22 86 20 20 20 20  20 20 2a 20 5f 20 75 70  |..".      * _ up|
00001520  22 0d 0a 8c 16 dc 22 86  20 20 20 20 20 20 3f 20  |".....".      ? |
00001530  5f 20 64 6f 77 6e 22 0d  0a 96 19 dc 22 86 20 20  |_ down".....".  |
00001540  20 20 52 54 4e 20 5f 20  62 6c 61 73 74 65 72 22  |  RTN _ blaster"|
00001550  0d 0a a0 2c dc 2c 2c 22  82 45 78 70 6c 6f 72 65  |...,.,,".Explore|
00001560  20 6d 61 7a 65 20 20 20  20 20 20 20 20 84 20 20  | maze        .  |
00001570  20 53 43 4f 52 45 20 46  4f 52 3a 22 0d 0a aa 15  | SCORE FOR:"....|
00001580  dc 22 82 41 76 6f 69 64  20 6e 61 73 74 69 65 73  |.".Avoid nasties|
00001590  22 0d 0a b4 2e dc 22 82  43 6f 6c 6c 65 63 74 20  |".....".Collect |
000015a0  63 61 73 68 20 20 20 20  20 20 20 20 20 20 20 84  |cash           .|
000015b0  43 61 73 68 20 63 6f 6c  6c 65 63 74 65 64 22 0d  |Cash collected".|
000015c0  0a be 2e 20 dc 22 82 42  6c 61 73 74 20 75 70 20  |... .".Blast up |
000015d0  6f 6e 6c 79 20 28 6d 61  78 20 36 29 20 20 84 42  |only (max 6)  .B|
000015e0  6c 61 73 74 65 72 73 20  6c 65 66 74 22 0d 0a c8  |lasters left"...|
000015f0  29 dc 22 82 54 69 6d 65  20 6c 69 6d 69 74 20 32  |).".Time limit 2|
00001600  30 30 20 73 65 63 73 20  20 20 20 84 54 69 6d 65  |00 secs    .Time|
00001610  20 6c 65 66 74 22 0d 0a  d2 13 dc 22 82 54 68 72  | left".....".Thr|
00001620  65 65 20 6c 69 76 65 73  22 0d 0a dc 12 dc 2c 22  |ee lives".....,"|
00001630  83 50 72 65 73 73 20 6b  65 79 22 0d 0a e6 08 dc  |.Press key".....|
00001640  22 20 22 0d 0a f0 05 e1  0d 0a fa 05 20 0d 0b 04  |" "......... ...|
00001650  0e dd f2 61 73 73 65 6d  62 6c 65 0d 0b 0e 09 f7  |...assemble.....|
00001660  8d 54 7a 4c 0d 0b 18 1d  4f 53 42 59 54 45 3d 26  |.TzL....OSBYTE=&|
00001670  46 46 46 34 3a 4f 53 41  53 43 49 3d 26 46 46 45  |FFF4:OSASCI=&FFE|
00001680  33 0d 0b 22 0a 3f 26 37  32 3d 30 0d 0b 2c 0d e3  |3..".?&72=0..,..|
00001690  4e 25 3d 30 b8 33 88 33  0d 0b 36 0b 50 25 3d 63  |N%=0.3.3..6.P%=c|
000016a0  6f 64 65 0d 0b 40 19 5b  4f 50 54 30 20 20 20 20  |ode..@.[OPT0    |
000016b0  20 20 20 5c 20 84 20 4f  50 54 4e 25 0d 0b 4a 16  |   \ . OPTN%..J.|
000016c0  4c 44 41 23 26 38 37 3a  4a 53 52 20 4f 53 42 59  |LDA#&87:JSR OSBY|
000016d0  54 45 0d 0b 54 0a 53 54  58 26 37 30 0d 0b 5e 07  |TE..T.STX&70..^.|
000016e0  52 54 53 0d 0b 68 05 20  0d 0b 72 10 2e 6d 65 73  |RTS..h. ..r..mes|
000016f0  73 20 4c 44 58 26 37 32  0d 0b 7c 14 2e 6c 6f 6f  |s LDX&72..|..loo|
00001700  70 20 4c 44 41 20 64 61  74 61 2c 58 0d 0b 86 0b  |p LDA data,X....|
00001710  42 45 51 20 65 6e 64 0d  0b 90 13 43 4d 50 23 33  |BEQ end....CMP#3|
00001720  32 3a 42 45 51 20 6f 76  65 72 0d 0b 9a 0e 53 45  |2:BEQ over....SE|
00001730  43 3a 53 42 43 26 37 35  0d 0b a4 14 2e 6f 76 65  |C:SBC&75.....ove|
00001740  72 20 4a 53 52 20 4f 53  41 53 43 49 0d 0b ae 10  |r JSR OSASCI....|
00001750  49 4e 58 3a 4a 4d 50 20  6c 6f 6f 70 0d 0b b8 0c  |INX:JMP loop....|
00001760  2e 65 6e 64 20 49 4e 58  0d 0b c2 0a 53 54 58 26  |.end INX....STX&|
00001770  37 33 0d 0b cc 07 52 54  53 0d 0b d6 09 2e 64 61  |73....RTS.....da|
00001780  74 61 0d 0b e0 07 5d 3a  ed 0d 0b ea 0c e3 4e 25  |ta....]:......N%|
00001790  3d 31 b8 31 30 0d 0b f4  08 f3 20 41 24 0d 0b fe  |=1.10..... A$...|
000017a0  09 5b 4f 50 54 30 0d 0c  08 0b 45 51 55 53 20 41  |.[OPT0....EQUS A|
000017b0  24 0d 0c 12 0a 45 51 55  42 20 30 0d 0c 1c 05 5d  |$....EQUB 0....]|
000017c0  0d 0c 26 05 ed 0d 0c 30  05 e1 0d 0c 3a 27 dc 20  |..&....0....:'. |
000017d0  5a 48 4f 4f 20 47 52 51  48 31 20 51 52 5a 20 49  |ZHOO GRQH1 QRZ I|
000017e0  4c 51 47 20 5c 52 58 55  20 5a 44 5c 20 45 44 46  |LQG \RXU ZD\ EDF|
000017f0  4e 0d 0c 44 26 dc 20 55  56 5b 20 49 48 4b 20 49  |N..D&. UV[ IHK I|
00001800  5c 5b 20 5b 4f 50 5a 20  50 5a 20 5b 4f 4c 20 4c  |\[ [OPZ PZ [OL L|
00001810  48 5a 60 20 49 50 5b 0d  0c 4e 16 dc 20 62 4c 57  |HZ` IP[..N.. bLW|
00001820  57 20 62 4c 57 57 64 20  4e 4c 4f 50 5f 0d 0c 58  |W bLWWd NLOP_..X|
00001830  1f dc 20 62 63 50 68 20  52 5e 5e 5b 3d 20 5a 54  |.. bcPh R^^[= ZT|
00001840  54 5f 20 5e 5d 20 20 56  5e 58 5d 56 0d 0c 62 14  |T_ ^]  V^X]V..b.|
00001850  dc 20 58 42 4d 4d 20 58  42 4d 4d 5a 20 58 4a 5b  |. XBMM XBMMZ XJ[|
00001860  0d 0c 6c 20 dc 20 5c 4a  51 51 20 49 54 53 4a 20  |..l . \JQQ ITSJ |
00001870  5c 46 51 51 20 5c 46 51  51 5e 4a 5d 55 4a 57 59  |\FQQ \FQQ^J]UJWY|
00001880  0d 0c 76 24 dc 20 52 57  57 57 38 38 38 20 61 4b  |..v$. RWWW888 aK|
00001890  56 56 20 61 4b 56 56 63  20 20 5d 57 4b 5c 5e 20  |VV aKVVc  ]WK\^ |
000018a0  4b 5d 5d 2b 0d 0c 80 19  dc 20 56 5e 5e 53 20 55  |K]]+..... V^^S U|
000018b0  5e 61 20 50 20 51 54 56  58 5d 5d 54 61 0d 0c 8a  |^a P QTVX]]Ta...|
000018c0  19 dc 20 5d 49 45 4c 25  20 5b 4c 45 58 20 45 20  |.. ]IEL% [LEX E |
000018d0  54 50 45 5d 49 56 0d 0c  94 26 dc 20 4f 5a 4d 49  |TPE]IV...&. OZMI|
000018e0  5c 20 5b 5c 5d 4e 4e 29  20 20 5b 5d 58 4d 5a 20  |\ [\]NN)  []XMZ |
000018f0  49 4b 4d 20 5f 5f 20 4b  50 49 55 58 0d ff        |IKM __ KPIUX..|
000018fe

Our privacy policy is here.
Last updated: 01 May 2025, 21:49 UTC
Website designed by .