Home » Recent acquisitions » Commodore_16 » tape009a_c16_commodore_16_games_pack_1.wav » unscramble

unscramble

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 » Recent acquisitions » Commodore_16 » tape009a_c16_commodore_16_games_pack_1.wav
Filename: unscramble
Read OK:
File size: 0A09 bytes
Load address: 1001
Exec address: 0000
File contents
    10 COLOR0,2:COLOR4,2:VOL8
    20 DIMN(3,3):DIMNZ$(15)
    30 X=0:Y=0:C2$="":C3$=""
    40 TP$="🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸":S$="🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>"
    50 CX$="     <cursor down><cursor left> <cursor down><cursor left> <cursor down><cursor left> <cursor down><cursor left> <cursor left><cursor left> <cursor left><cursor left> <cursor left><cursor left> <cursor left><cursor left> <cursor up><cursor left> <cursor up><cursor left> <cursor up><cursor left> "
    60 CD$="<home><cursor down><cursor down><cursor down><cursor down>":CR$="<cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>":CS$="╭🭸🭸🭸╮<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>🭲<cursor down><cursor left>╯<cursor left><cursor left>🭸<cursor left><cursor left>🭸<cursor left><cursor left>🭸<cursor left><cursor left>╰<cursor up><cursor left>🭲<cursor up><cursor left>🭲<cursor up><cursor left>🭲"
    70 BD$="<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>":BR$="<cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>"
    80 COLOR1,3,3:PRINT"<clr><cursor down><cursor right><cursor right><cursor right><cursor right>┬ ┬┬ ┬╭🭸╮╭🭸╮┌🭸╮╭🭸╮╭╮╭╮┌🭸╮┬ ┌🭸"
    90 PRINT"<cursor right><cursor right><cursor right><cursor right>🭲 🭲🭲╲🭲╰🭸╮🭲  ├┬╯├🭸┤🭲╰╯🭲├🭸┤🭲 ├🭸"
   100 PRINT"<cursor right><cursor right><cursor right><cursor right>╰🭸╯┴ ┴╰🭸╯╰🭸╯┴╰ ┴ ┴┴  ┴└🭸╯└🭸└🭸 ●"
   110 COLOR1,9,4:PRINT"<cursor down><cursor down><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>INSTRUCTIONS"
   120 PRINT"<cursor down><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>'I'    CURSOR LEFT"
   130 PRINT"<cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>'P'    CURSOR RIGHT"
   140 PRINT"<cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>'Q'    CURSOR UP"
   150 PRINT"<cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>'Z'    CURSOR DOWN"
   160 PRINT"<cursor down><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>SPACE   SHIFT PIECES"
   170 PRINT"<cursor down><cursor down><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>(HIT RETURN TO START)"
   180 GETA$:IFASC(A$)<>13THEN180
   190 NZ$(0)="<white><reverse on>   <cursor down><cursor left><cursor left><cursor left>   <cursor down><cursor left><cursor left><cursor left>   "
   200 NZ$(1)="<black><reverse on>   <cursor down><cursor left><cursor left><cursor left> 1 <cursor down><cursor left><cursor left><cursor left>   "
   210 NZ$(2)="<red><reverse on>   <cursor down><cursor left><cursor left><cursor left> 2 <cursor down><cursor left><cursor left><cursor left>   "
   220 NZ$(3)="<cyan><reverse on>   <cursor down><cursor left><cursor left><cursor left> 3 <cursor down><cursor left><cursor left><cursor left>   "
   230 NZ$(4)="<purple><reverse on>   <cursor down><cursor left><cursor left><cursor left> 4 <cursor down><cursor left><cursor left><cursor left>   "
   240 NZ$(5)="<green><reverse on>   <cursor down><cursor left><cursor left><cursor left> 5 <cursor down><cursor left><cursor left><cursor left>   "
   250 NZ$(6)="<blue><reverse on>   <cursor down><cursor left><cursor left><cursor left> 6 <cursor down><cursor left><cursor left><cursor left>   "
   260 NZ$(7)="<light gray><reverse on>   <cursor down><cursor left><cursor left><cursor left> 7 <cursor down><cursor left><cursor left><cursor left>   "
   270 NZ$(8)="<orange><reverse on>   <cursor down><cursor left><cursor left><cursor left> 8 <cursor down><cursor left><cursor left><cursor left>   "
   280 NZ$(9)="<brown><reverse on>   <cursor down><cursor left><cursor left><cursor left> 9 <cursor down><cursor left><cursor left><cursor left>   "
   290 NZ$(10)="<pink><reverse on>   <cursor down><cursor left><cursor left><cursor left>10 <cursor down><cursor left><cursor left><cursor left>   "
   300 NZ$(11)="<dark gray><reverse on>   <cursor down><cursor left><cursor left><cursor left>11 <cursor down><cursor left><cursor left><cursor left>   "
   310 NZ$(12)="<medium gray><reverse on>   <cursor down><cursor left><cursor left><cursor left>12 <cursor down><cursor left><cursor left><cursor left>   "
   320 NZ$(13)="<light green><reverse on>   <cursor down><cursor left><cursor left><cursor left>13 <cursor down><cursor left><cursor left><cursor left>   "
   330 NZ$(14)="<light blue><reverse on>   <cursor down><cursor left><cursor left><cursor left>14 <cursor down><cursor left><cursor left><cursor left>   "
   340 NZ$(15)="<light gray><reverse on>   <cursor down><cursor left><cursor left><cursor left>15 <cursor down><cursor left><cursor left><cursor left>   "
   350 FORI=0TO3:FORJ=0TO3:N(I,J)=I*4+J:NEXTJ,I
   360 PRINT"<clr><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>UNSCRAMBLE!":GOSUB550
   370 X1=0:Y1=0:X=0:Y=0:Z=20+INT(RND(0)*25)
   380 FORJ=1TOZ:X=INT(RND(0)*4):GOSUB620:Y=INT(RND(0)*4):GOSUB620:NEXT
   390 COLOR1,3,3:PRINTCD$;CR$;"<cursor right><cursor down>";C2$;C3$;CS$;"<home>":X=0:Y=0
   400 GETA$:IFA$<>" "ANDA$<>"P"ANDA$<>"I"ANDA$<>"Q"ANDA$<>"Z"THEN400
   410 IFA$=" "AND(X1=XORY1=Y)THENGOSUB620:GOTO400
   420 PRINTCD$;CR$;"<cursor down><cursor right>";C2$;C3$;CX$
   430 IFA$<>" "THENSOUND1,400,7
   440 IFA$="P"THENX=X+1:C2$=C2$+"<cursor right><cursor right><cursor right><cursor right>":IFX>3THENX=0:C2$=""
   450 IFA$<>"I"THEN480
   460 X=X-1:IFX>=0THENC2$=LEFT$(C2$,X*4):GOTO520
   470 X=3:C2$="<cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>":GOTO520
   480 IFA$<>"Q"THEN510
   490 Y=Y-1:IFY>=0THENC3$=LEFT$(C3$,Y*4):GOTO520
   500 Y=3:C3$="<cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>"
   510 IFA$="Z"THENY=Y+1:C3$=C3$+"<cursor down><cursor down><cursor down><cursor down>":IFY>3THENY=0:C3$=""
   520 COLOR1,3,3:PRINTCD$;CR$;"<cursor down><cursor right>";C2$;C3$;CS$
   530 GOTO400
   540 END
   550 COLOR1,1:PRINTCD$;CR$;"╭";TP$;"╮<cursor down><cursor left>";S$;
   560 PRINTCD$;CR$;"<cursor down>";S$;"╰";TP$;"╯";
   570 PRINTCD$;"<cursor down><cursor down><cursor down><cursor down>";
   580 FORI=0TO3:PRINTCR$;"<cursor right><cursor right>";:FORJ=0TO3
   590 PRINT"<cursor up><cursor up>";NZ$(I*4+J);"<rev off> ";:N(I,J)=I*4+J
   600 NEXTJ:PRINT:PRINT:PRINT:PRINT:NEXTI
   610 RETURN
   620 IFX1=XANDY1=YTHENRETURN
   630 IFY<Y1THENFORI=Y1-1TOYSTEP-1:N(I+1,X)=N(I,X):GOSUB680:Y1=Y:NEXT
   640 IFY>Y1THENFORI=Y1+1TOY:N(I-1,X)=N(I,X):GOSUB690:NEXT:Y1=Y:RETURN
   650 IFX<X1THENFORI=X1-1TOXSTEP-1:N(Y,I+1)=N(Y,I):GOSUB710:NEXT:X1=X:RETURN
   660 IFX>X1THENFORI=X1+1TOX:N(Y,I-1)=N(Y,I):GOSUB720:NEXT:X1=X:RETURN
   670 PRINTBD$;BR$;NZ$(0):COLOR1,1:RETURN
   680 Z$=BD$:BD$=LEFT$(BD$,I*4+7):GOTO700
   690 Z$=BD$:BD$=BD$+"<cursor down><cursor down><cursor down><cursor down>"
   700 SOUND1,1000-5*I,2:GOSUB670:PRINTZ$;BR$;NZ$(N(I,X)):RETURN
   710 Z$=BR$:BR$=LEFT$(BR$,I*4+12):GOTO730
   720 Z$=BR$:BR$=BR$+"<cursor right><cursor right><cursor right><cursor right>"
   730 SOUND1,970+5*I,2:GOSUB670:PRINTBD$;Z$;NZ$(N(Y,I)):RETURN


�0,2:�4,2:�8'�N(3,3):�NZ$(15)AX�0:Y�0:C2$�"":C3$�""�(TP$�"�����������������":S$�"����������������������������������"�2CX$�"     � � � � �� �� �� �� �� �� �� "<CD$�"":CR$�"":CS$�"������������˝�Ý�Ý�Ý�ʑ�‘�‘��":FBD$�"":BR$�""lP�1,3,3:�"�� ���������ɰ��������ɰ�ɲ ��"�Z�"� ��������  ��˫ó���«ó� ��"�d�"��˱�������˱� ���������˭í� �"�n�1,9,4:�"INSTRUCTIONS"x�"'I'    CURSOR LEFT"4��"'P'    CURSOR RIGHT"V��"'Q'    CURSOR UP"z��"'Z'    CURSOR DOWN"���"SPACE   SHIFT PIECES"���"(HIT RETURN TO START)"���A$:��(A$)��13�180�NZ$(0)�"   ���   ���   "!�NZ$(1)�"�   ��� 1 ���   "B�NZ$(2)�"   ��� 2 ���   "c�NZ$(3)�"�   ��� 3 ���   "��NZ$(4)�"�   ��� 4 ���   "��NZ$(5)�"   ��� 5 ���   "��NZ$(6)�"   ��� 6 ���   "�NZ$(7)�"�   ��� 7 ���   "NZ$(8)�"�   ��� 8 ���   ")NZ$(9)�"�   ��� 9 ���   "K"NZ$(10)�"�   ���10 ���   "m,NZ$(11)�"�   ���11 ���   "�6NZ$(12)�"�   ���12 ���   "�@NZ$(13)�"�   ���13 ���   "�JNZ$(14)�"�   ���14 ���   "�TNZ$(15)�"�   ���15 ���   "^�I�0�3:�J�0�3:N(I,J)�I�4�J:�J,IAh�"�UNSCRAMBLE!":�550grX1�0:Y1�0:X�0:Y�0:Z�20��(�(0)�25)�|�J�1�Z:X��(�(0)�4):�620:Y��(�(0)�4):�620:����1,3,3:�CD$;CR$;"";C2$;C3$;CS$;"":X�0:Y�0���A$:�A$��" "�A$��"P"�A$��"I"�A$��"Q"�A$��"Z"�400��A$�" "�(X1�X�Y1�Y)��620:�400<��CD$;CR$;"";C2$;C3$;CX$R��A$��" "��1,400,7���A$�"P"�X�X�1:C2$�C2$�"":�X�3�X�0:C2$�""���A$��"I"�480��X�X�1:�X��0�C2$��(C2$,X�4):�520��X�3:C2$�"":�520���A$��"Q"�510
�Y�Y�1:�Y��0�C3$��(C3$,Y�4):�520(�Y�3:C3$�""Y��A$�"Z"�Y�Y�1:C3$�C3$�"":�Y�3�Y�0:C3$�""~�1,3,3:�CD$;CR$;"";C2$;C3$;CS$��400���&�1,1:�CD$;CR$;"�";TP$;"��";S$;�0�CD$;CR$;"";S$;"�";TP$;"�";�:�CD$;"";D�I�0�3:�CR$;"";:�J�0�3(N�"��";NZ$(I�4�J);"� ";:N(I,J)�I�4�J:X�J:�:�:�:�:�I@b�Ql�X1�X�Y1�Y���v�Y�Y1��I�Y1�1�Y��1:N(I�1,X)�N(I,X):�680:Y1�Y:����Y�Y1��I�Y1�1�Y:N(I�1,X)�N(I,X):�690:�:Y1�Y:����X�X1��I�X1�1�X��1:N(Y,I�1)�N(Y,I):�710:�:X1�X:���X�X1��I�X1�1�X:N(Y,I�1)�N(Y,I):�720:�:X1�X:�8��BD$;BR$;NZ$(0):�1,1:�Y�Z$�BD$:BD$��(BD$,I�4�7):�700s�Z$�BD$:BD$�BD$�""���1,1000�5�I,2:�670:�Z$;BR$;NZ$(N(I,X)):���Z$�BR$:BR$��(BR$,I�4�12):�730��Z$�BR$:BR$�BR$�""��1,970�5�I,2:�670:�BD$;Z$;NZ$(N(Y,I)):�
RPJ@.0,2:.4,2:.8@'PT@.n(3,3):.nz$(15)@aP.@x.0:y.0:c2$."":c3$.""@.P(@tp$.".................":s$.".Q..Q..Q..Q..Q..Q..Q..Q..Q..Q..Q..Q..Q..Q..Q..Q..Q."@.P2@cx$."     Q. Q. Q. Q. .. .. .. .. .. .. .. "@UQ<@cd$."SQQQQ":cr$."]]]]]]]]]]":cs$.".....Q..Q..Q..Q......................."@:Qf@bd$."SQQQQQQ":br$."]]]]]]]]]]]]"@LQp@.1,3,3:.".Q]]]]. ........................ .."@.Qz@."]]]]. ........  .............. .."@.QD@."]]]].............. .............. ."@.QN@.1,9,4:."QQQ]]]]]]]]]]]]instructions"@ORX@."QQ]]]]]]]]]'i'    cursor left"@4R.@."Q]]]]]]]]]'p'    cursor right"@vR.@."Q]]]]]]]]]'q'    cursor up"@ZR.@."Q]]]]]]]]]'z'    cursor down"@.R.@."QQ]]]]]]]]space   shift pieces"@.R.@."QQQ]]]]]]]](hit return to start)"@.R.@.a$:..(a$)..13.180@@S.@nz$(0)."ER   Q...   Q...   "@!S.@nz$(1).".R   Q... 1 Q...   "@bS.@nz$(2)."£R   Q... 2 Q...   "@CS.@nz$(3).".R   Q... 3 Q...   "@.S.@nz$(4).".R   Q... 4 Q...   "@.S.@nz$(5).".R   Q... 5 Q...   "@.S.@nz$(6).".R   Q... 6 Q...   "@.SDAnz$(7).".R   Q... 7 Q...   "@HTNAnz$(8).".R   Q... 8 Q...   "@)TXAnz$(9).".R   Q... 9 Q...   "@kT"Anz$(10).".R   Q...10 Q...   "@MT,Anz$(11).".R   Q...11 Q...   "@.T6Anz$(12).".R   Q...12 Q...   "@.T@Anz$(13).".R   Q...13 Q...   "@.TjAnz$(14).".R   Q...14 Q...   "@.TtAnz$(15).".R   Q...15 Q...   "@YU.A.i.0.3:.j.0.3:n(i,j).i.4.j:.j,i@aUHA.".Q]]]]]]]]]]]]]]unscramble!":.550@GURAx1.0:y1.0:x.0:y.0:z.20..(.(0).25)@.U.A.j.1.z:x..(.(0).4):.620:y..(.(0).4):.620:.@.U.A.1,3,3:.cd$;cr$;"]Q";c2$;c3$;cs$;"S":x.0:y.0@.U.A.a$:.a$.." ".a$.."p".a$.."i".a$.."q".a$.."z".400@.V.A.a$." ".(x1.x.y1.y)..620:.400@<V.A.cd$;cr$;"Q]";c2$;c3$;cx$@rV.A.a$.." "..1,400,7@.V.A.a$."p".x.x.1:c2$.c2$."]]]]":.x.3.x.0:c2$.""@.V.A.a$.."i".480@.V.Ax.x.1:.x..0.c2$..(c2$,x.4):.520@.V.Ax.3:c2$."]]]]]]]]]]]]":.520@.V.A.a$.."q".510@MW.Ay.y.1:.y..0.c3$..(c3$,y.4):.520@(W.Ay.3:c3$."QQQQQQQQQQQQ"@yW.A.a$."z".y.y.1:c3$.c3$."QQQQ":.y.3.y.0:c3$.""@.WHB.1,3,3:.cd$;cr$;"Q]";c2$;c3$;cs$@.WRB.400@.W£B.@.W&B.1,1:.cd$;cr$;".";tp$;".Q.";s$;@.W0B.cd$;cr$;"Q";s$;".";tp$;".";@.W:B.cd$;"QQQQ";@@XdB.i.0.3:.cr$;"]]";:.j.0.3@(XnB."..";nz$(i.4.j);". ";:n(i,j).i.4.j@:XxB.j:.:.:.:.:.i@@XBB.@qXLB.x1.x.y1.y..@.XVB.y.y1..i.y1.1.y..1:n(i.1,x).n(i,x):.680:y1.y:.@.X.B.y.y1..i.y1.1.y:n(i.1,x).n(i,x):.690:.:y1.y:.@.X.B.x.x1..i.x1.1.x..1:n(y,i.1).n(y,i):.710:.:x1.x:.@]Y.B.x.x1..i.x1.1.x:n(y,i.1).n(y,i):.720:.:x1.x:.@8Y.B.bd$;br$;nz$(0):.1,1:.@yY.Bz$.bd$:bd$..(bd$,i.4.7):.700@SY.Bz$.bd$:bd$.bd$."QQQQ"@.Y.B.1,1000.5.i,2:.670:.z$;br$;nz$(n(i,x)):.@.Y.Bz$.br$:br$..(br$,i.4.12):.730@.Y.Bz$.br$:br$.br$."]]]]"@HZ.B.1,970.5.i,2:.670:.bd$;z$;nz$(n(y,i)):.@@@
00000000  12 10 0a 00 e7 30 2c 32  3a e7 34 2c 32 3a db 38  |.....0,2:.4,2:.8|
00000010  00 27 10 14 00 86 4e 28  33 2c 33 29 3a 86 4e 5a  |.'....N(3,3):.NZ|
00000020  24 28 31 35 29 00 41 10  1e 00 58 b2 30 3a 59 b2  |$(15).A...X.0:Y.|
00000030  30 3a 43 32 24 b2 22 22  3a 43 33 24 b2 22 22 00  |0:C2$."":C3$."".|
00000040  96 10 28 00 54 50 24 b2  22 c3 c3 c3 c3 c3 c3 c3  |..(.TP$.".......|
00000050  c3 c3 c3 c3 c3 c3 c3 c3  c3 c3 22 3a 53 24 b2 22  |..........":S$."|
00000060  c2 11 9d c2 11 9d c2 11  9d c2 11 9d c2 11 9d c2  |................|
00000070  11 9d c2 11 9d c2 11 9d  c2 11 9d c2 11 9d c2 11  |................|
00000080  9d c2 11 9d c2 11 9d c2  11 9d c2 11 9d c2 11 9d  |................|
00000090  c2 11 9d 22 00 c7 10 32  00 43 58 24 b2 22 20 20  |..."...2.CX$."  |
000000a0  20 20 20 11 9d 20 11 9d  20 11 9d 20 11 9d 20 9d  |   .. .. .. .. .|
000000b0  9d 20 9d 9d 20 9d 9d 20  9d 9d 20 91 9d 20 91 9d  |. .. .. .. .. ..|
000000c0  20 91 9d 20 22 00 15 11  3c 00 43 44 24 b2 22 13  | .. "...<.CD$.".|
000000d0  11 11 11 11 22 3a 43 52  24 b2 22 1d 1d 1d 1d 1d  |....":CR$.".....|
000000e0  1d 1d 1d 1d 1d 22 3a 43  53 24 b2 22 d5 c3 c3 c3  |.....":CS$."....|
000000f0  c9 11 9d c2 11 9d c2 11  9d c2 11 9d cb 9d 9d c3  |................|
00000100  9d 9d c3 9d 9d c3 9d 9d  ca 91 9d c2 91 9d c2 91  |................|
00000110  9d c2 22 00 3a 11 46 00  42 44 24 b2 22 13 11 11  |..".:.F.BD$."...|
00000120  11 11 11 11 22 3a 42 52  24 b2 22 1d 1d 1d 1d 1d  |....":BR$.".....|
00000130  1d 1d 1d 1d 1d 1d 1d 22  00 6c 11 50 00 e7 31 2c  |.......".l.P..1,|
00000140  33 2c 33 3a 99 22 93 11  1d 1d 1d 1d b2 20 b2 b2  |3,3:."....... ..|
00000150  a0 b2 d5 c3 c9 d5 c3 c9  b0 c3 c9 d5 c3 c9 d5 c9  |................|
00000160  d5 c9 b0 c3 c9 b2 20 b0  c3 22 00 95 11 5a 00 99  |...... .."...Z..|
00000170  22 1d 1d 1d 1d c2 20 c2  c2 cd c2 ca c3 c9 c2 20  |"..... ........ |
00000180  20 ab b2 cb ab c3 b3 c2  ca cb c2 ab c3 b3 c2 20  | .............. |
00000190  ab c3 22 00 c0 11 64 00  99 22 1d 1d 1d 1d ca c3  |.."...d.."......|
000001a0  cb b1 a0 b1 ca c3 cb ca  c3 cb b1 ca 20 b1 a0 b1  |............ ...|
000001b0  b1 a0 a0 b1 ad c3 cb ad  c3 ad c3 20 d1 22 00 ea  |........... ."..|
000001c0  11 6e 00 e7 31 2c 39 2c  34 3a 99 22 11 11 11 1d  |.n..1,9,4:."....|
000001d0  1d 1d 1d 1d 1d 1d 1d 1d  1d 1d 1d 49 4e 53 54 52  |...........INSTR|
000001e0  55 43 54 49 4f 4e 53 22  00 0f 12 78 00 99 22 11  |UCTIONS"...x..".|
000001f0  11 1d 1d 1d 1d 1d 1d 1d  1d 1d 27 49 27 20 20 20  |..........'I'   |
00000200  20 43 55 52 53 4f 52 20  4c 45 46 54 22 00 34 12  | CURSOR LEFT".4.|
00000210  82 00 99 22 11 1d 1d 1d  1d 1d 1d 1d 1d 1d 27 50  |..."..........'P|
00000220  27 20 20 20 20 43 55 52  53 4f 52 20 52 49 47 48  |'    CURSOR RIGH|
00000230  54 22 00 56 12 8c 00 99  22 11 1d 1d 1d 1d 1d 1d  |T".V....".......|
00000240  1d 1d 1d 27 51 27 20 20  20 20 43 55 52 53 4f 52  |...'Q'    CURSOR|
00000250  20 55 50 22 00 7a 12 96  00 99 22 11 1d 1d 1d 1d  | UP".z....".....|
00000260  1d 1d 1d 1d 1d 27 5a 27  20 20 20 20 43 55 52 53  |.....'Z'    CURS|
00000270  4f 52 20 44 4f 57 4e 22  00 a0 12 a0 00 99 22 11  |OR DOWN"......".|
00000280  11 1d 1d 1d 1d 1d 1d 1d  1d 53 50 41 43 45 20 20  |.........SPACE  |
00000290  20 53 48 49 46 54 20 50  49 45 43 45 53 22 00 c8  | SHIFT PIECES"..|
000002a0  12 aa 00 99 22 11 11 11  1d 1d 1d 1d 1d 1d 1d 1d  |...."...........|
000002b0  28 48 49 54 20 52 45 54  55 52 4e 20 54 4f 20 53  |(HIT RETURN TO S|
000002c0  54 41 52 54 29 22 00 df  12 b4 00 a1 41 24 3a 8b  |TART)"......A$:.|
000002d0  c6 28 41 24 29 b3 b1 31  33 a7 31 38 30 00 00 13  |.(A$)..13.180...|
000002e0  be 00 4e 5a 24 28 30 29  b2 22 05 12 20 20 20 11  |..NZ$(0)."..   .|
000002f0  9d 9d 9d 20 20 20 11 9d  9d 9d 20 20 20 22 00 21  |...   ....   ".!|
00000300  13 c8 00 4e 5a 24 28 31  29 b2 22 90 12 20 20 20  |...NZ$(1)."..   |
00000310  11 9d 9d 9d 20 31 20 11  9d 9d 9d 20 20 20 22 00  |.... 1 ....   ".|
00000320  42 13 d2 00 4e 5a 24 28  32 29 b2 22 1c 12 20 20  |B...NZ$(2)."..  |
00000330  20 11 9d 9d 9d 20 32 20  11 9d 9d 9d 20 20 20 22  | .... 2 ....   "|
00000340  00 63 13 dc 00 4e 5a 24  28 33 29 b2 22 9f 12 20  |.c...NZ$(3).".. |
00000350  20 20 11 9d 9d 9d 20 33  20 11 9d 9d 9d 20 20 20  |  .... 3 ....   |
00000360  22 00 84 13 e6 00 4e 5a  24 28 34 29 b2 22 9c 12  |".....NZ$(4)."..|
00000370  20 20 20 11 9d 9d 9d 20  34 20 11 9d 9d 9d 20 20  |   .... 4 ....  |
00000380  20 22 00 a5 13 f0 00 4e  5a 24 28 35 29 b2 22 1e  | ".....NZ$(5).".|
00000390  12 20 20 20 11 9d 9d 9d  20 35 20 11 9d 9d 9d 20  |.   .... 5 .... |
000003a0  20 20 22 00 c6 13 fa 00  4e 5a 24 28 36 29 b2 22  |  ".....NZ$(6)."|
000003b0  1f 12 20 20 20 11 9d 9d  9d 20 36 20 11 9d 9d 9d  |..   .... 6 ....|
000003c0  20 20 20 22 00 e7 13 04  01 4e 5a 24 28 37 29 b2  |   ".....NZ$(7).|
000003d0  22 9b 12 20 20 20 11 9d  9d 9d 20 37 20 11 9d 9d  |"..   .... 7 ...|
000003e0  9d 20 20 20 22 00 08 14  0e 01 4e 5a 24 28 38 29  |.   ".....NZ$(8)|
000003f0  b2 22 81 12 20 20 20 11  9d 9d 9d 20 38 20 11 9d  |."..   .... 8 ..|
00000400  9d 9d 20 20 20 22 00 29  14 18 01 4e 5a 24 28 39  |..   ".)...NZ$(9|
00000410  29 b2 22 95 12 20 20 20  11 9d 9d 9d 20 39 20 11  |)."..   .... 9 .|
00000420  9d 9d 9d 20 20 20 22 00  4b 14 22 01 4e 5a 24 28  |...   ".K.".NZ$(|
00000430  31 30 29 b2 22 96 12 20  20 20 11 9d 9d 9d 31 30  |10)."..   ....10|
00000440  20 11 9d 9d 9d 20 20 20  22 00 6d 14 2c 01 4e 5a  | ....   ".m.,.NZ|
00000450  24 28 31 31 29 b2 22 97  12 20 20 20 11 9d 9d 9d  |$(11)."..   ....|
00000460  31 31 20 11 9d 9d 9d 20  20 20 22 00 8f 14 36 01  |11 ....   "...6.|
00000470  4e 5a 24 28 31 32 29 b2  22 98 12 20 20 20 11 9d  |NZ$(12)."..   ..|
00000480  9d 9d 31 32 20 11 9d 9d  9d 20 20 20 22 00 b1 14  |..12 ....   "...|
00000490  40 01 4e 5a 24 28 31 33  29 b2 22 99 12 20 20 20  |@.NZ$(13)."..   |
000004a0  11 9d 9d 9d 31 33 20 11  9d 9d 9d 20 20 20 22 00  |....13 ....   ".|
000004b0  d3 14 4a 01 4e 5a 24 28  31 34 29 b2 22 9a 12 20  |..J.NZ$(14).".. |
000004c0  20 20 11 9d 9d 9d 31 34  20 11 9d 9d 9d 20 20 20  |  ....14 ....   |
000004d0  22 00 f5 14 54 01 4e 5a  24 28 31 35 29 b2 22 9b  |"...T.NZ$(15).".|
000004e0  12 20 20 20 11 9d 9d 9d  31 35 20 11 9d 9d 9d 20  |.   ....15 .... |
000004f0  20 20 22 00 19 15 5e 01  81 49 b2 30 a4 33 3a 81  |  "...^..I.0.3:.|
00000500  4a b2 30 a4 33 3a 4e 28  49 2c 4a 29 b2 49 ac 34  |J.0.3:N(I,J).I.4|
00000510  aa 4a 3a 82 4a 2c 49 00  41 15 68 01 99 22 93 11  |.J:.J,I.A.h.."..|
00000520  1d 1d 1d 1d 1d 1d 1d 1d  1d 1d 1d 1d 1d 1d 55 4e  |..............UN|
00000530  53 43 52 41 4d 42 4c 45  21 22 3a 8d 35 35 30 00  |SCRAMBLE!":.550.|
00000540  67 15 72 01 58 31 b2 30  3a 59 31 b2 30 3a 58 b2  |g.r.X1.0:Y1.0:X.|
00000550  30 3a 59 b2 30 3a 5a b2  32 30 aa b5 28 bb 28 30  |0:Y.0:Z.20..(.(0|
00000560  29 ac 32 35 29 00 96 15  7c 01 81 4a b2 31 a4 5a  |).25)...|..J.1.Z|
00000570  3a 58 b2 b5 28 bb 28 30  29 ac 34 29 3a 8d 36 32  |:X..(.(0).4):.62|
00000580  30 3a 59 b2 b5 28 bb 28  30 29 ac 34 29 3a 8d 36  |0:Y..(.(0).4):.6|
00000590  32 30 3a 82 00 c7 15 86  01 e7 31 2c 33 2c 33 3a  |20:.......1,3,3:|
000005a0  99 43 44 24 3b 43 52 24  3b 22 1d 11 22 3b 43 32  |.CD$;CR$;"..";C2|
000005b0  24 3b 43 33 24 3b 43 53  24 3b 22 13 22 3a 58 b2  |$;C3$;CS$;".":X.|
000005c0  30 3a 59 b2 30 00 fc 15  90 01 a1 41 24 3a 8b 41  |0:Y.0......A$:.A|
000005d0  24 b3 b1 22 20 22 af 41  24 b3 b1 22 50 22 af 41  |$.." ".A$.."P".A|
000005e0  24 b3 b1 22 49 22 af 41  24 b3 b1 22 51 22 af 41  |$.."I".A$.."Q".A|
000005f0  24 b3 b1 22 5a 22 a7 34  30 30 00 1e 16 9a 01 8b  |$.."Z".400......|
00000600  41 24 b2 22 20 22 af 28  58 31 b2 58 b0 59 31 b2  |A$." ".(X1.X.Y1.|
00000610  59 29 a7 8d 36 32 30 3a  89 34 30 30 00 3c 16 a4  |Y)..620:.400.<..|
00000620  01 99 43 44 24 3b 43 52  24 3b 22 11 1d 22 3b 43  |..CD$;CR$;"..";C|
00000630  32 24 3b 43 33 24 3b 43  58 24 00 52 16 ae 01 8b  |2$;C3$;CX$.R....|
00000640  41 24 b3 b1 22 20 22 a7  da 31 2c 34 30 30 2c 37  |A$.." "..1,400,7|
00000650  00 83 16 b8 01 8b 41 24  b2 22 50 22 a7 58 b2 58  |......A$."P".X.X|
00000660  aa 31 3a 43 32 24 b2 43  32 24 aa 22 1d 1d 1d 1d  |.1:C2$.C2$."....|
00000670  22 3a 8b 58 b1 33 a7 58  b2 30 3a 43 32 24 b2 22  |":.X.3.X.0:C2$."|
00000680  22 00 94 16 c2 01 8b 41  24 b3 b1 22 49 22 a7 34  |"......A$.."I".4|
00000690  38 30 00 b8 16 cc 01 58  b2 58 ab 31 3a 8b 58 b1  |80.....X.X.1:.X.|
000006a0  b2 30 a7 43 32 24 b2 c8  28 43 32 24 2c 58 ac 34  |.0.C2$..(C2$,X.4|
000006b0  29 3a 89 35 32 30 00 d8  16 d6 01 58 b2 33 3a 43  |):.520.....X.3:C|
000006c0  32 24 b2 22 1d 1d 1d 1d  1d 1d 1d 1d 1d 1d 1d 1d  |2$."............|
000006d0  22 3a 89 35 32 30 00 e9  16 e0 01 8b 41 24 b3 b1  |":.520......A$..|
000006e0  22 51 22 a7 35 31 30 00  0d 17 ea 01 59 b2 59 ab  |"Q".510.....Y.Y.|
000006f0  31 3a 8b 59 b1 b2 30 a7  43 33 24 b2 c8 28 43 33  |1:.Y..0.C3$..(C3|
00000700  24 2c 59 ac 34 29 3a 89  35 32 30 00 28 17 f4 01  |$,Y.4):.520.(...|
00000710  59 b2 33 3a 43 33 24 b2  22 11 11 11 11 11 11 11  |Y.3:C3$.".......|
00000720  11 11 11 11 11 22 00 59  17 fe 01 8b 41 24 b2 22  |.....".Y....A$."|
00000730  5a 22 a7 59 b2 59 aa 31  3a 43 33 24 b2 43 33 24  |Z".Y.Y.1:C3$.C3$|
00000740  aa 22 11 11 11 11 22 3a  8b 59 b1 33 a7 59 b2 30  |."....":.Y.3.Y.0|
00000750  3a 43 33 24 b2 22 22 00  7e 17 08 02 e7 31 2c 33  |:C3$."".~....1,3|
00000760  2c 33 3a 99 43 44 24 3b  43 52 24 3b 22 11 1d 22  |,3:.CD$;CR$;".."|
00000770  3b 43 32 24 3b 43 33 24  3b 43 53 24 00 87 17 12  |;C2$;C3$;CS$....|
00000780  02 89 34 30 30 00 8d 17  1c 02 80 00 b1 17 26 02  |..400.........&.|
00000790  e7 31 2c 31 3a 99 43 44  24 3b 43 52 24 3b 22 d5  |.1,1:.CD$;CR$;".|
000007a0  22 3b 54 50 24 3b 22 c9  11 9d 22 3b 53 24 3b 00  |";TP$;"...";S$;.|
000007b0  d2 17 30 02 99 43 44 24  3b 43 52 24 3b 22 11 22  |..0..CD$;CR$;"."|
000007c0  3b 53 24 3b 22 ca 22 3b  54 50 24 3b 22 cb 22 3b  |;S$;".";TP$;".";|
000007d0  00 e3 17 3a 02 99 43 44  24 3b 22 11 11 11 11 22  |...:..CD$;"...."|
000007e0  3b 00 00 18 44 02 81 49  b2 30 a4 33 3a 99 43 52  |;...D..I.0.3:.CR|
000007f0  24 3b 22 1d 1d 22 3b 3a  81 4a b2 30 a4 33 00 28  |$;"..";:.J.0.3.(|
00000800  18 4e 02 99 22 91 91 22  3b 4e 5a 24 28 49 ac 34  |.N.."..";NZ$(I.4|
00000810  aa 4a 29 3b 22 92 20 22  3b 3a 4e 28 49 2c 4a 29  |.J);". ";:N(I,J)|
00000820  b2 49 ac 34 aa 4a 00 3a  18 58 02 82 4a 3a 99 3a  |.I.4.J.:.X..J:.:|
00000830  99 3a 99 3a 99 3a 82 49  00 40 18 62 02 8e 00 51  |.:.:.:.I.@.b...Q|
00000840  18 6c 02 8b 58 31 b2 58  af 59 31 b2 59 a7 8e 00  |.l..X1.X.Y1.Y...|
00000850  84 18 76 02 8b 59 b3 59  31 a7 81 49 b2 59 31 ab  |..v..Y.Y1..I.Y1.|
00000860  31 a4 59 a9 ab 31 3a 4e  28 49 aa 31 2c 58 29 b2  |1.Y..1:N(I.1,X).|
00000870  4e 28 49 2c 58 29 3a 8d  36 38 30 3a 59 31 b2 59  |N(I,X):.680:Y1.Y|
00000880  3a 82 00 b6 18 80 02 8b  59 b1 59 31 a7 81 49 b2  |:.......Y.Y1..I.|
00000890  59 31 aa 31 a4 59 3a 4e  28 49 ab 31 2c 58 29 b2  |Y1.1.Y:N(I.1,X).|
000008a0  4e 28 49 2c 58 29 3a 8d  36 39 30 3a 82 3a 59 31  |N(I,X):.690:.:Y1|
000008b0  b2 59 3a 8e 00 eb 18 8a  02 8b 58 b3 58 31 a7 81  |.Y:.......X.X1..|
000008c0  49 b2 58 31 ab 31 a4 58  a9 ab 31 3a 4e 28 59 2c  |I.X1.1.X..1:N(Y,|
000008d0  49 aa 31 29 b2 4e 28 59  2c 49 29 3a 8d 37 31 30  |I.1).N(Y,I):.710|
000008e0  3a 82 3a 58 31 b2 58 3a  8e 00 1d 19 94 02 8b 58  |:.:X1.X:.......X|
000008f0  b1 58 31 a7 81 49 b2 58  31 aa 31 a4 58 3a 4e 28  |.X1..I.X1.1.X:N(|
00000900  59 2c 49 ab 31 29 b2 4e  28 59 2c 49 29 3a 8d 37  |Y,I.1).N(Y,I):.7|
00000910  32 30 3a 82 3a 58 31 b2  58 3a 8e 00 38 19 9e 02  |20:.:X1.X:..8...|
00000920  99 42 44 24 3b 42 52 24  3b 4e 5a 24 28 30 29 3a  |.BD$;BR$;NZ$(0):|
00000930  e7 31 2c 31 3a 8e 00 59  19 a8 02 5a 24 b2 42 44  |.1,1:..Y...Z$.BD|
00000940  24 3a 42 44 24 b2 c8 28  42 44 24 2c 49 ac 34 aa  |$:BD$..(BD$,I.4.|
00000950  37 29 3a 89 37 30 30 00  73 19 b2 02 5a 24 b2 42  |7):.700.s...Z$.B|
00000960  44 24 3a 42 44 24 b2 42  44 24 aa 22 11 11 11 11  |D$:BD$.BD$."....|
00000970  22 00 a0 19 bc 02 da 31  2c 31 30 30 30 ab 35 ac  |"......1,1000.5.|
00000980  49 2c 32 3a 8d 36 37 30  3a 99 5a 24 3b 42 52 24  |I,2:.670:.Z$;BR$|
00000990  3b 4e 5a 24 28 4e 28 49  2c 58 29 29 3a 8e 00 c2  |;NZ$(N(I,X)):...|
000009a0  19 c6 02 5a 24 b2 42 52  24 3a 42 52 24 b2 c8 28  |...Z$.BR$:BR$..(|
000009b0  42 52 24 2c 49 ac 34 aa  31 32 29 3a 89 37 33 30  |BR$,I.4.12):.730|
000009c0  00 dc 19 d0 02 5a 24 b2  42 52 24 3a 42 52 24 b2  |.....Z$.BR$:BR$.|
000009d0  42 52 24 aa 22 1d 1d 1d  1d 22 00 08 1a da 02 da  |BR$."...."......|
000009e0  31 2c 39 37 30 aa 35 ac  49 2c 32 3a 8d 36 37 30  |1,970.5.I,2:.670|
000009f0  3a 99 42 44 24 3b 5a 24  3b 4e 5a 24 28 4e 28 59  |:.BD$;Z$;NZ$(N(Y|
00000a00  2c 49 29 29 3a 8e 00 00  00                       |,I)):....|
00000a09