Home » Personal collection » Acorn tapes » Commercial_Releases » box04_tape19b_acorn_five_star_3_bbc.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_tape19b_acorn_five_star_3_bbc.wav
Filename: THUNDER
Read OK: ✔
File size: 1125 bytes
Load address: 1A00
Exec address: 1A00
File contents
    0ONERRORCALL!-4
    1FORL%=0TO63:L%?&380=L%?&2CB0:NEXT:HIMEM=&2CF0:a%=0:h$="....":CALL&880:PRINT$&140:PROCT:PRINT$&120:FORL%=0TO31:L%?&8A0=L%?&7820:NEXT:GOTO60
   20D%=D%-1:GOTO55
   30D%=D%+1:GOTO55
   40E%=E%-1:GOTO55
   50E%=E%+1
   55?N%=0:PROCS:IF?(?J%+&7820)=0G=G+.5:?(?J%+&7820)=1:PROCN(16,0,3,2,G):RETURN ELSERETURN
   60REPEATFORL%=0TO31:L%?&FB8=L%?&7800:L%?&F78=L%?&77C0:L%?&F98=L%?&77E0:L%?&880=0:NEXT:VDU28,0,19,19,0,17,128,12,26:FORL%=0TO89:L%?&7820=0:NEXT:D%=6:E%=4:?X%=18:?Y%=14:G=0:I%=957:!114=0:!119=&640001:COLOUR2:PRINTTAB(18,0)"%"TAB(18,1)":"
   61P%=0:GOSUB55:PROCG
   62IFG<100SOUND1,3,100,30:COLOUR3:PRINTTAB(5,11)"GAME  OVER":VDU19,2,6;0;:FORL%=0TO9999:NEXT 
   65VDU28,0,19,19,0,12:?&5E=&90:?&5F=&2D:?J%=200:CALLZ%:VDU26:PRINTSPC16:COLOUR128:COLOUR3:PRINTTAB(3,2)"THUNDER-STRUCK":COLOUR130:COLOUR1:PRINTTAB(10,8)"%AGE:"TAB(10,10)"HIGH:"TAB(12,12)"BY:"TAB(18,8)"%"TAB(18,10)"%"
   70PROCN(15,8,0,3,G):PROCN(15,10,0,3,a%):PRINTTAB(15,12)h$:IFG<a%GOTO90 ELSEFORL%=0TO200STEP10:SOUND3,2,L%,1:SOUND2,2,L%DIV2,1:NEXT:a%=G:PROCN(15,10,0,3,a%):VDU23;10,96;0;0;0;31,15,12: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,15)"HIT A KEY":PROCT: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%=386:?N%=10
  120UNTIL?N%:IF?N%>15GOSUB?N%:IF?N%=0GOTO110ELSEIF?N%=15MOVE1271,I%:I%=I%-48:SOUND17,2,220,1:IFI%<386I%=386
  121IF?N%=15DRAW1271,I%ELSESOUND17,2,I%DIV5,1:PLOT69,1271,I%:I%=I%-4
  130IFI%<387ENDPROC ELSE?N%=0:GOTO110 
  600DEFPROCS:?J%=?(&787A+D%+E%*11):R%=55*?J%+&2E2A:?&5E=R%MOD256:?&5F=R%DIV256:CALLZ%:VDU26:IF?J%=86IF?121=27OR?&FD3=86VDU19,1,1;0;19,2,6;0;19,3,3;0; ELSEIF?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,&73A0+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%<387 ?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,385: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:SOUND9,-9,195,1:ENDPROC
 1000DEFPROCN(R%,S%,T%,U%,V%):COLOURT%:PRINTTAB(R%,S%);LEFT$("00000",U%-LENSTR$V%);STR$V%: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,1:G=G+1.765625:PROCN(16,0,3,2,G):I%=I%+32:IFI%>957I%=957
 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,1:PROCN(16,0,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,1:ENDPROC
 3010PROCb(H%?&19FC,H%?&19F8,24,H%?&19F0):PROCz:ENDPROC
 3020I%=957: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,1: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,1:PROCz:ENDPROC
 3090PROCz:PROCp(H%*2-18,15,16,1,&7100+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,1:PROCz:ENDPROC
 3110?128=13:PROCb(6,16,24,1):PROCz:ENDPROC
 3120PROCz:PROCp(H%*2-46,12,16,1,&7100+H%*32):ENDPROC
 4999DEFPROCT:W%=0:REPEATPROCn:UNTILINKEY(1)>0:ENDPROC
 5000DEFPROCn:V%=TIME:IFTIME<W%+15ENDPROC ELSEW%=V%:L%=(L%+1)MOD44:M%=L%?&2DDE:S%=(101ANDM%=1)+(121ANDM%=2)+(129ANDM%=3):SOUND17,4,FNN(S%),10:SOUND18,4,FNN(S%+16),10:SOUND19,4,FNN(S%+28),10:T%=T%-150:ENDPROC
 5020DEFFNN(U%)=U%-(RND(3)-1)*48
 5030DEFPROCZ:FORL%=0TO2:IFL%?&89DPROCp(L%*2+12,12,16,1,&74A0+L%*32)
 5040NEXT:ENDPROC
 6000DEFPROCd:VDU26:COLOUR2:PRINTTAB(0,0)"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,13,18,10,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%:SOUND2,S%,T%+R%+48,U%:SOUND3,S%,T%+R%+96,U%:NEXT:ENDPROC
 7030DATA81,101,109,117,109,101,109,117,-1,101,-1,101


��!-4
o�L%=0�63:L%?&380=L%?&2CB0:�:�=&2CF0:a%=0:h$="....":�&880:�$&140:�T:�$&120:�L%=0�31:L%?&8A0=L%?&7820:�:�T|@
D%=D%-1:�Tw@
D%=D%+1:�Tw@
(E%=E%-1:�Tw@
2E%=E%+1
7E?N%=0:�S:�?(?J%+&7820)=0G=G+.5:?(?J%+&7820)=1:�N(16,0,3,2,G):� ��
<��L%=0�31:L%?&FB8=L%?&7800:L%?&F78=L%?&77C0:L%?&F98=L%?&77E0:L%?&880=0:�:�28,0,19,19,0,17,128,12,26:�L%=0�89:L%?&7820=0:�:D%=6:E%=4:?X%=18:?Y%=14:G=0:I%=957:!114=0:!119=&640001:�2:�18,0)"%"�18,1)":"
=P%=0:�Tw@:�G
>E�G<100�1,3,100,30:�3:�5,11)"GAME  OVER":�19,2,6;0;:�L%=0�9999:� 
A��28,0,19,19,0,12:?&5E=&90:?&5F=&2D:?J%=200:�Z%:�26:�16:�128:�3:�3,2)"THUNDER-STRUCK":�130:�1:�10,8)"%AGE:"�10,10)"HIGH:"�12,12)"BY:"�18,8)"%"�18,10)"%"
F��N(15,8,0,3,G):�N(15,10,0,3,a%):�15,12)h$:�G<a%�DZ@ ��L%=0�200�10:�3,2,L%,1:�2,2,L%�2,1:�:a%=G:�N(15,10,0,3,a%):�23;10,96;0;0;0;31,15,12: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,15)"HIT A KEY":�T:�0
d��G
n��A%
owS%=�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%=386:?N%=10
xS�?N%:�?N%>15�?N%:�?N%=0�Dn@��?N%=15�1271,I%:I%=I%-48:�17,2,220,1:�I%<386I%=386
y4�?N%=15�1271,I%��17,2,I%�5,1:�69,1271,I%:I%=I%-4
��I%<387� �?N%=0:�Dn@ 
X���S:?J%=?(&787A+D%+E%*11):R%=55*?J%+&2E2A:?&5E=R%�256:?&5F=R%�256:�Z%:�26:�?J%=86�?121=27�?&FD3=86�19,1,1;0;19,2,6;0;19,3,3;0; ��?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,&73A0+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%<387 ?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,385:�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:�9,-9,195,1:�
�<��N(R%,S%,T%,U%,V%):�T%:�R%,S%);�"00000",U%-��V%);�V%:�
�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,1:G=G+1.765625:�N(16,0,3,2,G):I%=I%+32:�I%>957I%=957
	�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
�GO%?&2E12=H%:?121=100:�G%:�b(38,0,16,1):�18,4,200,1:�N(16,0,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,1:�
�*�b(H%?&19FC,H%?&19F8,24,H%?&19F0):�z:�
�I%=957:�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,1:�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,1:�z:�
^�z:�p(H%*2-18,15,16,1,&7100+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,1:�z:�
&?128=13:�b(6,16,24,1):�z:�
0(�z:�p(H%*2-46,12,16,1,&7100+H%*32):�
���T:W%=0:��n:��(1)>0:�
����n:V%=�:�<W%+15� �W%=V%:L%=(L%+1)�44:M%=L%?&2DDE:S%=(101�M%=1)+(121�M%=2)+(129�M%=3):�17,4,�N(S%),10:�18,4,�N(S%+16),10:�19,4,�N(S%+28),10:T%=T%-150:�
�ݤN(U%)=U%-(�(3)-1)*48
�7��Z:�L%=0�2:�L%?&89D�p(L%*2+12,12,16,1,&74A0+L%*32)
��:�
p���d:�26:�2:�0,0)"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,13,18,10,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%:�2,S%,T%+R%+48,U%:�3,S%,T%+R%+96,U%:�:�
v1�81,101,109,117,109,101,109,117,-1,101,-1,101
�VV
00000000  0d 00 00 0a ee 85 d6 21  2d 34 0d 00 01 6f e3 4c  |.......!-4...o.L|
00000010  25 3d 30 b8 36 33 3a 4c  25 3f 26 33 38 30 3d 4c  |%=0.63:L%?&380=L|
00000020  25 3f 26 32 43 42 30 3a  ed 3a d3 3d 26 32 43 46  |%?&2CB0:.:.=&2CF|
00000030  30 3a 61 25 3d 30 3a 68  24 3d 22 2e 2e 2e 2e 22  |0:a%=0:h$="...."|
00000040  3a d6 26 38 38 30 3a f1  24 26 31 34 30 3a f2 54  |:.&880:.$&140:.T|
00000050  3a f1 24 26 31 32 30 3a  e3 4c 25 3d 30 b8 33 31  |:.$&120:.L%=0.31|
00000060  3a 4c 25 3f 26 38 41 30  3d 4c 25 3f 26 37 38 32  |:L%?&8A0=L%?&782|
00000070  30 3a ed 3a e5 8d 54 7c  40 0d 00 14 11 44 25 3d  |0:.:..T|@....D%=|
00000080  44 25 2d 31 3a e5 8d 54  77 40 0d 00 1e 11 44 25  |D%-1:..Tw@....D%|
00000090  3d 44 25 2b 31 3a e5 8d  54 77 40 0d 00 28 11 45  |=D%+1:..Tw@..(.E|
000000a0  25 3d 45 25 2d 31 3a e5  8d 54 77 40 0d 00 32 0b  |%=E%-1:..Tw@..2.|
000000b0  45 25 3d 45 25 2b 31 0d  00 37 45 3f 4e 25 3d 30  |E%=E%+1..7E?N%=0|
000000c0  3a f2 53 3a e7 3f 28 3f  4a 25 2b 26 37 38 32 30  |:.S:.?(?J%+&7820|
000000d0  29 3d 30 47 3d 47 2b 2e  35 3a 3f 28 3f 4a 25 2b  |)=0G=G+.5:?(?J%+|
000000e0  26 37 38 32 30 29 3d 31  3a f2 4e 28 31 36 2c 30  |&7820)=1:.N(16,0|
000000f0  2c 33 2c 32 2c 47 29 3a  f8 20 8b f8 0d 00 3c cb  |,3,2,G):. ....<.|
00000100  f5 e3 4c 25 3d 30 b8 33  31 3a 4c 25 3f 26 46 42  |..L%=0.31:L%?&FB|
00000110  38 3d 4c 25 3f 26 37 38  30 30 3a 4c 25 3f 26 46  |8=L%?&7800:L%?&F|
00000120  37 38 3d 4c 25 3f 26 37  37 43 30 3a 4c 25 3f 26  |78=L%?&77C0:L%?&|
00000130  46 39 38 3d 4c 25 3f 26  37 37 45 30 3a 4c 25 3f  |F98=L%?&77E0:L%?|
00000140  26 38 38 30 3d 30 3a ed  3a ef 32 38 2c 30 2c 31  |&880=0:.:.28,0,1|
00000150  39 2c 31 39 2c 30 2c 31  37 2c 31 32 38 2c 31 32  |9,19,0,17,128,12|
00000160  2c 32 36 3a e3 4c 25 3d  30 b8 38 39 3a 4c 25 3f  |,26:.L%=0.89:L%?|
00000170  26 37 38 32 30 3d 30 3a  ed 3a 44 25 3d 36 3a 45  |&7820=0:.:D%=6:E|
00000180  25 3d 34 3a 3f 58 25 3d  31 38 3a 3f 59 25 3d 31  |%=4:?X%=18:?Y%=1|
00000190  34 3a 47 3d 30 3a 49 25  3d 39 35 37 3a 21 31 31  |4:G=0:I%=957:!11|
000001a0  34 3d 30 3a 21 31 31 39  3d 26 36 34 30 30 30 31  |4=0:!119=&640001|
000001b0  3a fb 32 3a f1 8a 31 38  2c 30 29 22 25 22 8a 31  |:.2:..18,0)"%".1|
000001c0  38 2c 31 29 22 3a 22 0d  00 3d 11 50 25 3d 30 3a  |8,1)":"..=.P%=0:|
000001d0  e4 8d 54 77 40 3a f2 47  0d 00 3e 45 e7 47 3c 31  |..Tw@:.G..>E.G<1|
000001e0  30 30 d4 31 2c 33 2c 31  30 30 2c 33 30 3a fb 33  |00.1,3,100,30:.3|
000001f0  3a f1 8a 35 2c 31 31 29  22 47 41 4d 45 20 20 4f  |:..5,11)"GAME  O|
00000200  56 45 52 22 3a ef 31 39  2c 32 2c 36 3b 30 3b 3a  |VER":.19,2,6;0;:|
00000210  e3 4c 25 3d 30 b8 39 39  39 39 3a ed 20 0d 00 41  |.L%=0.9999:. ..A|
00000220  9e ef 32 38 2c 30 2c 31  39 2c 31 39 2c 30 2c 31  |..28,0,19,19,0,1|
00000230  32 3a 3f 26 35 45 3d 26  39 30 3a 3f 26 35 46 3d  |2:?&5E=&90:?&5F=|
00000240  26 32 44 3a 3f 4a 25 3d  32 30 30 3a d6 5a 25 3a  |&2D:?J%=200:.Z%:|
00000250  ef 32 36 3a f1 89 31 36  3a fb 31 32 38 3a fb 33  |.26:..16:.128:.3|
00000260  3a f1 8a 33 2c 32 29 22  54 48 55 4e 44 45 52 2d  |:..3,2)"THUNDER-|
00000270  53 54 52 55 43 4b 22 3a  fb 31 33 30 3a fb 31 3a  |STRUCK":.130:.1:|
00000280  f1 8a 31 30 2c 38 29 22  25 41 47 45 3a 22 8a 31  |..10,8)"%AGE:".1|
00000290  30 2c 31 30 29 22 48 49  47 48 3a 22 8a 31 32 2c  |0,10)"HIGH:".12,|
000002a0  31 32 29 22 42 59 3a 22  8a 31 38 2c 38 29 22 25  |12)"BY:".18,8)"%|
000002b0  22 8a 31 38 2c 31 30 29  22 25 22 0d 00 46 9c f2  |".18,10)"%"..F..|
000002c0  4e 28 31 35 2c 38 2c 30  2c 33 2c 47 29 3a f2 4e  |N(15,8,0,3,G):.N|
000002d0  28 31 35 2c 31 30 2c 30  2c 33 2c 61 25 29 3a f1  |(15,10,0,3,a%):.|
000002e0  8a 31 35 2c 31 32 29 68  24 3a e7 47 3c 61 25 e5  |.15,12)h$:.G<a%.|
000002f0  8d 44 5a 40 20 8b e3 4c  25 3d 30 b8 32 30 30 88  |.DZ@ ..L%=0.200.|
00000300  31 30 3a d4 33 2c 32 2c  4c 25 2c 31 3a d4 32 2c  |10:.3,2,L%,1:.2,|
00000310  32 2c 4c 25 81 32 2c 31  3a ed 3a 61 25 3d 47 3a  |2,L%.2,1:.:a%=G:|
00000320  f2 4e 28 31 35 2c 31 30  2c 30 2c 33 2c 61 25 29  |.N(15,10,0,3,a%)|
00000330  3a ef 32 33 3b 31 30 2c  39 36 3b 30 3b 30 3b 30  |:.23;10,96;0;0;0|
00000340  3b 33 31 2c 31 35 2c 31  32 3a 68 24 3d 22 22 3a  |;31,15,12:h$="":|
00000350  e3 4c 25 3d 30 b8 33 0d  00 47 33 53 25 3d a5 3a  |.L%=0.3..G3S%=.:|
00000360  d4 31 2c 2d 39 2c 31 35  30 2c 31 3a e7 53 25 3e  |.1,-9,150,1:.S%>|
00000370  33 31 80 53 25 3c 39 31  68 24 3d 68 24 2b bd 53  |31.S%<91h$=h$+.S|
00000380  25 3a ef 53 25 8b 8d 44  47 40 0d 00 4b 15 ed 3a  |%:.S%..DG@..K..:|
00000390  ef 32 33 3b 38 32 30 32  3b 30 3b 30 3b 30 3b 0d  |.23;8202;0;0;0;.|
000003a0  00 5a 25 fb 33 3a fb 31  32 38 3a f1 8a 31 30 2c  |.Z%.3:.128:..10,|
000003b0  31 35 29 22 48 49 54 20  41 20 4b 45 59 22 3a f2  |15)"HIT A KEY":.|
000003c0  54 3a fd 30 0d 00 64 07  dd f2 47 0d 00 6e 08 f5  |T:.0..d...G..n..|
000003d0  d6 41 25 0d 00 6f 77 53  25 3d a6 30 3a e7 53 25  |.A%..owS%=.0:.S%|
000003e0  3d 34 37 f2 50 20 8b e7  3f 4a 25 3d 32 30 e7 53  |=47.P ..?J%=20.S|
000003f0  25 3d 31 33 39 e7 45 25  3e 31 f2 6c 28 2d 31 29  |%=139.E%>1.l(-1)|
00000400  8b e7 3f 4a 25 3d 32 30  e7 53 25 3d 31 33 38 e7  |..?J%=20.S%=138.|
00000410  45 25 3c 38 f2 6c 28 31  29 8b e7 53 25 3d 35 38  |E%<8.l(1)..S%=58|
00000420  f2 75 20 8b e7 53 25 3d  37 31 f2 67 20 8b e7 53  |.u ..S%=71.g ..S|
00000430  25 3d 38 34 f2 74 20 8b  e7 53 25 3d 39 49 25 3d  |%=84.t ..S%=9I%=|
00000440  33 38 36 3a 3f 4e 25 3d  31 30 0d 00 78 53 fd 3f  |386:?N%=10..xS.?|
00000450  4e 25 3a e7 3f 4e 25 3e  31 35 e4 3f 4e 25 3a e7  |N%:.?N%>15.?N%:.|
00000460  3f 4e 25 3d 30 e5 8d 44  6e 40 8b e7 3f 4e 25 3d  |?N%=0..Dn@..?N%=|
00000470  31 35 ec 31 32 37 31 2c  49 25 3a 49 25 3d 49 25  |15.1271,I%:I%=I%|
00000480  2d 34 38 3a d4 31 37 2c  32 2c 32 32 30 2c 31 3a  |-48:.17,2,220,1:|
00000490  e7 49 25 3c 33 38 36 49  25 3d 33 38 36 0d 00 79  |.I%<386I%=386..y|
000004a0  34 e7 3f 4e 25 3d 31 35  df 31 32 37 31 2c 49 25  |4.?N%=15.1271,I%|
000004b0  8b d4 31 37 2c 32 2c 49  25 81 35 2c 31 3a f0 36  |..17,2,I%.5,1:.6|
000004c0  39 2c 31 32 37 31 2c 49  25 3a 49 25 3d 49 25 2d  |9,1271,I%:I%=I%-|
000004d0  34 0d 00 82 1a e7 49 25  3c 33 38 37 e1 20 8b 3f  |4.....I%<387. .?|
000004e0  4e 25 3d 30 3a e5 8d 44  6e 40 20 0d 02 58 a1 dd  |N%=0:..Dn@ ..X..|
000004f0  f2 53 3a 3f 4a 25 3d 3f  28 26 37 38 37 41 2b 44  |.S:?J%=?(&787A+D|
00000500  25 2b 45 25 2a 31 31 29  3a 52 25 3d 35 35 2a 3f  |%+E%*11):R%=55*?|
00000510  4a 25 2b 26 32 45 32 41  3a 3f 26 35 45 3d 52 25  |J%+&2E2A:?&5E=R%|
00000520  83 32 35 36 3a 3f 26 35  46 3d 52 25 81 32 35 36  |.256:?&5F=R%.256|
00000530  3a d6 5a 25 3a ef 32 36  3a e7 3f 4a 25 3d 38 36  |:.Z%:.26:.?J%=86|
00000540  e7 3f 31 32 31 3d 32 37  84 3f 26 46 44 33 3d 38  |.?121=27.?&FD3=8|
00000550  36 ef 31 39 2c 31 2c 31  3b 30 3b 31 39 2c 32 2c  |6.19,1,1;0;19,2,|
00000560  36 3b 30 3b 31 39 2c 33  2c 33 3b 30 3b 20 8b e7  |6;0;19,3,3;0; ..|
00000570  3f 4a 25 3d 35 33 e7 3f  26 38 38 41 20 3f 31 34  |?J%=53.?&88A ?14|
00000580  36 3d 30 8b e7 3f 4a 25  3d 36 f2 5a 0d 02 59 71  |6=0..?J%=6.Z..Yq|
00000590  e3 4c 25 3d 30 b8 33 3a  e7 4c 25 3f 26 38 38 30  |.L%=0.3:.L%?&880|
000005a0  e7 4c 25 3f 26 31 39 46  34 3d 3f 4a 25 f2 62 28  |.L%?&19F4=?J%.b(|
000005b0  4c 25 3f 26 31 39 46 43  2c 4c 25 3f 26 31 39 46  |L%?&19FC,L%?&19F|
000005c0  38 2c 32 34 2c 4c 25 3f  26 31 39 46 30 29 8b e7  |8,24,L%?&19F0)..|
000005d0  3f 4a 25 3d 37 36 e7 4c  25 3f 26 38 39 35 f2 70  |?J%=76.L%?&895.p|
000005e0  28 4c 25 2a 32 2b 32 34  2c 31 35 2c 31 36 2c 31  |(L%*2+24,15,16,1|
000005f0  2c 26 37 33 41 30 2b 4c  25 2a 33 32 29 0d 02 5d  |,&73A0+L%*32)..]|
00000600  b5 ed 3a e7 3f 4a 25 3d  32 30 3a 3f 31 32 38 3d  |..:.?J%=20:?128=|
00000610  34 2b 45 25 8b e7 3f 4a  25 3d 38 33 e7 3f 26 38  |4+E%..?J%=83.?&8|
00000620  39 43 20 3f 31 32 38 3d  31 33 8b e7 3f 4a 25 3d  |9C ?128=13..?J%=|
00000630  32 e7 50 25 f2 62 28 33  30 2c 36 2c 32 34 2c 33  |2.P%.b(30,6,24,3|
00000640  29 20 8b e7 3f 4a 25 3d  33 36 e7 3f 32 31 39 34  |) ..?J%=36.?2194|
00000650  e3 4c 25 3d 31 32 b8 34  88 2d 32 3a f2 70 28 31  |.L%=12.4.-2:.p(1|
00000660  38 2c 4c 25 2c 32 34 2c  31 2c 26 34 39 43 30 29  |8,L%,24,1,&49C0)|
00000670  3a ed 20 8b e7 3f 4a 25  3d 37 36 e7 21 26 38 39  |:. ..?J%=76.!&89|
00000680  35 3d 26 31 30 31 30 31  30 31 f2 62 28 31 33 2c  |5=&1010101.b(13,|
00000690  31 30 2c 38 2c 37 29 8b  e7 3f 4a 25 3d 35 38 e7  |10,8,7)..?J%=58.|
000006a0  3f 26 38 39 33 f2 62 28  36 2c 34 2c 32 34 2c 31  |?&893.b(6,4,24,1|
000006b0  33 29 0d 02 62 1a 49 25  3d 49 25 2d 31 3a e7 49  |3)..b.I%=I%-1:.I|
000006c0  25 3c 33 38 37 20 3f 4e  25 3d 31 30 0d 02 63 09  |%<387 ?N%=10..c.|
000006d0  e5 8d 54 5f 43 0d 02 8a  67 dd f2 6c 28 54 25 29  |..T_C...g..l(T%)|
000006e0  3a e7 3f 31 31 35 3d 30  d4 31 39 2c 34 2c 32 30  |:.?115=0.19,4,20|
000006f0  30 2c 35 3a d4 33 2c 2d  35 2c 30 2c 31 30 3a d4  |0,5:.3,-5,0,10:.|
00000700  33 2c 34 2c 32 30 30 2c  31 3a e3 4c 25 3d 30 b8  |3,4,200,1:.L%=0.|
00000710  32 35 30 30 3a ed 3a f2  62 28 31 30 2c 35 2c 32  |2500:.:.b(10,5,2|
00000720  34 2c 38 29 3a 45 25 3d  45 25 2b 54 25 3a 3f 31  |4,8):E%=E%+T%:?1|
00000730  32 38 3d 34 2b 45 25 3a  e1 20 8b e1 0d 02 bc 2c  |28=4+E%:. .....,|
00000740  dd f2 75 3a 48 25 3d 3f  31 32 31 3a d6 4b 25 3a  |..u:H%=?121:.K%:|
00000750  e7 3f 26 35 45 3e 30 e5  28 33 30 30 30 2b 3f 26  |.?&5E>0.(3000+?&|
00000760  35 45 29 3a e1 20 8b e1  0d 03 1f 25 e6 30 2c 32  |5E):. .....%.0,2|
00000770  3a ec 31 32 37 31 2c 33  38 35 3a f0 32 31 2c 31  |:.1271,385:.21,1|
00000780  32 37 31 2c 49 25 3a e6  30 2c 30 3a e1 0d 03 20  |271,I%:.0,0:... |
00000790  3b dd f2 50 3a e7 44 25  3d 31 30 84 3f 31 32 31  |;..P:.D%=10.?121|
000007a0  3d 32 30 80 45 25 3d 30  84 3f 31 32 31 3d 32 30  |=20.E%=0.?121=20|
000007b0  80 45 25 3d 37 e1 20 8b  e7 3f 31 32 31 3d 31 30  |.E%=7. ..?121=10|
000007c0  30 d6 42 25 8b d6 51 25  0d 03 21 2a d4 31 39 2c  |0.B%..Q%..!*.19,|
000007d0  2d 39 2c 31 39 30 2c 32  3a d4 33 2c 2d 39 2c 32  |-9,190,2:.3,-9,2|
000007e0  30 30 2c 32 3a d4 39 2c  2d 39 2c 31 39 35 2c 31  |00,2:.9,-9,195,1|
000007f0  3a e1 0d 03 e8 3c dd f2  4e 28 52 25 2c 53 25 2c  |:....<..N(R%,S%,|
00000800  54 25 2c 55 25 2c 56 25  29 3a fb 54 25 3a f1 8a  |T%,U%,V%):.T%:..|
00000810  52 25 2c 53 25 29 3b c0  22 30 30 30 30 30 22 2c  |R%,S%);."00000",|
00000820  55 25 2d a9 c3 56 25 29  3b c3 56 25 3a e1 0d 03  |U%-..V%);.V%:...|
00000830  f2 42 dd f2 62 28 53 25  2c 54 25 2c 55 25 2c 56  |.B..b(S%,T%,U%,V|
00000840  25 29 3a 3f 31 30 32 3d  53 25 3a 3f 31 34 37 3d  |%):?102=S%:?147=|
00000850  55 25 3a e3 4d 25 3d 30  b8 56 25 3a 3f 31 30 33  |U%:.M%=0.V%:?103|
00000860  3d 4d 25 2b 54 25 3a d6  34 34 34 35 3a ed 3a e1  |=M%+T%:.4445:.:.|
00000870  0d 03 fc 6f dd f2 70 28  53 25 2c 54 25 2c 55 25  |...o..p(S%,T%,U%|
00000880  2c 56 25 2c 57 25 29 3a  3f 31 30 32 3d 53 25 3a  |,V%,W%):?102=S%:|
00000890  3f 31 34 37 3d 55 25 3a  57 25 3d 57 25 2d 55 25  |?147=U%:W%=W%-U%|
000008a0  3a e3 4d 25 3d 30 b8 56  25 3a 3f 31 30 33 3d 4d  |:.M%=0.V%:?103=M|
000008b0  25 2b 54 25 3a 57 25 3d  57 25 2b 55 25 3a 3f 26  |%+T%:W%=W%+U%:?&|
000008c0  36 30 3d 57 25 83 32 35  36 3a 3f 26 36 31 3d 57  |60=W%.256:?&61=W|
000008d0  25 81 32 35 36 3a d6 34  34 37 36 3a ed 3a e1 0d  |%.256:.4476:.:..|
000008e0  05 14 77 dd f2 7a 3a 3f  31 32 31 3d 31 30 30 3a  |..w..z:?121=100:|
000008f0  48 25 3f 26 46 42 38 3d  31 30 30 3a 48 25 3f 26  |H%?&FB8=100:H%?&|
00000900  38 38 30 3d 31 3a d6 47  25 3a f2 62 28 33 38 2c  |880=1:.G%:.b(38,|
00000910  30 2c 31 36 2c 31 29 3a  d4 31 38 2c 31 2c 32 30  |0,16,1):.18,1,20|
00000920  30 2c 31 3a 47 3d 47 2b  31 2e 37 36 35 36 32 35  |0,1:G=G+1.765625|
00000930  3a f2 4e 28 31 36 2c 30  2c 33 2c 32 2c 47 29 3a  |:.N(16,0,3,2,G):|
00000940  49 25 3d 49 25 2b 33 32  3a e7 49 25 3e 39 35 37  |I%=I%+32:.I%>957|
00000950  49 25 3d 39 35 37 0d 05  15 09 e5 8d 54 5f 43 0d  |I%=957......T_C.|
00000960  05 1e 29 dd a4 67 3a 4d  25 3d 31 30 30 3a e3 4c  |..)..g:M%=100:.L|
00000970  25 3d 30 b8 37 3a e7 4c  25 3f 26 32 45 30 41 3d  |%=0.7:.L%?&2E0A=|
00000980  3f 4a 25 4d 25 3d 4c 25  0d 05 28 09 ed 3a 3d 4d  |?J%M%=L%..(..:=M|
00000990  25 0d 05 dc c5 dd f2 67  3a 4f 25 3d a4 67 3a 48  |%......g:O%=.g:H|
000009a0  25 3d 3f 31 32 31 3a e7  4f 25 3d 31 30 30 84 48  |%=?121:.O%=100.H|
000009b0  25 3d 31 30 30 84 4f 25  3f 26 32 45 31 32 3c 3e  |%=100.O%?&2E12<>|
000009c0  31 30 30 e1 20 8b e7 4f  25 3f 26 32 45 31 41 3d  |100. ..O%?&2E1A=|
000009d0  48 25 47 3d 47 2b 32 2e  34 32 37 37 33 34 33 37  |H%G=G+2.42773437|
000009e0  3a d4 31 39 2c 32 2c 31  30 30 2c 33 3a d4 33 2c  |:.19,2,100,3:.3,|
000009f0  32 2c 31 35 30 2c 33 3a  d4 33 2c 32 2c 32 30 30  |2,150,3:.3,2,200|
00000a00  2c 33 3a e7 48 25 3d 31  33 f2 62 28 33 30 2c 36  |,3:.H%=13.b(30,6|
00000a10  2c 32 34 2c 33 29 3a 3f  26 46 43 35 3d 31 30 30  |,24,3):?&FC5=100|
00000a20  3a 50 25 3d 31 3a 48 25  3d 31 30 30 3a e5 8d 64  |:P%=1:H%=100:..d|
00000a30  5e 45 8b e7 4f 25 3f 26  32 45 31 41 3d 48 25 48  |^E..O%?&2E1A=H%H|
00000a40  25 3f 26 46 42 38 3d 31  30 30 3a 48 25 3d 4f 25  |%?&FB8=100:H%=O%|
00000a50  3f 26 32 45 32 32 0d 05  dd 0f 48 25 3f 26 46 42  |?&2E22....H%?&FB|
00000a60  38 3d 31 30 30 0d 05 de  47 4f 25 3f 26 32 45 31  |8=100...GO%?&2E1|
00000a70  32 3d 48 25 3a 3f 31 32  31 3d 31 30 30 3a d6 47  |2=H%:?121=100:.G|
00000a80  25 3a f2 62 28 33 38 2c  30 2c 31 36 2c 31 29 3a  |%:.b(38,0,16,1):|
00000a90  d4 31 38 2c 34 2c 32 30  30 2c 31 3a f2 4e 28 31  |.18,4,200,1:.N(1|
00000aa0  36 2c 30 2c 33 2c 32 2c  47 29 3a e1 0d 05 e6 81  |6,0,3,2,G):.....|
00000ab0  dd f2 74 3a 4f 25 3d a4  67 3a e7 4f 25 3d 31 30  |..t:O%=.g:.O%=10|
00000ac0  30 84 3f 31 32 31 3c 31  30 30 84 4f 25 3f 26 32  |0.?121<100.O%?&2|
00000ad0  45 31 32 3d 31 30 30 e1  20 8b 48 25 3d 4f 25 3f  |E12=100. .H%=O%?|
00000ae0  26 32 45 31 32 3a 48 25  3f 26 46 37 38 3d 33 38  |&2E12:H%?&F78=38|
00000af0  3a 48 25 3f 26 46 39 38  3d 30 3a 48 25 3f 26 46  |:H%?&F98=0:H%?&F|
00000b00  42 38 3d 3f 4a 25 3a 3f  31 32 31 3d 48 25 3a 4f  |B8=?J%:?121=H%:O|
00000b10  25 3f 26 32 45 31 32 3d  31 30 30 3a d6 47 25 3a  |%?&2E12=100:.G%:|
00000b20  d4 31 38 2c 34 2c 31 39  30 2c 31 3a e1 0d 0b c2  |.18,4,190,1:....|
00000b30  2a f2 62 28 48 25 3f 26  31 39 46 43 2c 48 25 3f  |*.b(H%?&19FC,H%?|
00000b40  26 31 39 46 38 2c 32 34  2c 48 25 3f 26 31 39 46  |&19F8,24,H%?&19F|
00000b50  30 29 3a f2 7a 3a e1 0d  0b cc 13 49 25 3d 39 35  |0):.z:.....I%=95|
00000b60  37 3a f2 7a 3a e5 8d 54  5f 43 0d 0b d6 0f f2 7a  |7:.z:..T_C.....z|
00000b70  3a 3f 31 34 36 3d 30 3a  e1 0d 0b e0 21 3f 31 32  |:?146=0:....!?12|
00000b80  38 3d 31 34 3a f2 62 28  3f 31 32 32 2c 31 36 2c  |8=14:.b(?122,16,|
00000b90  32 34 2c 31 29 3a f2 7a  3a e1 0d 0b ea 5f e7 3f  |24,1):.z:...._.?|
00000ba0  4a 25 3d 36 e7 3f 58 25  3e 31 31 e7 3f 59 25 3d  |J%=6.?X%>11.?Y%=|
00000bb0  31 30 e7 3f 26 38 39 44  e7 3f 26 38 39 45 e7 3f  |10.?&89D.?&89E.?|
00000bc0  26 38 39 46 20 47 3d 39  38 3a f2 7a 3a 47 3d 31  |&89F G=98:.z:G=1|
00000bd0  30 30 3a f2 4e 28 31 35  2c 30 2c 33 2c 33 2c 31  |00:.N(15,0,3,3,1|
00000be0  30 30 29 3a f2 64 3a 3f  4e 25 3d 31 30 3a 49 25  |00):.d:?N%=10:I%|
00000bf0  3d 33 38 36 3a e1 20 8b  e1 0d 0b f4 45 e7 3f 31  |=386:. .....E.?1|
00000c00  32 31 3c 3e 31 37 e1 20  8b f2 7a 3a 3f 31 32 31  |21<>17. ..z:?121|
00000c10  3d 31 38 3a 3f 26 46 43  41 3d 3f 4a 25 3a e3 4c  |=18:?&FCA=?J%:.L|
00000c20  25 3d 31 35 b8 35 88 2d  33 3a d4 32 2c 31 2c 4c  |%=15.5.-3:.2,1,L|
00000c30  25 2a 31 30 2c 33 3a ed  3a d6 47 25 3a e1 0d 0b  |%*10,3:.:.G%:...|
00000c40  fe 47 e7 3f 58 25 3c 31  34 84 3f 58 25 3e 32 30  |.G.?X%<14.?X%>20|
00000c50  f2 7a 3a d4 32 2c 33 2c  32 30 30 2c 31 3a e3 4c  |.z:.2,3,200,1:.L|
00000c60  25 3d 31 32 b8 34 88 2d  32 3a f2 70 28 31 38 2c  |%=12.4.-2:.p(18,|
00000c70  4c 25 2c 32 34 2c 31 2c  26 34 39 43 30 29 3a ed  |L%,24,1,&49C0):.|
00000c80  3a e1 20 8b e1 0d 0c 08  5b d4 31 37 2c 30 2c 30  |:. .....[.17,0,0|
00000c90  2c 30 3a e3 4c 25 3d 30  b8 2d 31 32 88 2d 31 3a  |,0:.L%=0.-12.-1:|
00000ca0  d4 31 2c 4c 25 2c 32 30  30 2c 31 3a ed 3a d4 31  |.1,L%,200,1:.:.1|
00000cb0  2c 2d 31 33 2c 32 30 30  2c 31 30 3a 53 25 3d a6  |,-13,200,10:S%=.|
00000cc0  35 30 3a f2 62 28 36 2c  34 2c 32 34 2c 31 33 29  |50:.b(6,4,24,13)|
00000cd0  3a d4 30 2c 34 2c 31 30  30 2c 31 3a f2 7a 3a e1  |:.0,4,100,1:.z:.|
00000ce0  0d 0c 12 5e f2 7a 3a f2  70 28 48 25 2a 32 2d 31  |...^.z:.p(H%*2-1|
00000cf0  38 2c 31 35 2c 31 36 2c  31 2c 26 37 31 30 30 2b  |8,15,16,1,&7100+|
00000d00  48 25 2a 33 32 29 3a e7  21 26 38 39 35 3d 31 36  |H%*32):.!&895=16|
00000d10  38 34 33 30 30 39 e3 4c  25 3d 31 30 b8 31 37 3a  |843009.L%=10.17:|
00000d20  f2 62 28 31 33 2c 4c 25  2c 38 2c 30 29 3a d4 32  |.b(13,L%,8,0):.2|
00000d30  2c 32 2c 4c 25 2a 31 30  2c 31 3a ed 3a e1 0d 0c  |,2,L%*10,1:.:...|
00000d40  1c 63 e7 3f 26 46 44 31  3c 3e 3f 4a 25 e1 20 8b  |.c.?&FD1<>?J%. .|
00000d50  f2 62 28 3f 26 46 39 31  2c 3f 26 46 42 31 2c 31  |.b(?&F91,?&FB1,1|
00000d60  36 2c 31 29 3a 3f 26 46  44 31 3d 31 30 30 3a 3f  |6,1):?&FD1=100:?|
00000d70  26 46 39 33 3d 3f 26 46  39 31 3a 3f 26 46 42 33  |&F93=?&F91:?&FB3|
00000d80  3d 3f 26 46 42 31 3a 3f  26 46 44 33 3d 3f 4a 25  |=?&FB1:?&FD3=?J%|
00000d90  3a d4 31 38 2c 34 2c 31  30 30 2c 31 3a f2 7a 3a  |:.18,4,100,1:.z:|
00000da0  e1 0d 0c 26 1e 3f 31 32  38 3d 31 33 3a f2 62 28  |...&.?128=13:.b(|
00000db0  36 2c 31 36 2c 32 34 2c  31 29 3a f2 7a 3a e1 0d  |6,16,24,1):.z:..|
00000dc0  0c 30 28 f2 7a 3a f2 70  28 48 25 2a 32 2d 34 36  |.0(.z:.p(H%*2-46|
00000dd0  2c 31 32 2c 31 36 2c 31  2c 26 37 31 30 30 2b 48  |,12,16,1,&7100+H|
00000de0  25 2a 33 32 29 3a e1 0d  13 87 1a dd f2 54 3a 57  |%*32):.......T:W|
00000df0  25 3d 30 3a f5 f2 6e 3a  fd a6 28 31 29 3e 30 3a  |%=0:..n:..(1)>0:|
00000e00  e1 0d 13 88 9c dd f2 6e  3a 56 25 3d 91 3a e7 91  |.......n:V%=.:..|
00000e10  3c 57 25 2b 31 35 e1 20  8b 57 25 3d 56 25 3a 4c  |<W%+15. .W%=V%:L|
00000e20  25 3d 28 4c 25 2b 31 29  83 34 34 3a 4d 25 3d 4c  |%=(L%+1).44:M%=L|
00000e30  25 3f 26 32 44 44 45 3a  53 25 3d 28 31 30 31 80  |%?&2DDE:S%=(101.|
00000e40  4d 25 3d 31 29 2b 28 31  32 31 80 4d 25 3d 32 29  |M%=1)+(121.M%=2)|
00000e50  2b 28 31 32 39 80 4d 25  3d 33 29 3a d4 31 37 2c  |+(129.M%=3):.17,|
00000e60  34 2c a4 4e 28 53 25 29  2c 31 30 3a d4 31 38 2c  |4,.N(S%),10:.18,|
00000e70  34 2c a4 4e 28 53 25 2b  31 36 29 2c 31 30 3a d4  |4,.N(S%+16),10:.|
00000e80  31 39 2c 34 2c a4 4e 28  53 25 2b 32 38 29 2c 31  |19,4,.N(S%+28),1|
00000e90  30 3a 54 25 3d 54 25 2d  31 35 30 3a e1 0d 13 9c  |0:T%=T%-150:....|
00000ea0  1a dd a4 4e 28 55 25 29  3d 55 25 2d 28 b3 28 33  |...N(U%)=U%-(.(3|
00000eb0  29 2d 31 29 2a 34 38 0d  13 a6 37 dd f2 5a 3a e3  |)-1)*48...7..Z:.|
00000ec0  4c 25 3d 30 b8 32 3a e7  4c 25 3f 26 38 39 44 f2  |L%=0.2:.L%?&89D.|
00000ed0  70 28 4c 25 2a 32 2b 31  32 2c 31 32 2c 31 36 2c  |p(L%*2+12,12,16,|
00000ee0  31 2c 26 37 34 41 30 2b  4c 25 2a 33 32 29 0d 13  |1,&74A0+L%*32)..|
00000ef0  b0 07 ed 3a e1 0d 17 70  99 dd f2 64 3a ef 32 36  |...:...p...d:.26|
00000f00  3a fb 32 3a f1 8a 30 2c  30 29 22 47 4f 49 4e 47  |:.2:..0,0)"GOING|
00000f10  20 48 4f 4d 45 21 20 20  20 20 22 3a e3 4c 25 3d  | HOME!    ":.L%=|
00000f20  32 b8 37 3a f2 70 28 3f  58 25 2c 4c 25 2c 33 32  |2.7:.p(?X%,L%,32|
00000f30  2c 32 2c 26 32 43 46 30  29 3a d4 30 2c 2d 31 30  |,2,&2CF0):.0,-10|
00000f40  2c 31 30 30 2c 31 3a e3  4d 25 3d 30 b8 32 30 30  |,100,1:.M%=0.200|
00000f50  3a ed 2c 3a e3 4c 25 3d  30 b8 32 30 3a e3 50 25  |:.,:.L%=0.20:.P%|
00000f60  3d 30 b8 31 3a e3 62 25  3d 30 b8 33 3a f2 70 28  |=0.1:.b%=0.3:.p(|
00000f70  3f 58 25 2c 3f 59 25 2b  62 25 2c 33 32 2c 30 2c  |?X%,?Y%+b%,32,0,|
00000f80  26 32 44 35 30 2b 50 25  2a 33 32 29 3a ed 0d 17  |&2D50+P%*32):...|
00000f90  7a 96 d4 31 36 2b 50 25  2b 31 2c 50 25 2b 32 2c  |z..16+P%+1,P%+2,|
00000fa0  4c 25 2a 31 30 2b 50 25  2a 35 30 2c 31 3a e3 62  |L%*10+P%*50,1:.b|
00000fb0  25 3d 30 b8 31 35 30 2d  4c 25 2a 31 35 3a ed 3a  |%=0.150-L%*15:.:|
00000fc0  ed 2c 3a ef 32 38 2c 32  2c 31 33 2c 31 38 2c 31  |.,:.28,2,13,18,1|
00000fd0  30 2c 31 32 2c 32 36 3a  e3 4c 25 3d 37 b8 32 88  |0,12,26:.L%=7.2.|
00000fe0  2d 31 3a f2 70 28 3f 58  25 2c 4c 25 2c 33 32 2c  |-1:.p(?X%,L%,32,|
00000ff0  32 2c 26 32 43 46 30 29  3a d4 30 2c 2d 31 30 2c  |2,&2CF0):.0,-10,|
00001000  31 30 30 2c 31 3a f2 62  28 3f 58 25 2c 4c 25 2b  |100,1:.b(?X%,L%+|
00001010  33 2c 33 32 2c 30 29 3a  e3 4d 25 3d 30 b8 32 30  |3,32,0):.M%=0.20|
00001020  30 3a ed 2c 0d 17 84 4a  f2 62 28 3f 58 25 2c 32  |0:.,...J.b(?X%,2|
00001030  2c 33 32 2c 32 29 3a e3  4c 25 3d 30 b8 31 39 39  |,32,2):.L%=0.199|
00001040  39 3a ed 3a f2 6d 75 73  69 63 28 31 30 2c 31 30  |9:.:.music(10,10|
00001050  29 3a f2 6d 75 73 69 63  28 32 30 2c 31 30 29 3a  |):.music(20,10):|
00001060  e3 4c 25 3d 30 b8 36 39  39 39 3a ed 3a e1 0d 1b  |.L%=0.6999:.:...|
00001070  58 27 dd f2 6d 75 73 69  63 28 54 25 2c 55 25 29  |X'..music(T%,U%)|
00001080  3a f7 8d 44 76 5b 3a e7  55 25 3d 31 55 25 3d 36  |:..Dv[:.U%=1U%=6|
00001090  8b 55 25 3d 33 0d 1b 62  20 e3 4c 25 3d 31 b8 31  |.U%=3..b .L%=1.1|
000010a0  32 3a f3 52 25 3a e7 52  25 3d 2d 31 53 25 3d 30  |2:.R%:.R%=-1S%=0|
000010b0  8b 53 25 3d 34 0d 1b 6c  3a d4 31 2c 53 25 2c 54  |.S%=4..l:.1,S%,T|
000010c0  25 2b 52 25 2c 55 25 3a  d4 32 2c 53 25 2c 54 25  |%+R%,U%:.2,S%,T%|
000010d0  2b 52 25 2b 34 38 2c 55  25 3a d4 33 2c 53 25 2c  |+R%+48,U%:.3,S%,|
000010e0  54 25 2b 52 25 2b 39 36  2c 55 25 3a ed 3a e1 0d  |T%+R%+96,U%:.:..|
000010f0  1b 76 31 dc 38 31 2c 31  30 31 2c 31 30 39 2c 31  |.v1.81,101,109,1|
00001100  31 37 2c 31 30 39 2c 31  30 31 2c 31 30 39 2c 31  |17,109,101,109,1|
00001110  31 37 2c 2d 31 2c 31 30  31 2c 2d 31 2c 31 30 31  |17,-1,101,-1,101|
00001120  0d ff 08 56 56                                    |...VV|
00001125
THUNDER.m0
THUNDER.m1
THUNDER.m2
THUNDER.m4
THUNDER.m5

© Dominic Ford 2021–2024.

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .