Home » CEEFAX disks » telesoftware5.adl » 20-03-88/DEMO

20-03-88/DEMO

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 » CEEFAX disks » telesoftware5.adl
Filename: 20-03-88/DEMO
Read OK:
File size: 08D2 bytes
Load address: 1900
Exec address: 8023
File contents
   10DIMV%(8,8),W%(8,8),X%(8,8),Y%(8,2),Z%(8,64):PROCa:MODE5:VDU23;&200A;0;0;0;:PROCb:PROCc:MODE1:PROCd:L%=0:VDU20,23;&400A;0;0;0;:*FX21,0
   20PRINTTAB(8,28)"Start at Column ";:REPEAT:A$=GET$:F%=ASC(A$)-64:UNTILF%<9ANDF%>0:PRINTA$;:P%=F%:PRINT", Row ";:REPEAT:A$=GET$:G%=9-VAL(A$):UNTILG%<9ANDG%>0:VDU23;&200A;0;0;0;:PRINTA$:Q%=G%:S%=F%+G%:PROCe(-1):VDU31,4*F%+1,3*G%:PROCf:SOUND3,2,0,1:VDU20:PRINTTAB(10,30)"Now let me think ...":REPEAT:PROCg:IFL%=63PROCh:END
   30REPEAT:PROCi:IFA%=0PROCj
   40UNTILA%<>0:G%=G%+Y%(A%,1):F%=F%+Y%(A%,2):L%=L%+1:Z%(A%,L%)=1:UNTILFALSE
   50DEFPROCj:V%(G%,F%)=0:FORH%=1TO8:PROCk:IFK%<>0 W%(O%,N%)=W%(O%,N%)+1:W%(G%,F%)=W%(G%,F%)+1
   60NEXT:FORI%=1TO8:IFZ%(I%,L%)=1 J%=I%:I%=8
   70NEXT:Z%(J%,L%)=2:G%=G%-Y%(J%,1):F%=F%-Y%(J%,2):FORI%=1TO8:Z%(I%,L%+1)=0:NEXT:L%=L%-1:ENDPROC
   80DEFPROCd:VDU23;&200A;0;0;0;19,1,0;0;19,2,0;0;19,3,0;0;:PRINTTAB(5,1)"A   B   C   D   E   F   G   H":FORR%=1TO8:VDU17,3,17,128:PRINTTAB(1,R%*3+1);9-R%:FORC%=1TO8:S%=R%+C%:PROCe(0):VDU31,4*C%,R%*3:PROCl:NEXT:NEXT:ENDPROC
   90DEFPROCc:FORR%=1TO8:READY%(R%,1):READY%(R%,2):NEXT:FORG%=1TO8:FORF%=1TO8:PROCm:NEXT:NEXT:ENDPROC
  100DEFPROCm:E%=0:FORH%=1TO8:PROCk:IFK%<>0 E%=E%+1
  110NEXT:W%(G%,F%)=E%:ENDPROC
  120DEFPROCg:V%(G%,F%)=1:W%(G%,F%)=0:X%(G%,F%)=L%:FORH%=1TO8:PROCk:IFK%<>0 W%(O%,N%)=W%(O%,N%)-1
  130NEXT:ENDPROC
  140DEFPROCi:A%=0:B%=10:FORH%=1TO8:PROCk:IFK%<>0IFZ%(H%,L%+1)<=0IFD%<=B%B%=D%:A%=H%
  150NEXT:ENDPROC
  160DEFPROCk:K%=1:O%=G%+Y%(H%,1):N%=F%+Y%(H%,2):IFO%>8ORO%<1 K%=0
  170IFN%>8ORN%<1 K%=0
  180IFK%=0ENDPROC
  190IFV%(O%,N%)=1 K%=0
  200IFK%=1 D%=W%(O%,N%)
  210ENDPROC
  220DEFPROCh:PRINTTAB(10,30);SPC(20):FORT%=1TO63:FORR%=1TO8:FORC%=1TO8:IFX%(R%,C%)=T%N%=C%:O%=R%
  230NEXT:NEXT:PROCn:PROCe(0):PROCo:S%=O%+N%:PROCe(-1):VDU31,4*N%+1,3*O%:PROCf:SOUND3,2,0,1:Q%=O%:P%=N%:NEXT:PROCn:PROCe(0):PROCo:VDU20,31,0,30,23;&670A;0;0;0;:*FX21,0
  240ENDPROC
  250DEFPROCl:FORM%=1TO3:VDU32,32,32,32,10,8,8,8,8:NEXT:ENDPROC
  260DEFPROCa:VDU23,224,15,3,15,27,27,63,63,127:VDU23,225,0,192,112,120,184,188,180,172:VDU23,226,127,247,230,78,14,14,14,7:VDU23,227,92,124,204,184,240,192,48,224:VDU23,228,120,31,8,31,63,127,192,127:VDU23,229,30,248,16,248,252,254,3,254
  270ENVELOPE2,1,0,2,3,10,20,10,100,-5,-5,-1,126,9:ENDPROC
  280DEFPROCf:VDU224,225,10,8,8,226,227,10,8,8,228,229:ENDPROC
  290DEFPROCo:VDU31,4*P%,3*Q%:PROCl:PRINTTAB(4*P%+1,Q%*3+1);T%:ENDPROC
  300DEFPROCn:U%=RND(50)+25:TIME=0:REPEAT:UNTILTIME>U%:ENDPROC
  310DEFPROCb:VDU31,1,6:PROCf:VDU31,16,6:PROCf:PRINTTAB(3,3)"Knight's Tour"TAB(8,7)"by"TAB(1,11)"Gordon Horsington":PRINTTAB(2,18)"It is possible to"''"move a Knight round"''"a  Chess  board  so"''"that  it  lands  on"''"every square  once,"''"and only once.":ENDPROC
  320DEFPROCe(C%):IFS%=(S%DIV2)*2VDU17,1,17,130ELSEVDU17,2,17,129
  330IFC%VDU17,0
  340ENDPROC
  350DATA1,2,1,-2,2,1,2,-1,-1,2,-1,-2,-2,1,-2,-1
  360REMLENOSCLIHhLNINPUTTAB(HVPOSTRUE!PLOT
EXTLENTAB( REMOSCLILASC!LENVALEXTEVALOSCLI REMOSCLILENOPENINLREMOSCLIPA.=&1900
O.
RUN

  370

q�V%(8,8),W%(8,8),X%(8,8),Y%(8,2),Z%(8,64):�a:�5:�23;&200A;0;0;0;:�b:�c:�1:�d:L%=0:�20,23;&400A;0;0;0;:*FX21,0
��8,28)"Start at Column ";:�:A$=�:F%=�(A$)-64:�F%<9�F%>0:�A$;:P%=F%:�", Row ";:�:A$=�:G%=9-�(A$):�G%<9�G%>0:�23;&200A;0;0;0;:�A$:Q%=G%:S%=F%+G%:�e(-1):�31,4*F%+1,3*G%:�f:�3,2,0,1:�20:�10,30)"Now let me think ...":�:�g:�L%=63�h:�
�:�i:�A%=0�j
(?�A%<>0:G%=G%+Y%(A%,1):F%=F%+Y%(A%,2):L%=L%+1:Z%(A%,L%)=1:��
2Q��j:V%(G%,F%)=0:�H%=1�8:�k:�K%<>0 W%(O%,N%)=W%(O%,N%)+1:W%(G%,F%)=W%(G%,F%)+1
<%�:�I%=1�8:�Z%(I%,L%)=1 J%=I%:I%=8
FQ�:Z%(J%,L%)=2:G%=G%-Y%(J%,1):F%=F%-Y%(J%,2):�I%=1�8:Z%(I%,L%+1)=0:�:L%=L%-1:�
P���d:�23;&200A;0;0;0;19,1,0;0;19,2,0;0;19,3,0;0;:�5,1)"A   B   C   D   E   F   G   H":�R%=1�8:�17,3,17,128:�1,R%*3+1);9-R%:�C%=1�8:S%=R%+C%:�e(0):�31,4*C%,R%*3:�l:�:�:�
Z>��c:�R%=1�8:�Y%(R%,1):�Y%(R%,2):�:�G%=1�8:�F%=1�8:�m:�:�:�
d&��m:E%=0:�H%=1�8:�k:�K%<>0 E%=E%+1
n�:W%(G%,F%)=E%:�
xT��g:V%(G%,F%)=1:W%(G%,F%)=0:X%(G%,F%)=L%:�H%=1�8:�k:�K%<>0 W%(O%,N%)=W%(O%,N%)-1
��:�
�E��i:A%=0:B%=10:�H%=1�8:�k:�K%<>0�Z%(H%,L%+1)<=0�D%<=B%B%=D%:A%=H%
��:�
�:��k:K%=1:O%=G%+Y%(H%,1):N%=F%+Y%(H%,2):�O%>8�O%<1 K%=0
��N%>8�N%<1 K%=0
�
�K%=0�
��V%(O%,N%)=1 K%=0
��K%=1 D%=W%(O%,N%)
��
�H��h:�10,30);�(20):�T%=1�63:�R%=1�8:�C%=1�8:�X%(R%,C%)=T%N%=C%:O%=R%
�}�:�:�n:�e(0):�o:S%=O%+N%:�e(-1):�31,4*N%+1,3*O%:�f:�3,2,0,1:Q%=O%:P%=N%:�:�n:�e(0):�o:�20,31,0,30,23;&670A;0;0;0;:*FX21,0
��
�+��l:�M%=1�3:�32,32,32,32,10,8,8,8,8:�:�
���a:�23,224,15,3,15,27,27,63,63,127:�23,225,0,192,112,120,184,188,180,172:�23,226,127,247,230,78,14,14,14,7:�23,227,92,124,204,184,240,192,48,224:�23,228,120,31,8,31,63,127,192,127:�23,229,30,248,16,248,252,254,3,254
,�2,1,0,2,3,10,20,10,100,-5,-5,-1,126,9:�
0��f:�224,225,10,8,8,226,227,10,8,8,228,229:�
".��o:�31,4*P%,3*Q%:�l:�4*P%+1,Q%*3+1);T%:�
,!��n:U%=�(50)+25:�=0:�:��>U%:�
6���b:�31,1,6:�f:�31,16,6:�f:�3,3)"Knight's Tour"�8,7)"by"�1,11)"Gordon Horsington":�2,18)"It is possible to"''"move a Knight round"''"a  Chess  board  so"''"that  it  lands  on"''"every square  once,"''"and only once.":�
@1��e(C%):�S%=(S%�2)*2�17,1,17,130��17,2,17,129
J�C%�17,0
T�
^,�1,2,1,-2,2,1,2,-1,-1,2,-1,-2,-2,1,-2,-1
h=���Hh��H��!�
��� �L�!����� �L�PA.=&1900
O.
RUN

r
�
00000000  0d 00 0a 71 de 56 25 28  38 2c 38 29 2c 57 25 28  |...q.V%(8,8),W%(|
00000010  38 2c 38 29 2c 58 25 28  38 2c 38 29 2c 59 25 28  |8,8),X%(8,8),Y%(|
00000020  38 2c 32 29 2c 5a 25 28  38 2c 36 34 29 3a f2 61  |8,2),Z%(8,64):.a|
00000030  3a eb 35 3a ef 32 33 3b  26 32 30 30 41 3b 30 3b  |:.5:.23;&200A;0;|
00000040  30 3b 30 3b 3a f2 62 3a  f2 63 3a eb 31 3a f2 64  |0;0;:.b:.c:.1:.d|
00000050  3a 4c 25 3d 30 3a ef 32  30 2c 32 33 3b 26 34 30  |:L%=0:.20,23;&40|
00000060  30 41 3b 30 3b 30 3b 30  3b 3a 2a 46 58 32 31 2c  |0A;0;0;0;:*FX21,|
00000070  30 0d 00 14 e9 f1 8a 38  2c 32 38 29 22 53 74 61  |0......8,28)"Sta|
00000080  72 74 20 61 74 20 43 6f  6c 75 6d 6e 20 22 3b 3a  |rt at Column ";:|
00000090  f5 3a 41 24 3d be 3a 46  25 3d 97 28 41 24 29 2d  |.:A$=.:F%=.(A$)-|
000000a0  36 34 3a fd 46 25 3c 39  80 46 25 3e 30 3a f1 41  |64:.F%<9.F%>0:.A|
000000b0  24 3b 3a 50 25 3d 46 25  3a f1 22 2c 20 52 6f 77  |$;:P%=F%:.", Row|
000000c0  20 22 3b 3a f5 3a 41 24  3d be 3a 47 25 3d 39 2d  | ";:.:A$=.:G%=9-|
000000d0  bb 28 41 24 29 3a fd 47  25 3c 39 80 47 25 3e 30  |.(A$):.G%<9.G%>0|
000000e0  3a ef 32 33 3b 26 32 30  30 41 3b 30 3b 30 3b 30  |:.23;&200A;0;0;0|
000000f0  3b 3a f1 41 24 3a 51 25  3d 47 25 3a 53 25 3d 46  |;:.A$:Q%=G%:S%=F|
00000100  25 2b 47 25 3a f2 65 28  2d 31 29 3a ef 33 31 2c  |%+G%:.e(-1):.31,|
00000110  34 2a 46 25 2b 31 2c 33  2a 47 25 3a f2 66 3a d4  |4*F%+1,3*G%:.f:.|
00000120  33 2c 32 2c 30 2c 31 3a  ef 32 30 3a f1 8a 31 30  |3,2,0,1:.20:..10|
00000130  2c 33 30 29 22 4e 6f 77  20 6c 65 74 20 6d 65 20  |,30)"Now let me |
00000140  74 68 69 6e 6b 20 2e 2e  2e 22 3a f5 3a f2 67 3a  |think ...":.:.g:|
00000150  e7 4c 25 3d 36 33 f2 68  3a e0 0d 00 1e 10 f5 3a  |.L%=63.h:......:|
00000160  f2 69 3a e7 41 25 3d 30  f2 6a 0d 00 28 3f fd 41  |.i:.A%=0.j..(?.A|
00000170  25 3c 3e 30 3a 47 25 3d  47 25 2b 59 25 28 41 25  |%<>0:G%=G%+Y%(A%|
00000180  2c 31 29 3a 46 25 3d 46  25 2b 59 25 28 41 25 2c  |,1):F%=F%+Y%(A%,|
00000190  32 29 3a 4c 25 3d 4c 25  2b 31 3a 5a 25 28 41 25  |2):L%=L%+1:Z%(A%|
000001a0  2c 4c 25 29 3d 31 3a fd  a3 0d 00 32 51 dd f2 6a  |,L%)=1:....2Q..j|
000001b0  3a 56 25 28 47 25 2c 46  25 29 3d 30 3a e3 48 25  |:V%(G%,F%)=0:.H%|
000001c0  3d 31 b8 38 3a f2 6b 3a  e7 4b 25 3c 3e 30 20 57  |=1.8:.k:.K%<>0 W|
000001d0  25 28 4f 25 2c 4e 25 29  3d 57 25 28 4f 25 2c 4e  |%(O%,N%)=W%(O%,N|
000001e0  25 29 2b 31 3a 57 25 28  47 25 2c 46 25 29 3d 57  |%)+1:W%(G%,F%)=W|
000001f0  25 28 47 25 2c 46 25 29  2b 31 0d 00 3c 25 ed 3a  |%(G%,F%)+1..<%.:|
00000200  e3 49 25 3d 31 b8 38 3a  e7 5a 25 28 49 25 2c 4c  |.I%=1.8:.Z%(I%,L|
00000210  25 29 3d 31 20 4a 25 3d  49 25 3a 49 25 3d 38 0d  |%)=1 J%=I%:I%=8.|
00000220  00 46 51 ed 3a 5a 25 28  4a 25 2c 4c 25 29 3d 32  |.FQ.:Z%(J%,L%)=2|
00000230  3a 47 25 3d 47 25 2d 59  25 28 4a 25 2c 31 29 3a  |:G%=G%-Y%(J%,1):|
00000240  46 25 3d 46 25 2d 59 25  28 4a 25 2c 32 29 3a e3  |F%=F%-Y%(J%,2):.|
00000250  49 25 3d 31 b8 38 3a 5a  25 28 49 25 2c 4c 25 2b  |I%=1.8:Z%(I%,L%+|
00000260  31 29 3d 30 3a ed 3a 4c  25 3d 4c 25 2d 31 3a e1  |1)=0:.:L%=L%-1:.|
00000270  0d 00 50 ad dd f2 64 3a  ef 32 33 3b 26 32 30 30  |..P...d:.23;&200|
00000280  41 3b 30 3b 30 3b 30 3b  31 39 2c 31 2c 30 3b 30  |A;0;0;0;19,1,0;0|
00000290  3b 31 39 2c 32 2c 30 3b  30 3b 31 39 2c 33 2c 30  |;19,2,0;0;19,3,0|
000002a0  3b 30 3b 3a f1 8a 35 2c  31 29 22 41 20 20 20 42  |;0;:..5,1)"A   B|
000002b0  20 20 20 43 20 20 20 44  20 20 20 45 20 20 20 46  |   C   D   E   F|
000002c0  20 20 20 47 20 20 20 48  22 3a e3 52 25 3d 31 b8  |   G   H":.R%=1.|
000002d0  38 3a ef 31 37 2c 33 2c  31 37 2c 31 32 38 3a f1  |8:.17,3,17,128:.|
000002e0  8a 31 2c 52 25 2a 33 2b  31 29 3b 39 2d 52 25 3a  |.1,R%*3+1);9-R%:|
000002f0  e3 43 25 3d 31 b8 38 3a  53 25 3d 52 25 2b 43 25  |.C%=1.8:S%=R%+C%|
00000300  3a f2 65 28 30 29 3a ef  33 31 2c 34 2a 43 25 2c  |:.e(0):.31,4*C%,|
00000310  52 25 2a 33 3a f2 6c 3a  ed 3a ed 3a e1 0d 00 5a  |R%*3:.l:.:.:...Z|
00000320  3e dd f2 63 3a e3 52 25  3d 31 b8 38 3a f3 59 25  |>..c:.R%=1.8:.Y%|
00000330  28 52 25 2c 31 29 3a f3  59 25 28 52 25 2c 32 29  |(R%,1):.Y%(R%,2)|
00000340  3a ed 3a e3 47 25 3d 31  b8 38 3a e3 46 25 3d 31  |:.:.G%=1.8:.F%=1|
00000350  b8 38 3a f2 6d 3a ed 3a  ed 3a e1 0d 00 64 26 dd  |.8:.m:.:.:...d&.|
00000360  f2 6d 3a 45 25 3d 30 3a  e3 48 25 3d 31 b8 38 3a  |.m:E%=0:.H%=1.8:|
00000370  f2 6b 3a e7 4b 25 3c 3e  30 20 45 25 3d 45 25 2b  |.k:.K%<>0 E%=E%+|
00000380  31 0d 00 6e 14 ed 3a 57  25 28 47 25 2c 46 25 29  |1..n..:W%(G%,F%)|
00000390  3d 45 25 3a e1 0d 00 78  54 dd f2 67 3a 56 25 28  |=E%:...xT..g:V%(|
000003a0  47 25 2c 46 25 29 3d 31  3a 57 25 28 47 25 2c 46  |G%,F%)=1:W%(G%,F|
000003b0  25 29 3d 30 3a 58 25 28  47 25 2c 46 25 29 3d 4c  |%)=0:X%(G%,F%)=L|
000003c0  25 3a e3 48 25 3d 31 b8  38 3a f2 6b 3a e7 4b 25  |%:.H%=1.8:.k:.K%|
000003d0  3c 3e 30 20 57 25 28 4f  25 2c 4e 25 29 3d 57 25  |<>0 W%(O%,N%)=W%|
000003e0  28 4f 25 2c 4e 25 29 2d  31 0d 00 82 07 ed 3a e1  |(O%,N%)-1.....:.|
000003f0  0d 00 8c 45 dd f2 69 3a  41 25 3d 30 3a 42 25 3d  |...E..i:A%=0:B%=|
00000400  31 30 3a e3 48 25 3d 31  b8 38 3a f2 6b 3a e7 4b  |10:.H%=1.8:.k:.K|
00000410  25 3c 3e 30 e7 5a 25 28  48 25 2c 4c 25 2b 31 29  |%<>0.Z%(H%,L%+1)|
00000420  3c 3d 30 e7 44 25 3c 3d  42 25 42 25 3d 44 25 3a  |<=0.D%<=B%B%=D%:|
00000430  41 25 3d 48 25 0d 00 96  07 ed 3a e1 0d 00 a0 3a  |A%=H%.....:....:|
00000440  dd f2 6b 3a 4b 25 3d 31  3a 4f 25 3d 47 25 2b 59  |..k:K%=1:O%=G%+Y|
00000450  25 28 48 25 2c 31 29 3a  4e 25 3d 46 25 2b 59 25  |%(H%,1):N%=F%+Y%|
00000460  28 48 25 2c 32 29 3a e7  4f 25 3e 38 84 4f 25 3c  |(H%,2):.O%>8.O%<|
00000470  31 20 4b 25 3d 30 0d 00  aa 13 e7 4e 25 3e 38 84  |1 K%=0.....N%>8.|
00000480  4e 25 3c 31 20 4b 25 3d  30 0d 00 b4 0a e7 4b 25  |N%<1 K%=0.....K%|
00000490  3d 30 e1 0d 00 be 15 e7  56 25 28 4f 25 2c 4e 25  |=0......V%(O%,N%|
000004a0  29 3d 31 20 4b 25 3d 30  0d 00 c8 16 e7 4b 25 3d  |)=1 K%=0.....K%=|
000004b0  31 20 44 25 3d 57 25 28  4f 25 2c 4e 25 29 0d 00  |1 D%=W%(O%,N%)..|
000004c0  d2 05 e1 0d 00 dc 48 dd  f2 68 3a f1 8a 31 30 2c  |......H..h:..10,|
000004d0  33 30 29 3b 89 28 32 30  29 3a e3 54 25 3d 31 b8  |30);.(20):.T%=1.|
000004e0  36 33 3a e3 52 25 3d 31  b8 38 3a e3 43 25 3d 31  |63:.R%=1.8:.C%=1|
000004f0  b8 38 3a e7 58 25 28 52  25 2c 43 25 29 3d 54 25  |.8:.X%(R%,C%)=T%|
00000500  4e 25 3d 43 25 3a 4f 25  3d 52 25 0d 00 e6 7d ed  |N%=C%:O%=R%...}.|
00000510  3a ed 3a f2 6e 3a f2 65  28 30 29 3a f2 6f 3a 53  |:.:.n:.e(0):.o:S|
00000520  25 3d 4f 25 2b 4e 25 3a  f2 65 28 2d 31 29 3a ef  |%=O%+N%:.e(-1):.|
00000530  33 31 2c 34 2a 4e 25 2b  31 2c 33 2a 4f 25 3a f2  |31,4*N%+1,3*O%:.|
00000540  66 3a d4 33 2c 32 2c 30  2c 31 3a 51 25 3d 4f 25  |f:.3,2,0,1:Q%=O%|
00000550  3a 50 25 3d 4e 25 3a ed  3a f2 6e 3a f2 65 28 30  |:P%=N%:.:.n:.e(0|
00000560  29 3a f2 6f 3a ef 32 30  2c 33 31 2c 30 2c 33 30  |):.o:.20,31,0,30|
00000570  2c 32 33 3b 26 36 37 30  41 3b 30 3b 30 3b 30 3b  |,23;&670A;0;0;0;|
00000580  3a 2a 46 58 32 31 2c 30  0d 00 f0 05 e1 0d 00 fa  |:*FX21,0........|
00000590  2b dd f2 6c 3a e3 4d 25  3d 31 b8 33 3a ef 33 32  |+..l:.M%=1.3:.32|
000005a0  2c 33 32 2c 33 32 2c 33  32 2c 31 30 2c 38 2c 38  |,32,32,32,10,8,8|
000005b0  2c 38 2c 38 3a ed 3a e1  0d 01 04 dc dd f2 61 3a  |,8,8:.:.......a:|
000005c0  ef 32 33 2c 32 32 34 2c  31 35 2c 33 2c 31 35 2c  |.23,224,15,3,15,|
000005d0  32 37 2c 32 37 2c 36 33  2c 36 33 2c 31 32 37 3a  |27,27,63,63,127:|
000005e0  ef 32 33 2c 32 32 35 2c  30 2c 31 39 32 2c 31 31  |.23,225,0,192,11|
000005f0  32 2c 31 32 30 2c 31 38  34 2c 31 38 38 2c 31 38  |2,120,184,188,18|
00000600  30 2c 31 37 32 3a ef 32  33 2c 32 32 36 2c 31 32  |0,172:.23,226,12|
00000610  37 2c 32 34 37 2c 32 33  30 2c 37 38 2c 31 34 2c  |7,247,230,78,14,|
00000620  31 34 2c 31 34 2c 37 3a  ef 32 33 2c 32 32 37 2c  |14,14,7:.23,227,|
00000630  39 32 2c 31 32 34 2c 32  30 34 2c 31 38 34 2c 32  |92,124,204,184,2|
00000640  34 30 2c 31 39 32 2c 34  38 2c 32 32 34 3a ef 32  |40,192,48,224:.2|
00000650  33 2c 32 32 38 2c 31 32  30 2c 33 31 2c 38 2c 33  |3,228,120,31,8,3|
00000660  31 2c 36 33 2c 31 32 37  2c 31 39 32 2c 31 32 37  |1,63,127,192,127|
00000670  3a ef 32 33 2c 32 32 39  2c 33 30 2c 32 34 38 2c  |:.23,229,30,248,|
00000680  31 36 2c 32 34 38 2c 32  35 32 2c 32 35 34 2c 33  |16,248,252,254,3|
00000690  2c 32 35 34 0d 01 0e 2c  e2 32 2c 31 2c 30 2c 32  |,254...,.2,1,0,2|
000006a0  2c 33 2c 31 30 2c 32 30  2c 31 30 2c 31 30 30 2c  |,3,10,20,10,100,|
000006b0  2d 35 2c 2d 35 2c 2d 31  2c 31 32 36 2c 39 3a e1  |-5,-5,-1,126,9:.|
000006c0  0d 01 18 30 dd f2 66 3a  ef 32 32 34 2c 32 32 35  |...0..f:.224,225|
000006d0  2c 31 30 2c 38 2c 38 2c  32 32 36 2c 32 32 37 2c  |,10,8,8,226,227,|
000006e0  31 30 2c 38 2c 38 2c 32  32 38 2c 32 32 39 3a e1  |10,8,8,228,229:.|
000006f0  0d 01 22 2e dd f2 6f 3a  ef 33 31 2c 34 2a 50 25  |.."...o:.31,4*P%|
00000700  2c 33 2a 51 25 3a f2 6c  3a f1 8a 34 2a 50 25 2b  |,3*Q%:.l:..4*P%+|
00000710  31 2c 51 25 2a 33 2b 31  29 3b 54 25 3a e1 0d 01  |1,Q%*3+1);T%:...|
00000720  2c 21 dd f2 6e 3a 55 25  3d b3 28 35 30 29 2b 32  |,!..n:U%=.(50)+2|
00000730  35 3a d1 3d 30 3a f5 3a  fd 91 3e 55 25 3a e1 0d  |5:.=0:.:..>U%:..|
00000740  01 36 e1 dd f2 62 3a ef  33 31 2c 31 2c 36 3a f2  |.6...b:.31,1,6:.|
00000750  66 3a ef 33 31 2c 31 36  2c 36 3a f2 66 3a f1 8a  |f:.31,16,6:.f:..|
00000760  33 2c 33 29 22 4b 6e 69  67 68 74 27 73 20 54 6f  |3,3)"Knight's To|
00000770  75 72 22 8a 38 2c 37 29  22 62 79 22 8a 31 2c 31  |ur".8,7)"by".1,1|
00000780  31 29 22 47 6f 72 64 6f  6e 20 48 6f 72 73 69 6e  |1)"Gordon Horsin|
00000790  67 74 6f 6e 22 3a f1 8a  32 2c 31 38 29 22 49 74  |gton":..2,18)"It|
000007a0  20 69 73 20 70 6f 73 73  69 62 6c 65 20 74 6f 22  | is possible to"|
000007b0  27 27 22 6d 6f 76 65 20  61 20 4b 6e 69 67 68 74  |''"move a Knight|
000007c0  20 72 6f 75 6e 64 22 27  27 22 61 20 20 43 68 65  | round"''"a  Che|
000007d0  73 73 20 20 62 6f 61 72  64 20 20 73 6f 22 27 27  |ss  board  so"''|
000007e0  22 74 68 61 74 20 20 69  74 20 20 6c 61 6e 64 73  |"that  it  lands|
000007f0  20 20 6f 6e 22 27 27 22  65 76 65 72 79 20 73 71  |  on"''"every sq|
00000800  75 61 72 65 20 20 6f 6e  63 65 2c 22 27 27 22 61  |uare  once,"''"a|
00000810  6e 64 20 6f 6e 6c 79 20  6f 6e 63 65 2e 22 3a e1  |nd only once.":.|
00000820  0d 01 40 31 dd f2 65 28  43 25 29 3a e7 53 25 3d  |..@1..e(C%):.S%=|
00000830  28 53 25 81 32 29 2a 32  ef 31 37 2c 31 2c 31 37  |(S%.2)*2.17,1,17|
00000840  2c 31 33 30 8b ef 31 37  2c 32 2c 31 37 2c 31 32  |,130..17,2,17,12|
00000850  39 0d 01 4a 0c e7 43 25  ef 31 37 2c 30 0d 01 54  |9..J..C%.17,0..T|
00000860  05 e1 0d 01 5e 2c dc 31  2c 32 2c 31 2c 2d 32 2c  |....^,.1,2,1,-2,|
00000870  32 2c 31 2c 32 2c 2d 31  2c 2d 31 2c 32 2c 2d 31  |2,1,2,-1,-1,2,-1|
00000880  2c 2d 32 2c 2d 32 2c 31  2c 2d 32 2c 2d 31 0d 01  |,-2,-2,1,-2,-1..|
00000890  68 3d f4 15 a9 ff 48 68  aa e8 8a 48 bc b9 21 f0  |h=....Hh...H..!.|
000008a0  0a a2 00 a9 8a 20 f4 ff  4c 97 21 a9 bb a2 00 a0  |..... ..L.!.....|
000008b0  ff 20 f4 ff a9 8e 4c f4  ff 50 41 2e 3d 26 31 39  |. ....L..PA.=&19|
000008c0  30 30 0d 4f 2e 0d 52 55  4e 0d 00 0d 01 72 05 06  |00.O..RUN....r..|
000008d0  0d ff                                             |..|
000008d2
20-03-88/DEMO.m0
20-03-88/DEMO.m1
20-03-88/DEMO.m2
20-03-88/DEMO.m4
20-03-88/DEMO.m5