Home » Personal collection » Acorn tapes » Commercial_Releases » box04_tape19a_acorn_five_star_3_electron.wav » THUNDER

THUNDER

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 » Personal collection » Acorn tapes » Commercial_Releases » box04_tape19a_acorn_five_star_3_electron.wav
Filename: THUNDER
Read OK:
File size: 102F bytes
Load address: 1A00
Exec address: 1A00
File contents
    1HIMEM=&2CF0:a%=0:h$="....":GOTO57
   20D%=D%-1:GOTO55
   30D%=D%+1:GOTO55
   40E%=E%-1:GOTO55
   50E%=E%+1
   55?N%=0:PROCS:IF?(?J%+&5F20)=0G=G+.5:?(?J%+&5F20)=1:PROCN(0,13,3,2,G):RETURN ELSERETURN
   57?&367=47:?&369=&10:PRINT$&140:S%=GET:PRINT$&120:FORL%=0TO63:L%?&380=L%?&880:NEXT:FORL%=0TO31:L%?&8A0=L%?&5F20:NEXT:GOTO60
   60REPEATFORL%=0TO31:L%?&FB8=L%?&5F00:L%?&F78=L%?&5EC0:L%?&F98=L%?&5EE0:L%?&880=0:NEXT:VDU28,0,31,19,13,17,128,12,26:FORL%=0TO89:L%?&5F20=0:NEXT:D%=6:E%=4:?X%=18:?Y%=14:G=0:I%=575:!114=0:!119=&640001:COLOUR2:PRINTTAB(2,13)"@"
   61P%=0:GOSUB55:PROCG:*FX15,1 
   62IFG<100SOUND1,3,100,30:COLOUR3:PRINTTAB(5,24)"GAME  OVER":FORL%=0TO9999:NEXT
   65VDU28,0,31,19,13,12:?&5E=&90:?&5F=&2D:?J%=200:CALLZ%:VDU26:COLOUR128:COLOUR3:PRINTTAB(3,14)"THUNDER-STRUCK":COLOUR1:COLOUR130:PRINTTAB(10,20)"@AGE:"TAB(10,22)"HIGH:"TAB(12,24)"BY:"TAB(18,20)"@"TAB(18,22)"@"
   70PROCN(15,20,0,3,G):PROCN(15,22,0,3,a%):PRINTTAB(15,24)h$:IFG<a%GOTO90 ELSEFORL%=0TO200STEP10:SOUND3,2,L%,1:SOUND3,2,L%DIV2,1:NEXT:a%=G:PROCN(15,22,0,3,a%):VDU23;10,96;0;0;0;31,15,24:h$="":FORL%=0TO3
   71S%=GET:SOUND1,-9,150,1:IFS%>31ANDS%<91h$=h$+CHR$S%:VDUS%ELSE71
   75NEXT:VDU23;8202;0;0;0;
   90COLOUR3:COLOUR128:PRINTTAB(10,28)"HIT A KEY":S%=GET:UNTIL0
  100DEFPROCG
  110REPEATCALLA%
  111S%=INKEY0:IFS%=47PROCP ELSEIF?J%=20IFS%=139IFE%>1PROCl(-1)ELSEIF?J%=20IFS%=138IFE%<8PROCl(1)ELSEIFS%=58PROCu ELSEIFS%=71PROCg ELSEIFS%=84PROCt ELSEIFS%=9I%=0:?N%=10
  120UNTIL?N%:IF?N%>15GOSUB?N%:IF?N%=0GOTO110ELSEIF?N%=15MOVE1271,I%:I%=I%-48:SOUND17,2,220,1:IFI%<0I%=0
  121IF?N%=15DRAW1271,I%ELSESOUND17,2,I%DIV5,1:PLOT69,1271,I%:I%=I%-4
  130IFI%<1ENDPROC ELSE?N%=0:GOTO110
  600DEFPROCS:?J%=?(&5F7A+D%+E%*11):R%=55*?J%+&2E2A:?&5E=R%MOD256:?&5F=R%DIV256:CALLZ%:VDU26:IF?J%=53IF?&88A ?146=0ELSEIF?J%=6PROCZ
  601FORL%=0TO3:IFL%?&880IFL%?&19F4=?J%PROCb(L%?&19FC,L%?&19F8,24,L%?&19F0)ELSEIF?J%=76IFL%?&895PROCp(L%*2+24,15,16,1,&5AA0+L%*32)
  605NEXT:IF?J%=20:?128=4+E%ELSEIF?J%=83IF?&89C ?128=13ELSEIF?J%=2IFP%PROCb(30,6,24,3) ELSEIF?J%=36IF?2194FORL%=12TO4STEP-2:PROCp(18,L%,24,1,&49C0):NEXT ELSEIF?J%=76IF!&895=&1010101PROCb(13,10,8,7)ELSEIF?J%=58IF?&893PROCb(6,4,24,13)
  610I%=I%-1:IFI%<0 ?N%=10
  611GOTO799
  650DEFPROCl(T%):IF?115=0SOUND19,4,200,5:SOUND3,-5,0,10:SOUND3,4,200,1:FORL%=0TO2500:NEXT:PROCb(10,5,24,8):E%=E%+T%:?128=4+E%:ENDPROC ELSEENDPROC
  700DEFPROCu:H%=?121:CALLK%:IF?&5E>0GOTO(3000+?&5E):ENDPROC ELSEENDPROC
  799GCOL0,2:MOVE1271,0:PLOT21,1271,I%:GCOL0,0:ENDPROC
  800DEFPROCP:IFD%=10OR?121=20ANDE%=0OR?121=20ANDE%=7ENDPROC ELSEIF?121=100CALLB%ELSECALLQ%
  801SOUND19,-9,190,2:SOUND3,-9,200,2:SOUND3,-9,195,1:ENDPROC
 1000DEFPROCN(R%,S%,T%,U%,V%):COLOURT%:PRINTTAB(R%,S%);:A$=LEFT$("00000",U%-LENSTR$V%)+STR$V%:FORL%=1TOU%:VDU176+ASCMID$(A$,L%):NEXT:ENDPROC
 1010DEFPROCb(S%,T%,U%,V%):?102=S%:?147=U%:FORM%=0TOV%:?103=M%+T%:CALL4445:NEXT:ENDPROC
 1020DEFPROCp(S%,T%,U%,V%,W%):?102=S%:?147=U%:W%=W%-U%:FORM%=0TOV%:?103=M%+T%:W%=W%+U%:?&60=W%MOD256:?&61=W%DIV256:CALL4476:NEXT:ENDPROC
 1300DEFPROCz:?121=100:H%?&FB8=100:H%?&880=1:CALLG%:PROCb(38,0,16,1):SOUND18,1,200,4:G=G+1.765625:PROCN(0,13,3,2,G):I%=I%+32:IFI%>575I%=575
 1301GOTO799
 1310DEFFNg:M%=100:FORL%=0TO7:IFL%?&2E0A=?J%M%=L%
 1320NEXT:=M%
 1500DEFPROCg:O%=FNg:H%=?121:IFO%=100ORH%=100ORO%?&2E12<>100ENDPROC ELSEIFO%?&2E1A=H%G=G+2.42773437:SOUND19,2,100,3:SOUND3,2,150,3:SOUND3,2,200,3:IFH%=13PROCb(30,6,24,3):?&FC5=100:P%=1:H%=100:GOTO1502ELSEIFO%?&2E1A=H%H%?&FB8=100:H%=O%?&2E22
 1501H%?&FB8=100
 1502O%?&2E12=H%:?121=100:CALLG%:PROCb(38,0,16,1):SOUND18,4,200,3:SOUND18,4,201,3::PROCN(0,13,3,2,G):ENDPROC
 1510DEFPROCt:O%=FNg:IFO%=100OR?121<100ORO%?&2E12=100ENDPROC ELSEH%=O%?&2E12:H%?&F78=38:H%?&F98=0:H%?&FB8=?J%:?121=H%:O%?&2E12=100:CALLG%:SOUND18,4,190,2:SOUND2,4,200,3:ENDPROC
 3010PROCb(H%?&19FC,H%?&19F8,24,H%?&19F0):PROCz:ENDPROC
 3020I%=575:PROCz:GOTO799
 3030PROCz:?146=0:ENDPROC
 3040?128=14:PROCb(?122,16,24,1):PROCz:ENDPROC
 3050IF?J%=6IF?X%>11IF?Y%=10IF?&89DIF?&89EIF?&89F G=98:PROCz:G=100:PROCN(15,0,3,3,100):PROCd:?N%=10:I%=386:ENDPROC ELSEENDPROC
 3060IF?121<>17ENDPROC ELSEPROCz:?121=18:?&FCA=?J%:FORL%=15TO5STEP-3:SOUND2,1,L%*10,3:NEXT:CALLG%:ENDPROC
 3070IF?X%<14OR?X%>20PROCz:SOUND2,3,200,5:FORL%=12TO4STEP-2:PROCp(18,L%,24,1,&49C0):NEXT:ENDPROC ELSEENDPROC
 3080SOUND17,0,0,0:FORL%=0TO-12STEP-1:SOUND1,L%,200,1:NEXT:SOUND1,-13,200,10:S%=INKEY50:PROCb(6,4,24,13):SOUND0,4,100,2:PROCz:ENDPROC
 3090PROCz:PROCp(H%*2-18,15,16,1,&5800+H%*32):IF!&895=16843009FORL%=10TO17:PROCb(13,L%,8,0):SOUND2,2,L%*10,1:NEXT:ENDPROC
 3100IF?&FD1<>?J%ENDPROC ELSEPROCb(?&F91,?&FB1,16,1):?&FD1=100:?&F93=?&F91:?&FB3=?&FB1:?&FD3=?J%:SOUND18,4,100,3:PROCz:ENDPROC
 3110?128=13:PROCb(6,16,24,1):PROCz:ENDPROC
 3120PROCz:PROCp(H%*2-46,12,16,1,&7100+H%*32):ENDPROC
 5040DEFPROCZ:FORL%=0TO2:IFL%?&89DPROCp(L%*2+12,12,16,1,&5BA0+L%*32)
 5041NEXT:ENDPROC
 6000DEFPROCd:VDU26:COLOUR2:PRINTTAB(0,13)"GOING HOME!    ":FORL%=2TO7:PROCp(?X%,L%,32,2,&2CF0):SOUND0,-10,100,1:FORM%=0TO200:NEXT,:FORL%=0TO20:FORP%=0TO1:FORb%=0TO3:PROCp(?X%,?Y%+b%,32,0,&2D50+P%*32):NEXT
 6010SOUND16+P%+1,P%+2,L%*10+P%*50,1:FORb%=0TO150-L%*15:NEXT:NEXT,:VDU28,2,26,18,23,12,26:FORL%=7TO2STEP-1:PROCp(?X%,L%,32,2,&2CF0):SOUND0,-10,100,1:PROCb(?X%,L%+3,32,0):FORM%=0TO200:NEXT,
 6020PROCb(?X%,2,32,2):FORL%=0TO1999:NEXT:PROCmusic(10,10):PROCmusic(20,10):FORL%=0TO6999:NEXT:ENDPROC
 7000DEFPROCmusic(T%,U%):RESTORE7030:IFU%=1U%=6ELSEU%=3
 7010FORL%=1TO12:READR%:IFR%=-1S%=0ELSES%=4
 7020SOUND1,S%,T%+R%,U%:NEXT:ENDPROC
 7030DATA81,101,109,117,109,101,109,117,-1,101,-1,101
 �=&2CF0:a%=0:h$="....":�Ty@
D%=D%-1:�Tw@
D%=D%+1:�Tw@
(E%=E%-1:�Tw@
2E%=E%+1
7E?N%=0:�S:�?(?J%+&5F20)=0G=G+.5:?(?J%+&5F20)=1:�N(0,13,3,2,G):� ��
9f?&367=47:?&369=&10:�$&140:S%=�:�$&120:�L%=0�63:L%?&380=L%?&880:�:�L%=0�31:L%?&8A0=L%?&5F20:�:�T|@
<��L%=0�31:L%?&FB8=L%?&5F00:L%?&F78=L%?&5EC0:L%?&F98=L%?&5EE0:L%?&880=0:�:�28,0,31,19,13,17,128,12,26:�L%=0�89:L%?&5F20=0:�:D%=6:E%=4:?X%=18:?Y%=14:G=0:I%=575:!114=0:!119=&640001:�2:�2,13)"@"
=P%=0:�Tw@:�G:*FX15,1 
>9�G<100�1,3,100,30:�3:�5,24)"GAME  OVER":�L%=0�9999:�
A��28,0,31,19,13,12:?&5E=&90:?&5F=&2D:?J%=200:�Z%:�26:�128:�3:�3,14)"THUNDER-STRUCK":�1:�130:�10,20)"@AGE:"�10,22)"HIGH:"�12,24)"BY:"�18,20)"@"�18,22)"@"
F��N(15,20,0,3,G):�N(15,22,0,3,a%):�15,24)h$:�G<a%�DZ@ ��L%=0�200�10:�3,2,L%,1:�3,2,L%�2,1:�:a%=G:�N(15,22,0,3,a%):�23;10,96;0;0;0;31,15,24:h$="":�L%=0�3
G3S%=�:�1,-9,150,1:�S%>31�S%<91h$=h$+�S%:�S%��DG@
K�:�23;8202;0;0;0;
Z'�3:�128:�10,28)"HIT A KEY":S%=�:�0
d��G
n��A%
ouS%=�0:�S%=47�P ��?J%=20�S%=139�E%>1�l(-1)��?J%=20�S%=138�E%<8�l(1)��S%=58�u ��S%=71�g ��S%=84�t ��S%=9I%=0:?N%=10
xO�?N%:�?N%>15�?N%:�?N%=0�Dn@��?N%=15�1271,I%:I%=I%-48:�17,2,220,1:�I%<0I%=0
y4�?N%=15�1271,I%��17,2,I%�5,1:�69,1271,I%:I%=I%-4
��I%<1� �?N%=0:�Dn@
Xk��S:?J%=?(&5F7A+D%+E%*11):R%=55*?J%+&2E2A:?&5E=R%�256:?&5F=R%�256:�Z%:�26:�?J%=53�?&88A ?146=0��?J%=6�Z
Yq�L%=0�3:�L%?&880�L%?&19F4=?J%�b(L%?&19FC,L%?&19F8,24,L%?&19F0)��?J%=76�L%?&895�p(L%*2+24,15,16,1,&5AA0+L%*32)
]��:�?J%=20:?128=4+E%��?J%=83�?&89C ?128=13��?J%=2�P%�b(30,6,24,3) ��?J%=36�?2194�L%=12�4�-2:�p(18,L%,24,1,&49C0):� ��?J%=76�!&895=&1010101�b(13,10,8,7)��?J%=58�?&893�b(6,4,24,13)
bI%=I%-1:�I%<0 ?N%=10
c	�T_C
�g��l(T%):�?115=0�19,4,200,5:�3,-5,0,10:�3,4,200,1:�L%=0�2500:�:�b(10,5,24,8):E%=E%+T%:?128=4+E%:� ��
�,��u:H%=?121:�K%:�?&5E>0�(3000+?&5E):� ��
#�0,2:�1271,0:�21,1271,I%:�0,0:�
 ;��P:�D%=10�?121=20�E%=0�?121=20�E%=7� ��?121=100�B%��Q%
!*�19,-9,190,2:�3,-9,200,2:�3,-9,195,1:�
�Y��N(R%,S%,T%,U%,V%):�T%:�R%,S%);:A$=�"00000",U%-��V%)+�V%:�L%=1�U%:�176+��A$,L%):�:�
�B��b(S%,T%,U%,V%):?102=S%:?147=U%:�M%=0�V%:?103=M%+T%:�4445:�:�
�o��p(S%,T%,U%,V%,W%):?102=S%:?147=U%:W%=W%-U%:�M%=0�V%:?103=M%+T%:W%=W%+U%:?&60=W%�256:?&61=W%�256:�4476:�:�
w��z:?121=100:H%?&FB8=100:H%?&880=1:�G%:�b(38,0,16,1):�18,1,200,4:G=G+1.765625:�N(0,13,3,2,G):I%=I%+32:�I%>575I%=575
	�T_C
)ݤg:M%=100:�L%=0�7:�L%?&2E0A=?J%M%=L%
(	�:=M%
����g:O%=�g:H%=?121:�O%=100�H%=100�O%?&2E12<>100� ��O%?&2E1A=H%G=G+2.42773437:�19,2,100,3:�3,2,150,3:�3,2,200,3:�H%=13�b(30,6,24,3):?&FC5=100:P%=1:H%=100:�d^E��O%?&2E1A=H%H%?&FB8=100:H%=O%?&2E22
�H%?&FB8=100
�TO%?&2E12=H%:?121=100:�G%:�b(38,0,16,1):�18,4,200,3:�18,4,201,3::�N(0,13,3,2,G):�
���t:O%=�g:�O%=100�?121<100�O%?&2E12=100� �H%=O%?&2E12:H%?&F78=38:H%?&F98=0:H%?&FB8=?J%:?121=H%:O%?&2E12=100:�G%:�18,4,190,2:�2,4,200,3:�
�*�b(H%?&19FC,H%?&19F8,24,H%?&19F0):�z:�
�I%=575:�z:�T_C
��z:?146=0:�
�!?128=14:�b(?122,16,24,1):�z:�
�_�?J%=6�?X%>11�?Y%=10�?&89D�?&89E�?&89F G=98:�z:G=100:�N(15,0,3,3,100):�d:?N%=10:I%=386:� ��
�E�?121<>17� ��z:?121=18:?&FCA=?J%:�L%=15�5�-3:�2,1,L%*10,3:�:�G%:�
�G�?X%<14�?X%>20�z:�2,3,200,5:�L%=12�4�-2:�p(18,L%,24,1,&49C0):�:� ��
[�17,0,0,0:�L%=0�-12�-1:�1,L%,200,1:�:�1,-13,200,10:S%=�50:�b(6,4,24,13):�0,4,100,2:�z:�
^�z:�p(H%*2-18,15,16,1,&5800+H%*32):�!&895=16843009�L%=10�17:�b(13,L%,8,0):�2,2,L%*10,1:�:�
c�?&FD1<>?J%� ��b(?&F91,?&FB1,16,1):?&FD1=100:?&F93=?&F91:?&FB3=?&FB1:?&FD3=?J%:�18,4,100,3:�z:�
&?128=13:�b(6,16,24,1):�z:�
0(�z:�p(H%*2-46,12,16,1,&7100+H%*32):�
�7��Z:�L%=0�2:�L%?&89D�p(L%*2+12,12,16,1,&5BA0+L%*32)
��:�
p���d:�26:�2:�0,13)"GOING HOME!    ":�L%=2�7:�p(?X%,L%,32,2,&2CF0):�0,-10,100,1:�M%=0�200:�,:�L%=0�20:�P%=0�1:�b%=0�3:�p(?X%,?Y%+b%,32,0,&2D50+P%*32):�
z��16+P%+1,P%+2,L%*10+P%*50,1:�b%=0�150-L%*15:�:�,:�28,2,26,18,23,12,26:�L%=7�2�-1:�p(?X%,L%,32,2,&2CF0):�0,-10,100,1:�b(?X%,L%+3,32,0):�M%=0�200:�,
�J�b(?X%,2,32,2):�L%=0�1999:�:�music(10,10):�music(20,10):�L%=0�6999:�:�
X'��music(T%,U%):��Dv[:�U%=1U%=6�U%=3
b �L%=1�12:�R%:�R%=-1S%=0�S%=4
l�1,S%,T%+R%,U%:�:�
v1�81,101,109,117,109,101,109,117,-1,101,-1,101
�
a	 )
00000000  0d 00 01 20 d3 3d 26 32  43 46 30 3a 61 25 3d 30  |... .=&2CF0:a%=0|
00000010  3a 68 24 3d 22 2e 2e 2e  2e 22 3a e5 8d 54 79 40  |:h$="....":..Ty@|
00000020  0d 00 14 11 44 25 3d 44  25 2d 31 3a e5 8d 54 77  |....D%=D%-1:..Tw|
00000030  40 0d 00 1e 11 44 25 3d  44 25 2b 31 3a e5 8d 54  |@....D%=D%+1:..T|
00000040  77 40 0d 00 28 11 45 25  3d 45 25 2d 31 3a e5 8d  |w@..(.E%=E%-1:..|
00000050  54 77 40 0d 00 32 0b 45  25 3d 45 25 2b 31 0d 00  |Tw@..2.E%=E%+1..|
00000060  37 45 3f 4e 25 3d 30 3a  f2 53 3a e7 3f 28 3f 4a  |7E?N%=0:.S:.?(?J|
00000070  25 2b 26 35 46 32 30 29  3d 30 47 3d 47 2b 2e 35  |%+&5F20)=0G=G+.5|
00000080  3a 3f 28 3f 4a 25 2b 26  35 46 32 30 29 3d 31 3a  |:?(?J%+&5F20)=1:|
00000090  f2 4e 28 30 2c 31 33 2c  33 2c 32 2c 47 29 3a f8  |.N(0,13,3,2,G):.|
000000a0  20 8b f8 0d 00 39 66 3f  26 33 36 37 3d 34 37 3a  | ....9f?&367=47:|
000000b0  3f 26 33 36 39 3d 26 31  30 3a f1 24 26 31 34 30  |?&369=&10:.$&140|
000000c0  3a 53 25 3d a5 3a f1 24  26 31 32 30 3a e3 4c 25  |:S%=.:.$&120:.L%|
000000d0  3d 30 b8 36 33 3a 4c 25  3f 26 33 38 30 3d 4c 25  |=0.63:L%?&380=L%|
000000e0  3f 26 38 38 30 3a ed 3a  e3 4c 25 3d 30 b8 33 31  |?&880:.:.L%=0.31|
000000f0  3a 4c 25 3f 26 38 41 30  3d 4c 25 3f 26 35 46 32  |:L%?&8A0=L%?&5F2|
00000100  30 3a ed 3a e5 8d 54 7c  40 0d 00 3c c3 f5 e3 4c  |0:.:..T|@..<...L|
00000110  25 3d 30 b8 33 31 3a 4c  25 3f 26 46 42 38 3d 4c  |%=0.31:L%?&FB8=L|
00000120  25 3f 26 35 46 30 30 3a  4c 25 3f 26 46 37 38 3d  |%?&5F00:L%?&F78=|
00000130  4c 25 3f 26 35 45 43 30  3a 4c 25 3f 26 46 39 38  |L%?&5EC0:L%?&F98|
00000140  3d 4c 25 3f 26 35 45 45  30 3a 4c 25 3f 26 38 38  |=L%?&5EE0:L%?&88|
00000150  30 3d 30 3a ed 3a ef 32  38 2c 30 2c 33 31 2c 31  |0=0:.:.28,0,31,1|
00000160  39 2c 31 33 2c 31 37 2c  31 32 38 2c 31 32 2c 32  |9,13,17,128,12,2|
00000170  36 3a e3 4c 25 3d 30 b8  38 39 3a 4c 25 3f 26 35  |6:.L%=0.89:L%?&5|
00000180  46 32 30 3d 30 3a ed 3a  44 25 3d 36 3a 45 25 3d  |F20=0:.:D%=6:E%=|
00000190  34 3a 3f 58 25 3d 31 38  3a 3f 59 25 3d 31 34 3a  |4:?X%=18:?Y%=14:|
000001a0  47 3d 30 3a 49 25 3d 35  37 35 3a 21 31 31 34 3d  |G=0:I%=575:!114=|
000001b0  30 3a 21 31 31 39 3d 26  36 34 30 30 30 31 3a fb  |0:!119=&640001:.|
000001c0  32 3a f1 8a 32 2c 31 33  29 22 40 22 0d 00 3d 1a  |2:..2,13)"@"..=.|
000001d0  50 25 3d 30 3a e4 8d 54  77 40 3a f2 47 3a 2a 46  |P%=0:..Tw@:.G:*F|
000001e0  58 31 35 2c 31 20 0d 00  3e 39 e7 47 3c 31 30 30  |X15,1 ..>9.G<100|
000001f0  d4 31 2c 33 2c 31 30 30  2c 33 30 3a fb 33 3a f1  |.1,3,100,30:.3:.|
00000200  8a 35 2c 32 34 29 22 47  41 4d 45 20 20 4f 56 45  |.5,24)"GAME  OVE|
00000210  52 22 3a e3 4c 25 3d 30  b8 39 39 39 39 3a ed 0d  |R":.L%=0.9999:..|
00000220  00 41 9d ef 32 38 2c 30  2c 33 31 2c 31 39 2c 31  |.A..28,0,31,19,1|
00000230  33 2c 31 32 3a 3f 26 35  45 3d 26 39 30 3a 3f 26  |3,12:?&5E=&90:?&|
00000240  35 46 3d 26 32 44 3a 3f  4a 25 3d 32 30 30 3a d6  |5F=&2D:?J%=200:.|
00000250  5a 25 3a ef 32 36 3a fb  31 32 38 3a fb 33 3a f1  |Z%:.26:.128:.3:.|
00000260  8a 33 2c 31 34 29 22 54  48 55 4e 44 45 52 2d 53  |.3,14)"THUNDER-S|
00000270  54 52 55 43 4b 22 3a fb  31 3a fb 31 33 30 3a f1  |TRUCK":.1:.130:.|
00000280  8a 31 30 2c 32 30 29 22  40 41 47 45 3a 22 8a 31  |.10,20)"@AGE:".1|
00000290  30 2c 32 32 29 22 48 49  47 48 3a 22 8a 31 32 2c  |0,22)"HIGH:".12,|
000002a0  32 34 29 22 42 59 3a 22  8a 31 38 2c 32 30 29 22  |24)"BY:".18,20)"|
000002b0  40 22 8a 31 38 2c 32 32  29 22 40 22 0d 00 46 9d  |@".18,22)"@"..F.|
000002c0  f2 4e 28 31 35 2c 32 30  2c 30 2c 33 2c 47 29 3a  |.N(15,20,0,3,G):|
000002d0  f2 4e 28 31 35 2c 32 32  2c 30 2c 33 2c 61 25 29  |.N(15,22,0,3,a%)|
000002e0  3a f1 8a 31 35 2c 32 34  29 68 24 3a e7 47 3c 61  |:..15,24)h$:.G<a|
000002f0  25 e5 8d 44 5a 40 20 8b  e3 4c 25 3d 30 b8 32 30  |%..DZ@ ..L%=0.20|
00000300  30 88 31 30 3a d4 33 2c  32 2c 4c 25 2c 31 3a d4  |0.10:.3,2,L%,1:.|
00000310  33 2c 32 2c 4c 25 81 32  2c 31 3a ed 3a 61 25 3d  |3,2,L%.2,1:.:a%=|
00000320  47 3a f2 4e 28 31 35 2c  32 32 2c 30 2c 33 2c 61  |G:.N(15,22,0,3,a|
00000330  25 29 3a ef 32 33 3b 31  30 2c 39 36 3b 30 3b 30  |%):.23;10,96;0;0|
00000340  3b 30 3b 33 31 2c 31 35  2c 32 34 3a 68 24 3d 22  |;0;31,15,24:h$="|
00000350  22 3a e3 4c 25 3d 30 b8  33 0d 00 47 33 53 25 3d  |":.L%=0.3..G3S%=|
00000360  a5 3a d4 31 2c 2d 39 2c  31 35 30 2c 31 3a e7 53  |.:.1,-9,150,1:.S|
00000370  25 3e 33 31 80 53 25 3c  39 31 68 24 3d 68 24 2b  |%>31.S%<91h$=h$+|
00000380  bd 53 25 3a ef 53 25 8b  8d 44 47 40 0d 00 4b 15  |.S%:.S%..DG@..K.|
00000390  ed 3a ef 32 33 3b 38 32  30 32 3b 30 3b 30 3b 30  |.:.23;8202;0;0;0|
000003a0  3b 0d 00 5a 27 fb 33 3a  fb 31 32 38 3a f1 8a 31  |;..Z'.3:.128:..1|
000003b0  30 2c 32 38 29 22 48 49  54 20 41 20 4b 45 59 22  |0,28)"HIT A KEY"|
000003c0  3a 53 25 3d a5 3a fd 30  0d 00 64 07 dd f2 47 0d  |:S%=.:.0..d...G.|
000003d0  00 6e 08 f5 d6 41 25 0d  00 6f 75 53 25 3d a6 30  |.n...A%..ouS%=.0|
000003e0  3a e7 53 25 3d 34 37 f2  50 20 8b e7 3f 4a 25 3d  |:.S%=47.P ..?J%=|
000003f0  32 30 e7 53 25 3d 31 33  39 e7 45 25 3e 31 f2 6c  |20.S%=139.E%>1.l|
00000400  28 2d 31 29 8b e7 3f 4a  25 3d 32 30 e7 53 25 3d  |(-1)..?J%=20.S%=|
00000410  31 33 38 e7 45 25 3c 38  f2 6c 28 31 29 8b e7 53  |138.E%<8.l(1)..S|
00000420  25 3d 35 38 f2 75 20 8b  e7 53 25 3d 37 31 f2 67  |%=58.u ..S%=71.g|
00000430  20 8b e7 53 25 3d 38 34  f2 74 20 8b e7 53 25 3d  | ..S%=84.t ..S%=|
00000440  39 49 25 3d 30 3a 3f 4e  25 3d 31 30 0d 00 78 4f  |9I%=0:?N%=10..xO|
00000450  fd 3f 4e 25 3a e7 3f 4e  25 3e 31 35 e4 3f 4e 25  |.?N%:.?N%>15.?N%|
00000460  3a e7 3f 4e 25 3d 30 e5  8d 44 6e 40 8b e7 3f 4e  |:.?N%=0..Dn@..?N|
00000470  25 3d 31 35 ec 31 32 37  31 2c 49 25 3a 49 25 3d  |%=15.1271,I%:I%=|
00000480  49 25 2d 34 38 3a d4 31  37 2c 32 2c 32 32 30 2c  |I%-48:.17,2,220,|
00000490  31 3a e7 49 25 3c 30 49  25 3d 30 0d 00 79 34 e7  |1:.I%<0I%=0..y4.|
000004a0  3f 4e 25 3d 31 35 df 31  32 37 31 2c 49 25 8b d4  |?N%=15.1271,I%..|
000004b0  31 37 2c 32 2c 49 25 81  35 2c 31 3a f0 36 39 2c  |17,2,I%.5,1:.69,|
000004c0  31 32 37 31 2c 49 25 3a  49 25 3d 49 25 2d 34 0d  |1271,I%:I%=I%-4.|
000004d0  00 82 17 e7 49 25 3c 31  e1 20 8b 3f 4e 25 3d 30  |....I%<1. .?N%=0|
000004e0  3a e5 8d 44 6e 40 0d 02  58 6b dd f2 53 3a 3f 4a  |:..Dn@..Xk..S:?J|
000004f0  25 3d 3f 28 26 35 46 37  41 2b 44 25 2b 45 25 2a  |%=?(&5F7A+D%+E%*|
00000500  31 31 29 3a 52 25 3d 35  35 2a 3f 4a 25 2b 26 32  |11):R%=55*?J%+&2|
00000510  45 32 41 3a 3f 26 35 45  3d 52 25 83 32 35 36 3a  |E2A:?&5E=R%.256:|
00000520  3f 26 35 46 3d 52 25 81  32 35 36 3a d6 5a 25 3a  |?&5F=R%.256:.Z%:|
00000530  ef 32 36 3a e7 3f 4a 25  3d 35 33 e7 3f 26 38 38  |.26:.?J%=53.?&88|
00000540  41 20 3f 31 34 36 3d 30  8b e7 3f 4a 25 3d 36 f2  |A ?146=0..?J%=6.|
00000550  5a 0d 02 59 71 e3 4c 25  3d 30 b8 33 3a e7 4c 25  |Z..Yq.L%=0.3:.L%|
00000560  3f 26 38 38 30 e7 4c 25  3f 26 31 39 46 34 3d 3f  |?&880.L%?&19F4=?|
00000570  4a 25 f2 62 28 4c 25 3f  26 31 39 46 43 2c 4c 25  |J%.b(L%?&19FC,L%|
00000580  3f 26 31 39 46 38 2c 32  34 2c 4c 25 3f 26 31 39  |?&19F8,24,L%?&19|
00000590  46 30 29 8b e7 3f 4a 25  3d 37 36 e7 4c 25 3f 26  |F0)..?J%=76.L%?&|
000005a0  38 39 35 f2 70 28 4c 25  2a 32 2b 32 34 2c 31 35  |895.p(L%*2+24,15|
000005b0  2c 31 36 2c 31 2c 26 35  41 41 30 2b 4c 25 2a 33  |,16,1,&5AA0+L%*3|
000005c0  32 29 0d 02 5d b5 ed 3a  e7 3f 4a 25 3d 32 30 3a  |2)..]..:.?J%=20:|
000005d0  3f 31 32 38 3d 34 2b 45  25 8b e7 3f 4a 25 3d 38  |?128=4+E%..?J%=8|
000005e0  33 e7 3f 26 38 39 43 20  3f 31 32 38 3d 31 33 8b  |3.?&89C ?128=13.|
000005f0  e7 3f 4a 25 3d 32 e7 50  25 f2 62 28 33 30 2c 36  |.?J%=2.P%.b(30,6|
00000600  2c 32 34 2c 33 29 20 8b  e7 3f 4a 25 3d 33 36 e7  |,24,3) ..?J%=36.|
00000610  3f 32 31 39 34 e3 4c 25  3d 31 32 b8 34 88 2d 32  |?2194.L%=12.4.-2|
00000620  3a f2 70 28 31 38 2c 4c  25 2c 32 34 2c 31 2c 26  |:.p(18,L%,24,1,&|
00000630  34 39 43 30 29 3a ed 20  8b e7 3f 4a 25 3d 37 36  |49C0):. ..?J%=76|
00000640  e7 21 26 38 39 35 3d 26  31 30 31 30 31 30 31 f2  |.!&895=&1010101.|
00000650  62 28 31 33 2c 31 30 2c  38 2c 37 29 8b e7 3f 4a  |b(13,10,8,7)..?J|
00000660  25 3d 35 38 e7 3f 26 38  39 33 f2 62 28 36 2c 34  |%=58.?&893.b(6,4|
00000670  2c 32 34 2c 31 33 29 0d  02 62 18 49 25 3d 49 25  |,24,13)..b.I%=I%|
00000680  2d 31 3a e7 49 25 3c 30  20 3f 4e 25 3d 31 30 0d  |-1:.I%<0 ?N%=10.|
00000690  02 63 09 e5 8d 54 5f 43  0d 02 8a 67 dd f2 6c 28  |.c...T_C...g..l(|
000006a0  54 25 29 3a e7 3f 31 31  35 3d 30 d4 31 39 2c 34  |T%):.?115=0.19,4|
000006b0  2c 32 30 30 2c 35 3a d4  33 2c 2d 35 2c 30 2c 31  |,200,5:.3,-5,0,1|
000006c0  30 3a d4 33 2c 34 2c 32  30 30 2c 31 3a e3 4c 25  |0:.3,4,200,1:.L%|
000006d0  3d 30 b8 32 35 30 30 3a  ed 3a f2 62 28 31 30 2c  |=0.2500:.:.b(10,|
000006e0  35 2c 32 34 2c 38 29 3a  45 25 3d 45 25 2b 54 25  |5,24,8):E%=E%+T%|
000006f0  3a 3f 31 32 38 3d 34 2b  45 25 3a e1 20 8b e1 0d  |:?128=4+E%:. ...|
00000700  02 bc 2c dd f2 75 3a 48  25 3d 3f 31 32 31 3a d6  |..,..u:H%=?121:.|
00000710  4b 25 3a e7 3f 26 35 45  3e 30 e5 28 33 30 30 30  |K%:.?&5E>0.(3000|
00000720  2b 3f 26 35 45 29 3a e1  20 8b e1 0d 03 1f 23 e6  |+?&5E):. .....#.|
00000730  30 2c 32 3a ec 31 32 37  31 2c 30 3a f0 32 31 2c  |0,2:.1271,0:.21,|
00000740  31 32 37 31 2c 49 25 3a  e6 30 2c 30 3a e1 0d 03  |1271,I%:.0,0:...|
00000750  20 3b dd f2 50 3a e7 44  25 3d 31 30 84 3f 31 32  | ;..P:.D%=10.?12|
00000760  31 3d 32 30 80 45 25 3d  30 84 3f 31 32 31 3d 32  |1=20.E%=0.?121=2|
00000770  30 80 45 25 3d 37 e1 20  8b e7 3f 31 32 31 3d 31  |0.E%=7. ..?121=1|
00000780  30 30 d6 42 25 8b d6 51  25 0d 03 21 2a d4 31 39  |00.B%..Q%..!*.19|
00000790  2c 2d 39 2c 31 39 30 2c  32 3a d4 33 2c 2d 39 2c  |,-9,190,2:.3,-9,|
000007a0  32 30 30 2c 32 3a d4 33  2c 2d 39 2c 31 39 35 2c  |200,2:.3,-9,195,|
000007b0  31 3a e1 0d 03 e8 59 dd  f2 4e 28 52 25 2c 53 25  |1:....Y..N(R%,S%|
000007c0  2c 54 25 2c 55 25 2c 56  25 29 3a fb 54 25 3a f1  |,T%,U%,V%):.T%:.|
000007d0  8a 52 25 2c 53 25 29 3b  3a 41 24 3d c0 22 30 30  |.R%,S%);:A$=."00|
000007e0  30 30 30 22 2c 55 25 2d  a9 c3 56 25 29 2b c3 56  |000",U%-..V%)+.V|
000007f0  25 3a e3 4c 25 3d 31 b8  55 25 3a ef 31 37 36 2b  |%:.L%=1.U%:.176+|
00000800  97 c1 41 24 2c 4c 25 29  3a ed 3a e1 0d 03 f2 42  |..A$,L%):.:....B|
00000810  dd f2 62 28 53 25 2c 54  25 2c 55 25 2c 56 25 29  |..b(S%,T%,U%,V%)|
00000820  3a 3f 31 30 32 3d 53 25  3a 3f 31 34 37 3d 55 25  |:?102=S%:?147=U%|
00000830  3a e3 4d 25 3d 30 b8 56  25 3a 3f 31 30 33 3d 4d  |:.M%=0.V%:?103=M|
00000840  25 2b 54 25 3a d6 34 34  34 35 3a ed 3a e1 0d 03  |%+T%:.4445:.:...|
00000850  fc 6f dd f2 70 28 53 25  2c 54 25 2c 55 25 2c 56  |.o..p(S%,T%,U%,V|
00000860  25 2c 57 25 29 3a 3f 31  30 32 3d 53 25 3a 3f 31  |%,W%):?102=S%:?1|
00000870  34 37 3d 55 25 3a 57 25  3d 57 25 2d 55 25 3a e3  |47=U%:W%=W%-U%:.|
00000880  4d 25 3d 30 b8 56 25 3a  3f 31 30 33 3d 4d 25 2b  |M%=0.V%:?103=M%+|
00000890  54 25 3a 57 25 3d 57 25  2b 55 25 3a 3f 26 36 30  |T%:W%=W%+U%:?&60|
000008a0  3d 57 25 83 32 35 36 3a  3f 26 36 31 3d 57 25 81  |=W%.256:?&61=W%.|
000008b0  32 35 36 3a d6 34 34 37  36 3a ed 3a e1 0d 05 14  |256:.4476:.:....|
000008c0  77 dd f2 7a 3a 3f 31 32  31 3d 31 30 30 3a 48 25  |w..z:?121=100:H%|
000008d0  3f 26 46 42 38 3d 31 30  30 3a 48 25 3f 26 38 38  |?&FB8=100:H%?&88|
000008e0  30 3d 31 3a d6 47 25 3a  f2 62 28 33 38 2c 30 2c  |0=1:.G%:.b(38,0,|
000008f0  31 36 2c 31 29 3a d4 31  38 2c 31 2c 32 30 30 2c  |16,1):.18,1,200,|
00000900  34 3a 47 3d 47 2b 31 2e  37 36 35 36 32 35 3a f2  |4:G=G+1.765625:.|
00000910  4e 28 30 2c 31 33 2c 33  2c 32 2c 47 29 3a 49 25  |N(0,13,3,2,G):I%|
00000920  3d 49 25 2b 33 32 3a e7  49 25 3e 35 37 35 49 25  |=I%+32:.I%>575I%|
00000930  3d 35 37 35 0d 05 15 09  e5 8d 54 5f 43 0d 05 1e  |=575......T_C...|
00000940  29 dd a4 67 3a 4d 25 3d  31 30 30 3a e3 4c 25 3d  |)..g:M%=100:.L%=|
00000950  30 b8 37 3a e7 4c 25 3f  26 32 45 30 41 3d 3f 4a  |0.7:.L%?&2E0A=?J|
00000960  25 4d 25 3d 4c 25 0d 05  28 09 ed 3a 3d 4d 25 0d  |%M%=L%..(..:=M%.|
00000970  05 dc c5 dd f2 67 3a 4f  25 3d a4 67 3a 48 25 3d  |.....g:O%=.g:H%=|
00000980  3f 31 32 31 3a e7 4f 25  3d 31 30 30 84 48 25 3d  |?121:.O%=100.H%=|
00000990  31 30 30 84 4f 25 3f 26  32 45 31 32 3c 3e 31 30  |100.O%?&2E12<>10|
000009a0  30 e1 20 8b e7 4f 25 3f  26 32 45 31 41 3d 48 25  |0. ..O%?&2E1A=H%|
000009b0  47 3d 47 2b 32 2e 34 32  37 37 33 34 33 37 3a d4  |G=G+2.42773437:.|
000009c0  31 39 2c 32 2c 31 30 30  2c 33 3a d4 33 2c 32 2c  |19,2,100,3:.3,2,|
000009d0  31 35 30 2c 33 3a d4 33  2c 32 2c 32 30 30 2c 33  |150,3:.3,2,200,3|
000009e0  3a e7 48 25 3d 31 33 f2  62 28 33 30 2c 36 2c 32  |:.H%=13.b(30,6,2|
000009f0  34 2c 33 29 3a 3f 26 46  43 35 3d 31 30 30 3a 50  |4,3):?&FC5=100:P|
00000a00  25 3d 31 3a 48 25 3d 31  30 30 3a e5 8d 64 5e 45  |%=1:H%=100:..d^E|
00000a10  8b e7 4f 25 3f 26 32 45  31 41 3d 48 25 48 25 3f  |..O%?&2E1A=H%H%?|
00000a20  26 46 42 38 3d 31 30 30  3a 48 25 3d 4f 25 3f 26  |&FB8=100:H%=O%?&|
00000a30  32 45 32 32 0d 05 dd 0f  48 25 3f 26 46 42 38 3d  |2E22....H%?&FB8=|
00000a40  31 30 30 0d 05 de 54 4f  25 3f 26 32 45 31 32 3d  |100...TO%?&2E12=|
00000a50  48 25 3a 3f 31 32 31 3d  31 30 30 3a d6 47 25 3a  |H%:?121=100:.G%:|
00000a60  f2 62 28 33 38 2c 30 2c  31 36 2c 31 29 3a d4 31  |.b(38,0,16,1):.1|
00000a70  38 2c 34 2c 32 30 30 2c  33 3a d4 31 38 2c 34 2c  |8,4,200,3:.18,4,|
00000a80  32 30 31 2c 33 3a 3a f2  4e 28 30 2c 31 33 2c 33  |201,3::.N(0,13,3|
00000a90  2c 32 2c 47 29 3a e1 0d  05 e6 8c dd f2 74 3a 4f  |,2,G):.......t:O|
00000aa0  25 3d a4 67 3a e7 4f 25  3d 31 30 30 84 3f 31 32  |%=.g:.O%=100.?12|
00000ab0  31 3c 31 30 30 84 4f 25  3f 26 32 45 31 32 3d 31  |1<100.O%?&2E12=1|
00000ac0  30 30 e1 20 8b 48 25 3d  4f 25 3f 26 32 45 31 32  |00. .H%=O%?&2E12|
00000ad0  3a 48 25 3f 26 46 37 38  3d 33 38 3a 48 25 3f 26  |:H%?&F78=38:H%?&|
00000ae0  46 39 38 3d 30 3a 48 25  3f 26 46 42 38 3d 3f 4a  |F98=0:H%?&FB8=?J|
00000af0  25 3a 3f 31 32 31 3d 48  25 3a 4f 25 3f 26 32 45  |%:?121=H%:O%?&2E|
00000b00  31 32 3d 31 30 30 3a d6  47 25 3a d4 31 38 2c 34  |12=100:.G%:.18,4|
00000b10  2c 31 39 30 2c 32 3a d4  32 2c 34 2c 32 30 30 2c  |,190,2:.2,4,200,|
00000b20  33 3a e1 0d 0b c2 2a f2  62 28 48 25 3f 26 31 39  |3:....*.b(H%?&19|
00000b30  46 43 2c 48 25 3f 26 31  39 46 38 2c 32 34 2c 48  |FC,H%?&19F8,24,H|
00000b40  25 3f 26 31 39 46 30 29  3a f2 7a 3a e1 0d 0b cc  |%?&19F0):.z:....|
00000b50  13 49 25 3d 35 37 35 3a  f2 7a 3a e5 8d 54 5f 43  |.I%=575:.z:..T_C|
00000b60  0d 0b d6 0f f2 7a 3a 3f  31 34 36 3d 30 3a e1 0d  |.....z:?146=0:..|
00000b70  0b e0 21 3f 31 32 38 3d  31 34 3a f2 62 28 3f 31  |..!?128=14:.b(?1|
00000b80  32 32 2c 31 36 2c 32 34  2c 31 29 3a f2 7a 3a e1  |22,16,24,1):.z:.|
00000b90  0d 0b ea 5f e7 3f 4a 25  3d 36 e7 3f 58 25 3e 31  |..._.?J%=6.?X%>1|
00000ba0  31 e7 3f 59 25 3d 31 30  e7 3f 26 38 39 44 e7 3f  |1.?Y%=10.?&89D.?|
00000bb0  26 38 39 45 e7 3f 26 38  39 46 20 47 3d 39 38 3a  |&89E.?&89F G=98:|
00000bc0  f2 7a 3a 47 3d 31 30 30  3a f2 4e 28 31 35 2c 30  |.z:G=100:.N(15,0|
00000bd0  2c 33 2c 33 2c 31 30 30  29 3a f2 64 3a 3f 4e 25  |,3,3,100):.d:?N%|
00000be0  3d 31 30 3a 49 25 3d 33  38 36 3a e1 20 8b e1 0d  |=10:I%=386:. ...|
00000bf0  0b f4 45 e7 3f 31 32 31  3c 3e 31 37 e1 20 8b f2  |..E.?121<>17. ..|
00000c00  7a 3a 3f 31 32 31 3d 31  38 3a 3f 26 46 43 41 3d  |z:?121=18:?&FCA=|
00000c10  3f 4a 25 3a e3 4c 25 3d  31 35 b8 35 88 2d 33 3a  |?J%:.L%=15.5.-3:|
00000c20  d4 32 2c 31 2c 4c 25 2a  31 30 2c 33 3a ed 3a d6  |.2,1,L%*10,3:.:.|
00000c30  47 25 3a e1 0d 0b fe 47  e7 3f 58 25 3c 31 34 84  |G%:....G.?X%<14.|
00000c40  3f 58 25 3e 32 30 f2 7a  3a d4 32 2c 33 2c 32 30  |?X%>20.z:.2,3,20|
00000c50  30 2c 35 3a e3 4c 25 3d  31 32 b8 34 88 2d 32 3a  |0,5:.L%=12.4.-2:|
00000c60  f2 70 28 31 38 2c 4c 25  2c 32 34 2c 31 2c 26 34  |.p(18,L%,24,1,&4|
00000c70  39 43 30 29 3a ed 3a e1  20 8b e1 0d 0c 08 5b d4  |9C0):.:. .....[.|
00000c80  31 37 2c 30 2c 30 2c 30  3a e3 4c 25 3d 30 b8 2d  |17,0,0,0:.L%=0.-|
00000c90  31 32 88 2d 31 3a d4 31  2c 4c 25 2c 32 30 30 2c  |12.-1:.1,L%,200,|
00000ca0  31 3a ed 3a d4 31 2c 2d  31 33 2c 32 30 30 2c 31  |1:.:.1,-13,200,1|
00000cb0  30 3a 53 25 3d a6 35 30  3a f2 62 28 36 2c 34 2c  |0:S%=.50:.b(6,4,|
00000cc0  32 34 2c 31 33 29 3a d4  30 2c 34 2c 31 30 30 2c  |24,13):.0,4,100,|
00000cd0  32 3a f2 7a 3a e1 0d 0c  12 5e f2 7a 3a f2 70 28  |2:.z:....^.z:.p(|
00000ce0  48 25 2a 32 2d 31 38 2c  31 35 2c 31 36 2c 31 2c  |H%*2-18,15,16,1,|
00000cf0  26 35 38 30 30 2b 48 25  2a 33 32 29 3a e7 21 26  |&5800+H%*32):.!&|
00000d00  38 39 35 3d 31 36 38 34  33 30 30 39 e3 4c 25 3d  |895=16843009.L%=|
00000d10  31 30 b8 31 37 3a f2 62  28 31 33 2c 4c 25 2c 38  |10.17:.b(13,L%,8|
00000d20  2c 30 29 3a d4 32 2c 32  2c 4c 25 2a 31 30 2c 31  |,0):.2,2,L%*10,1|
00000d30  3a ed 3a e1 0d 0c 1c 63  e7 3f 26 46 44 31 3c 3e  |:.:....c.?&FD1<>|
00000d40  3f 4a 25 e1 20 8b f2 62  28 3f 26 46 39 31 2c 3f  |?J%. ..b(?&F91,?|
00000d50  26 46 42 31 2c 31 36 2c  31 29 3a 3f 26 46 44 31  |&FB1,16,1):?&FD1|
00000d60  3d 31 30 30 3a 3f 26 46  39 33 3d 3f 26 46 39 31  |=100:?&F93=?&F91|
00000d70  3a 3f 26 46 42 33 3d 3f  26 46 42 31 3a 3f 26 46  |:?&FB3=?&FB1:?&F|
00000d80  44 33 3d 3f 4a 25 3a d4  31 38 2c 34 2c 31 30 30  |D3=?J%:.18,4,100|
00000d90  2c 33 3a f2 7a 3a e1 0d  0c 26 1e 3f 31 32 38 3d  |,3:.z:...&.?128=|
00000da0  31 33 3a f2 62 28 36 2c  31 36 2c 32 34 2c 31 29  |13:.b(6,16,24,1)|
00000db0  3a f2 7a 3a e1 0d 0c 30  28 f2 7a 3a f2 70 28 48  |:.z:...0(.z:.p(H|
00000dc0  25 2a 32 2d 34 36 2c 31  32 2c 31 36 2c 31 2c 26  |%*2-46,12,16,1,&|
00000dd0  37 31 30 30 2b 48 25 2a  33 32 29 3a e1 0d 13 b0  |7100+H%*32):....|
00000de0  37 dd f2 5a 3a e3 4c 25  3d 30 b8 32 3a e7 4c 25  |7..Z:.L%=0.2:.L%|
00000df0  3f 26 38 39 44 f2 70 28  4c 25 2a 32 2b 31 32 2c  |?&89D.p(L%*2+12,|
00000e00  31 32 2c 31 36 2c 31 2c  26 35 42 41 30 2b 4c 25  |12,16,1,&5BA0+L%|
00000e10  2a 33 32 29 0d 13 b1 07  ed 3a e1 0d 17 70 9a dd  |*32).....:...p..|
00000e20  f2 64 3a ef 32 36 3a fb  32 3a f1 8a 30 2c 31 33  |.d:.26:.2:..0,13|
00000e30  29 22 47 4f 49 4e 47 20  48 4f 4d 45 21 20 20 20  |)"GOING HOME!   |
00000e40  20 22 3a e3 4c 25 3d 32  b8 37 3a f2 70 28 3f 58  | ":.L%=2.7:.p(?X|
00000e50  25 2c 4c 25 2c 33 32 2c  32 2c 26 32 43 46 30 29  |%,L%,32,2,&2CF0)|
00000e60  3a d4 30 2c 2d 31 30 2c  31 30 30 2c 31 3a e3 4d  |:.0,-10,100,1:.M|
00000e70  25 3d 30 b8 32 30 30 3a  ed 2c 3a e3 4c 25 3d 30  |%=0.200:.,:.L%=0|
00000e80  b8 32 30 3a e3 50 25 3d  30 b8 31 3a e3 62 25 3d  |.20:.P%=0.1:.b%=|
00000e90  30 b8 33 3a f2 70 28 3f  58 25 2c 3f 59 25 2b 62  |0.3:.p(?X%,?Y%+b|
00000ea0  25 2c 33 32 2c 30 2c 26  32 44 35 30 2b 50 25 2a  |%,32,0,&2D50+P%*|
00000eb0  33 32 29 3a ed 0d 17 7a  96 d4 31 36 2b 50 25 2b  |32):...z..16+P%+|
00000ec0  31 2c 50 25 2b 32 2c 4c  25 2a 31 30 2b 50 25 2a  |1,P%+2,L%*10+P%*|
00000ed0  35 30 2c 31 3a e3 62 25  3d 30 b8 31 35 30 2d 4c  |50,1:.b%=0.150-L|
00000ee0  25 2a 31 35 3a ed 3a ed  2c 3a ef 32 38 2c 32 2c  |%*15:.:.,:.28,2,|
00000ef0  32 36 2c 31 38 2c 32 33  2c 31 32 2c 32 36 3a e3  |26,18,23,12,26:.|
00000f00  4c 25 3d 37 b8 32 88 2d  31 3a f2 70 28 3f 58 25  |L%=7.2.-1:.p(?X%|
00000f10  2c 4c 25 2c 33 32 2c 32  2c 26 32 43 46 30 29 3a  |,L%,32,2,&2CF0):|
00000f20  d4 30 2c 2d 31 30 2c 31  30 30 2c 31 3a f2 62 28  |.0,-10,100,1:.b(|
00000f30  3f 58 25 2c 4c 25 2b 33  2c 33 32 2c 30 29 3a e3  |?X%,L%+3,32,0):.|
00000f40  4d 25 3d 30 b8 32 30 30  3a ed 2c 0d 17 84 4a f2  |M%=0.200:.,...J.|
00000f50  62 28 3f 58 25 2c 32 2c  33 32 2c 32 29 3a e3 4c  |b(?X%,2,32,2):.L|
00000f60  25 3d 30 b8 31 39 39 39  3a ed 3a f2 6d 75 73 69  |%=0.1999:.:.musi|
00000f70  63 28 31 30 2c 31 30 29  3a f2 6d 75 73 69 63 28  |c(10,10):.music(|
00000f80  32 30 2c 31 30 29 3a e3  4c 25 3d 30 b8 36 39 39  |20,10):.L%=0.699|
00000f90  39 3a ed 3a e1 0d 1b 58  27 dd f2 6d 75 73 69 63  |9:.:...X'..music|
00000fa0  28 54 25 2c 55 25 29 3a  f7 8d 44 76 5b 3a e7 55  |(T%,U%):..Dv[:.U|
00000fb0  25 3d 31 55 25 3d 36 8b  55 25 3d 33 0d 1b 62 20  |%=1U%=6.U%=3..b |
00000fc0  e3 4c 25 3d 31 b8 31 32  3a f3 52 25 3a e7 52 25  |.L%=1.12:.R%:.R%|
00000fd0  3d 2d 31 53 25 3d 30 8b  53 25 3d 34 0d 1b 6c 16  |=-1S%=0.S%=4..l.|
00000fe0  d4 31 2c 53 25 2c 54 25  2b 52 25 2c 55 25 3a ed  |.1,S%,T%+R%,U%:.|
00000ff0  3a e1 0d 1b 76 31 dc 38  31 2c 31 30 31 2c 31 30  |:...v1.81,101,10|
00001000  39 2c 31 31 37 2c 31 30  39 2c 31 30 31 2c 31 30  |9,117,109,101,10|
00001010  39 2c 31 31 37 2c 2d 31  2c 31 30 31 2c 2d 31 2c  |9,117,-1,101,-1,|
00001020  31 30 31 0d ff 06 06 0d  06 61 1c 09 01 20 29     |101......a... )|
0000102f
THUNDER.m0
THUNDER.m1
THUNDER.m2
THUNDER.m4
THUNDER.m5