Home » Archimedes archive » Acorn Computing » 1993 07 Mega Disk.adf » 93_07 » DataVision/!DataVis/Accs/CASHBOOKG/TechnDream/!TechDream/Stage1/Loader1
DataVision/!DataVis/Accs/CASHBOOKG/TechnDream/!TechDream/Stage1/Loader1
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 » 1993 07 Mega Disk.adf » 93_07 |
| Filename: | DataVision/!DataVis/Accs/CASHBOOKG/TechnDream/!TechDream/Stage1/Loader1 |
| Read OK: | ✔ |
| File size: | 185D bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
10 REM ><Obey$Dir>.STAGE1.Loader1
11 ?&8F26=3
20 PROCAss
30 AlienTable=&9EB00:AlienData=AlienTable+256*12
40 FORT%=0TO5000:T%?AlienData=0:NEXT
50 Flash=&69CCC:Explos1=&643D8:Explos2=&68698
60 X=&3DA00
70 FORX1=1TO15:FORY1=1TO8:?X=RND(4)-1:X=X+1:NEXT:NEXT
80 FOR Loop=1TO4
90 FOR T=1TO4:FORX1=1TO10:FORY1=1TO8:?X=RND(4)-1:X=X+1:NEXT:NEXT:NEXT
100 ?X=3:X=X+1:?X=2:X=X+1
110 ?X=4:X=X+1:?X=5:X=X+1:?X=6:X=X+1
120 ?X=0:X=X+1:?X=1:X=X+1:?X=2:X=X+1
130 N1=7:FOR Y1=1TO7:?X=N1:N1=N1+1:X=X+1:NEXT:?X=3:X=X+1
140 FORX1=1TO7:FORY1=1TO8:?X=N1:N1=N1+1:X=X+1:NEXT:NEXT
150 FORX1=1TO10:?X=136:X=X+1:?X=137:X=X+1:FORY1=1TO4:?X=138:X=X+1:NEXT:?X=139:X=X+1:?X=140:X=X+1:NEXT
160 N1=70:FORX1=1TO7:FORY1=1TO8:?X=N1:N1=N1+1:X=X+1:NEXT:NEXT
170 FOR Y1=1TO7:?X=N1:N1=N1+1:X=X+1:NEXT:?X=3:X=X+1
180 ?X=0:X=X+1:?X=1:X=X+1
190 FORY1=1TO3:?X=N1:X=X+1:N1=N1+1:NEXT
200 ?X=0:X=X+1:?X=1:X=X+1:?X=2:X=X+1
210 NEXT
220 *L. <Obey$Dir>.STAGE1.BackG1 15100
230 !RD=&15100:!SC=&3E400:!LE=&24C48:CALL Uncom
240 *L. <Obey$Dir>.STAGE1.Aliens1 15100
250 !RD=&15100:!SC=&74700:!LE=&CB6C:CALL Uncom
260 PROCAlienSetup
270 CHAIN"<Obey$Dir>.X"
280 DEFPROCAT(N,S,M,X,Y,A,B)
290 N=N-1:N=N*12
300 AlienTable!(N)=S:AlienTable!(N+4)=M:AlienTable?(N+8)=X:AlienTable?(N+9)=Y
310 AlienTable?(N+10)=A:AlienTable?(N+11)=B:ENDPROC
320 DEFPROCAlienSetup
330 PROCAlienPositions
340 ALGraph=&74738
350 FOR Parp=1TO4:PROCAT(Parp,ALGraph,0,32,30,0,0):ALGraph=ALGraph+&42C:NEXT
351 Smeg=ALGraph
360 PROCAT(5,ALGraph,0,56,28,0,0):ALGraph=ALGraph+1612
370 FOR Parp=1TO2:PROCAT(Parp+5,ALGraph,0,64,44,0,0):ALGraph=ALGraph+2860:NEXT
380 FOR Parp=1TO2:PROCAT(Parp+7,ALGraph,0,32,32,0,0):ALGraph=ALGraph+&42C:NEXT
390 PROCAT(10,ALGraph,0,32,28,0,0):ALGraph=ALGraph+940
400 PROCAT(11,ALGraph,0,32,32,0,0):ALGraph=ALGraph+&42C
410 PROCAT(12,ALGraph,0,48,8,0,0):ALGraph=ALGraph+428
411 ALGraph=ALGraph+&40
420 FOR Parp=1TO2:PROCAT(Parp+12,ALGraph,0,32,20,0,0):ALGraph=ALGraph+812:NEXT
430 FOR Parp=1TO2:PROCAT(Parp+14,ALGraph,0,32,28,0,0):ALGraph=ALGraph+&42C:NEXT
431 ALGraph=ALGraph-&40
440 FOR Parp=1TO4:PROCAT(Parp+16,ALGraph,0,40,20,0,0):ALGraph=ALGraph+844:NEXT
450 PROCAT(21,ALGraph,1,48,8,0,0):ALGraph=ALGraph+428
460 FOR Parp=1TO2:PROCAT(Parp+21,ALGraph,1,128,104,0,0):ALGraph=ALGraph+&342C:NEXT
461 PROCAT(5,Smeg,ALGraph,56,26,0,0):ALGraph=ALGraph+1612
470 PROCAT(238,Flash,Flash+&42C,8,1,0,0)
480 PROCAT(239,Flash,Flash+&42C,8,1,0,0)
490 PROCAT(240,Flash,Flash+&42C,32,32,0,0)
500 PROCAT(241,(Flash+&42C*2),(Flash+&42C*2)+2348,48,38,0,0)
510 FORT%=0TO7:PROCAT(242+T%,Explos1+(T%*&42C*2),(Explos1+&42C+(T%*&42C*2)),32,32,0,0):NEXT
520 PROCAT(230,Flash,Flash+&42C,32,32,0,0)
530 PROCAT(231,(Flash+&42C*2),(Flash+&42C*2)+2348,48,38,0,0)
540 FORT%=0TO7:PROCAT(232+T%,Explos2+(T%*812),0,32,24,0,0):NEXT:ENDPROC
550 ENDPROC
560 DEFPROCA(X,Y,A,F,H,D,N)
570 IF (?&8F0F+?&8F1F)>1 H=H+2
580 H=H+(?&8F21-1)*2:IF H>255 H=255
590 AlienData!AC=X:AC=AC+4:A%=Y:A%=A%+N*&10000:AlienData!AC=A%:AC=AC+4:AlienData!AC=A:AC=AC+1:AlienData?AC=F:AC=AC+1:AlienData?AC=H:AC=AC+1:AlienData?AC=D:AC=AC+1:ENDPROC
600 DEFPROCF(X,Y,F,D,N):X=X+128:Y=Y+128:FORT=1TON:FO?FC=X:FC=FC+1:FO?FC=Y
610 FC=FC+1:FO?FC=F:FC=FC+1:FO?FC=D:FC=FC+1:NEXT:ENDPROC
620 DEFPROCForms
630 FO=F1+8:FC=0:PROCF(-2,0,0,0,30):PROCF(0,0,0,1,100)
640 ENDPROC
650 DEFPROCAlienPositions AC=0
660 FORT=1TO20:PROCA(0,0,0,0,0,0,0):NEXT
670 FORT=1TO7:PROCA(340,8+T*32,17,138,2,0,T+10):NEXT
680 FORT=1TO5:PROCA(0,0,0,0,0,0,0):NEXT
690 FORT=1TO7:PROCA(340,8+(8-T)*32,17,138,2,0,T+10):NEXT
700 IF N%=1 THEN FORT=1TO8:PROCA(0,0,0,0,0,0,0):NEXT ELSE FORT=1TO4:PROCA(-20,75,19,155,4,0,T+4):PROCA(-20,185,19,156,4,0,T):NEXT
710 FORT=1TO4:PROCA(340,128,17,131,2,0,10+T*2):PROCA(340,128,17,132,2,0,9+T*2):NEXT
720 IF N%=1 THEN FORT=1TO5:PROCA(0,0,0,0,0,0,0):NEXT ELSE FORT=1TO5:PROCA(360,130,8,138,2,0,T):NEXT
721 IF N%=3 FORT=1TO5:PROCA(300,-30,17,187,5,0,T+20):NEXT ELSE FORT=1TO5:PROCA(0,0,0,0,0,0,0):NEXT
730 FORT=1TO4:PROCA(340,128,17,131,2,0,10+T*2):PROCA(340,128,17,132,2,0,9+T*2):NEXT
740 PROCA(340,128,1,151,10,0,10):PROCA(340,80,1,152,10,0,11):PROCA(340,200,1,151,10,0,12):PROCA(340,40,1,153,10,0,13):PROCA(340,100,1,153,10,0,14):PROCA(340,160,1,152,10,0,15):PROCA(340,140,1,151,10,0,16)
750 PROCA(340,130,5,154,6,0,17):PROCA(340,80,5,154,6,0,18):PROCA(340,180,5,154,6,0,19)
760 FORT=1TO5:PROCA(0,0,0,0,0,0,0):NEXT
770 PROCA(340,130,5,154,6,0,20):PROCA(340,80,5,154,6,0,21):PROCA(340,180,5,154,6,0,22)
780 FORT=1TO7:PROCA(0,0,0,0,0,0,0):NEXT
790 FORT=1TO5:PROCA(360,80,8,138,2,0,T+5):NEXT
800 FORT=1TO5:PROCA(360,130,8,138,2,0,T+10):NEXT
810 FORT=1TO5:PROCA(360,180,8,138,2,0,T+15):NEXT
820 FORT=1TO4:PROCA(0,0,0,0,0,0,0):NEXT
830 FORT=1TO5:PROCA(-20,75,19,155,4,0,T+5):NEXT
840 FORT=1TO2:PROCA(0,0,0,0,0,0,0):NEXT
850 FORT=1TO5:PROCA(-20,185,19,156,4,0,T+10):NEXT
860 FORT=1TO3:PROCA(0,0,0,0,0,0,0):NEXT
870 FORT=1TO5:PROCA(340,128,17,138,2,0,T+10):NEXT
880 FORT=1TO3:PROCA(0,0,0,0,0,0,0):NEXT
890 PROCA(360,140,6,157,25,0,10)
900 FORT=1TO4:PROCA(0,0,0,0,0,0,0):NEXT
910 PROCA(360,80,6,157,25,0,11)
920 FORT=1TO4:PROCA(0,0,0,0,0,0,0):NEXT
930 PROCA(360,180,6,157,25,0,12)
940 FORT=1TO5:PROCA(0,0,0,0,0,0,0):NEXT
950 FORN=1TO7:FORT=1TO3:PROCA(0,0,0,0,0,0,0):NEXT:IF N%>1 PROCA(360,40+RND(160),17,138,5,0,N+5) ELSE PROCA(0,0,0,0,0,0,0)
960 PROCA(400,40+RND(160),9+RND(2),159,20,0,N+12):NEXT
970 FORT=1TO5:PROCA(360,80,17,138,2,0,T+20):NEXT
980 FORT=1TO4:PROCA(0,0,0,0,0,0,0):NEXT
990 FORT=1TO5:PROCA(360,180,17,138,2,0,T+25):NEXT
1000 PROCA(340,130,5,154,6,0,10):PROCA(340,80,5,154,6,0,11):PROCA(340,180,5,154,6,0,12)
1010 FORT=1TO3:PROCA(0,0,0,0,0,0,0):NEXT
1020 PROCA(360,140,6,157,25,0,10)
1030 FORT=1TO4:PROCA(0,0,0,0,0,0,0):NEXT
1040 PROCA(360,80,6,157,25,0,11)
1050 FORT=1TO4:PROCA(0,0,0,0,0,0,0):NEXT
1060 PROCA(360,180,6,157,25,0,12)
1070 IF N%=3 FORT=1TO5:PROCA(300,280,17,186,5,0,11+T*2):PROCA(300,-30,17,187,5,0,12+T*2):NEXT ELSE FORT=1TO10:PROCA(0,0,0,0,0,0,0):NEXT
1080 FORT=1TO4:PROCA(-20,75,19,155,4,0,T+5):NEXT
1090 FORT=1TO2:PROCA(0,0,0,0,0,0,0):NEXT
1100 FORT=1TO4:PROCA(-20,185,19,156,4,0,T+1):NEXT
1110 FORT=1TO3:PROCA(0,0,0,0,0,0,0):NEXT
1120 FORT=1TO6:PROCA(340,128,17,138,2,0,T+20):NEXT
1130 FORT=1TO6:PROCA(0,0,0,0,0,0,0):NEXT
1140 FORT=1TO5:PROCA(360,80,8,138,2,0,T+5):NEXT
1150 FORT=1TO5:PROCA(360,130,8,138,2,0,T+10):NEXT
1160 FORT=1TO5:PROCA(360,180,8,138,2,0,T+15):NEXT
1170 IF N%=3 FORT=1TO8:PROCA(300,280,17,186,5,0,T):NEXT ELSE FORT=1TO8:PROCA(0,0,0,0,0,0,0):NEXT
1180 PROCA(340,128,1,151,10,0,10):PROCA(340,80,1,152,10,0,11):PROCA(340,200,1,151,10,0,12):PROCA(340,40,1,153,10,0,13):PROCA(340,100,1,153,10,0,14):PROCA(340,160,1,152,10,0,15):PROCA(340,140,1,151,10,0,16)
1190 PROCA(340,130,5,154,6,0,17):PROCA(340,80,5,154,6,0,18):PROCA(340,180,5,154,6,0,19)
1200 FORT=1TO6:PROCA(0,0,0,0,0,0,0):NEXT
1210 FORT=1TO7:PROCA(340,8+T*32,17,138,2,0,T+20):NEXT
1220 FORT=1TO5:PROCA(0,0,0,0,0,0,0):NEXT
1230 FORT=1TO7:PROCA(340,8+(8-T)*32,17,138,2,0,T+10):NEXT
1240 FORT=1TO5:PROCA(0,0,0,0,0,0,0):NEXT
1250 PROCA(400,80,22,160,160,0,1)
1260 ENDPROC
1270 DEFPROCAss:FORT%=0TO2STEP2:P%=&15000:[OPT T%
1280 .Uncom STMFD R13!,{R14}:LDR R1,RD:LDR R0,SC:LDR R4,LE:.EX1 LDRB R2,[R1],#1:LDRB R3,[R1],#1:.EX2 STRB R2,[R0],#1:SUB R4,R4,#1:SUBS R3,R3,#1:BGT EX2:CMP R4,#0:BGT EX1:LDMFD R13!,{PC}:.RD EQUD0:.SC EQUD0:.LE EQUD0:]:NEXT:ENDPROC
! � ><Obey$Dir>.STAGE1.Loader1
?&8F26=3
�Ass
2 AlienTable=&9EB00:AlienData=AlienTable+256*12
( �T%=0�5000:T%?AlienData=0:�
2/ Flash=&69CCC:Explos1=&643D8:Explos2=&68698
<
X=&3DA00
F) �X1=1�15:�Y1=1�8:?X=�(4)-1:X=X+1:�:�
P � Loop=1�4
Z3 � T=1�4:�X1=1�10:�Y1=1�8:?X=�(4)-1:X=X+1:�:�:�
d ?X=3:X=X+1:?X=2:X=X+1
n% ?X=4:X=X+1:?X=5:X=X+1:?X=6:X=X+1
x% ?X=0:X=X+1:?X=1:X=X+1:?X=2:X=X+1
�3 N1=7:� Y1=1�7:?X=N1:N1=N1+1:X=X+1:�:?X=3:X=X+1
�, �X1=1�7:�Y1=1�8:?X=N1:N1=N1+1:X=X+1:�:�
�Z �X1=1�10:?X=136:X=X+1:?X=137:X=X+1:�Y1=1�4:?X=138:X=X+1:�:?X=139:X=X+1:?X=140:X=X+1:�
�2 N1=70:�X1=1�7:�Y1=1�8:?X=N1:N1=N1+1:X=X+1:�:�
�. � Y1=1�7:?X=N1:N1=N1+1:X=X+1:�:?X=3:X=X+1
� ?X=0:X=X+1:?X=1:X=X+1
�" �Y1=1�3:?X=N1:X=X+1:N1=N1+1:�
�% ?X=0:X=X+1:?X=1:X=X+1:?X=2:X=X+1
� �
�' *L. <Obey$Dir>.STAGE1.BackG1 15100
�- !RD=&15100:!SC=&3E400:!LE=&24C48:� Uncom
�( *L. <Obey$Dir>.STAGE1.Aliens1 15100
�, !RD=&15100:!SC=&74700:!LE=&CB6C:� Uncom
�AlienSetup
�"<Obey$Dir>.X"
��AT(N,S,M,X,Y,A,B)
" N=N-1:N=N*12
,N AlienTable!(N)=S:AlienTable!(N+4)=M:AlienTable?(N+8)=X:AlienTable?(N+9)=Y
6. AlienTable?(N+10)=A:AlienTable?(N+11)=B:�
@ ��AlienSetup
J �AlienPositions
T ALGraph=&74738
^D � Parp=1�4:�AT(Parp,ALGraph,0,32,30,0,0):ALGraph=ALGraph+&42C:�
_ Smeg=ALGraph
h4 �AT(5,ALGraph,0,56,28,0,0):ALGraph=ALGraph+1612
rF � Parp=1�2:�AT(Parp+5,ALGraph,0,64,44,0,0):ALGraph=ALGraph+2860:�
|F � Parp=1�2:�AT(Parp+7,ALGraph,0,32,32,0,0):ALGraph=ALGraph+&42C:�
�4 �AT(10,ALGraph,0,32,28,0,0):ALGraph=ALGraph+940
�5 �AT(11,ALGraph,0,32,32,0,0):ALGraph=ALGraph+&42C
�3 �AT(12,ALGraph,0,48,8,0,0):ALGraph=ALGraph+428
� ALGraph=ALGraph+&40
�F � Parp=1�2:�AT(Parp+12,ALGraph,0,32,20,0,0):ALGraph=ALGraph+812:�
�G � Parp=1�2:�AT(Parp+14,ALGraph,0,32,28,0,0):ALGraph=ALGraph+&42C:�
� ALGraph=ALGraph-&40
�F � Parp=1�4:�AT(Parp+16,ALGraph,0,40,20,0,0):ALGraph=ALGraph+844:�
�3 �AT(21,ALGraph,1,48,8,0,0):ALGraph=ALGraph+428
�J � Parp=1�2:�AT(Parp+21,ALGraph,1,128,104,0,0):ALGraph=ALGraph+&342C:�
�7 �AT(5,Smeg,ALGraph,56,26,0,0):ALGraph=ALGraph+1612
�& �AT(238,Flash,Flash+&42C,8,1,0,0)
�& �AT(239,Flash,Flash+&42C,8,1,0,0)
�( �AT(240,Flash,Flash+&42C,32,32,0,0)
�: �AT(241,(Flash+&42C*2),(Flash+&42C*2)+2348,48,38,0,0)
�S �T%=0�7:�AT(242+T%,Explos1+(T%*&42C*2),(Explos1+&42C+(T%*&42C*2)),32,32,0,0):�
( �AT(230,Flash,Flash+&42C,32,32,0,0)
: �AT(231,(Flash+&42C*2),(Flash+&42C*2)+2348,48,38,0,0)
9 �T%=0�7:�AT(232+T%,Explos2+(T%*812),0,32,24,0,0):�:�
& �
0 ��A(X,Y,A,F,H,D,N)
: � (?&8F0F+?&8F1F)>1 H=H+2
D# H=H+(?&8F21-1)*2:� H>255 H=255
N� AlienData!AC=X:AC=AC+4:A%=Y:A%=A%+N*&10000:AlienData!AC=A%:AC=AC+4:AlienData!AC=A:AC=AC+1:AlienData?AC=F:AC=AC+1:AlienData?AC=H:AC=AC+1:AlienData?AC=D:AC=AC+1:�
XB ��F(X,Y,F,D,N):X=X+128:Y=Y+128:�T=1�N:FO?FC=X:FC=FC+1:FO?FC=Y
b0 FC=FC+1:FO?FC=F:FC=FC+1:FO?FC=D:FC=FC+1:�:�
l ��Forms
v1 FO=F1+8:FC=0:�F(-2,0,0,0,30):�F(0,0,0,1,100)
� �
� ��AlienPositions AC=0
� �T=1�20:�A(0,0,0,0,0,0,0):�
�, �T=1�7:�A(340,8+T*32,17,138,2,0,T+10):�
� �T=1�5:�A(0,0,0,0,0,0,0):�
�0 �T=1�7:�A(340,8+(8-T)*32,17,138,2,0,T+10):�
�f � N%=1 � �T=1�8:�A(0,0,0,0,0,0,0):� � �T=1�4:�A(-20,75,19,155,4,0,T+4):�A(-20,185,19,156,4,0,T):�
�H �T=1�4:�A(340,128,17,131,2,0,10+T*2):�A(340,128,17,132,2,0,9+T*2):�
�K � N%=1 � �T=1�5:�A(0,0,0,0,0,0,0):� � �T=1�5:�A(360,130,8,138,2,0,T):�
�M � N%=3 �T=1�5:�A(300,-30,17,187,5,0,T+20):� � �T=1�5:�A(0,0,0,0,0,0,0):�
�H �T=1�4:�A(340,128,17,131,2,0,10+T*2):�A(340,128,17,132,2,0,9+T*2):�
� �A(340,128,1,151,10,0,10):�A(340,80,1,152,10,0,11):�A(340,200,1,151,10,0,12):�A(340,40,1,153,10,0,13):�A(340,100,1,153,10,0,14):�A(340,160,1,152,10,0,15):�A(340,140,1,151,10,0,16)
�N �A(340,130,5,154,6,0,17):�A(340,80,5,154,6,0,18):�A(340,180,5,154,6,0,19)
� �T=1�5:�A(0,0,0,0,0,0,0):�
N �A(340,130,5,154,6,0,20):�A(340,80,5,154,6,0,21):�A(340,180,5,154,6,0,22)
�T=1�7:�A(0,0,0,0,0,0,0):�
& �T=1�5:�A(360,80,8,138,2,0,T+5):�
( �T=1�5:�A(360,130,8,138,2,0,T+10):�
*( �T=1�5:�A(360,180,8,138,2,0,T+15):�
4 �T=1�4:�A(0,0,0,0,0,0,0):�
>' �T=1�5:�A(-20,75,19,155,4,0,T+5):�
H �T=1�2:�A(0,0,0,0,0,0,0):�
R) �T=1�5:�A(-20,185,19,156,4,0,T+10):�
\ �T=1�3:�A(0,0,0,0,0,0,0):�
f) �T=1�5:�A(340,128,17,138,2,0,T+10):�
p �T=1�3:�A(0,0,0,0,0,0,0):�
z �A(360,140,6,157,25,0,10)
� �T=1�4:�A(0,0,0,0,0,0,0):�
� �A(360,80,6,157,25,0,11)
� �T=1�4:�A(0,0,0,0,0,0,0):�
� �A(360,180,6,157,25,0,12)
� �T=1�5:�A(0,0,0,0,0,0,0):�
�b �N=1�7:�T=1�3:�A(0,0,0,0,0,0,0):�:� N%>1 �A(360,40+�(160),17,138,5,0,N+5) � �A(0,0,0,0,0,0,0)
�- �A(400,40+�(160),9+�(2),159,20,0,N+12):�
�( �T=1�5:�A(360,80,17,138,2,0,T+20):�
� �T=1�4:�A(0,0,0,0,0,0,0):�
�) �T=1�5:�A(360,180,17,138,2,0,T+25):�
�N �A(340,130,5,154,6,0,10):�A(340,80,5,154,6,0,11):�A(340,180,5,154,6,0,12)
� �T=1�3:�A(0,0,0,0,0,0,0):�
� �A(360,140,6,157,25,0,10)
�T=1�4:�A(0,0,0,0,0,0,0):�
�A(360,80,6,157,25,0,11)
�T=1�4:�A(0,0,0,0,0,0,0):�
$ �A(360,180,6,157,25,0,12)
.n � N%=3 �T=1�5:�A(300,280,17,186,5,0,11+T*2):�A(300,-30,17,187,5,0,12+T*2):� � �T=1�10:�A(0,0,0,0,0,0,0):�
8' �T=1�4:�A(-20,75,19,155,4,0,T+5):�
B �T=1�2:�A(0,0,0,0,0,0,0):�
L( �T=1�4:�A(-20,185,19,156,4,0,T+1):�
V �T=1�3:�A(0,0,0,0,0,0,0):�
`) �T=1�6:�A(340,128,17,138,2,0,T+20):�
j �T=1�6:�A(0,0,0,0,0,0,0):�
t& �T=1�5:�A(360,80,8,138,2,0,T+5):�
~( �T=1�5:�A(360,130,8,138,2,0,T+10):�
�( �T=1�5:�A(360,180,8,138,2,0,T+15):�
�J � N%=3 �T=1�8:�A(300,280,17,186,5,0,T):� � �T=1�8:�A(0,0,0,0,0,0,0):�
�� �A(340,128,1,151,10,0,10):�A(340,80,1,152,10,0,11):�A(340,200,1,151,10,0,12):�A(340,40,1,153,10,0,13):�A(340,100,1,153,10,0,14):�A(340,160,1,152,10,0,15):�A(340,140,1,151,10,0,16)
�N �A(340,130,5,154,6,0,17):�A(340,80,5,154,6,0,18):�A(340,180,5,154,6,0,19)
� �T=1�6:�A(0,0,0,0,0,0,0):�
�, �T=1�7:�A(340,8+T*32,17,138,2,0,T+20):�
� �T=1�5:�A(0,0,0,0,0,0,0):�
�0 �T=1�7:�A(340,8+(8-T)*32,17,138,2,0,T+10):�
� �T=1�5:�A(0,0,0,0,0,0,0):�
� �A(400,80,22,160,160,0,1)
� �
�& ��Ass:�T%=0�2�2:P%=&15000:[OPT T%
� .Uncom STMFD R13!,{R14}:LDR R1,RD:LDR R0,SC:LDR R4,LE:.EX1 LDRB R2,[R1],#1:LDRB R3,[R1],#1:.EX2 STRB R2,[R0],#1:SUB R4,R4,#1:SUBS R3,R3,#1:BGT EX2:CMP R4,#0:BGT EX1:LDMFD R13!,{PC}:.RD EQUD0:.SC EQUD0:.LE EQUD0:]:�:�
� 00000000 0d 00 0a 21 20 f4 20 3e 3c 4f 62 65 79 24 44 69 |...! . ><Obey$Di|
00000010 72 3e 2e 53 54 41 47 45 31 2e 4c 6f 61 64 65 72 |r>.STAGE1.Loader|
00000020 31 0d 00 0b 0d 20 3f 26 38 46 32 36 3d 33 0d 00 |1.... ?&8F26=3..|
00000030 14 09 20 f2 41 73 73 0d 00 1e 32 20 41 6c 69 65 |.. .Ass...2 Alie|
00000040 6e 54 61 62 6c 65 3d 26 39 45 42 30 30 3a 41 6c |nTable=&9EB00:Al|
00000050 69 65 6e 44 61 74 61 3d 41 6c 69 65 6e 54 61 62 |ienData=AlienTab|
00000060 6c 65 2b 32 35 36 2a 31 32 0d 00 28 20 20 e3 54 |le+256*12..( .T|
00000070 25 3d 30 b8 35 30 30 30 3a 54 25 3f 41 6c 69 65 |%=0.5000:T%?Alie|
00000080 6e 44 61 74 61 3d 30 3a ed 0d 00 32 2f 20 46 6c |nData=0:...2/ Fl|
00000090 61 73 68 3d 26 36 39 43 43 43 3a 45 78 70 6c 6f |ash=&69CCC:Explo|
000000a0 73 31 3d 26 36 34 33 44 38 3a 45 78 70 6c 6f 73 |s1=&643D8:Explos|
000000b0 32 3d 26 36 38 36 39 38 0d 00 3c 0d 20 58 3d 26 |2=&68698..<. X=&|
000000c0 33 44 41 30 30 0d 00 46 29 20 e3 58 31 3d 31 b8 |3DA00..F) .X1=1.|
000000d0 31 35 3a e3 59 31 3d 31 b8 38 3a 3f 58 3d b3 28 |15:.Y1=1.8:?X=.(|
000000e0 34 29 2d 31 3a 58 3d 58 2b 31 3a ed 3a ed 0d 00 |4)-1:X=X+1:.:...|
000000f0 50 0f 20 e3 20 4c 6f 6f 70 3d 31 b8 34 0d 00 5a |P. . Loop=1.4..Z|
00000100 33 20 e3 20 54 3d 31 b8 34 3a e3 58 31 3d 31 b8 |3 . T=1.4:.X1=1.|
00000110 31 30 3a e3 59 31 3d 31 b8 38 3a 3f 58 3d b3 28 |10:.Y1=1.8:?X=.(|
00000120 34 29 2d 31 3a 58 3d 58 2b 31 3a ed 3a ed 3a ed |4)-1:X=X+1:.:.:.|
00000130 0d 00 64 1a 20 3f 58 3d 33 3a 58 3d 58 2b 31 3a |..d. ?X=3:X=X+1:|
00000140 3f 58 3d 32 3a 58 3d 58 2b 31 0d 00 6e 25 20 3f |?X=2:X=X+1..n% ?|
00000150 58 3d 34 3a 58 3d 58 2b 31 3a 3f 58 3d 35 3a 58 |X=4:X=X+1:?X=5:X|
00000160 3d 58 2b 31 3a 3f 58 3d 36 3a 58 3d 58 2b 31 0d |=X+1:?X=6:X=X+1.|
00000170 00 78 25 20 3f 58 3d 30 3a 58 3d 58 2b 31 3a 3f |.x% ?X=0:X=X+1:?|
00000180 58 3d 31 3a 58 3d 58 2b 31 3a 3f 58 3d 32 3a 58 |X=1:X=X+1:?X=2:X|
00000190 3d 58 2b 31 0d 00 82 33 20 4e 31 3d 37 3a e3 20 |=X+1...3 N1=7:. |
000001a0 59 31 3d 31 b8 37 3a 3f 58 3d 4e 31 3a 4e 31 3d |Y1=1.7:?X=N1:N1=|
000001b0 4e 31 2b 31 3a 58 3d 58 2b 31 3a ed 3a 3f 58 3d |N1+1:X=X+1:.:?X=|
000001c0 33 3a 58 3d 58 2b 31 0d 00 8c 2c 20 e3 58 31 3d |3:X=X+1..., .X1=|
000001d0 31 b8 37 3a e3 59 31 3d 31 b8 38 3a 3f 58 3d 4e |1.7:.Y1=1.8:?X=N|
000001e0 31 3a 4e 31 3d 4e 31 2b 31 3a 58 3d 58 2b 31 3a |1:N1=N1+1:X=X+1:|
000001f0 ed 3a ed 0d 00 96 5a 20 e3 58 31 3d 31 b8 31 30 |.:....Z .X1=1.10|
00000200 3a 3f 58 3d 31 33 36 3a 58 3d 58 2b 31 3a 3f 58 |:?X=136:X=X+1:?X|
00000210 3d 31 33 37 3a 58 3d 58 2b 31 3a e3 59 31 3d 31 |=137:X=X+1:.Y1=1|
00000220 b8 34 3a 3f 58 3d 31 33 38 3a 58 3d 58 2b 31 3a |.4:?X=138:X=X+1:|
00000230 ed 3a 3f 58 3d 31 33 39 3a 58 3d 58 2b 31 3a 3f |.:?X=139:X=X+1:?|
00000240 58 3d 31 34 30 3a 58 3d 58 2b 31 3a ed 0d 00 a0 |X=140:X=X+1:....|
00000250 32 20 4e 31 3d 37 30 3a e3 58 31 3d 31 b8 37 3a |2 N1=70:.X1=1.7:|
00000260 e3 59 31 3d 31 b8 38 3a 3f 58 3d 4e 31 3a 4e 31 |.Y1=1.8:?X=N1:N1|
00000270 3d 4e 31 2b 31 3a 58 3d 58 2b 31 3a ed 3a ed 0d |=N1+1:X=X+1:.:..|
00000280 00 aa 2e 20 e3 20 59 31 3d 31 b8 37 3a 3f 58 3d |... . Y1=1.7:?X=|
00000290 4e 31 3a 4e 31 3d 4e 31 2b 31 3a 58 3d 58 2b 31 |N1:N1=N1+1:X=X+1|
000002a0 3a ed 3a 3f 58 3d 33 3a 58 3d 58 2b 31 0d 00 b4 |:.:?X=3:X=X+1...|
000002b0 1a 20 3f 58 3d 30 3a 58 3d 58 2b 31 3a 3f 58 3d |. ?X=0:X=X+1:?X=|
000002c0 31 3a 58 3d 58 2b 31 0d 00 be 22 20 e3 59 31 3d |1:X=X+1..." .Y1=|
000002d0 31 b8 33 3a 3f 58 3d 4e 31 3a 58 3d 58 2b 31 3a |1.3:?X=N1:X=X+1:|
000002e0 4e 31 3d 4e 31 2b 31 3a ed 0d 00 c8 25 20 3f 58 |N1=N1+1:....% ?X|
000002f0 3d 30 3a 58 3d 58 2b 31 3a 3f 58 3d 31 3a 58 3d |=0:X=X+1:?X=1:X=|
00000300 58 2b 31 3a 3f 58 3d 32 3a 58 3d 58 2b 31 0d 00 |X+1:?X=2:X=X+1..|
00000310 d2 06 20 ed 0d 00 dc 27 20 2a 4c 2e 20 3c 4f 62 |.. ....' *L. <Ob|
00000320 65 79 24 44 69 72 3e 2e 53 54 41 47 45 31 2e 42 |ey$Dir>.STAGE1.B|
00000330 61 63 6b 47 31 20 31 35 31 30 30 0d 00 e6 2d 20 |ackG1 15100...- |
00000340 21 52 44 3d 26 31 35 31 30 30 3a 21 53 43 3d 26 |!RD=&15100:!SC=&|
00000350 33 45 34 30 30 3a 21 4c 45 3d 26 32 34 43 34 38 |3E400:!LE=&24C48|
00000360 3a d6 20 55 6e 63 6f 6d 0d 00 f0 28 20 2a 4c 2e |:. Uncom...( *L.|
00000370 20 3c 4f 62 65 79 24 44 69 72 3e 2e 53 54 41 47 | <Obey$Dir>.STAG|
00000380 45 31 2e 41 6c 69 65 6e 73 31 20 31 35 31 30 30 |E1.Aliens1 15100|
00000390 0d 00 fa 2c 20 21 52 44 3d 26 31 35 31 30 30 3a |..., !RD=&15100:|
000003a0 21 53 43 3d 26 37 34 37 30 30 3a 21 4c 45 3d 26 |!SC=&74700:!LE=&|
000003b0 43 42 36 43 3a d6 20 55 6e 63 6f 6d 0d 01 04 10 |CB6C:. Uncom....|
000003c0 20 f2 41 6c 69 65 6e 53 65 74 75 70 0d 01 0e 14 | .AlienSetup....|
000003d0 20 d7 22 3c 4f 62 65 79 24 44 69 72 3e 2e 58 22 | ."<Obey$Dir>.X"|
000003e0 0d 01 18 18 20 dd f2 41 54 28 4e 2c 53 2c 4d 2c |.... ..AT(N,S,M,|
000003f0 58 2c 59 2c 41 2c 42 29 0d 01 22 11 20 4e 3d 4e |X,Y,A,B)..". N=N|
00000400 2d 31 3a 4e 3d 4e 2a 31 32 0d 01 2c 4e 20 41 6c |-1:N=N*12..,N Al|
00000410 69 65 6e 54 61 62 6c 65 21 28 4e 29 3d 53 3a 41 |ienTable!(N)=S:A|
00000420 6c 69 65 6e 54 61 62 6c 65 21 28 4e 2b 34 29 3d |lienTable!(N+4)=|
00000430 4d 3a 41 6c 69 65 6e 54 61 62 6c 65 3f 28 4e 2b |M:AlienTable?(N+|
00000440 38 29 3d 58 3a 41 6c 69 65 6e 54 61 62 6c 65 3f |8)=X:AlienTable?|
00000450 28 4e 2b 39 29 3d 59 0d 01 36 2e 20 41 6c 69 65 |(N+9)=Y..6. Alie|
00000460 6e 54 61 62 6c 65 3f 28 4e 2b 31 30 29 3d 41 3a |nTable?(N+10)=A:|
00000470 41 6c 69 65 6e 54 61 62 6c 65 3f 28 4e 2b 31 31 |AlienTable?(N+11|
00000480 29 3d 42 3a e1 0d 01 40 11 20 dd f2 41 6c 69 65 |)=B:...@. ..Alie|
00000490 6e 53 65 74 75 70 0d 01 4a 14 20 f2 41 6c 69 65 |nSetup..J. .Alie|
000004a0 6e 50 6f 73 69 74 69 6f 6e 73 0d 01 54 13 20 41 |nPositions..T. A|
000004b0 4c 47 72 61 70 68 3d 26 37 34 37 33 38 0d 01 5e |LGraph=&74738..^|
000004c0 44 20 e3 20 50 61 72 70 3d 31 b8 34 3a f2 41 54 |D . Parp=1.4:.AT|
000004d0 28 50 61 72 70 2c 41 4c 47 72 61 70 68 2c 30 2c |(Parp,ALGraph,0,|
000004e0 33 32 2c 33 30 2c 30 2c 30 29 3a 41 4c 47 72 61 |32,30,0,0):ALGra|
000004f0 70 68 3d 41 4c 47 72 61 70 68 2b 26 34 32 43 3a |ph=ALGraph+&42C:|
00000500 ed 0d 01 5f 11 20 53 6d 65 67 3d 41 4c 47 72 61 |..._. Smeg=ALGra|
00000510 70 68 0d 01 68 34 20 f2 41 54 28 35 2c 41 4c 47 |ph..h4 .AT(5,ALG|
00000520 72 61 70 68 2c 30 2c 35 36 2c 32 38 2c 30 2c 30 |raph,0,56,28,0,0|
00000530 29 3a 41 4c 47 72 61 70 68 3d 41 4c 47 72 61 70 |):ALGraph=ALGrap|
00000540 68 2b 31 36 31 32 0d 01 72 46 20 e3 20 50 61 72 |h+1612..rF . Par|
00000550 70 3d 31 b8 32 3a f2 41 54 28 50 61 72 70 2b 35 |p=1.2:.AT(Parp+5|
00000560 2c 41 4c 47 72 61 70 68 2c 30 2c 36 34 2c 34 34 |,ALGraph,0,64,44|
00000570 2c 30 2c 30 29 3a 41 4c 47 72 61 70 68 3d 41 4c |,0,0):ALGraph=AL|
00000580 47 72 61 70 68 2b 32 38 36 30 3a ed 0d 01 7c 46 |Graph+2860:...|F|
00000590 20 e3 20 50 61 72 70 3d 31 b8 32 3a f2 41 54 28 | . Parp=1.2:.AT(|
000005a0 50 61 72 70 2b 37 2c 41 4c 47 72 61 70 68 2c 30 |Parp+7,ALGraph,0|
000005b0 2c 33 32 2c 33 32 2c 30 2c 30 29 3a 41 4c 47 72 |,32,32,0,0):ALGr|
000005c0 61 70 68 3d 41 4c 47 72 61 70 68 2b 26 34 32 43 |aph=ALGraph+&42C|
000005d0 3a ed 0d 01 86 34 20 f2 41 54 28 31 30 2c 41 4c |:....4 .AT(10,AL|
000005e0 47 72 61 70 68 2c 30 2c 33 32 2c 32 38 2c 30 2c |Graph,0,32,28,0,|
000005f0 30 29 3a 41 4c 47 72 61 70 68 3d 41 4c 47 72 61 |0):ALGraph=ALGra|
00000600 70 68 2b 39 34 30 0d 01 90 35 20 f2 41 54 28 31 |ph+940...5 .AT(1|
00000610 31 2c 41 4c 47 72 61 70 68 2c 30 2c 33 32 2c 33 |1,ALGraph,0,32,3|
00000620 32 2c 30 2c 30 29 3a 41 4c 47 72 61 70 68 3d 41 |2,0,0):ALGraph=A|
00000630 4c 47 72 61 70 68 2b 26 34 32 43 0d 01 9a 33 20 |LGraph+&42C...3 |
00000640 f2 41 54 28 31 32 2c 41 4c 47 72 61 70 68 2c 30 |.AT(12,ALGraph,0|
00000650 2c 34 38 2c 38 2c 30 2c 30 29 3a 41 4c 47 72 61 |,48,8,0,0):ALGra|
00000660 70 68 3d 41 4c 47 72 61 70 68 2b 34 32 38 0d 01 |ph=ALGraph+428..|
00000670 9b 18 20 41 4c 47 72 61 70 68 3d 41 4c 47 72 61 |.. ALGraph=ALGra|
00000680 70 68 2b 26 34 30 0d 01 a4 46 20 e3 20 50 61 72 |ph+&40...F . Par|
00000690 70 3d 31 b8 32 3a f2 41 54 28 50 61 72 70 2b 31 |p=1.2:.AT(Parp+1|
000006a0 32 2c 41 4c 47 72 61 70 68 2c 30 2c 33 32 2c 32 |2,ALGraph,0,32,2|
000006b0 30 2c 30 2c 30 29 3a 41 4c 47 72 61 70 68 3d 41 |0,0,0):ALGraph=A|
000006c0 4c 47 72 61 70 68 2b 38 31 32 3a ed 0d 01 ae 47 |LGraph+812:....G|
000006d0 20 e3 20 50 61 72 70 3d 31 b8 32 3a f2 41 54 28 | . Parp=1.2:.AT(|
000006e0 50 61 72 70 2b 31 34 2c 41 4c 47 72 61 70 68 2c |Parp+14,ALGraph,|
000006f0 30 2c 33 32 2c 32 38 2c 30 2c 30 29 3a 41 4c 47 |0,32,28,0,0):ALG|
00000700 72 61 70 68 3d 41 4c 47 72 61 70 68 2b 26 34 32 |raph=ALGraph+&42|
00000710 43 3a ed 0d 01 af 18 20 41 4c 47 72 61 70 68 3d |C:..... ALGraph=|
00000720 41 4c 47 72 61 70 68 2d 26 34 30 0d 01 b8 46 20 |ALGraph-&40...F |
00000730 e3 20 50 61 72 70 3d 31 b8 34 3a f2 41 54 28 50 |. Parp=1.4:.AT(P|
00000740 61 72 70 2b 31 36 2c 41 4c 47 72 61 70 68 2c 30 |arp+16,ALGraph,0|
00000750 2c 34 30 2c 32 30 2c 30 2c 30 29 3a 41 4c 47 72 |,40,20,0,0):ALGr|
00000760 61 70 68 3d 41 4c 47 72 61 70 68 2b 38 34 34 3a |aph=ALGraph+844:|
00000770 ed 0d 01 c2 33 20 f2 41 54 28 32 31 2c 41 4c 47 |....3 .AT(21,ALG|
00000780 72 61 70 68 2c 31 2c 34 38 2c 38 2c 30 2c 30 29 |raph,1,48,8,0,0)|
00000790 3a 41 4c 47 72 61 70 68 3d 41 4c 47 72 61 70 68 |:ALGraph=ALGraph|
000007a0 2b 34 32 38 0d 01 cc 4a 20 e3 20 50 61 72 70 3d |+428...J . Parp=|
000007b0 31 b8 32 3a f2 41 54 28 50 61 72 70 2b 32 31 2c |1.2:.AT(Parp+21,|
000007c0 41 4c 47 72 61 70 68 2c 31 2c 31 32 38 2c 31 30 |ALGraph,1,128,10|
000007d0 34 2c 30 2c 30 29 3a 41 4c 47 72 61 70 68 3d 41 |4,0,0):ALGraph=A|
000007e0 4c 47 72 61 70 68 2b 26 33 34 32 43 3a ed 0d 01 |LGraph+&342C:...|
000007f0 cd 37 20 f2 41 54 28 35 2c 53 6d 65 67 2c 41 4c |.7 .AT(5,Smeg,AL|
00000800 47 72 61 70 68 2c 35 36 2c 32 36 2c 30 2c 30 29 |Graph,56,26,0,0)|
00000810 3a 41 4c 47 72 61 70 68 3d 41 4c 47 72 61 70 68 |:ALGraph=ALGraph|
00000820 2b 31 36 31 32 0d 01 d6 26 20 f2 41 54 28 32 33 |+1612...& .AT(23|
00000830 38 2c 46 6c 61 73 68 2c 46 6c 61 73 68 2b 26 34 |8,Flash,Flash+&4|
00000840 32 43 2c 38 2c 31 2c 30 2c 30 29 0d 01 e0 26 20 |2C,8,1,0,0)...& |
00000850 f2 41 54 28 32 33 39 2c 46 6c 61 73 68 2c 46 6c |.AT(239,Flash,Fl|
00000860 61 73 68 2b 26 34 32 43 2c 38 2c 31 2c 30 2c 30 |ash+&42C,8,1,0,0|
00000870 29 0d 01 ea 28 20 f2 41 54 28 32 34 30 2c 46 6c |)...( .AT(240,Fl|
00000880 61 73 68 2c 46 6c 61 73 68 2b 26 34 32 43 2c 33 |ash,Flash+&42C,3|
00000890 32 2c 33 32 2c 30 2c 30 29 0d 01 f4 3a 20 f2 41 |2,32,0,0)...: .A|
000008a0 54 28 32 34 31 2c 28 46 6c 61 73 68 2b 26 34 32 |T(241,(Flash+&42|
000008b0 43 2a 32 29 2c 28 46 6c 61 73 68 2b 26 34 32 43 |C*2),(Flash+&42C|
000008c0 2a 32 29 2b 32 33 34 38 2c 34 38 2c 33 38 2c 30 |*2)+2348,48,38,0|
000008d0 2c 30 29 0d 01 fe 53 20 e3 54 25 3d 30 b8 37 3a |,0)...S .T%=0.7:|
000008e0 f2 41 54 28 32 34 32 2b 54 25 2c 45 78 70 6c 6f |.AT(242+T%,Explo|
000008f0 73 31 2b 28 54 25 2a 26 34 32 43 2a 32 29 2c 28 |s1+(T%*&42C*2),(|
00000900 45 78 70 6c 6f 73 31 2b 26 34 32 43 2b 28 54 25 |Explos1+&42C+(T%|
00000910 2a 26 34 32 43 2a 32 29 29 2c 33 32 2c 33 32 2c |*&42C*2)),32,32,|
00000920 30 2c 30 29 3a ed 0d 02 08 28 20 f2 41 54 28 32 |0,0):....( .AT(2|
00000930 33 30 2c 46 6c 61 73 68 2c 46 6c 61 73 68 2b 26 |30,Flash,Flash+&|
00000940 34 32 43 2c 33 32 2c 33 32 2c 30 2c 30 29 0d 02 |42C,32,32,0,0)..|
00000950 12 3a 20 f2 41 54 28 32 33 31 2c 28 46 6c 61 73 |.: .AT(231,(Flas|
00000960 68 2b 26 34 32 43 2a 32 29 2c 28 46 6c 61 73 68 |h+&42C*2),(Flash|
00000970 2b 26 34 32 43 2a 32 29 2b 32 33 34 38 2c 34 38 |+&42C*2)+2348,48|
00000980 2c 33 38 2c 30 2c 30 29 0d 02 1c 39 20 e3 54 25 |,38,0,0)...9 .T%|
00000990 3d 30 b8 37 3a f2 41 54 28 32 33 32 2b 54 25 2c |=0.7:.AT(232+T%,|
000009a0 45 78 70 6c 6f 73 32 2b 28 54 25 2a 38 31 32 29 |Explos2+(T%*812)|
000009b0 2c 30 2c 33 32 2c 32 34 2c 30 2c 30 29 3a ed 3a |,0,32,24,0,0):.:|
000009c0 e1 0d 02 26 06 20 e1 0d 02 30 17 20 dd f2 41 28 |...&. ...0. ..A(|
000009d0 58 2c 59 2c 41 2c 46 2c 48 2c 44 2c 4e 29 0d 02 |X,Y,A,F,H,D,N)..|
000009e0 3a 1e 20 e7 20 28 3f 26 38 46 30 46 2b 3f 26 38 |:. . (?&8F0F+?&8|
000009f0 46 31 46 29 3e 31 20 48 3d 48 2b 32 0d 02 44 23 |F1F)>1 H=H+2..D#|
00000a00 20 48 3d 48 2b 28 3f 26 38 46 32 31 2d 31 29 2a | H=H+(?&8F21-1)*|
00000a10 32 3a e7 20 48 3e 32 35 35 20 48 3d 32 35 35 0d |2:. H>255 H=255.|
00000a20 02 4e a5 20 41 6c 69 65 6e 44 61 74 61 21 41 43 |.N. AlienData!AC|
00000a30 3d 58 3a 41 43 3d 41 43 2b 34 3a 41 25 3d 59 3a |=X:AC=AC+4:A%=Y:|
00000a40 41 25 3d 41 25 2b 4e 2a 26 31 30 30 30 30 3a 41 |A%=A%+N*&10000:A|
00000a50 6c 69 65 6e 44 61 74 61 21 41 43 3d 41 25 3a 41 |lienData!AC=A%:A|
00000a60 43 3d 41 43 2b 34 3a 41 6c 69 65 6e 44 61 74 61 |C=AC+4:AlienData|
00000a70 21 41 43 3d 41 3a 41 43 3d 41 43 2b 31 3a 41 6c |!AC=A:AC=AC+1:Al|
00000a80 69 65 6e 44 61 74 61 3f 41 43 3d 46 3a 41 43 3d |ienData?AC=F:AC=|
00000a90 41 43 2b 31 3a 41 6c 69 65 6e 44 61 74 61 3f 41 |AC+1:AlienData?A|
00000aa0 43 3d 48 3a 41 43 3d 41 43 2b 31 3a 41 6c 69 65 |C=H:AC=AC+1:Alie|
00000ab0 6e 44 61 74 61 3f 41 43 3d 44 3a 41 43 3d 41 43 |nData?AC=D:AC=AC|
00000ac0 2b 31 3a e1 0d 02 58 42 20 dd f2 46 28 58 2c 59 |+1:...XB ..F(X,Y|
00000ad0 2c 46 2c 44 2c 4e 29 3a 58 3d 58 2b 31 32 38 3a |,F,D,N):X=X+128:|
00000ae0 59 3d 59 2b 31 32 38 3a e3 54 3d 31 b8 4e 3a 46 |Y=Y+128:.T=1.N:F|
00000af0 4f 3f 46 43 3d 58 3a 46 43 3d 46 43 2b 31 3a 46 |O?FC=X:FC=FC+1:F|
00000b00 4f 3f 46 43 3d 59 0d 02 62 30 20 46 43 3d 46 43 |O?FC=Y..b0 FC=FC|
00000b10 2b 31 3a 46 4f 3f 46 43 3d 46 3a 46 43 3d 46 43 |+1:FO?FC=F:FC=FC|
00000b20 2b 31 3a 46 4f 3f 46 43 3d 44 3a 46 43 3d 46 43 |+1:FO?FC=D:FC=FC|
00000b30 2b 31 3a ed 3a e1 0d 02 6c 0c 20 dd f2 46 6f 72 |+1:.:...l. ..For|
00000b40 6d 73 0d 02 76 31 20 46 4f 3d 46 31 2b 38 3a 46 |ms..v1 FO=F1+8:F|
00000b50 43 3d 30 3a f2 46 28 2d 32 2c 30 2c 30 2c 30 2c |C=0:.F(-2,0,0,0,|
00000b60 33 30 29 3a f2 46 28 30 2c 30 2c 30 2c 31 2c 31 |30):.F(0,0,0,1,1|
00000b70 30 30 29 0d 02 80 06 20 e1 0d 02 8a 1a 20 dd f2 |00).... ..... ..|
00000b80 41 6c 69 65 6e 50 6f 73 69 74 69 6f 6e 73 20 41 |AlienPositions A|
00000b90 43 3d 30 0d 02 94 20 20 e3 54 3d 31 b8 32 30 3a |C=0... .T=1.20:|
00000ba0 f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |.A(0,0,0,0,0,0,0|
00000bb0 29 3a ed 0d 02 9e 2c 20 e3 54 3d 31 b8 37 3a f2 |):...., .T=1.7:.|
00000bc0 41 28 33 34 30 2c 38 2b 54 2a 33 32 2c 31 37 2c |A(340,8+T*32,17,|
00000bd0 31 33 38 2c 32 2c 30 2c 54 2b 31 30 29 3a ed 0d |138,2,0,T+10):..|
00000be0 02 a8 1f 20 e3 54 3d 31 b8 35 3a f2 41 28 30 2c |... .T=1.5:.A(0,|
00000bf0 30 2c 30 2c 30 2c 30 2c 30 2c 30 29 3a ed 0d 02 |0,0,0,0,0,0):...|
00000c00 b2 30 20 e3 54 3d 31 b8 37 3a f2 41 28 33 34 30 |.0 .T=1.7:.A(340|
00000c10 2c 38 2b 28 38 2d 54 29 2a 33 32 2c 31 37 2c 31 |,8+(8-T)*32,17,1|
00000c20 33 38 2c 32 2c 30 2c 54 2b 31 30 29 3a ed 0d 02 |38,2,0,T+10):...|
00000c30 bc 66 20 e7 20 4e 25 3d 31 20 8c 20 e3 54 3d 31 |.f . N%=1 . .T=1|
00000c40 b8 38 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c |.8:.A(0,0,0,0,0,|
00000c50 30 2c 30 29 3a ed 20 8b 20 e3 54 3d 31 b8 34 3a |0,0):. . .T=1.4:|
00000c60 f2 41 28 2d 32 30 2c 37 35 2c 31 39 2c 31 35 35 |.A(-20,75,19,155|
00000c70 2c 34 2c 30 2c 54 2b 34 29 3a f2 41 28 2d 32 30 |,4,0,T+4):.A(-20|
00000c80 2c 31 38 35 2c 31 39 2c 31 35 36 2c 34 2c 30 2c |,185,19,156,4,0,|
00000c90 54 29 3a ed 0d 02 c6 48 20 e3 54 3d 31 b8 34 3a |T):....H .T=1.4:|
00000ca0 f2 41 28 33 34 30 2c 31 32 38 2c 31 37 2c 31 33 |.A(340,128,17,13|
00000cb0 31 2c 32 2c 30 2c 31 30 2b 54 2a 32 29 3a f2 41 |1,2,0,10+T*2):.A|
00000cc0 28 33 34 30 2c 31 32 38 2c 31 37 2c 31 33 32 2c |(340,128,17,132,|
00000cd0 32 2c 30 2c 39 2b 54 2a 32 29 3a ed 0d 02 d0 4b |2,0,9+T*2):....K|
00000ce0 20 e7 20 4e 25 3d 31 20 8c 20 e3 54 3d 31 b8 35 | . N%=1 . .T=1.5|
00000cf0 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c |:.A(0,0,0,0,0,0,|
00000d00 30 29 3a ed 20 8b 20 e3 54 3d 31 b8 35 3a f2 41 |0):. . .T=1.5:.A|
00000d10 28 33 36 30 2c 31 33 30 2c 38 2c 31 33 38 2c 32 |(360,130,8,138,2|
00000d20 2c 30 2c 54 29 3a ed 0d 02 d1 4d 20 e7 20 4e 25 |,0,T):....M . N%|
00000d30 3d 33 20 e3 54 3d 31 b8 35 3a f2 41 28 33 30 30 |=3 .T=1.5:.A(300|
00000d40 2c 2d 33 30 2c 31 37 2c 31 38 37 2c 35 2c 30 2c |,-30,17,187,5,0,|
00000d50 54 2b 32 30 29 3a ed 20 8b 20 e3 54 3d 31 b8 35 |T+20):. . .T=1.5|
00000d60 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c |:.A(0,0,0,0,0,0,|
00000d70 30 29 3a ed 0d 02 da 48 20 e3 54 3d 31 b8 34 3a |0):....H .T=1.4:|
00000d80 f2 41 28 33 34 30 2c 31 32 38 2c 31 37 2c 31 33 |.A(340,128,17,13|
00000d90 31 2c 32 2c 30 2c 31 30 2b 54 2a 32 29 3a f2 41 |1,2,0,10+T*2):.A|
00000da0 28 33 34 30 2c 31 32 38 2c 31 37 2c 31 33 32 2c |(340,128,17,132,|
00000db0 32 2c 30 2c 39 2b 54 2a 32 29 3a ed 0d 02 e4 b8 |2,0,9+T*2):.....|
00000dc0 20 f2 41 28 33 34 30 2c 31 32 38 2c 31 2c 31 35 | .A(340,128,1,15|
00000dd0 31 2c 31 30 2c 30 2c 31 30 29 3a f2 41 28 33 34 |1,10,0,10):.A(34|
00000de0 30 2c 38 30 2c 31 2c 31 35 32 2c 31 30 2c 30 2c |0,80,1,152,10,0,|
00000df0 31 31 29 3a f2 41 28 33 34 30 2c 32 30 30 2c 31 |11):.A(340,200,1|
00000e00 2c 31 35 31 2c 31 30 2c 30 2c 31 32 29 3a f2 41 |,151,10,0,12):.A|
00000e10 28 33 34 30 2c 34 30 2c 31 2c 31 35 33 2c 31 30 |(340,40,1,153,10|
00000e20 2c 30 2c 31 33 29 3a f2 41 28 33 34 30 2c 31 30 |,0,13):.A(340,10|
00000e30 30 2c 31 2c 31 35 33 2c 31 30 2c 30 2c 31 34 29 |0,1,153,10,0,14)|
00000e40 3a f2 41 28 33 34 30 2c 31 36 30 2c 31 2c 31 35 |:.A(340,160,1,15|
00000e50 32 2c 31 30 2c 30 2c 31 35 29 3a f2 41 28 33 34 |2,10,0,15):.A(34|
00000e60 30 2c 31 34 30 2c 31 2c 31 35 31 2c 31 30 2c 30 |0,140,1,151,10,0|
00000e70 2c 31 36 29 0d 02 ee 4e 20 f2 41 28 33 34 30 2c |,16)...N .A(340,|
00000e80 31 33 30 2c 35 2c 31 35 34 2c 36 2c 30 2c 31 37 |130,5,154,6,0,17|
00000e90 29 3a f2 41 28 33 34 30 2c 38 30 2c 35 2c 31 35 |):.A(340,80,5,15|
00000ea0 34 2c 36 2c 30 2c 31 38 29 3a f2 41 28 33 34 30 |4,6,0,18):.A(340|
00000eb0 2c 31 38 30 2c 35 2c 31 35 34 2c 36 2c 30 2c 31 |,180,5,154,6,0,1|
00000ec0 39 29 0d 02 f8 1f 20 e3 54 3d 31 b8 35 3a f2 41 |9).... .T=1.5:.A|
00000ed0 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 29 3a |(0,0,0,0,0,0,0):|
00000ee0 ed 0d 03 02 4e 20 f2 41 28 33 34 30 2c 31 33 30 |....N .A(340,130|
00000ef0 2c 35 2c 31 35 34 2c 36 2c 30 2c 32 30 29 3a f2 |,5,154,6,0,20):.|
00000f00 41 28 33 34 30 2c 38 30 2c 35 2c 31 35 34 2c 36 |A(340,80,5,154,6|
00000f10 2c 30 2c 32 31 29 3a f2 41 28 33 34 30 2c 31 38 |,0,21):.A(340,18|
00000f20 30 2c 35 2c 31 35 34 2c 36 2c 30 2c 32 32 29 0d |0,5,154,6,0,22).|
00000f30 03 0c 1f 20 e3 54 3d 31 b8 37 3a f2 41 28 30 2c |... .T=1.7:.A(0,|
00000f40 30 2c 30 2c 30 2c 30 2c 30 2c 30 29 3a ed 0d 03 |0,0,0,0,0,0):...|
00000f50 16 26 20 e3 54 3d 31 b8 35 3a f2 41 28 33 36 30 |.& .T=1.5:.A(360|
00000f60 2c 38 30 2c 38 2c 31 33 38 2c 32 2c 30 2c 54 2b |,80,8,138,2,0,T+|
00000f70 35 29 3a ed 0d 03 20 28 20 e3 54 3d 31 b8 35 3a |5):... ( .T=1.5:|
00000f80 f2 41 28 33 36 30 2c 31 33 30 2c 38 2c 31 33 38 |.A(360,130,8,138|
00000f90 2c 32 2c 30 2c 54 2b 31 30 29 3a ed 0d 03 2a 28 |,2,0,T+10):...*(|
00000fa0 20 e3 54 3d 31 b8 35 3a f2 41 28 33 36 30 2c 31 | .T=1.5:.A(360,1|
00000fb0 38 30 2c 38 2c 31 33 38 2c 32 2c 30 2c 54 2b 31 |80,8,138,2,0,T+1|
00000fc0 35 29 3a ed 0d 03 34 1f 20 e3 54 3d 31 b8 34 3a |5):...4. .T=1.4:|
00000fd0 f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |.A(0,0,0,0,0,0,0|
00000fe0 29 3a ed 0d 03 3e 27 20 e3 54 3d 31 b8 35 3a f2 |):...>' .T=1.5:.|
00000ff0 41 28 2d 32 30 2c 37 35 2c 31 39 2c 31 35 35 2c |A(-20,75,19,155,|
00001000 34 2c 30 2c 54 2b 35 29 3a ed 0d 03 48 1f 20 e3 |4,0,T+5):...H. .|
00001010 54 3d 31 b8 32 3a f2 41 28 30 2c 30 2c 30 2c 30 |T=1.2:.A(0,0,0,0|
00001020 2c 30 2c 30 2c 30 29 3a ed 0d 03 52 29 20 e3 54 |,0,0,0):...R) .T|
00001030 3d 31 b8 35 3a f2 41 28 2d 32 30 2c 31 38 35 2c |=1.5:.A(-20,185,|
00001040 31 39 2c 31 35 36 2c 34 2c 30 2c 54 2b 31 30 29 |19,156,4,0,T+10)|
00001050 3a ed 0d 03 5c 1f 20 e3 54 3d 31 b8 33 3a f2 41 |:...\. .T=1.3:.A|
00001060 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 29 3a |(0,0,0,0,0,0,0):|
00001070 ed 0d 03 66 29 20 e3 54 3d 31 b8 35 3a f2 41 28 |...f) .T=1.5:.A(|
00001080 33 34 30 2c 31 32 38 2c 31 37 2c 31 33 38 2c 32 |340,128,17,138,2|
00001090 2c 30 2c 54 2b 31 30 29 3a ed 0d 03 70 1f 20 e3 |,0,T+10):...p. .|
000010a0 54 3d 31 b8 33 3a f2 41 28 30 2c 30 2c 30 2c 30 |T=1.3:.A(0,0,0,0|
000010b0 2c 30 2c 30 2c 30 29 3a ed 0d 03 7a 1e 20 f2 41 |,0,0,0):...z. .A|
000010c0 28 33 36 30 2c 31 34 30 2c 36 2c 31 35 37 2c 32 |(360,140,6,157,2|
000010d0 35 2c 30 2c 31 30 29 0d 03 84 1f 20 e3 54 3d 31 |5,0,10).... .T=1|
000010e0 b8 34 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c |.4:.A(0,0,0,0,0,|
000010f0 30 2c 30 29 3a ed 0d 03 8e 1d 20 f2 41 28 33 36 |0,0):..... .A(36|
00001100 30 2c 38 30 2c 36 2c 31 35 37 2c 32 35 2c 30 2c |0,80,6,157,25,0,|
00001110 31 31 29 0d 03 98 1f 20 e3 54 3d 31 b8 34 3a f2 |11).... .T=1.4:.|
00001120 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 29 |A(0,0,0,0,0,0,0)|
00001130 3a ed 0d 03 a2 1e 20 f2 41 28 33 36 30 2c 31 38 |:..... .A(360,18|
00001140 30 2c 36 2c 31 35 37 2c 32 35 2c 30 2c 31 32 29 |0,6,157,25,0,12)|
00001150 0d 03 ac 1f 20 e3 54 3d 31 b8 35 3a f2 41 28 30 |.... .T=1.5:.A(0|
00001160 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 29 3a ed 0d |,0,0,0,0,0,0):..|
00001170 03 b6 62 20 e3 4e 3d 31 b8 37 3a e3 54 3d 31 b8 |..b .N=1.7:.T=1.|
00001180 33 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 |3:.A(0,0,0,0,0,0|
00001190 2c 30 29 3a ed 3a e7 20 4e 25 3e 31 20 f2 41 28 |,0):.:. N%>1 .A(|
000011a0 33 36 30 2c 34 30 2b b3 28 31 36 30 29 2c 31 37 |360,40+.(160),17|
000011b0 2c 31 33 38 2c 35 2c 30 2c 4e 2b 35 29 20 8b 20 |,138,5,0,N+5) . |
000011c0 f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |.A(0,0,0,0,0,0,0|
000011d0 29 0d 03 c0 2d 20 f2 41 28 34 30 30 2c 34 30 2b |)...- .A(400,40+|
000011e0 b3 28 31 36 30 29 2c 39 2b b3 28 32 29 2c 31 35 |.(160),9+.(2),15|
000011f0 39 2c 32 30 2c 30 2c 4e 2b 31 32 29 3a ed 0d 03 |9,20,0,N+12):...|
00001200 ca 28 20 e3 54 3d 31 b8 35 3a f2 41 28 33 36 30 |.( .T=1.5:.A(360|
00001210 2c 38 30 2c 31 37 2c 31 33 38 2c 32 2c 30 2c 54 |,80,17,138,2,0,T|
00001220 2b 32 30 29 3a ed 0d 03 d4 1f 20 e3 54 3d 31 b8 |+20):..... .T=1.|
00001230 34 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 |4:.A(0,0,0,0,0,0|
00001240 2c 30 29 3a ed 0d 03 de 29 20 e3 54 3d 31 b8 35 |,0):....) .T=1.5|
00001250 3a f2 41 28 33 36 30 2c 31 38 30 2c 31 37 2c 31 |:.A(360,180,17,1|
00001260 33 38 2c 32 2c 30 2c 54 2b 32 35 29 3a ed 0d 03 |38,2,0,T+25):...|
00001270 e8 4e 20 f2 41 28 33 34 30 2c 31 33 30 2c 35 2c |.N .A(340,130,5,|
00001280 31 35 34 2c 36 2c 30 2c 31 30 29 3a f2 41 28 33 |154,6,0,10):.A(3|
00001290 34 30 2c 38 30 2c 35 2c 31 35 34 2c 36 2c 30 2c |40,80,5,154,6,0,|
000012a0 31 31 29 3a f2 41 28 33 34 30 2c 31 38 30 2c 35 |11):.A(340,180,5|
000012b0 2c 31 35 34 2c 36 2c 30 2c 31 32 29 0d 03 f2 1f |,154,6,0,12)....|
000012c0 20 e3 54 3d 31 b8 33 3a f2 41 28 30 2c 30 2c 30 | .T=1.3:.A(0,0,0|
000012d0 2c 30 2c 30 2c 30 2c 30 29 3a ed 0d 03 fc 1e 20 |,0,0,0,0):..... |
000012e0 f2 41 28 33 36 30 2c 31 34 30 2c 36 2c 31 35 37 |.A(360,140,6,157|
000012f0 2c 32 35 2c 30 2c 31 30 29 0d 04 06 1f 20 e3 54 |,25,0,10).... .T|
00001300 3d 31 b8 34 3a f2 41 28 30 2c 30 2c 30 2c 30 2c |=1.4:.A(0,0,0,0,|
00001310 30 2c 30 2c 30 29 3a ed 0d 04 10 1d 20 f2 41 28 |0,0,0):..... .A(|
00001320 33 36 30 2c 38 30 2c 36 2c 31 35 37 2c 32 35 2c |360,80,6,157,25,|
00001330 30 2c 31 31 29 0d 04 1a 1f 20 e3 54 3d 31 b8 34 |0,11).... .T=1.4|
00001340 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c |:.A(0,0,0,0,0,0,|
00001350 30 29 3a ed 0d 04 24 1e 20 f2 41 28 33 36 30 2c |0):...$. .A(360,|
00001360 31 38 30 2c 36 2c 31 35 37 2c 32 35 2c 30 2c 31 |180,6,157,25,0,1|
00001370 32 29 0d 04 2e 6e 20 e7 20 4e 25 3d 33 20 e3 54 |2)...n . N%=3 .T|
00001380 3d 31 b8 35 3a f2 41 28 33 30 30 2c 32 38 30 2c |=1.5:.A(300,280,|
00001390 31 37 2c 31 38 36 2c 35 2c 30 2c 31 31 2b 54 2a |17,186,5,0,11+T*|
000013a0 32 29 3a f2 41 28 33 30 30 2c 2d 33 30 2c 31 37 |2):.A(300,-30,17|
000013b0 2c 31 38 37 2c 35 2c 30 2c 31 32 2b 54 2a 32 29 |,187,5,0,12+T*2)|
000013c0 3a ed 20 8b 20 e3 54 3d 31 b8 31 30 3a f2 41 28 |:. . .T=1.10:.A(|
000013d0 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 29 3a ed |0,0,0,0,0,0,0):.|
000013e0 0d 04 38 27 20 e3 54 3d 31 b8 34 3a f2 41 28 2d |..8' .T=1.4:.A(-|
000013f0 32 30 2c 37 35 2c 31 39 2c 31 35 35 2c 34 2c 30 |20,75,19,155,4,0|
00001400 2c 54 2b 35 29 3a ed 0d 04 42 1f 20 e3 54 3d 31 |,T+5):...B. .T=1|
00001410 b8 32 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c |.2:.A(0,0,0,0,0,|
00001420 30 2c 30 29 3a ed 0d 04 4c 28 20 e3 54 3d 31 b8 |0,0):...L( .T=1.|
00001430 34 3a f2 41 28 2d 32 30 2c 31 38 35 2c 31 39 2c |4:.A(-20,185,19,|
00001440 31 35 36 2c 34 2c 30 2c 54 2b 31 29 3a ed 0d 04 |156,4,0,T+1):...|
00001450 56 1f 20 e3 54 3d 31 b8 33 3a f2 41 28 30 2c 30 |V. .T=1.3:.A(0,0|
00001460 2c 30 2c 30 2c 30 2c 30 2c 30 29 3a ed 0d 04 60 |,0,0,0,0,0):...`|
00001470 29 20 e3 54 3d 31 b8 36 3a f2 41 28 33 34 30 2c |) .T=1.6:.A(340,|
00001480 31 32 38 2c 31 37 2c 31 33 38 2c 32 2c 30 2c 54 |128,17,138,2,0,T|
00001490 2b 32 30 29 3a ed 0d 04 6a 1f 20 e3 54 3d 31 b8 |+20):...j. .T=1.|
000014a0 36 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 |6:.A(0,0,0,0,0,0|
000014b0 2c 30 29 3a ed 0d 04 74 26 20 e3 54 3d 31 b8 35 |,0):...t& .T=1.5|
000014c0 3a f2 41 28 33 36 30 2c 38 30 2c 38 2c 31 33 38 |:.A(360,80,8,138|
000014d0 2c 32 2c 30 2c 54 2b 35 29 3a ed 0d 04 7e 28 20 |,2,0,T+5):...~( |
000014e0 e3 54 3d 31 b8 35 3a f2 41 28 33 36 30 2c 31 33 |.T=1.5:.A(360,13|
000014f0 30 2c 38 2c 31 33 38 2c 32 2c 30 2c 54 2b 31 30 |0,8,138,2,0,T+10|
00001500 29 3a ed 0d 04 88 28 20 e3 54 3d 31 b8 35 3a f2 |):....( .T=1.5:.|
00001510 41 28 33 36 30 2c 31 38 30 2c 38 2c 31 33 38 2c |A(360,180,8,138,|
00001520 32 2c 30 2c 54 2b 31 35 29 3a ed 0d 04 92 4a 20 |2,0,T+15):....J |
00001530 e7 20 4e 25 3d 33 20 e3 54 3d 31 b8 38 3a f2 41 |. N%=3 .T=1.8:.A|
00001540 28 33 30 30 2c 32 38 30 2c 31 37 2c 31 38 36 2c |(300,280,17,186,|
00001550 35 2c 30 2c 54 29 3a ed 20 8b 20 e3 54 3d 31 b8 |5,0,T):. . .T=1.|
00001560 38 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 |8:.A(0,0,0,0,0,0|
00001570 2c 30 29 3a ed 0d 04 9c b8 20 f2 41 28 33 34 30 |,0):..... .A(340|
00001580 2c 31 32 38 2c 31 2c 31 35 31 2c 31 30 2c 30 2c |,128,1,151,10,0,|
00001590 31 30 29 3a f2 41 28 33 34 30 2c 38 30 2c 31 2c |10):.A(340,80,1,|
000015a0 31 35 32 2c 31 30 2c 30 2c 31 31 29 3a f2 41 28 |152,10,0,11):.A(|
000015b0 33 34 30 2c 32 30 30 2c 31 2c 31 35 31 2c 31 30 |340,200,1,151,10|
000015c0 2c 30 2c 31 32 29 3a f2 41 28 33 34 30 2c 34 30 |,0,12):.A(340,40|
000015d0 2c 31 2c 31 35 33 2c 31 30 2c 30 2c 31 33 29 3a |,1,153,10,0,13):|
000015e0 f2 41 28 33 34 30 2c 31 30 30 2c 31 2c 31 35 33 |.A(340,100,1,153|
000015f0 2c 31 30 2c 30 2c 31 34 29 3a f2 41 28 33 34 30 |,10,0,14):.A(340|
00001600 2c 31 36 30 2c 31 2c 31 35 32 2c 31 30 2c 30 2c |,160,1,152,10,0,|
00001610 31 35 29 3a f2 41 28 33 34 30 2c 31 34 30 2c 31 |15):.A(340,140,1|
00001620 2c 31 35 31 2c 31 30 2c 30 2c 31 36 29 0d 04 a6 |,151,10,0,16)...|
00001630 4e 20 f2 41 28 33 34 30 2c 31 33 30 2c 35 2c 31 |N .A(340,130,5,1|
00001640 35 34 2c 36 2c 30 2c 31 37 29 3a f2 41 28 33 34 |54,6,0,17):.A(34|
00001650 30 2c 38 30 2c 35 2c 31 35 34 2c 36 2c 30 2c 31 |0,80,5,154,6,0,1|
00001660 38 29 3a f2 41 28 33 34 30 2c 31 38 30 2c 35 2c |8):.A(340,180,5,|
00001670 31 35 34 2c 36 2c 30 2c 31 39 29 0d 04 b0 1f 20 |154,6,0,19).... |
00001680 e3 54 3d 31 b8 36 3a f2 41 28 30 2c 30 2c 30 2c |.T=1.6:.A(0,0,0,|
00001690 30 2c 30 2c 30 2c 30 29 3a ed 0d 04 ba 2c 20 e3 |0,0,0,0):...., .|
000016a0 54 3d 31 b8 37 3a f2 41 28 33 34 30 2c 38 2b 54 |T=1.7:.A(340,8+T|
000016b0 2a 33 32 2c 31 37 2c 31 33 38 2c 32 2c 30 2c 54 |*32,17,138,2,0,T|
000016c0 2b 32 30 29 3a ed 0d 04 c4 1f 20 e3 54 3d 31 b8 |+20):..... .T=1.|
000016d0 35 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 |5:.A(0,0,0,0,0,0|
000016e0 2c 30 29 3a ed 0d 04 ce 30 20 e3 54 3d 31 b8 37 |,0):....0 .T=1.7|
000016f0 3a f2 41 28 33 34 30 2c 38 2b 28 38 2d 54 29 2a |:.A(340,8+(8-T)*|
00001700 33 32 2c 31 37 2c 31 33 38 2c 32 2c 30 2c 54 2b |32,17,138,2,0,T+|
00001710 31 30 29 3a ed 0d 04 d8 1f 20 e3 54 3d 31 b8 35 |10):..... .T=1.5|
00001720 3a f2 41 28 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c |:.A(0,0,0,0,0,0,|
00001730 30 29 3a ed 0d 04 e2 1e 20 f2 41 28 34 30 30 2c |0):..... .A(400,|
00001740 38 30 2c 32 32 2c 31 36 30 2c 31 36 30 2c 30 2c |80,22,160,160,0,|
00001750 31 29 0d 04 ec 06 20 e1 0d 04 f6 26 20 dd f2 41 |1).... ....& ..A|
00001760 73 73 3a e3 54 25 3d 30 b8 32 88 32 3a 50 25 3d |ss:.T%=0.2.2:P%=|
00001770 26 31 35 30 30 30 3a 5b 4f 50 54 20 54 25 0d 05 |&15000:[OPT T%..|
00001780 00 dd 20 2e 55 6e 63 6f 6d 20 53 54 4d 46 44 20 |.. .Uncom STMFD |
00001790 52 31 33 21 2c 7b 52 31 34 7d 3a 4c 44 52 20 52 |R13!,{R14}:LDR R|
000017a0 31 2c 52 44 3a 4c 44 52 20 52 30 2c 53 43 3a 4c |1,RD:LDR R0,SC:L|
000017b0 44 52 20 52 34 2c 4c 45 3a 2e 45 58 31 20 4c 44 |DR R4,LE:.EX1 LD|
000017c0 52 42 20 52 32 2c 5b 52 31 5d 2c 23 31 3a 4c 44 |RB R2,[R1],#1:LD|
000017d0 52 42 20 52 33 2c 5b 52 31 5d 2c 23 31 3a 2e 45 |RB R3,[R1],#1:.E|
000017e0 58 32 20 53 54 52 42 20 52 32 2c 5b 52 30 5d 2c |X2 STRB R2,[R0],|
000017f0 23 31 3a 53 55 42 20 52 34 2c 52 34 2c 23 31 3a |#1:SUB R4,R4,#1:|
00001800 53 55 42 53 20 52 33 2c 52 33 2c 23 31 3a 42 47 |SUBS R3,R3,#1:BG|
00001810 54 20 45 58 32 3a 43 4d 50 20 52 34 2c 23 30 3a |T EX2:CMP R4,#0:|
00001820 42 47 54 20 45 58 31 3a 4c 44 4d 46 44 20 52 31 |BGT EX1:LDMFD R1|
00001830 33 21 2c 7b 50 43 7d 3a 2e 52 44 20 45 51 55 44 |3!,{PC}:.RD EQUD|
00001840 30 3a 2e 53 43 20 45 51 55 44 30 3a 2e 4c 45 20 |0:.SC EQUD0:.LE |
00001850 45 51 55 44 30 3a 5d 3a ed 3a e1 0d ff |EQUD0:]:.:...|
0000185d 
.