Home » Personal collection » Acorn tapes » Electron_User » Electron_User_tape18a_acorn_eu_1991_january.wav » WizBlob

WizBlob

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 » Electron_User » Electron_User_tape18a_acorn_eu_1991_january.wav
Filename: WizBlob
Read OK: ✔
File size: 0A7E bytes
Load address: FFFF1A00
Exec address: FFFF8023
Duplicates

There are 2 duplicate copies of this file in the archive:

File contents
   10REM Wizblob: Listing II WizBlob
   20REM by Rob Walmsley
   30REM (c) The Micro User
   40ONERRORMODE7:REPORT:PRINT ERL:END
   50MODE2:VDU23,1,0;0;0;0;:PROCN:REPEATPROCD:REPEATPROCB:PROCO:PROCJ:PROCE:PROCH:TIME=0:REPEATPROCK:IFTIME>200 M%=M%-1:PROCE:TIME=0:IFM%<=0 H%=TRUE
   60UNTILH%ORY%>=1076:IFH%GCOL3,K%:PROCA(A,X%,Y%):PROCF(X%,Y%):G%=G%-1ELSEA%=A%+1:SOUND1,3,180,1
   70PROCC(150):UNTILG%=0:PROCI:UNTIL0
   80DEFPROCK:PROCM:`%=A:a%=X%:b%=Y%:VDU19,K%,6;0;19,L%,0;0;:IFINKEY-66 R=R-.2:IFR<=-2 R=-2
   90IFINKEY-82 R=R+.2:IFR>=2 R=2
  100A=A+R:IFA>11 A=0ELSEIFA<0 A=11
  110X%=X%+C:Y%=Y%+B:B=B-D:GCOL3,L%:PROCA(A,X%,Y%):VDU19,K%,0;0;19,L%,6;0;:GCOL3,K%:PROCA(`%,a%,b%):IFK%=1 K%=2:L%=1ELSEK%=1:L%=2
  120PROCG:ENDPROC
  130DEFPROCG:IFB>0 B%=POINT(X%+8,Y%+4):C%=POINT(X%+56,Y%+4)ELSEB%=POINT(X%+8,Y%-68):C%=POINT(X%+56,Y%-68)
  140IFC>0 D%=POINT(X%+72,Y%-4):E%=POINT(X%+72,Y%-60)ELSED%=POINT(X%-8,Y%-4):E%=POINT(X%-8,Y%-60)
  150IFD%=15ORE%=15ORB%=15ORC%=15 H%=TRUE:ENDPROC
  160D%=D%>3:E%=E%>3:B%=B%>3:C%=C%>3:F%=FALSE:IFB%ANDC%OR((B%ORC%)AND(D%=0ANDE%=0))B=-B:F%=TRUE:IFB>0 C=R*c%
  170IFD%ANDE%OR((D%ORE%)AND(B%=0ANDC%=0))C=-C:F%=TRUE
  180IFF%=FALSE IF(D%ORE%)AND(B%ORC%)C=-C:B=-B:F%=TRUE
  190IFF%SOUND0,2,3,1
  200ENDPROC
  210DEFPROCA(I%,X%,Y%):MOVEX%,Y%:VDU224+I%*2,10,8,225+I%*2:ENDPROC
  220DEFPROCN:c%=12:R%=28:D=.5:DIMA%(7,1),z%8:T%=64:U%=32:ENDPROC
  230DEFPROCL(X%,Y%):VDU29,X%;Y%;:GCOL0,15:FORI%=0TOR%STEP4:Q%=SQR(R%*R%-I%*I%):MOVE-Q%,I%:DRAWQ%,I%:MOVE-Q%,-I%:DRAWQ%,-I%:NEXT:VDU26:ENDPROC
  240DEFPROCH:COLOUR128:VDU4:PRINTTAB(1,0)SPC3:VDU5:REPEATPROCK:UNTILY%<996:VDU4:COLOUR140:PRINTTAB(1,0)SPC3:COLOUR128:PRINTTAB(16,0)SPC3:VDU5:ENDPROC
  250DEFPROCJ:FORI%=0TO15:VDU19,I%,0;0;:NEXT:VDU4:COLOUR140:VDU28,0,25,19,0:CLS:COLOUR128:VDU28,1,24,18,1,12,26:COLOUR140:PRINTTAB(4,1)" "TAB(15,1)" "TAB(4,2)" "TAB(15,2)" ":COLOUR128:VDU5:GCOL0,12:RESTORE(450+(A%MOD10)*20):READN%
  260IFN%=0GOTO280
  270FORI%=1TON%:READ$z%:O%=(z%?0-65)*T%:P%=1024-(z%?1-65)*U%:V%=(z%?2-65)*T%:W%=1024-(z%?3-65)*U%:MOVEO%,P%:MOVEV%,P%:PLOT85,O%,W%:PLOT85,V%,W%:NEXT
  280READN%:IFN%>0FORJ%=1TON%:READO%,P%:PROCL(O%,P%):NEXT
  290GCOL0,15:MOVE32,176:PRINT"- - W I Z Z E R - -":VDU4:COLOUR3:PRINTTAB(1,28);"Level ":PRINTTAB(1,30);"Lives ":PRINTTAB(13,28);"Time":VDU5:FORI%=0TO15:VDU19,I%,I%;0;:NEXT:VDU19,3,6;0;19,12,2;0;:ENDPROC
  300DEFPROCF(Z%,_%):SOUND1,1,150,45:SOUND0,-15,7,35:GCOL3,7:FORi%=0TO2:A%(i%,0)=RND(3)-2:A%(i%,1)=RND(3)-2:NEXT:FORi%=16TO60STEP4:IFi%=60GOTO320
  310FORj%=0TO2:MOVEZ%+A%(j%,0)*i%,_%+A%(j%,1)*i%:VDUASC".":NEXT
  320IFi%=16GOTO340
  330FORj%=0TO2:MOVEZ%+A%(j%,0)*(i%-4),_%+A%(j%,1)*(i%-4):VDUASC".":NEXT
  340NEXT:ENDPROC
  350DEFPROCD:A%=1:G%=3:ENDPROC
  360DEFPROCB:M%=99:R=0:A=0:K%=1:L%=2:C=0:B=0:H%=FALSE:X%=128:Y%=1088:ENDPROC
  370DEFPROCO:VDU4:CLS:COLOUR7:PRINTTAB(1,10);"Entering level - ";A%:PROCC(300):CLS:VDU5:ENDPROC
  380DEFPROCC(d%):TIME=0:REPEATUNTILTIME>d%:ENDPROC
  390DEFPROCI:VDU4:PRINTTAB(0,28);SPC19;TAB(0,30);SPC19;:COLOUR7:PRINTTAB(0,29);"Hit Spacebar to play";:REPEATPROCC(11):PROCM:UNTILINKEY-99:VDU5:ENDPROC
  400DEFPROCE:VDU4:COLOUR5:PRINTTAB(7,30);G%:PRINTTAB(7,28);A%:PRINTTAB(14,30);M%;" ":VDU5:ENDPROC
  410DEFPROCM:S%=S%+1:IFS%=8 S%=1
  420VDU19,15,S%;0;0;:ENDPROC
  430DATA3,OSGZ,IJFB,PJMB
  440DATA1,640,900
  450DATA4,GNBH,JBMT,ERMT,TJPO
  460DATA1,1152,268
  470DATA4,GBET,QBOT,LPJZ,LKJE
  480DATA0
  490DATA6,PMQB,PMMJ,OSMJ,OSIP,BIJM,DTFZ
  500DATA2,128,268,1152,268
  510DATA3,BLHQ,NLTQ,JBLV
  520DATA2,496,900,784,900
  530DATA3,EZGI,QZOI,LZJT
  540DATA2,640,880,640,580
  550DATA6,FZHU,FQBN,TQPN,NZPU,HMNJ,HGNE
  560DATA4,128,268,1152,268,368,950,912,950
  570DATA0
  580DATA5,320,320,320,832,640,576,960,320,960,832
  590DATA4,EOBZ,KHGZ,QBNN,TTNZ
  600DATA2,328,256,1152,480


!� Wizblob: Listing II WizBlob
� by Rob Walmsley
� (c) The Micro User
(��7:�:� �:�
2V�2:�23,1,0;0;0;0;:�N:��D:��B:�O:�J:�E:�H:�=0:��K:�>200 M%=M%-1:�E:�=0:�M%<=0 H%=�
<J�H%�Y%>=1076:�H%�3,K%:�A(A,X%,Y%):�F(X%,Y%):G%=G%-1�A%=A%+1:�1,3,180,1
F�C(150):�G%=0:�I:�0
PJ��K:�M:`%=A:a%=X%:b%=Y%:�19,K%,6;0;19,L%,0;0;:�-66 R=R-.2:�R<=-2 R=-2
Z�-82 R=R+.2:�R>=2 R=2
dA=A+R:�A>11 A=0��A<0 A=11
nnX%=X%+C:Y%=Y%+B:B=B-D:�3,L%:�A(A,X%,Y%):�19,K%,0;0;19,L%,6;0;:�3,K%:�A(`%,a%,b%):�K%=1 K%=2:L%=1�K%=1:L%=2
x�G:�
�L��G:�B>0 B%=�X%+8,Y%+4):C%=�X%+56,Y%+4)�B%=�X%+8,Y%-68):C%=�X%+56,Y%-68)
�H�C>0 D%=�X%+72,Y%-4):E%=�X%+72,Y%-60)�D%=�X%-8,Y%-4):E%=�X%-8,Y%-60)
�#�D%=15�E%=15�B%=15�C%=15 H%=�:�
�ZD%=D%>3:E%=E%>3:B%=B%>3:C%=C%>3:F%=�:�B%�C%�((B%�C%)�(D%=0�E%=0))B=-B:F%=�:�B>0 C=R*c%
�)�D%�E%�((D%�E%)�(B%=0�C%=0))C=-C:F%=�
�(�F%=� �(D%�E%)�(B%�C%)C=-C:B=-B:F%=�
��F%�0,2,3,1
��
�2��A(I%,X%,Y%):�X%,Y%:�224+I%*2,10,8,225+I%*2:�
�3��N:c%=12:R%=28:D=.5:�A%(7,1),z%8:T%=64:U%=32:�
�d��L(X%,Y%):�29,X%;Y%;:�0,15:�I%=0�R%�4:Q%=�(R%*R%-I%*I%):�-Q%,I%:�Q%,I%:�-Q%,-I%:�Q%,-I%:�:�26:�
�L��H:�128:�4:�1,0)�3:�5:��K:�Y%<996:�4:�140:�1,0)�3:�128:�16,0)�3:�5:�
����J:�I%=0�15:�19,I%,0;0;:�:�4:�140:�28,0,25,19,0:�:�128:�28,1,24,18,1,12,26:�140:�4,1)" "�15,1)" "�4,2)" "�15,2)" ":�128:�5:�0,12:�(450+(A%�10)*20):�N%
�N%=0�TXA
�I%=1�N%:�$z%:O%=(z%?0-65)*T%:P%=1024-(z%?1-65)*U%:V%=(z%?2-65)*T%:W%=1024-(z%?3-65)*U%:�O%,P%:�V%,P%:�85,O%,W%:�85,V%,W%:�
(�N%:�N%>0�J%=1�N%:�O%,P%:�L(O%,P%):�
"��0,15:�32,176:�"- - W I Z Z E R - -":�4:�3:�1,28);"Level ":�1,30);"Lives ":�13,28);"Time":�5:�I%=0�15:�19,I%,I%;0;:�:�19,3,6;0;19,12,2;0;:�
,m��F(Z%,_%):�1,1,150,45:�0,-15,7,35:�3,7:�i%=0�2:A%(i%,0)=�(3)-2:A%(i%,1)=�(3)-2:�:�i%=16�60�4:�i%=60�D@A
62�j%=0�2:�Z%+A%(j%,0)*i%,_%+A%(j%,1)*i%:�".":�
@�i%=16�DTA
J:�j%=0�2:�Z%+A%(j%,0)*(i%-4),_%+A%(j%,1)*(i%-4):�".":�
T�:�
^��D:A%=1:G%=3:�
h=��B:M%=99:R=0:A=0:K%=1:L%=2:C=0:B=0:H%=�:X%=128:Y%=1088:�
r=��O:�4:�:�7:�1,10);"Entering level - ";A%:�C(300):�:�5:�
|��C(d%):�=0:���>d%:�
�[��I:�4:�0,28);�19;�0,30);�19;:�7:�0,29);"Hit Spacebar to play";:��C(11):�M:��-99:�5:�
�8��E:�4:�5:�7,30);G%:�7,28);A%:�14,30);M%;" ":�5:�
���M:S%=S%+1:�S%=8 S%=1
��19,15,S%;0;0;:�
��3,OSGZ,IJFB,PJMB
��1,640,900
��4,GNBH,JBMT,ERMT,TJPO
��1,1152,268
��4,GBET,QBOT,LPJZ,LKJE
��0
�$�6,PMQB,PMMJ,OSMJ,OSIP,BIJM,DTFZ
��2,128,268,1152,268
��3,BLHQ,NLTQ,JBLV
�2,496,900,784,900
�3,EZGI,QZOI,LZJT
�2,640,880,640,580
&$�6,FZHU,FQBN,TQPN,NZPU,HMNJ,HGNE
0'�4,128,268,1152,268,368,950,912,950
:�0
D.�5,320,320,320,832,640,576,960,320,960,832
N�4,EOBZ,KHGZ,QBNN,TTNZ
X�2,328,256,1152,480
�
00000000  0d 00 0a 21 f4 20 57 69  7a 62 6c 6f 62 3a 20 4c  |...!. Wizblob: L|
00000010  69 73 74 69 6e 67 20 49  49 20 57 69 7a 42 6c 6f  |isting II WizBlo|
00000020  62 0d 00 14 15 f4 20 62  79 20 52 6f 62 20 57 61  |b..... by Rob Wa|
00000030  6c 6d 73 6c 65 79 0d 00  1e 18 f4 20 28 63 29 20  |lmsley..... (c) |
00000040  54 68 65 20 4d 69 63 72  6f 20 55 73 65 72 0d 00  |The Micro User..|
00000050  28 10 ee 85 eb 37 3a f6  3a f1 20 9e 3a e0 0d 00  |(....7:.:. .:...|
00000060  32 56 eb 32 3a ef 32 33  2c 31 2c 30 3b 30 3b 30  |2V.2:.23,1,0;0;0|
00000070  3b 30 3b 3a f2 4e 3a f5  f2 44 3a f5 f2 42 3a f2  |;0;:.N:..D:..B:.|
00000080  4f 3a f2 4a 3a f2 45 3a  f2 48 3a d1 3d 30 3a f5  |O:.J:.E:.H:.=0:.|
00000090  f2 4b 3a e7 91 3e 32 30  30 20 4d 25 3d 4d 25 2d  |.K:..>200 M%=M%-|
000000a0  31 3a f2 45 3a d1 3d 30  3a e7 4d 25 3c 3d 30 20  |1:.E:.=0:.M%<=0 |
000000b0  48 25 3d b9 0d 00 3c 4a  fd 48 25 84 59 25 3e 3d  |H%=...<J.H%.Y%>=|
000000c0  31 30 37 36 3a e7 48 25  e6 33 2c 4b 25 3a f2 41  |1076:.H%.3,K%:.A|
000000d0  28 41 2c 58 25 2c 59 25  29 3a f2 46 28 58 25 2c  |(A,X%,Y%):.F(X%,|
000000e0  59 25 29 3a 47 25 3d 47  25 2d 31 8b 41 25 3d 41  |Y%):G%=G%-1.A%=A|
000000f0  25 2b 31 3a d4 31 2c 33  2c 31 38 30 2c 31 0d 00  |%+1:.1,3,180,1..|
00000100  46 17 f2 43 28 31 35 30  29 3a fd 47 25 3d 30 3a  |F..C(150):.G%=0:|
00000110  f2 49 3a fd 30 0d 00 50  4a dd f2 4b 3a f2 4d 3a  |.I:.0..PJ..K:.M:|
00000120  60 25 3d 41 3a 61 25 3d  58 25 3a 62 25 3d 59 25  |`%=A:a%=X%:b%=Y%|
00000130  3a ef 31 39 2c 4b 25 2c  36 3b 30 3b 31 39 2c 4c  |:.19,K%,6;0;19,L|
00000140  25 2c 30 3b 30 3b 3a e7  a6 2d 36 36 20 52 3d 52  |%,0;0;:..-66 R=R|
00000150  2d 2e 32 3a e7 52 3c 3d  2d 32 20 52 3d 2d 32 0d  |-.2:.R<=-2 R=-2.|
00000160  00 5a 1a e7 a6 2d 38 32  20 52 3d 52 2b 2e 32 3a  |.Z...-82 R=R+.2:|
00000170  e7 52 3e 3d 32 20 52 3d  32 0d 00 64 1d 41 3d 41  |.R>=2 R=2..d.A=A|
00000180  2b 52 3a e7 41 3e 31 31  20 41 3d 30 8b e7 41 3c  |+R:.A>11 A=0..A<|
00000190  30 20 41 3d 31 31 0d 00  6e 6e 58 25 3d 58 25 2b  |0 A=11..nnX%=X%+|
000001a0  43 3a 59 25 3d 59 25 2b  42 3a 42 3d 42 2d 44 3a  |C:Y%=Y%+B:B=B-D:|
000001b0  e6 33 2c 4c 25 3a f2 41  28 41 2c 58 25 2c 59 25  |.3,L%:.A(A,X%,Y%|
000001c0  29 3a ef 31 39 2c 4b 25  2c 30 3b 30 3b 31 39 2c  |):.19,K%,0;0;19,|
000001d0  4c 25 2c 36 3b 30 3b 3a  e6 33 2c 4b 25 3a f2 41  |L%,6;0;:.3,K%:.A|
000001e0  28 60 25 2c 61 25 2c 62  25 29 3a e7 4b 25 3d 31  |(`%,a%,b%):.K%=1|
000001f0  20 4b 25 3d 32 3a 4c 25  3d 31 8b 4b 25 3d 31 3a  | K%=2:L%=1.K%=1:|
00000200  4c 25 3d 32 0d 00 78 08  f2 47 3a e1 0d 00 82 4c  |L%=2..x..G:....L|
00000210  dd f2 47 3a e7 42 3e 30  20 42 25 3d b0 58 25 2b  |..G:.B>0 B%=.X%+|
00000220  38 2c 59 25 2b 34 29 3a  43 25 3d b0 58 25 2b 35  |8,Y%+4):C%=.X%+5|
00000230  36 2c 59 25 2b 34 29 8b  42 25 3d b0 58 25 2b 38  |6,Y%+4).B%=.X%+8|
00000240  2c 59 25 2d 36 38 29 3a  43 25 3d b0 58 25 2b 35  |,Y%-68):C%=.X%+5|
00000250  36 2c 59 25 2d 36 38 29  0d 00 8c 48 e7 43 3e 30  |6,Y%-68)...H.C>0|
00000260  20 44 25 3d b0 58 25 2b  37 32 2c 59 25 2d 34 29  | D%=.X%+72,Y%-4)|
00000270  3a 45 25 3d b0 58 25 2b  37 32 2c 59 25 2d 36 30  |:E%=.X%+72,Y%-60|
00000280  29 8b 44 25 3d b0 58 25  2d 38 2c 59 25 2d 34 29  |).D%=.X%-8,Y%-4)|
00000290  3a 45 25 3d b0 58 25 2d  38 2c 59 25 2d 36 30 29  |:E%=.X%-8,Y%-60)|
000002a0  0d 00 96 23 e7 44 25 3d  31 35 84 45 25 3d 31 35  |...#.D%=15.E%=15|
000002b0  84 42 25 3d 31 35 84 43  25 3d 31 35 20 48 25 3d  |.B%=15.C%=15 H%=|
000002c0  b9 3a e1 0d 00 a0 5a 44  25 3d 44 25 3e 33 3a 45  |.:....ZD%=D%>3:E|
000002d0  25 3d 45 25 3e 33 3a 42  25 3d 42 25 3e 33 3a 43  |%=E%>3:B%=B%>3:C|
000002e0  25 3d 43 25 3e 33 3a 46  25 3d a3 3a e7 42 25 80  |%=C%>3:F%=.:.B%.|
000002f0  43 25 84 28 28 42 25 84  43 25 29 80 28 44 25 3d  |C%.((B%.C%).(D%=|
00000300  30 80 45 25 3d 30 29 29  42 3d 2d 42 3a 46 25 3d  |0.E%=0))B=-B:F%=|
00000310  b9 3a e7 42 3e 30 20 43  3d 52 2a 63 25 0d 00 aa  |.:.B>0 C=R*c%...|
00000320  29 e7 44 25 80 45 25 84  28 28 44 25 84 45 25 29  |).D%.E%.((D%.E%)|
00000330  80 28 42 25 3d 30 80 43  25 3d 30 29 29 43 3d 2d  |.(B%=0.C%=0))C=-|
00000340  43 3a 46 25 3d b9 0d 00  b4 28 e7 46 25 3d a3 20  |C:F%=....(.F%=. |
00000350  e7 28 44 25 84 45 25 29  80 28 42 25 84 43 25 29  |.(D%.E%).(B%.C%)|
00000360  43 3d 2d 43 3a 42 3d 2d  42 3a 46 25 3d b9 0d 00  |C=-C:B=-B:F%=...|
00000370  be 0f e7 46 25 d4 30 2c  32 2c 33 2c 31 0d 00 c8  |...F%.0,2,3,1...|
00000380  05 e1 0d 00 d2 32 dd f2  41 28 49 25 2c 58 25 2c  |.....2..A(I%,X%,|
00000390  59 25 29 3a ec 58 25 2c  59 25 3a ef 32 32 34 2b  |Y%):.X%,Y%:.224+|
000003a0  49 25 2a 32 2c 31 30 2c  38 2c 32 32 35 2b 49 25  |I%*2,10,8,225+I%|
000003b0  2a 32 3a e1 0d 00 dc 33  dd f2 4e 3a 63 25 3d 31  |*2:....3..N:c%=1|
000003c0  32 3a 52 25 3d 32 38 3a  44 3d 2e 35 3a de 41 25  |2:R%=28:D=.5:.A%|
000003d0  28 37 2c 31 29 2c 7a 25  38 3a 54 25 3d 36 34 3a  |(7,1),z%8:T%=64:|
000003e0  55 25 3d 33 32 3a e1 0d  00 e6 64 dd f2 4c 28 58  |U%=32:....d..L(X|
000003f0  25 2c 59 25 29 3a ef 32  39 2c 58 25 3b 59 25 3b  |%,Y%):.29,X%;Y%;|
00000400  3a e6 30 2c 31 35 3a e3  49 25 3d 30 b8 52 25 88  |:.0,15:.I%=0.R%.|
00000410  34 3a 51 25 3d b6 28 52  25 2a 52 25 2d 49 25 2a  |4:Q%=.(R%*R%-I%*|
00000420  49 25 29 3a ec 2d 51 25  2c 49 25 3a df 51 25 2c  |I%):.-Q%,I%:.Q%,|
00000430  49 25 3a ec 2d 51 25 2c  2d 49 25 3a df 51 25 2c  |I%:.-Q%,-I%:.Q%,|
00000440  2d 49 25 3a ed 3a ef 32  36 3a e1 0d 00 f0 4c dd  |-I%:.:.26:....L.|
00000450  f2 48 3a fb 31 32 38 3a  ef 34 3a f1 8a 31 2c 30  |.H:.128:.4:..1,0|
00000460  29 89 33 3a ef 35 3a f5  f2 4b 3a fd 59 25 3c 39  |).3:.5:..K:.Y%<9|
00000470  39 36 3a ef 34 3a fb 31  34 30 3a f1 8a 31 2c 30  |96:.4:.140:..1,0|
00000480  29 89 33 3a fb 31 32 38  3a f1 8a 31 36 2c 30 29  |).3:.128:..16,0)|
00000490  89 33 3a ef 35 3a e1 0d  00 fa 9c dd f2 4a 3a e3  |.3:.5:.......J:.|
000004a0  49 25 3d 30 b8 31 35 3a  ef 31 39 2c 49 25 2c 30  |I%=0.15:.19,I%,0|
000004b0  3b 30 3b 3a ed 3a ef 34  3a fb 31 34 30 3a ef 32  |;0;:.:.4:.140:.2|
000004c0  38 2c 30 2c 32 35 2c 31  39 2c 30 3a db 3a fb 31  |8,0,25,19,0:.:.1|
000004d0  32 38 3a ef 32 38 2c 31  2c 32 34 2c 31 38 2c 31  |28:.28,1,24,18,1|
000004e0  2c 31 32 2c 32 36 3a fb  31 34 30 3a f1 8a 34 2c  |,12,26:.140:..4,|
000004f0  31 29 22 20 22 8a 31 35  2c 31 29 22 20 22 8a 34  |1)" ".15,1)" ".4|
00000500  2c 32 29 22 20 22 8a 31  35 2c 32 29 22 20 22 3a  |,2)" ".15,2)" ":|
00000510  fb 31 32 38 3a ef 35 3a  e6 30 2c 31 32 3a f7 28  |.128:.5:.0,12:.(|
00000520  34 35 30 2b 28 41 25 83  31 30 29 2a 32 30 29 3a  |450+(A%.10)*20):|
00000530  f3 4e 25 0d 01 04 0e e7  4e 25 3d 30 e5 8d 54 58  |.N%.....N%=0..TX|
00000540  41 0d 01 0e 7f e3 49 25  3d 31 b8 4e 25 3a f3 24  |A.....I%=1.N%:.$|
00000550  7a 25 3a 4f 25 3d 28 7a  25 3f 30 2d 36 35 29 2a  |z%:O%=(z%?0-65)*|
00000560  54 25 3a 50 25 3d 31 30  32 34 2d 28 7a 25 3f 31  |T%:P%=1024-(z%?1|
00000570  2d 36 35 29 2a 55 25 3a  56 25 3d 28 7a 25 3f 32  |-65)*U%:V%=(z%?2|
00000580  2d 36 35 29 2a 54 25 3a  57 25 3d 31 30 32 34 2d  |-65)*T%:W%=1024-|
00000590  28 7a 25 3f 33 2d 36 35  29 2a 55 25 3a ec 4f 25  |(z%?3-65)*U%:.O%|
000005a0  2c 50 25 3a ec 56 25 2c  50 25 3a f0 38 35 2c 4f  |,P%:.V%,P%:.85,O|
000005b0  25 2c 57 25 3a f0 38 35  2c 56 25 2c 57 25 3a ed  |%,W%:.85,V%,W%:.|
000005c0  0d 01 18 28 f3 4e 25 3a  e7 4e 25 3e 30 e3 4a 25  |...(.N%:.N%>0.J%|
000005d0  3d 31 b8 4e 25 3a f3 4f  25 2c 50 25 3a f2 4c 28  |=1.N%:.O%,P%:.L(|
000005e0  4f 25 2c 50 25 29 3a ed  0d 01 22 92 e6 30 2c 31  |O%,P%):..."..0,1|
000005f0  35 3a ec 33 32 2c 31 37  36 3a f1 22 2d 20 2d 20  |5:.32,176:."- - |
00000600  57 20 49 20 5a 20 5a 20  45 20 52 20 2d 20 2d 22  |W I Z Z E R - -"|
00000610  3a ef 34 3a fb 33 3a f1  8a 31 2c 32 38 29 3b 22  |:.4:.3:..1,28);"|
00000620  4c 65 76 65 6c 20 22 3a  f1 8a 31 2c 33 30 29 3b  |Level ":..1,30);|
00000630  22 4c 69 76 65 73 20 22  3a f1 8a 31 33 2c 32 38  |"Lives ":..13,28|
00000640  29 3b 22 54 69 6d 65 22  3a ef 35 3a e3 49 25 3d  |);"Time":.5:.I%=|
00000650  30 b8 31 35 3a ef 31 39  2c 49 25 2c 49 25 3b 30  |0.15:.19,I%,I%;0|
00000660  3b 3a ed 3a ef 31 39 2c  33 2c 36 3b 30 3b 31 39  |;:.:.19,3,6;0;19|
00000670  2c 31 32 2c 32 3b 30 3b  3a e1 0d 01 2c 6d dd f2  |,12,2;0;:...,m..|
00000680  46 28 5a 25 2c 5f 25 29  3a d4 31 2c 31 2c 31 35  |F(Z%,_%):.1,1,15|
00000690  30 2c 34 35 3a d4 30 2c  2d 31 35 2c 37 2c 33 35  |0,45:.0,-15,7,35|
000006a0  3a e6 33 2c 37 3a e3 69  25 3d 30 b8 32 3a 41 25  |:.3,7:.i%=0.2:A%|
000006b0  28 69 25 2c 30 29 3d b3  28 33 29 2d 32 3a 41 25  |(i%,0)=.(3)-2:A%|
000006c0  28 69 25 2c 31 29 3d b3  28 33 29 2d 32 3a ed 3a  |(i%,1)=.(3)-2:.:|
000006d0  e3 69 25 3d 31 36 b8 36  30 88 34 3a e7 69 25 3d  |.i%=16.60.4:.i%=|
000006e0  36 30 e5 8d 44 40 41 0d  01 36 32 e3 6a 25 3d 30  |60..D@A..62.j%=0|
000006f0  b8 32 3a ec 5a 25 2b 41  25 28 6a 25 2c 30 29 2a  |.2:.Z%+A%(j%,0)*|
00000700  69 25 2c 5f 25 2b 41 25  28 6a 25 2c 31 29 2a 69  |i%,_%+A%(j%,1)*i|
00000710  25 3a ef 97 22 2e 22 3a  ed 0d 01 40 0f e7 69 25  |%:..".":...@..i%|
00000720  3d 31 36 e5 8d 44 54 41  0d 01 4a 3a e3 6a 25 3d  |=16..DTA..J:.j%=|
00000730  30 b8 32 3a ec 5a 25 2b  41 25 28 6a 25 2c 30 29  |0.2:.Z%+A%(j%,0)|
00000740  2a 28 69 25 2d 34 29 2c  5f 25 2b 41 25 28 6a 25  |*(i%-4),_%+A%(j%|
00000750  2c 31 29 2a 28 69 25 2d  34 29 3a ef 97 22 2e 22  |,1)*(i%-4):.."."|
00000760  3a ed 0d 01 54 07 ed 3a  e1 0d 01 5e 13 dd f2 44  |:...T..:...^...D|
00000770  3a 41 25 3d 31 3a 47 25  3d 33 3a e1 0d 01 68 3d  |:A%=1:G%=3:...h=|
00000780  dd f2 42 3a 4d 25 3d 39  39 3a 52 3d 30 3a 41 3d  |..B:M%=99:R=0:A=|
00000790  30 3a 4b 25 3d 31 3a 4c  25 3d 32 3a 43 3d 30 3a  |0:K%=1:L%=2:C=0:|
000007a0  42 3d 30 3a 48 25 3d a3  3a 58 25 3d 31 32 38 3a  |B=0:H%=.:X%=128:|
000007b0  59 25 3d 31 30 38 38 3a  e1 0d 01 72 3d dd f2 4f  |Y%=1088:...r=..O|
000007c0  3a ef 34 3a db 3a fb 37  3a f1 8a 31 2c 31 30 29  |:.4:.:.7:..1,10)|
000007d0  3b 22 45 6e 74 65 72 69  6e 67 20 6c 65 76 65 6c  |;"Entering level|
000007e0  20 2d 20 22 3b 41 25 3a  f2 43 28 33 30 30 29 3a  | - ";A%:.C(300):|
000007f0  db 3a ef 35 3a e1 0d 01  7c 18 dd f2 43 28 64 25  |.:.5:...|...C(d%|
00000800  29 3a d1 3d 30 3a f5 fd  91 3e 64 25 3a e1 0d 01  |):.=0:...>d%:...|
00000810  86 5b dd f2 49 3a ef 34  3a f1 8a 30 2c 32 38 29  |.[..I:.4:..0,28)|
00000820  3b 89 31 39 3b 8a 30 2c  33 30 29 3b 89 31 39 3b  |;.19;.0,30);.19;|
00000830  3a fb 37 3a f1 8a 30 2c  32 39 29 3b 22 48 69 74  |:.7:..0,29);"Hit|
00000840  20 53 70 61 63 65 62 61  72 20 74 6f 20 70 6c 61  | Spacebar to pla|
00000850  79 22 3b 3a f5 f2 43 28  31 31 29 3a f2 4d 3a fd  |y";:..C(11):.M:.|
00000860  a6 2d 39 39 3a ef 35 3a  e1 0d 01 90 38 dd f2 45  |.-99:.5:....8..E|
00000870  3a ef 34 3a fb 35 3a f1  8a 37 2c 33 30 29 3b 47  |:.4:.5:..7,30);G|
00000880  25 3a f1 8a 37 2c 32 38  29 3b 41 25 3a f1 8a 31  |%:..7,28);A%:..1|
00000890  34 2c 33 30 29 3b 4d 25  3b 22 20 22 3a ef 35 3a  |4,30);M%;" ":.5:|
000008a0  e1 0d 01 9a 1a dd f2 4d  3a 53 25 3d 53 25 2b 31  |.......M:S%=S%+1|
000008b0  3a e7 53 25 3d 38 20 53  25 3d 31 0d 01 a4 14 ef  |:.S%=8 S%=1.....|
000008c0  31 39 2c 31 35 2c 53 25  3b 30 3b 30 3b 3a e1 0d  |19,15,S%;0;0;:..|
000008d0  01 ae 15 dc 33 2c 4f 53  47 5a 2c 49 4a 46 42 2c  |....3,OSGZ,IJFB,|
000008e0  50 4a 4d 42 0d 01 b8 0e  dc 31 2c 36 34 30 2c 39  |PJMB.....1,640,9|
000008f0  30 30 0d 01 c2 1a dc 34  2c 47 4e 42 48 2c 4a 42  |00.....4,GNBH,JB|
00000900  4d 54 2c 45 52 4d 54 2c  54 4a 50 4f 0d 01 cc 0f  |MT,ERMT,TJPO....|
00000910  dc 31 2c 31 31 35 32 2c  32 36 38 0d 01 d6 1a dc  |.1,1152,268.....|
00000920  34 2c 47 42 45 54 2c 51  42 4f 54 2c 4c 50 4a 5a  |4,GBET,QBOT,LPJZ|
00000930  2c 4c 4b 4a 45 0d 01 e0  06 dc 30 0d 01 ea 24 dc  |,LKJE.....0...$.|
00000940  36 2c 50 4d 51 42 2c 50  4d 4d 4a 2c 4f 53 4d 4a  |6,PMQB,PMMJ,OSMJ|
00000950  2c 4f 53 49 50 2c 42 49  4a 4d 2c 44 54 46 5a 0d  |,OSIP,BIJM,DTFZ.|
00000960  01 f4 17 dc 32 2c 31 32  38 2c 32 36 38 2c 31 31  |....2,128,268,11|
00000970  35 32 2c 32 36 38 0d 01  fe 15 dc 33 2c 42 4c 48  |52,268.....3,BLH|
00000980  51 2c 4e 4c 54 51 2c 4a  42 4c 56 0d 02 08 16 dc  |Q,NLTQ,JBLV.....|
00000990  32 2c 34 39 36 2c 39 30  30 2c 37 38 34 2c 39 30  |2,496,900,784,90|
000009a0  30 0d 02 12 15 dc 33 2c  45 5a 47 49 2c 51 5a 4f  |0.....3,EZGI,QZO|
000009b0  49 2c 4c 5a 4a 54 0d 02  1c 16 dc 32 2c 36 34 30  |I,LZJT.....2,640|
000009c0  2c 38 38 30 2c 36 34 30  2c 35 38 30 0d 02 26 24  |,880,640,580..&$|
000009d0  dc 36 2c 46 5a 48 55 2c  46 51 42 4e 2c 54 51 50  |.6,FZHU,FQBN,TQP|
000009e0  4e 2c 4e 5a 50 55 2c 48  4d 4e 4a 2c 48 47 4e 45  |N,NZPU,HMNJ,HGNE|
000009f0  0d 02 30 27 dc 34 2c 31  32 38 2c 32 36 38 2c 31  |..0'.4,128,268,1|
00000a00  31 35 32 2c 32 36 38 2c  33 36 38 2c 39 35 30 2c  |152,268,368,950,|
00000a10  39 31 32 2c 39 35 30 0d  02 3a 06 dc 30 0d 02 44  |912,950..:..0..D|
00000a20  2e dc 35 2c 33 32 30 2c  33 32 30 2c 33 32 30 2c  |..5,320,320,320,|
00000a30  38 33 32 2c 36 34 30 2c  35 37 36 2c 39 36 30 2c  |832,640,576,960,|
00000a40  33 32 30 2c 39 36 30 2c  38 33 32 0d 02 4e 1a dc  |320,960,832..N..|
00000a50  34 2c 45 4f 42 5a 2c 4b  48 47 5a 2c 51 42 4e 4e  |4,EOBZ,KHGZ,QBNN|
00000a60  2c 54 54 4e 5a 0d 02 58  17 dc 32 2c 33 32 38 2c  |,TTNZ..X..2,328,|
00000a70  32 35 36 2c 31 31 35 32  2c 34 38 30 0d ff        |256,1152,480..|
00000a7e
WizBlob.m0
WizBlob.m1
WizBlob.m2
WizBlob.m4
WizBlob.m5

© Dominic Ford 2021–2024.

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