Home » Personal collection » Acorn ADFS disks » Electron » Digital_pictures_2.ADF » GAMES1/SNOOPYDATA
GAMES1/SNOOPYDATA
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 ADFS disks » Electron » Digital_pictures_2.ADF |
Filename: | GAMES1/SNOOPYDATA |
Read OK: | ✔ |
File size: | 1432 bytes |
Load address: | FFFF0E00 |
Exec address: | FFFF8023 |
File contents
10DIMA(10):DIMA$(10) 20FOR A=1TO10:A(A)=100:A$(A)="":NEXTA 30VDU26:MODE1:VDU5:*FX11,0 40RESTORE1800:FORA=224TO237:READB,C,D,E,F,G,H,I:VDU23,A,B,C,D,E,F,G,H,I:NEXT 50ENVELOPE1,129,2,-2,-2,15,10,5,8,8,8,8,120,60 60T=1:T1=3:T2=2 70L=T1 80 U=4:SC=0:U1=SC 90RESTORE:GCOL0,3:FORA=1TO21:READB,C:PROCcube(B,C):NEXT 100GCOL0,2:MOVE868,536:VDU236,237:MOVE268,536:VDU236,237:VDU4 110COLOUR1:IFL>1THENPRINTTAB(38,1);:VDU224,225:PRINTTAB(38,2);:VDU226,227 120IF L=3THENPRINTTAB(36,1);:VDU224,225:PRINTTAB(36,2);:VDU226,227 130VDU5:*FX15,0 140GCOL3,2 150VDU19,1,T2;0;:VDU19,2,T1;0; 160N=0:N1=N:N2=N:N3=N:M=N:D=N 170X=0:Y=0:XB=568:YB=900:W=1:BALL=W 180SNX=0:SNY=0:S=0:SN=0 190PROCbounce 200X=568:Y=900 210PROCprint 220REPEAT 230K$=INKEY$(0) 240 IF K$="B"THENPROCdownright 250IF K$="V"THENPROCdownleft 260IF K$="Y"THENPROCupright 270IF K$="T"THENPROCupleft 280IFPOINT(X+20,Y-44)=1THENPROCcrash 290IFM<>0THEN400 300IFU1=0THENPROCtop 310IFU1=1THENPROChalf 320IFN<>0THENPROCcheck 330IFYB<360THENPROCball:XB=568:YB=900:BALL=BALL+1 340VDU4:PRINTTAB(2,2);SC:VDU5 350PROCbounce 360IFBALL=1 AND YB<460THEN VDU19,1,T;0;:SNX=XB:SNY=YB:XB=568:YB=900:BALL=BALL+1 370IFSN=20THENGCOL3,1:MOVESNX,SNY:VDU228,229:MOVESNX,SNY-32:VDU230,231:GCOL3,2:PROCspring 380IFSN>19THENPROCsnake 390IFPOINT(X+20,Y-44)=1THENPROCcrash 400UNTILM<>0 410IFM=3THEN440 420IFM=2THEN2010 430CLS:GOTO90 440RESTORE1790 450IFU=10THENU1=1:U=1 460SC=SC+100*(U1+1) 470FORA=1TOU:READB:NEXTA 480READT,T1,T2 490U=U+3:CLS:GOTO90 500DEFPROCcube(X,Y) 510MOVEX,Y:DRAWX,Y-60:DRAWX-60,Y-100:DRAWX-60,Y-40 520DRAWX,Y:DRAWX-60,Y+40:DRAWX-120,Y:DRAWX-120,Y-60 530DRAWX-60,Y-100:DRAWX-60,Y-40:DRAWX-120,Y 540ENDPROC 550DEFPROCdownright 560IFY=400THENRESTORE1760:PROCdeath:ENDPROC 570RESTORE1720 580PROCmove 590ENDPROC 600DEFPROCdownleft 610IFY=400THENRESTORE1770:PROCdeath:ENDPROC 620RESTORE1730 630PROCmove 640ENDPROC 650DEFPROCupright 660IFX=808 AND Y=500 ANDN1=0THENN=1:GOTO680 670IFPOINT(X+92,Y-20)<>3THENRESTORE1760:PROCdeath:ENDPROC 680RESTORE1740 690PROCmove 700ENDPROC 710DEFPROCupleft 720IFX=328 AND Y=500 AND N2=0 THEN N=-1:GOTO740 730IFPOINT(X-28,Y-20)<>3THENRESTORE1770:PROCdeath:ENDPROC 740RESTORE1750 750PROCmove 760ENDPROC 770DEFPROCmove 780W=0 790SOUND2,1,70,10 800IF N<>0 AND N3=1 THEN PROCdeath:ENDPROC 810IFN<>0THENN3=1 820*FX15,1 830FORA=1TO5:READB,C 840PROCprint:X=X+B:Y=Y+C:PROCprint 850NEXT 860ENDPROC 870DEFPROCprint 880MOVEX,Y:VDU224,225:MOVEX,Y-32:VDU226,227:ENDPROC 890DEFPROCdeath 900FORA=1TO7:READB,C:PROCprint:X=X+B:Y=Y+C:PROCprint:NEXT 910PROCprint 920Y=Y-30:MOVEX,Y:VDU224:VDU225:MOVEX,Y:VDU224:VDU225 930REPEAT 940Y=Y-16:IFY<240THENPROCprint:PROCprint 950SOUND1,-15,Y/5,1 960UNTILY<85 970M=1 980L=L-1:IFL=0THENM=2 990ENDPROC 1000DEFPROCfill 1010SC=SC+10 1020MOVEX+32,Y-100:MOVEX-28,Y-56 1030GCOL0,3 1040PLOT85,X+92,Y-58 1050GCOL3,2 1060ENDPROC 1070DEFPROCcover 1080IFU1=1THENSC=SC+40 1090MOVEX+32,Y-20:MOVEX-28,Y-56 1100GCOL0,3 1110PLOT85,X+92,Y-58 1120GCOL3,2 1130ENDPROC 1140DEFPROCbounce 1150IF X=XB AND Y=YB THEN PROCcrash 1160RESTORE(1710+(RND(2)*10)) 1170IFXB=568ANDYB=900THENPROCball 1180 FOR A=1TO5:READB,C 1190PROCball:XB=XB+B:YB=YB+C:PROCball 1200NEXT 1210SOUND0,-15,5,4 1220SN=SN+1 1230ENDPROC 1240DEFPROCball 1250GCOL3,1 1260IFPOINT(XB,YB-60)=3THENGCOL3,2 1270MOVEXB,YB:VDU228,229:MOVEXB,YB-32:VDU230,231 1280GCOL3,2 1290ENDPROC 1300DEFPROCcrash 1310ENVELOPE3,7,2,1,1,1,1,1,121,-10,-5,-2,120,120 1320SOUND1,3,53,20 1330M=1 1340L=L-1:IFL=0THENM=2 1350SN=0:ENDPROC 1360DEFPROCcheck 1370IFY=1000THENIFN=1ORN=-1THENN=N*2 1380IFN=1ORN=-1THENPROClift:ENDPROC 1390IFYB<900ANDYB>500THENIFN=2ORN=-2THENPROCarrive 1400ENDPROC 1410DEFPROCsnake 1420J=J+1:IF J=2 THEN J=0:ENDPROC 1430IFY>=SNY AND X<=SNX THEN RESTORE1750 ELSE GOTO1470 1440IFPOINT(SNX+2,SNY+20)<>3THENRESTORE1770:PROCplop:ENDPROC 1450PROCboing 1460ENDPROC 1470IF Y>=SNY AND X>SNX THEN RESTORE 1740 ELSE GOTO 1510 1480IFPOINT(SNX+62,SNY+20)<>3THENRESTORE1760:PROCplop:ENDPROC 1490PROCboing 1500ENDPROC 1510IF Y<SNY AND X<=SNX THEN RESTORE1730:PROCboing:ENDPROC 1520IFY<SNY AND X>SNX THEN RESTORE1720:PROCboing 1530ENDPROC 1540 DEFPROCboing 1550FORA=1TO5:READB,C 1560 PROCspring:SNX=SNX+B:SNY=SNY+C:PROCspring 1570NEXT 1580ENDPROC 1590DEFPROCspring 1600MOVESNX,SNY:VDU232:VDU233:MOVESNX,SNY-32:VDU234:VDU235 1610ENDPROC 1620DEFPROClift 1630FORA=1TO5:PROCprint:MOVEX,Y-64:VDU236,237:X=X-(12*N):Y=Y+20:MOVEX,Y:PROCprint:MOVEX,Y-64:VDU236,237:NEXT 1640ENDPROC 1650DEFPROCarrive 1660N3=0:IFN=2THENN1=1ELSEN2=1 1670MOVEX,Y-64:VDU236,237 1680IFN=2THENN=0:GOTO620 1690N=0:GOTO570 1700DATA660,840,720,740,600,740,780,640,660,640,540,640,840,540,720,540,600,540,480,540,900,440 1710DATA780,440,660,440,540,440,420,440,960,340,840,340,720,340,600,340,480,340,360,340 1720 DATA30,30,30,-30,0,-30,0,-30,0,-40 1730DATA-30,30,-30,-30,0,-30,0,-30,0,-40 1740DATA0,40,0,30,0,30,30,30,30,-30 1750DATA0,40,0,30,0,30,-30,30,-30,-30 1760DATA30,30,30,15,15,-15,15,-30,0,-30,0,-25,0,-25 1770DATA-30,30,-30,15,-15,-15,-15,-30,0,-30,0,-25,0,-25 1780DATA53,5,-15,53,2,0,53,5,-15,73,10,-15,89,5,-15,12,5,0,149,5,-15,14,2,0,149,5,-15,169,10,-15,185,5,-15,15,5,0 1790DATA0,1,3,2,6,1,5,4,6,3 1800DATA3,4,8,18,18,16,8,6,0,120,4,4,4,120,128,128,2,2,2,2,2,6,7,3,128,128,128,128,128,128,224,224 1810DATA0,0,0,0,0,0,3,15,0,0,0,0,0,0,192,240,28,60,63,63,63,31,15,3,56,60,252,252,252,248,240,192 1820DATA0,1,7,6,7,1,3,4,0,128,224,160,224,128,0,0,5,2,5,4,5,2,5,0,192,32,192,0,192,32,192,0 1830DATA0,31,32,79,80,79,32,31,0,248,4,242,10,242,4,248 1840DATA0,31,48,119,112,31,0,0,0,248,12,206,14,248,0,0 1850DATA0,-60,-60,-100,-60,-40,0,0,-60,40,-120,0,-120,-60,-60,-100,-60,-40,-120,0 1860DEFPROCtop 1870IF POINT(X,Y-60)=0ANDN=0THENPROCprint:PROCfill:PROCcover:PROCprint:D=D+1:IFD=21THENM=3 1880ENDPROC 1890DEFPROChalf 1900IF POINT(X,Y-65)=0ANDN=0THENPROCprint:PROCfill:PROCprint:W=1 1910IF POINT(X,Y-55)=0ANDN=0ANDW=0THENPROCprint:PROCcover:PROCprint:D=D+1:IFD=21THENM=3 1920ENDPROC 1930DEFPROCplop 1940SC=SC+50*(U1+1) 1950PROCspring:FORA=1TO6:READB,C:PROCspring:PROCspring:SNX=SNX+B:SNY=SNY+C:NEXT 1960REPEAT 1970SNY=SNY-16:IFSNY<240THENPROCspring:PROCspring:IFSNY<85THENBALL=0:SN=0:SNX=0:SNY=0 1980SOUND1,-15,SNY/5+50,1 1990UNTILBALL=0 2000ENDPROC 2010MODE6:VDU4:PRINTTAB(15,12);"GAME OVER":FORA=1TO5000:NEXTA:B=10:*FX15,0 2020B$="":FOR A=1TO10 2030IFSC>A(A)THENB=A:A=10 2040NEXTA 2050FORA=10TOB STEP-1:A(A)=A(A-1):A$(A)=A$(A-1):NEXTA 2060A(B)=SC:A$(B)="" 2070CLS:PRINT" Cubert Hall of Fame" 2080PRINT:PRINT" Today's Greatest" 2090FORA=1TO8:PRINTTAB(5,2*A+4);A;"."; 2100PRINTA(A);" ... ";A$(A):NEXTA 2110IFB>8THEN PRINT:PRINT:PRINT" Press (SPACE BAR) to play again":GOTO2160 2120PRINT:PRINT:PRINT" Please enter your name" 2130PRINTTAB(20,2*B+4);". "; 2140INPUT""A$(B) 2150FOR A=1TO(22-(2*B+4)):PRINT" ":NEXTA:PRINT" Press (SPACE BAR) to play again" 2160IF GET$=" "THEN30 2170GOTO2160
�A(10):�A$(10) !� A=1�10:A(A)=100:A$(A)="":�A �26:�1:�5:*FX11,0 (=��THG:�A=224�237:�B,C,D,E,F,G,H,I:�23,A,B,C,D,E,F,G,H,I:� 2)�1,129,2,-2,-2,15,10,5,8,8,8,8,120,60 <T=1:T1=3:T2=2 FL=T1 P U=4:SC=0:U1=SC Z$�:�0,3:�A=1�21:�B,C:�cube(B,C):� d/�0,2:�868,536:�236,237:�268,536:�236,237:�4 n/�1:�L>1��38,1);:�224,225:�38,2);:�226,227 x-� L=3��36,1);:�224,225:�36,2);:�226,227 ��5:*FX15,0 ��3,2 ��19,1,T2;0;:�19,2,T1;0; �N=0:N1=N:N2=N:N3=N:M=N:D=N �$X=0:Y=0:XB=568:YB=900:W=1:BALL=W �SNX=0:SNY=0:S=0:SN=0 ��bounce �X=568:Y=900 � �print �� �K$=�(0) � � K$="B"��downright �� K$="V"��downleft � K$="Y"��upright � K$="T"��upleft �X+20,Y-44)=1��crash "�M<>0��tPA ,�U1=0��top 6�U1=1��half @�N<>0��check J+�YB<360��ball:XB=568:YB=900:BALL=BALL+1 T�4:�2,2);SC:�5 ^�bounce hH�BALL=1 � YB<460� �19,1,T;0;:SNX=XB:SNY=YB:XB=568:YB=900:BALL=BALL+1 rC�SN=20��3,1:�SNX,SNY:�228,229:�SNX,SNY-32:�230,231:�3,2:�spring |�SN>19��snake ��X+20,Y-44)=1��crash � �M<>0 � �M=3��txA � �M=2��dZG ��:�DZ@ � ��d~F ��U=10�U1=1:U=1 �SC=SC+100*(U1+1) ��A=1�U:�B:�A ��T,T1,T2 �U=U+3:�:�DZ@ ���cube(X,Y) �'�X,Y:�X,Y-60:�X-60,Y-100:�X-60,Y-40 )�X,Y:�X-60,Y+40:�X-120,Y:�X-120,Y-60 &�X-60,Y-100:�X-60,Y-40:�X-120,Y � &��downright 0�Y=400���d`F:�death:� : ��txF D �move N� X��downleft b�Y=400���djF:�death:� l ��dBF v �move �� � ��upright �"�X=808 � Y=500 �N1=0�N=1:�thB �#�X+92,Y-20)<>3���d`F:�death:� � ��dLF � �move �� ���upleft �'�X=328 � Y=500 � N2=0 � N=-1:�ddB �"�X-28,Y-20)<>3���djF:�death:� � ��dVF � �move �� ��move W=0 �2,1,70,10 � N<>0 � N3=1 � �death:� *�N<>0�N3=1 4*FX15,1 >�A=1�5:�B,C H�print:X=X+B:Y=Y+C:�print R� \� f��print p$�X,Y:�224,225:�X,Y-32:�226,227:� z��death �+�A=1�7:�B,C:�print:X=X+B:Y=Y+C:�print:� � �print �(Y=Y-30:�X,Y:�224:�225:�X,Y:�224:�225 �� �Y=Y-16:�Y<240��print:�print ��1,-15,Y/5,1 � �Y<85 �M=1 �L=L-1:�L=0�M=2 �� � ��fill �SC=SC+10 ��X+32,Y-100:�X-28,Y-56 �0,3 �85,X+92,Y-58 �3,2 $� .��cover 8�U1=1�SC=SC+40 B�X+32,Y-20:�X-28,Y-56 L�0,3 V�85,X+92,Y-58 `�3,2 j� t��bounce ~� X=XB � Y=YB � �crash ��(1710+(�(2)*10)) ��XB=568�YB=900��ball � � A=1�5:�B,C ��ball:XB=XB+B:YB=YB+C:�ball �� ��0,-15,5,4 �SN=SN+1 �� � ��ball ��3,1 ��XB,YB-60)=3��3,2 �&�XB,YB:�228,229:�XB,YB-32:�230,231 �3,2 � ��crash *�3,7,2,1,1,1,1,1,121,-10,-5,-2,120,120 (�1,3,53,20 2M=1 <L=L-1:�L=0�M=2 F SN=0:� P��check Z�Y=1000��N=1�N=-1�N=N*2 d�N=1�N=-1��lift:� n$�YB<900�YB>500��N=2�N=-2��arrive x� ���snake �J=J+1:� J=2 � J=0:� �$�Y>=SNY � X<=SNX � ��dVF � �t~E �$�SNX+2,SNY+20)<>3���djF:�plop:� � �boing �� �&� Y>=SNY � X>SNX � � �dLF � � �dfE �%�SNX+62,SNY+20)<>3���d`F:�plop:� � �boing �� �%� Y<SNY � X<=SNX � ��dBF:�boing:� �!�Y<SNY � X>SNX � ��txF:�boing �� ��boing �A=1�5:�B,C ( �spring:SNX=SNX+B:SNY=SNY+C:�spring "� ,� 6��spring @,�SNX,SNY:�232:�233:�SNX,SNY-32:�234:�235 J� T��lift ^S�A=1�5:�print:�X,Y-64:�236,237:X=X-(12*N):Y=Y+20:�X,Y:�print:�X,Y-64:�236,237:� h� r��arrive |N3=0:�N=2�N1=1�N2=1 ��X,Y-64:�236,237 ��N=2�N=0:�DlB � N=0:�TzB �\�660,840,720,740,600,740,780,640,660,640,540,640,840,540,720,540,600,540,480,540,900,440 �T�780,440,660,440,540,440,420,440,960,340,840,340,720,340,600,340,480,340,360,340 �$ �30,30,30,-30,0,-30,0,-30,0,-40 �%�-30,30,-30,-30,0,-30,0,-30,0,-40 � �0,40,0,30,0,30,30,30,30,-30 �"�0,40,0,30,0,30,-30,30,-30,-30 �0�30,30,30,15,15,-15,15,-30,0,-30,0,-25,0,-25 �4�-30,30,-30,15,-15,-15,-15,-30,0,-30,0,-25,0,-25 �n�53,5,-15,53,2,0,53,5,-15,73,10,-15,89,5,-15,12,5,0,149,5,-15,14,2,0,149,5,-15,169,10,-15,185,5,-15,15,5,0 ��0,1,3,2,6,1,5,4,6,3 _�3,4,8,18,18,16,8,6,0,120,4,4,4,120,128,128,2,2,2,2,2,6,7,3,128,128,128,128,128,128,224,224 ^�0,0,0,0,0,0,3,15,0,0,0,0,0,0,192,240,28,60,63,63,63,31,15,3,56,60,252,252,252,248,240,192 X�0,1,7,6,7,1,3,4,0,128,224,160,224,128,0,0,5,2,5,4,5,2,5,0,192,32,192,0,192,32,192,0 &4�0,31,32,79,80,79,32,31,0,248,4,242,10,242,4,248 04�0,31,48,119,112,31,0,0,0,248,12,206,14,248,0,0 :N�0,-60,-60,-100,-60,-40,0,0,-60,40,-120,0,-120,-60,-60,-100,-60,-40,-120,0 D ��top N@� �X,Y-60)=0�N=0��print:�fill:�cover:�print:D=D+1:�D=21�M=3 X� b ��half l,� �X,Y-65)=0�N=0��print:�fill:�print:W=1 v=� �X,Y-55)=0�N=0�W=0��print:�cover:�print:D=D+1:�D=21�M=3 �� � ��plop �SC=SC+50*(U1+1) �=�spring:�A=1�6:�B,C:�spring:�spring:SNX=SNX+B:SNY=SNY+C:� �� �GSNY=SNY-16:�SNY<240��spring:�spring:�SNY<85�BALL=0:SN=0:SNX=0:SNY=0 ��1,-15,SNY/5+50,1 ��BALL=0 �� �8�6:�4:�15,12);"GAME OVER":�A=1�5000:�A:B=10:*FX15,0 �B$="":� A=1�10 ��SC>A(A)�B=A:A=10 ��A ,�A=10�B �-1:A(A)=A(A-1):A$(A)=A$(A-1):�A A(B)=SC:A$(B)="" #�:�" Cubert Hall of Fame" !�:�" Today's Greatest" *�A=1�8:�5,2*A+4);A;"."; 4�A(A);" ... ";A$(A):�A >9�B>8� �:�:�" Press (SPACE BAR) to play again":�DpH H%�:�:�" Please enter your name" R�20,2*B+4);". "; \�""A$(B) fD� A=1�(22-(2*B+4)):�" ":�A:�" Press (SPACE BAR) to play again" p� �=" "��T^@ z �DpH �
00000000 0d 00 0a 14 de 41 28 31 30 29 3a de 41 24 28 31 |.....A(10):.A$(1| 00000010 30 29 20 20 0d 00 14 21 e3 20 41 3d 31 b8 31 30 |0) ...!. A=1.10| 00000020 3a 41 28 41 29 3d 31 30 30 3a 41 24 28 41 29 3d |:A(A)=100:A$(A)=| 00000030 22 22 3a ed 41 0d 00 1e 15 ef 32 36 3a eb 31 3a |"":.A.....26:.1:| 00000040 ef 35 3a 2a 46 58 31 31 2c 30 0d 00 28 3d f7 8d |.5:*FX11,0..(=..| 00000050 54 48 47 3a e3 41 3d 32 32 34 b8 32 33 37 3a f3 |THG:.A=224.237:.| 00000060 42 2c 43 2c 44 2c 45 2c 46 2c 47 2c 48 2c 49 3a |B,C,D,E,F,G,H,I:| 00000070 ef 32 33 2c 41 2c 42 2c 43 2c 44 2c 45 2c 46 2c |.23,A,B,C,D,E,F,| 00000080 47 2c 48 2c 49 3a ed 0d 00 32 29 e2 31 2c 31 32 |G,H,I:...2).1,12| 00000090 39 2c 32 2c 2d 32 2c 2d 32 2c 31 35 2c 31 30 2c |9,2,-2,-2,15,10,| 000000a0 35 2c 38 2c 38 2c 38 2c 38 2c 31 32 30 2c 36 30 |5,8,8,8,8,120,60| 000000b0 0d 00 3c 11 54 3d 31 3a 54 31 3d 33 3a 54 32 3d |..<.T=1:T1=3:T2=| 000000c0 32 0d 00 46 08 4c 3d 54 31 0d 00 50 13 20 55 3d |2..F.L=T1..P. U=| 000000d0 34 3a 53 43 3d 30 3a 55 31 3d 53 43 0d 00 5a 24 |4:SC=0:U1=SC..Z$| 000000e0 f7 3a e6 30 2c 33 3a e3 41 3d 31 b8 32 31 3a f3 |.:.0,3:.A=1.21:.| 000000f0 42 2c 43 3a f2 63 75 62 65 28 42 2c 43 29 3a ed |B,C:.cube(B,C):.| 00000100 0d 00 64 2f e6 30 2c 32 3a ec 38 36 38 2c 35 33 |..d/.0,2:.868,53| 00000110 36 3a ef 32 33 36 2c 32 33 37 3a ec 32 36 38 2c |6:.236,237:.268,| 00000120 35 33 36 3a ef 32 33 36 2c 32 33 37 3a ef 34 0d |536:.236,237:.4.| 00000130 00 6e 2f fb 31 3a e7 4c 3e 31 8c f1 8a 33 38 2c |.n/.1:.L>1...38,| 00000140 31 29 3b 3a ef 32 32 34 2c 32 32 35 3a f1 8a 33 |1);:.224,225:..3| 00000150 38 2c 32 29 3b 3a ef 32 32 36 2c 32 32 37 0d 00 |8,2);:.226,227..| 00000160 78 2d e7 20 4c 3d 33 8c f1 8a 33 36 2c 31 29 3b |x-. L=3...36,1);| 00000170 3a ef 32 32 34 2c 32 32 35 3a f1 8a 33 36 2c 32 |:.224,225:..36,2| 00000180 29 3b 3a ef 32 32 36 2c 32 32 37 0d 00 82 0e ef |);:.226,227.....| 00000190 35 3a 2a 46 58 31 35 2c 30 0d 00 8c 08 e6 33 2c |5:*FX15,0.....3,| 000001a0 32 0d 00 96 1b ef 31 39 2c 31 2c 54 32 3b 30 3b |2.....19,1,T2;0;| 000001b0 3a ef 31 39 2c 32 2c 54 31 3b 30 3b 0d 00 a0 1e |:.19,2,T1;0;....| 000001c0 4e 3d 30 3a 4e 31 3d 4e 3a 4e 32 3d 4e 3a 4e 33 |N=0:N1=N:N2=N:N3| 000001d0 3d 4e 3a 4d 3d 4e 3a 44 3d 4e 0d 00 aa 24 58 3d |=N:M=N:D=N...$X=| 000001e0 30 3a 59 3d 30 3a 58 42 3d 35 36 38 3a 59 42 3d |0:Y=0:XB=568:YB=| 000001f0 39 30 30 3a 57 3d 31 3a 42 41 4c 4c 3d 57 0d 00 |900:W=1:BALL=W..| 00000200 b4 18 53 4e 58 3d 30 3a 53 4e 59 3d 30 3a 53 3d |..SNX=0:SNY=0:S=| 00000210 30 3a 53 4e 3d 30 0d 00 be 0b f2 62 6f 75 6e 63 |0:SN=0.....bounc| 00000220 65 0d 00 c8 0f 58 3d 35 36 38 3a 59 3d 39 30 30 |e....X=568:Y=900| 00000230 0d 00 d2 0a f2 70 72 69 6e 74 0d 00 dc 05 f5 0d |.....print......| 00000240 00 e6 0b 4b 24 3d bf 28 30 29 0d 00 f0 18 20 e7 |...K$=.(0).... .| 00000250 20 4b 24 3d 22 42 22 8c f2 64 6f 77 6e 72 69 67 | K$="B"..downrig| 00000260 68 74 0d 00 fa 16 e7 20 4b 24 3d 22 56 22 8c f2 |ht..... K$="V"..| 00000270 64 6f 77 6e 6c 65 66 74 0d 01 04 15 e7 20 4b 24 |downleft..... K$| 00000280 3d 22 59 22 8c f2 75 70 72 69 67 68 74 0d 01 0e |="Y"..upright...| 00000290 14 e7 20 4b 24 3d 22 54 22 8c f2 75 70 6c 65 66 |.. K$="T"..uplef| 000002a0 74 0d 01 18 19 e7 b0 58 2b 32 30 2c 59 2d 34 34 |t......X+20,Y-44| 000002b0 29 3d 31 8c f2 63 72 61 73 68 0d 01 22 0e e7 4d |)=1..crash.."..M| 000002c0 3c 3e 30 8c 8d 74 50 41 0d 01 2c 0e e7 55 31 3d |<>0..tPA..,..U1=| 000002d0 30 8c f2 74 6f 70 0d 01 36 0f e7 55 31 3d 31 8c |0..top..6..U1=1.| 000002e0 f2 68 61 6c 66 0d 01 40 10 e7 4e 3c 3e 30 8c f2 |.half..@..N<>0..| 000002f0 63 68 65 63 6b 0d 01 4a 2b e7 59 42 3c 33 36 30 |check..J+.YB<360| 00000300 8c f2 62 61 6c 6c 3a 58 42 3d 35 36 38 3a 59 42 |..ball:XB=568:YB| 00000310 3d 39 30 30 3a 42 41 4c 4c 3d 42 41 4c 4c 2b 31 |=900:BALL=BALL+1| 00000320 0d 01 54 13 ef 34 3a f1 8a 32 2c 32 29 3b 53 43 |..T..4:..2,2);SC| 00000330 3a ef 35 0d 01 5e 0b f2 62 6f 75 6e 63 65 0d 01 |:.5..^..bounce..| 00000340 68 48 e7 42 41 4c 4c 3d 31 20 80 20 59 42 3c 34 |hH.BALL=1 . YB<4| 00000350 36 30 8c 20 ef 31 39 2c 31 2c 54 3b 30 3b 3a 53 |60. .19,1,T;0;:S| 00000360 4e 58 3d 58 42 3a 53 4e 59 3d 59 42 3a 58 42 3d |NX=XB:SNY=YB:XB=| 00000370 35 36 38 3a 59 42 3d 39 30 30 3a 42 41 4c 4c 3d |568:YB=900:BALL=| 00000380 42 41 4c 4c 2b 31 0d 01 72 43 e7 53 4e 3d 32 30 |BALL+1..rC.SN=20| 00000390 8c e6 33 2c 31 3a ec 53 4e 58 2c 53 4e 59 3a ef |..3,1:.SNX,SNY:.| 000003a0 32 32 38 2c 32 32 39 3a ec 53 4e 58 2c 53 4e 59 |228,229:.SNX,SNY| 000003b0 2d 33 32 3a ef 32 33 30 2c 32 33 31 3a e6 33 2c |-32:.230,231:.3,| 000003c0 32 3a f2 73 70 72 69 6e 67 0d 01 7c 11 e7 53 4e |2:.spring..|..SN| 000003d0 3e 31 39 8c f2 73 6e 61 6b 65 0d 01 86 19 e7 b0 |>19..snake......| 000003e0 58 2b 32 30 2c 59 2d 34 34 29 3d 31 8c f2 63 72 |X+20,Y-44)=1..cr| 000003f0 61 73 68 0d 01 90 09 fd 4d 3c 3e 30 0d 01 9a 0d |ash.....M<>0....| 00000400 e7 4d 3d 33 8c 8d 74 78 41 0d 01 a4 0d e7 4d 3d |.M=3..txA.....M=| 00000410 32 8c 8d 64 5a 47 0d 01 ae 0b db 3a e5 8d 44 5a |2..dZG.....:..DZ| 00000420 40 0d 01 b8 09 f7 8d 64 7e 46 0d 01 c2 12 e7 55 |@......d~F.....U| 00000430 3d 31 30 8c 55 31 3d 31 3a 55 3d 31 0d 01 cc 14 |=10.U1=1:U=1....| 00000440 53 43 3d 53 43 2b 31 30 30 2a 28 55 31 2b 31 29 |SC=SC+100*(U1+1)| 00000450 0d 01 d6 10 e3 41 3d 31 b8 55 3a f3 42 3a ed 41 |.....A=1.U:.B:.A| 00000460 0d 01 e0 0c f3 54 2c 54 31 2c 54 32 0d 01 ea 11 |.....T,T1,T2....| 00000470 55 3d 55 2b 33 3a db 3a e5 8d 44 5a 40 0d 01 f4 |U=U+3:.:..DZ@...| 00000480 0f dd f2 63 75 62 65 28 58 2c 59 29 0d 01 fe 27 |...cube(X,Y)...'| 00000490 ec 58 2c 59 3a df 58 2c 59 2d 36 30 3a df 58 2d |.X,Y:.X,Y-60:.X-| 000004a0 36 30 2c 59 2d 31 30 30 3a df 58 2d 36 30 2c 59 |60,Y-100:.X-60,Y| 000004b0 2d 34 30 0d 02 08 29 df 58 2c 59 3a df 58 2d 36 |-40...).X,Y:.X-6| 000004c0 30 2c 59 2b 34 30 3a df 58 2d 31 32 30 2c 59 3a |0,Y+40:.X-120,Y:| 000004d0 df 58 2d 31 32 30 2c 59 2d 36 30 20 0d 02 12 26 |.X-120,Y-60 ...&| 000004e0 df 58 2d 36 30 2c 59 2d 31 30 30 3a df 58 2d 36 |.X-60,Y-100:.X-6| 000004f0 30 2c 59 2d 34 30 3a df 58 2d 31 32 30 2c 59 20 |0,Y-40:.X-120,Y | 00000500 20 20 0d 02 1c 05 e1 0d 02 26 0f dd f2 64 6f 77 | .......&...dow| 00000510 6e 72 69 67 68 74 0d 02 30 19 e7 59 3d 34 30 30 |nright..0..Y=400| 00000520 8c f7 8d 64 60 46 3a f2 64 65 61 74 68 3a e1 0d |...d`F:.death:..| 00000530 02 3a 09 f7 8d 74 78 46 0d 02 44 09 f2 6d 6f 76 |.:...txF..D..mov| 00000540 65 0d 02 4e 05 e1 0d 02 58 0e dd f2 64 6f 77 6e |e..N....X...down| 00000550 6c 65 66 74 0d 02 62 19 e7 59 3d 34 30 30 8c f7 |left..b..Y=400..| 00000560 8d 64 6a 46 3a f2 64 65 61 74 68 3a e1 0d 02 6c |.djF:.death:...l| 00000570 09 f7 8d 64 42 46 0d 02 76 09 f2 6d 6f 76 65 0d |...dBF..v..move.| 00000580 02 80 05 e1 0d 02 8a 0d dd f2 75 70 72 69 67 68 |..........uprigh| 00000590 74 0d 02 94 22 e7 58 3d 38 30 38 20 80 20 59 3d |t...".X=808 . Y=| 000005a0 35 30 30 20 80 4e 31 3d 30 8c 4e 3d 31 3a e5 8d |500 .N1=0.N=1:..| 000005b0 74 68 42 0d 02 9e 23 e7 b0 58 2b 39 32 2c 59 2d |thB...#..X+92,Y-| 000005c0 32 30 29 3c 3e 33 8c f7 8d 64 60 46 3a f2 64 65 |20)<>3...d`F:.de| 000005d0 61 74 68 3a e1 20 0d 02 a8 09 f7 8d 64 4c 46 0d |ath:. ......dLF.| 000005e0 02 b2 09 f2 6d 6f 76 65 0d 02 bc 05 e1 0d 02 c6 |....move........| 000005f0 0c dd f2 75 70 6c 65 66 74 0d 02 d0 27 e7 58 3d |...upleft...'.X=| 00000600 33 32 38 20 80 20 59 3d 35 30 30 20 80 20 4e 32 |328 . Y=500 . N2| 00000610 3d 30 20 8c 20 4e 3d 2d 31 3a e5 8d 64 64 42 20 |=0 . N=-1:..ddB | 00000620 0d 02 da 22 e7 b0 58 2d 32 38 2c 59 2d 32 30 29 |..."..X-28,Y-20)| 00000630 3c 3e 33 8c f7 8d 64 6a 46 3a f2 64 65 61 74 68 |<>3...djF:.death| 00000640 3a e1 0d 02 e4 09 f7 8d 64 56 46 0d 02 ee 09 f2 |:.......dVF.....| 00000650 6d 6f 76 65 0d 02 f8 05 e1 0d 03 02 0a dd f2 6d |move...........m| 00000660 6f 76 65 0d 03 0c 07 57 3d 30 0d 03 16 0e d4 32 |ove....W=0.....2| 00000670 2c 31 2c 37 30 2c 31 30 0d 03 20 1c e7 20 4e 3c |,1,70,10.. .. N<| 00000680 3e 30 20 80 20 4e 33 3d 31 20 8c 20 f2 64 65 61 |>0 . N3=1 . .dea| 00000690 74 68 3a e1 0d 03 2a 0e e7 4e 3c 3e 30 8c 4e 33 |th:...*..N<>0.N3| 000006a0 3d 31 0d 03 34 0b 2a 46 58 31 35 2c 31 0d 03 3e |=1..4.*FX15,1..>| 000006b0 0f e3 41 3d 31 b8 35 3a f3 42 2c 43 0d 03 48 1d |..A=1.5:.B,C..H.| 000006c0 f2 70 72 69 6e 74 3a 58 3d 58 2b 42 3a 59 3d 59 |.print:X=X+B:Y=Y| 000006d0 2b 43 3a f2 70 72 69 6e 74 0d 03 52 05 ed 0d 03 |+C:.print..R....| 000006e0 5c 05 e1 0d 03 66 0b dd f2 70 72 69 6e 74 0d 03 |\....f...print..| 000006f0 70 24 ec 58 2c 59 3a ef 32 32 34 2c 32 32 35 3a |p$.X,Y:.224,225:| 00000700 ec 58 2c 59 2d 33 32 3a ef 32 32 36 2c 32 32 37 |.X,Y-32:.226,227| 00000710 3a e1 0d 03 7a 0b dd f2 64 65 61 74 68 0d 03 84 |:...z...death...| 00000720 2b e3 41 3d 31 b8 37 3a f3 42 2c 43 3a f2 70 72 |+.A=1.7:.B,C:.pr| 00000730 69 6e 74 3a 58 3d 58 2b 42 3a 59 3d 59 2b 43 3a |int:X=X+B:Y=Y+C:| 00000740 f2 70 72 69 6e 74 3a ed 0d 03 8e 0a f2 70 72 69 |.print:......pri| 00000750 6e 74 0d 03 98 28 59 3d 59 2d 33 30 3a ec 58 2c |nt...(Y=Y-30:.X,| 00000760 59 3a ef 32 32 34 3a ef 32 32 35 3a ec 58 2c 59 |Y:.224:.225:.X,Y| 00000770 3a ef 32 32 34 3a ef 32 32 35 0d 03 a2 05 f5 0d |:.224:.225......| 00000780 03 ac 1f 59 3d 59 2d 31 36 3a e7 59 3c 32 34 30 |...Y=Y-16:.Y<240| 00000790 8c f2 70 72 69 6e 74 3a f2 70 72 69 6e 74 0d 03 |..print:.print..| 000007a0 b6 10 d4 31 2c 2d 31 35 2c 59 2f 35 2c 31 0d 03 |...1,-15,Y/5,1..| 000007b0 c0 09 fd 59 3c 38 35 0d 03 ca 07 4d 3d 31 0d 03 |...Y<85....M=1..| 000007c0 d4 12 4c 3d 4c 2d 31 3a e7 4c 3d 30 8c 4d 3d 32 |..L=L-1:.L=0.M=2| 000007d0 0d 03 de 05 e1 0d 03 e8 0a dd f2 66 69 6c 6c 0d |...........fill.| 000007e0 03 f2 0c 53 43 3d 53 43 2b 31 30 0d 03 fc 1a ec |...SC=SC+10.....| 000007f0 58 2b 33 32 2c 59 2d 31 30 30 3a ec 58 2d 32 38 |X+32,Y-100:.X-28| 00000800 2c 59 2d 35 36 0d 04 06 08 e6 30 2c 33 0d 04 10 |,Y-56.....0,3...| 00000810 11 f0 38 35 2c 58 2b 39 32 2c 59 2d 35 38 0d 04 |..85,X+92,Y-58..| 00000820 1a 08 e6 33 2c 32 0d 04 24 05 e1 0d 04 2e 0b dd |...3,2..$.......| 00000830 f2 63 6f 76 65 72 0d 04 38 12 e7 55 31 3d 31 8c |.cover..8..U1=1.| 00000840 53 43 3d 53 43 2b 34 30 0d 04 42 19 ec 58 2b 33 |SC=SC+40..B..X+3| 00000850 32 2c 59 2d 32 30 3a ec 58 2d 32 38 2c 59 2d 35 |2,Y-20:.X-28,Y-5| 00000860 36 0d 04 4c 08 e6 30 2c 33 0d 04 56 11 f0 38 35 |6..L..0,3..V..85| 00000870 2c 58 2b 39 32 2c 59 2d 35 38 0d 04 60 08 e6 33 |,X+92,Y-58..`..3| 00000880 2c 32 0d 04 6a 05 e1 0d 04 74 0c dd f2 62 6f 75 |,2..j....t...bou| 00000890 6e 63 65 0d 04 7e 1a e7 20 58 3d 58 42 20 80 20 |nce..~.. X=XB . | 000008a0 59 3d 59 42 20 8c 20 f2 63 72 61 73 68 0d 04 88 |Y=YB . .crash...| 000008b0 15 f7 28 31 37 31 30 2b 28 b3 28 32 29 2a 31 30 |..(1710+(.(2)*10| 000008c0 29 29 0d 04 92 18 e7 58 42 3d 35 36 38 80 59 42 |)).....XB=568.YB| 000008d0 3d 39 30 30 8c f2 62 61 6c 6c 0d 04 9c 11 20 e3 |=900..ball.... .| 000008e0 20 41 3d 31 b8 35 3a f3 42 2c 43 0d 04 a6 1f f2 | A=1.5:.B,C.....| 000008f0 62 61 6c 6c 3a 58 42 3d 58 42 2b 42 3a 59 42 3d |ball:XB=XB+B:YB=| 00000900 59 42 2b 43 3a f2 62 61 6c 6c 0d 04 b0 05 ed 0d |YB+C:.ball......| 00000910 04 ba 0e d4 30 2c 2d 31 35 2c 35 2c 34 0d 04 c4 |....0,-15,5,4...| 00000920 0b 53 4e 3d 53 4e 2b 31 0d 04 ce 05 e1 0d 04 d8 |.SN=SN+1........| 00000930 0a dd f2 62 61 6c 6c 0d 04 e2 08 e6 33 2c 31 0d |...ball.....3,1.| 00000940 04 ec 16 e7 b0 58 42 2c 59 42 2d 36 30 29 3d 33 |.....XB,YB-60)=3| 00000950 8c e6 33 2c 32 0d 04 f6 26 ec 58 42 2c 59 42 3a |..3,2...&.XB,YB:| 00000960 ef 32 32 38 2c 32 32 39 3a ec 58 42 2c 59 42 2d |.228,229:.XB,YB-| 00000970 33 32 3a ef 32 33 30 2c 32 33 31 0d 05 00 08 e6 |32:.230,231.....| 00000980 33 2c 32 0d 05 0a 05 e1 0d 05 14 0b dd f2 63 72 |3,2...........cr| 00000990 61 73 68 0d 05 1e 2a e2 33 2c 37 2c 32 2c 31 2c |ash...*.3,7,2,1,| 000009a0 31 2c 31 2c 31 2c 31 2c 31 32 31 2c 2d 31 30 2c |1,1,1,1,121,-10,| 000009b0 2d 35 2c 2d 32 2c 31 32 30 2c 31 32 30 0d 05 28 |-5,-2,120,120..(| 000009c0 0e d4 31 2c 33 2c 35 33 2c 32 30 0d 05 32 07 4d |..1,3,53,20..2.M| 000009d0 3d 31 0d 05 3c 12 4c 3d 4c 2d 31 3a e7 4c 3d 30 |=1..<.L=L-1:.L=0| 000009e0 8c 4d 3d 32 0d 05 46 0a 53 4e 3d 30 3a e1 0d 05 |.M=2..F.SN=0:...| 000009f0 50 0b dd f2 63 68 65 63 6b 0d 05 5a 1b e7 59 3d |P...check..Z..Y=| 00000a00 31 30 30 30 8c e7 4e 3d 31 84 4e 3d 2d 31 8c 4e |1000..N=1.N=-1.N| 00000a10 3d 4e 2a 32 0d 05 64 15 e7 4e 3d 31 84 4e 3d 2d |=N*2..d..N=1.N=-| 00000a20 31 8c f2 6c 69 66 74 3a e1 0d 05 6e 24 e7 59 42 |1..lift:...n$.YB| 00000a30 3c 39 30 30 80 59 42 3e 35 30 30 8c e7 4e 3d 32 |<900.YB>500..N=2| 00000a40 84 4e 3d 2d 32 8c f2 61 72 72 69 76 65 0d 05 78 |.N=-2..arrive..x| 00000a50 05 e1 0d 05 82 0b dd f2 73 6e 61 6b 65 0d 05 8c |........snake...| 00000a60 17 4a 3d 4a 2b 31 3a e7 20 4a 3d 32 20 8c 20 4a |.J=J+1:. J=2 . J| 00000a70 3d 30 3a e1 0d 05 96 24 e7 59 3e 3d 53 4e 59 20 |=0:....$.Y>=SNY | 00000a80 80 20 58 3c 3d 53 4e 58 20 8c 20 f7 8d 64 56 46 |. X<=SNX . ..dVF| 00000a90 20 8b 20 e5 8d 74 7e 45 0d 05 a0 24 e7 b0 53 4e | . ..t~E...$..SN| 00000aa0 58 2b 32 2c 53 4e 59 2b 32 30 29 3c 3e 33 8c f7 |X+2,SNY+20)<>3..| 00000ab0 8d 64 6a 46 3a f2 70 6c 6f 70 3a e1 0d 05 aa 0a |.djF:.plop:.....| 00000ac0 f2 62 6f 69 6e 67 0d 05 b4 05 e1 0d 05 be 26 e7 |.boing........&.| 00000ad0 20 59 3e 3d 53 4e 59 20 80 20 58 3e 53 4e 58 20 | Y>=SNY . X>SNX | 00000ae0 8c 20 f7 20 8d 64 4c 46 20 8b 20 e5 20 8d 64 66 |. . .dLF . . .df| 00000af0 45 0d 05 c8 25 e7 b0 53 4e 58 2b 36 32 2c 53 4e |E...%..SNX+62,SN| 00000b00 59 2b 32 30 29 3c 3e 33 8c f7 8d 64 60 46 3a f2 |Y+20)<>3...d`F:.| 00000b10 70 6c 6f 70 3a e1 0d 05 d2 0a f2 62 6f 69 6e 67 |plop:......boing| 00000b20 0d 05 dc 05 e1 0d 05 e6 25 e7 20 59 3c 53 4e 59 |........%. Y<SNY| 00000b30 20 80 20 58 3c 3d 53 4e 58 20 8c 20 f7 8d 64 42 | . X<=SNX . ..dB| 00000b40 46 3a f2 62 6f 69 6e 67 3a e1 0d 05 f0 21 e7 59 |F:.boing:....!.Y| 00000b50 3c 53 4e 59 20 80 20 58 3e 53 4e 58 20 8c 20 f7 |<SNY . X>SNX . .| 00000b60 8d 74 78 46 3a f2 62 6f 69 6e 67 0d 05 fa 05 e1 |.txF:.boing.....| 00000b70 0d 06 04 0d 20 dd f2 62 6f 69 6e 67 20 0d 06 0e |.... ..boing ...| 00000b80 0f e3 41 3d 31 b8 35 3a f3 42 2c 43 0d 06 18 28 |..A=1.5:.B,C...(| 00000b90 20 f2 73 70 72 69 6e 67 3a 53 4e 58 3d 53 4e 58 | .spring:SNX=SNX| 00000ba0 2b 42 3a 53 4e 59 3d 53 4e 59 2b 43 3a f2 73 70 |+B:SNY=SNY+C:.sp| 00000bb0 72 69 6e 67 0d 06 22 05 ed 0d 06 2c 05 e1 0d 06 |ring.."....,....| 00000bc0 36 0c dd f2 73 70 72 69 6e 67 0d 06 40 2c ec 53 |6...spring..@,.S| 00000bd0 4e 58 2c 53 4e 59 3a ef 32 33 32 3a ef 32 33 33 |NX,SNY:.232:.233| 00000be0 3a ec 53 4e 58 2c 53 4e 59 2d 33 32 3a ef 32 33 |:.SNX,SNY-32:.23| 00000bf0 34 3a ef 32 33 35 0d 06 4a 05 e1 0d 06 54 0b dd |4:.235..J....T..| 00000c00 f2 6c 69 66 74 20 0d 06 5e 53 e3 41 3d 31 b8 35 |.lift ..^S.A=1.5| 00000c10 3a f2 70 72 69 6e 74 3a ec 58 2c 59 2d 36 34 3a |:.print:.X,Y-64:| 00000c20 ef 32 33 36 2c 32 33 37 3a 58 3d 58 2d 28 31 32 |.236,237:X=X-(12| 00000c30 2a 4e 29 3a 59 3d 59 2b 32 30 3a ec 58 2c 59 3a |*N):Y=Y+20:.X,Y:| 00000c40 f2 70 72 69 6e 74 3a ec 58 2c 59 2d 36 34 3a ef |.print:.X,Y-64:.| 00000c50 32 33 36 2c 32 33 37 3a ed 0d 06 68 05 e1 0d 06 |236,237:...h....| 00000c60 72 0c dd f2 61 72 72 69 76 65 0d 06 7c 17 4e 33 |r...arrive..|.N3| 00000c70 3d 30 3a e7 4e 3d 32 8c 4e 31 3d 31 8b 4e 32 3d |=0:.N=2.N1=1.N2=| 00000c80 31 0d 06 86 14 ec 58 2c 59 2d 36 34 3a ef 32 33 |1.....X,Y-64:.23| 00000c90 36 2c 32 33 37 0d 06 90 12 e7 4e 3d 32 8c 4e 3d |6,237.....N=2.N=| 00000ca0 30 3a e5 8d 44 6c 42 0d 06 9a 0d 4e 3d 30 3a e5 |0:..DlB....N=0:.| 00000cb0 8d 54 7a 42 0d 06 a4 5c dc 36 36 30 2c 38 34 30 |.TzB...\.660,840| 00000cc0 2c 37 32 30 2c 37 34 30 2c 36 30 30 2c 37 34 30 |,720,740,600,740| 00000cd0 2c 37 38 30 2c 36 34 30 2c 36 36 30 2c 36 34 30 |,780,640,660,640| 00000ce0 2c 35 34 30 2c 36 34 30 2c 38 34 30 2c 35 34 30 |,540,640,840,540| 00000cf0 2c 37 32 30 2c 35 34 30 2c 36 30 30 2c 35 34 30 |,720,540,600,540| 00000d00 2c 34 38 30 2c 35 34 30 2c 39 30 30 2c 34 34 30 |,480,540,900,440| 00000d10 0d 06 ae 54 dc 37 38 30 2c 34 34 30 2c 36 36 30 |...T.780,440,660| 00000d20 2c 34 34 30 2c 35 34 30 2c 34 34 30 2c 34 32 30 |,440,540,440,420| 00000d30 2c 34 34 30 2c 39 36 30 2c 33 34 30 2c 38 34 30 |,440,960,340,840| 00000d40 2c 33 34 30 2c 37 32 30 2c 33 34 30 2c 36 30 30 |,340,720,340,600| 00000d50 2c 33 34 30 2c 34 38 30 2c 33 34 30 2c 33 36 30 |,340,480,340,360| 00000d60 2c 33 34 30 0d 06 b8 24 20 dc 33 30 2c 33 30 2c |,340...$ .30,30,| 00000d70 33 30 2c 2d 33 30 2c 30 2c 2d 33 30 2c 30 2c 2d |30,-30,0,-30,0,-| 00000d80 33 30 2c 30 2c 2d 34 30 0d 06 c2 25 dc 2d 33 30 |30,0,-40...%.-30| 00000d90 2c 33 30 2c 2d 33 30 2c 2d 33 30 2c 30 2c 2d 33 |,30,-30,-30,0,-3| 00000da0 30 2c 30 2c 2d 33 30 2c 30 2c 2d 34 30 0d 06 cc |0,0,-30,0,-40...| 00000db0 20 dc 30 2c 34 30 2c 30 2c 33 30 2c 30 2c 33 30 | .0,40,0,30,0,30| 00000dc0 2c 33 30 2c 33 30 2c 33 30 2c 2d 33 30 0d 06 d6 |,30,30,30,-30...| 00000dd0 22 dc 30 2c 34 30 2c 30 2c 33 30 2c 30 2c 33 30 |".0,40,0,30,0,30| 00000de0 2c 2d 33 30 2c 33 30 2c 2d 33 30 2c 2d 33 30 0d |,-30,30,-30,-30.| 00000df0 06 e0 30 dc 33 30 2c 33 30 2c 33 30 2c 31 35 2c |..0.30,30,30,15,| 00000e00 31 35 2c 2d 31 35 2c 31 35 2c 2d 33 30 2c 30 2c |15,-15,15,-30,0,| 00000e10 2d 33 30 2c 30 2c 2d 32 35 2c 30 2c 2d 32 35 0d |-30,0,-25,0,-25.| 00000e20 06 ea 34 dc 2d 33 30 2c 33 30 2c 2d 33 30 2c 31 |..4.-30,30,-30,1| 00000e30 35 2c 2d 31 35 2c 2d 31 35 2c 2d 31 35 2c 2d 33 |5,-15,-15,-15,-3| 00000e40 30 2c 30 2c 2d 33 30 2c 30 2c 2d 32 35 2c 30 2c |0,0,-30,0,-25,0,| 00000e50 2d 32 35 0d 06 f4 6e dc 35 33 2c 35 2c 2d 31 35 |-25...n.53,5,-15| 00000e60 2c 35 33 2c 32 2c 30 2c 35 33 2c 35 2c 2d 31 35 |,53,2,0,53,5,-15| 00000e70 2c 37 33 2c 31 30 2c 2d 31 35 2c 38 39 2c 35 2c |,73,10,-15,89,5,| 00000e80 2d 31 35 2c 31 32 2c 35 2c 30 2c 31 34 39 2c 35 |-15,12,5,0,149,5| 00000e90 2c 2d 31 35 2c 31 34 2c 32 2c 30 2c 31 34 39 2c |,-15,14,2,0,149,| 00000ea0 35 2c 2d 31 35 2c 31 36 39 2c 31 30 2c 2d 31 35 |5,-15,169,10,-15| 00000eb0 2c 31 38 35 2c 35 2c 2d 31 35 2c 31 35 2c 35 2c |,185,5,-15,15,5,| 00000ec0 30 0d 06 fe 18 dc 30 2c 31 2c 33 2c 32 2c 36 2c |0.....0,1,3,2,6,| 00000ed0 31 2c 35 2c 34 2c 36 2c 33 0d 07 08 5f dc 33 2c |1,5,4,6,3..._.3,| 00000ee0 34 2c 38 2c 31 38 2c 31 38 2c 31 36 2c 38 2c 36 |4,8,18,18,16,8,6| 00000ef0 2c 30 2c 31 32 30 2c 34 2c 34 2c 34 2c 31 32 30 |,0,120,4,4,4,120| 00000f00 2c 31 32 38 2c 31 32 38 2c 32 2c 32 2c 32 2c 32 |,128,128,2,2,2,2| 00000f10 2c 32 2c 36 2c 37 2c 33 2c 31 32 38 2c 31 32 38 |,2,6,7,3,128,128| 00000f20 2c 31 32 38 2c 31 32 38 2c 31 32 38 2c 31 32 38 |,128,128,128,128| 00000f30 2c 32 32 34 2c 32 32 34 0d 07 12 5e dc 30 2c 30 |,224,224...^.0,0| 00000f40 2c 30 2c 30 2c 30 2c 30 2c 33 2c 31 35 2c 30 2c |,0,0,0,0,3,15,0,| 00000f50 30 2c 30 2c 30 2c 30 2c 30 2c 31 39 32 2c 32 34 |0,0,0,0,0,192,24| 00000f60 30 2c 32 38 2c 36 30 2c 36 33 2c 36 33 2c 36 33 |0,28,60,63,63,63| 00000f70 2c 33 31 2c 31 35 2c 33 2c 35 36 2c 36 30 2c 32 |,31,15,3,56,60,2| 00000f80 35 32 2c 32 35 32 2c 32 35 32 2c 32 34 38 2c 32 |52,252,252,248,2| 00000f90 34 30 2c 31 39 32 0d 07 1c 58 dc 30 2c 31 2c 37 |40,192...X.0,1,7| 00000fa0 2c 36 2c 37 2c 31 2c 33 2c 34 2c 30 2c 31 32 38 |,6,7,1,3,4,0,128| 00000fb0 2c 32 32 34 2c 31 36 30 2c 32 32 34 2c 31 32 38 |,224,160,224,128| 00000fc0 2c 30 2c 30 2c 35 2c 32 2c 35 2c 34 2c 35 2c 32 |,0,0,5,2,5,4,5,2| 00000fd0 2c 35 2c 30 2c 31 39 32 2c 33 32 2c 31 39 32 2c |,5,0,192,32,192,| 00000fe0 30 2c 31 39 32 2c 33 32 2c 31 39 32 2c 30 0d 07 |0,192,32,192,0..| 00000ff0 26 34 dc 30 2c 33 31 2c 33 32 2c 37 39 2c 38 30 |&4.0,31,32,79,80| 00001000 2c 37 39 2c 33 32 2c 33 31 2c 30 2c 32 34 38 2c |,79,32,31,0,248,| 00001010 34 2c 32 34 32 2c 31 30 2c 32 34 32 2c 34 2c 32 |4,242,10,242,4,2| 00001020 34 38 0d 07 30 34 dc 30 2c 33 31 2c 34 38 2c 31 |48..04.0,31,48,1| 00001030 31 39 2c 31 31 32 2c 33 31 2c 30 2c 30 2c 30 2c |19,112,31,0,0,0,| 00001040 32 34 38 2c 31 32 2c 32 30 36 2c 31 34 2c 32 34 |248,12,206,14,24| 00001050 38 2c 30 2c 30 20 0d 07 3a 4e dc 30 2c 2d 36 30 |8,0,0 ..:N.0,-60| 00001060 2c 2d 36 30 2c 2d 31 30 30 2c 2d 36 30 2c 2d 34 |,-60,-100,-60,-4| 00001070 30 2c 30 2c 30 2c 2d 36 30 2c 34 30 2c 2d 31 32 |0,0,0,-60,40,-12| 00001080 30 2c 30 2c 2d 31 32 30 2c 2d 36 30 2c 2d 36 30 |0,0,-120,-60,-60| 00001090 2c 2d 31 30 30 2c 2d 36 30 2c 2d 34 30 2c 2d 31 |,-100,-60,-40,-1| 000010a0 32 30 2c 30 0d 07 44 09 dd f2 74 6f 70 0d 07 4e |20,0..D...top..N| 000010b0 40 e7 20 b0 58 2c 59 2d 36 30 29 3d 30 80 4e 3d |@. .X,Y-60)=0.N=| 000010c0 30 8c f2 70 72 69 6e 74 3a f2 66 69 6c 6c 3a f2 |0..print:.fill:.| 000010d0 63 6f 76 65 72 3a f2 70 72 69 6e 74 3a 44 3d 44 |cover:.print:D=D| 000010e0 2b 31 3a e7 44 3d 32 31 8c 4d 3d 33 20 0d 07 58 |+1:.D=21.M=3 ..X| 000010f0 05 e1 0d 07 62 0a dd f2 68 61 6c 66 0d 07 6c 2c |....b...half..l,| 00001100 e7 20 b0 58 2c 59 2d 36 35 29 3d 30 80 4e 3d 30 |. .X,Y-65)=0.N=0| 00001110 8c f2 70 72 69 6e 74 3a f2 66 69 6c 6c 3a f2 70 |..print:.fill:.p| 00001120 72 69 6e 74 3a 57 3d 31 0d 07 76 3d e7 20 b0 58 |rint:W=1..v=. .X| 00001130 2c 59 2d 35 35 29 3d 30 80 4e 3d 30 80 57 3d 30 |,Y-55)=0.N=0.W=0| 00001140 8c f2 70 72 69 6e 74 3a f2 63 6f 76 65 72 3a f2 |..print:.cover:.| 00001150 70 72 69 6e 74 3a 44 3d 44 2b 31 3a e7 44 3d 32 |print:D=D+1:.D=2| 00001160 31 8c 4d 3d 33 0d 07 80 05 e1 0d 07 8a 0a dd f2 |1.M=3...........| 00001170 70 6c 6f 70 0d 07 94 13 53 43 3d 53 43 2b 35 30 |plop....SC=SC+50| 00001180 2a 28 55 31 2b 31 29 0d 07 9e 3d f2 73 70 72 69 |*(U1+1)...=.spri| 00001190 6e 67 3a e3 41 3d 31 b8 36 3a f3 42 2c 43 3a f2 |ng:.A=1.6:.B,C:.| 000011a0 73 70 72 69 6e 67 3a f2 73 70 72 69 6e 67 3a 53 |spring:.spring:S| 000011b0 4e 58 3d 53 4e 58 2b 42 3a 53 4e 59 3d 53 4e 59 |NX=SNX+B:SNY=SNY| 000011c0 2b 43 3a ed 0d 07 a8 05 f5 0d 07 b2 47 53 4e 59 |+C:.........GSNY| 000011d0 3d 53 4e 59 2d 31 36 3a e7 53 4e 59 3c 32 34 30 |=SNY-16:.SNY<240| 000011e0 8c f2 73 70 72 69 6e 67 3a f2 73 70 72 69 6e 67 |..spring:.spring| 000011f0 3a e7 53 4e 59 3c 38 35 8c 42 41 4c 4c 3d 30 3a |:.SNY<85.BALL=0:| 00001200 53 4e 3d 30 3a 53 4e 58 3d 30 3a 53 4e 59 3d 30 |SN=0:SNX=0:SNY=0| 00001210 0d 07 bc 15 d4 31 2c 2d 31 35 2c 53 4e 59 2f 35 |.....1,-15,SNY/5| 00001220 2b 35 30 2c 31 0d 07 c6 0b fd 42 41 4c 4c 3d 30 |+50,1.....BALL=0| 00001230 0d 07 d0 05 e1 0d 07 da 38 eb 36 3a ef 34 3a f1 |........8.6:.4:.| 00001240 8a 31 35 2c 31 32 29 3b 22 47 41 4d 45 20 4f 56 |.15,12);"GAME OV| 00001250 45 52 22 3a e3 41 3d 31 b8 35 30 30 30 3a ed 41 |ER":.A=1.5000:.A| 00001260 3a 42 3d 31 30 3a 2a 46 58 31 35 2c 30 0d 07 e4 |:B=10:*FX15,0...| 00001270 12 42 24 3d 22 22 3a e3 20 41 3d 31 b8 31 30 0d |.B$="":. A=1.10.| 00001280 07 ee 15 e7 53 43 3e 41 28 41 29 8c 42 3d 41 3a |....SC>A(A).B=A:| 00001290 41 3d 31 30 0d 07 f8 06 ed 41 0d 08 02 2c e3 41 |A=10.....A...,.A| 000012a0 3d 31 30 b8 42 20 88 2d 31 3a 41 28 41 29 3d 41 |=10.B .-1:A(A)=A| 000012b0 28 41 2d 31 29 3a 41 24 28 41 29 3d 41 24 28 41 |(A-1):A$(A)=A$(A| 000012c0 2d 31 29 3a ed 41 0d 08 0c 14 41 28 42 29 3d 53 |-1):.A....A(B)=S| 000012d0 43 3a 41 24 28 42 29 3d 22 22 0d 08 16 23 db 3a |C:A$(B)=""...#.:| 000012e0 f1 22 20 20 20 20 20 20 20 43 75 62 65 72 74 20 |." Cubert | 000012f0 48 61 6c 6c 20 6f 66 20 46 61 6d 65 22 0d 08 20 |Hall of Fame".. | 00001300 21 f1 3a f1 22 20 20 20 20 20 20 20 20 54 6f 64 |!.:." Tod| 00001310 61 79 27 73 20 47 72 65 61 74 65 73 74 22 0d 08 |ay's Greatest"..| 00001320 2a 1c e3 41 3d 31 b8 38 3a f1 8a 35 2c 32 2a 41 |*..A=1.8:..5,2*A| 00001330 2b 34 29 3b 41 3b 22 2e 22 3b 0d 08 34 1a f1 41 |+4);A;".";..4..A| 00001340 28 41 29 3b 22 20 2e 2e 2e 20 22 3b 41 24 28 41 |(A);" ... ";A$(A| 00001350 29 3a ed 41 0d 08 3e 39 e7 42 3e 38 8c 20 f1 3a |):.A..>9.B>8. .:| 00001360 f1 3a f1 22 20 20 20 50 72 65 73 73 20 28 53 50 |.:." Press (SP| 00001370 41 43 45 20 42 41 52 29 20 74 6f 20 70 6c 61 79 |ACE BAR) to play| 00001380 20 61 67 61 69 6e 22 3a e5 8d 44 70 48 0d 08 48 | again":..DpH..H| 00001390 25 f1 3a f1 3a f1 22 20 20 20 20 50 6c 65 61 73 |%.:.:." Pleas| 000013a0 65 20 65 6e 74 65 72 20 79 6f 75 72 20 6e 61 6d |e enter your nam| 000013b0 65 22 0d 08 52 15 f1 8a 32 30 2c 32 2a 42 2b 34 |e"..R...20,2*B+4| 000013c0 29 3b 22 2e 20 22 3b 0d 08 5c 0c e8 22 22 41 24 |);". ";..\..""A$| 000013d0 28 42 29 0d 08 66 44 e3 20 41 3d 31 b8 28 32 32 |(B)..fD. A=1.(22| 000013e0 2d 28 32 2a 42 2b 34 29 29 3a f1 22 20 22 3a ed |-(2*B+4)):." ":.| 000013f0 41 3a f1 22 20 20 20 50 72 65 73 73 20 28 53 50 |A:." Press (SP| 00001400 41 43 45 20 42 41 52 29 20 74 6f 20 70 6c 61 79 |ACE BAR) to play| 00001410 20 61 67 61 69 6e 22 0d 08 70 10 e7 20 be 3d 22 | again"..p.. .="| 00001420 20 22 8c 8d 54 5e 40 0d 08 7a 09 e5 8d 44 70 48 | "..T^@..z...DpH| 00001430 0d ff |..| 00001432