Home » CEEFAX disks » telesoftware5.adl » 17-02-88/DUEL

17-02-88/DUEL

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: 17-02-88/DUEL
Read OK: ✔
File size: 1110 bytes
Load address: FFFF0E00
Exec address: FFFF802B
Duplicates

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

File contents
   10REM ***************
   20REM (C) Micro User
   30REM ***************
   40*KEY 10 OLD|MRUN|M
   50PROCgraphics
   60MODE1:PROCinstruct
   70ONERRORGOTO90
   80REPEAT
   90leftcrash=FALSE:rightcrash=FALSE
  100PROCgrid
  110IFsound=1 PROCsound
  120IF(RND<.5) PROCright
  130REPEAT
  140PROCgo
  150UNTIL leftcrash OR rightcrash
  160IF leftcrash PROCleftcrash
  170IF rightcrash PROCrightcrash
  180UNTILFALSE
  190END
  200REM************************
  210DEFPROCgo
  220PROCleft:IF leftcrash ENDPROC
  230PROCright:IF rightcrash ENDPROC
  240ENDPROC
  250REM************************
  260DEFPROCleft
  270IFboard L%=FNboardL(L%) ELSE L%=FNpaddles(1,L%)
  280X%=X%+(L%=4)-(L%=2):Y%=Y%+(L%=1)-(L%=3)
  290PROCreadch(X%,Y%)
  300VDU19,1,1,0,0,0,17,1,31,X%,Y%,226
  310IFS%=8THENVDU31,X%,Y%+1,224
  320SOUND0,-15,10,sound
  330IFT%=15 leftcrash=TRUE
  340ENDPROC
  350REM************************
  360DEFPROCright
  370IFboard R%=FNboardR(R%) ELSE R%=FNpaddles(3,R%)
  380A%=A%+(R%=4)-(R%=2):B%=B%+(R%=1)-(R%=3)
  390PROCreadch(A%,B%)
  400VDU19,2,2,0,0,0,17,2,31,A%,B%,226
  410IFS%=8THENVDU31,A%,B%+1,224
  420SOUND0,-15,20,sound
  430IFT%=15 rightcrash=TRUE
  440ENDPROC
  450REM***********************
  460DEFFNpaddles(P%,OD%)
  470LOCALC%
  480D%=0
  490ch1%=128-(ADVAL(P%) DIV 256):ch2%=128-(ADVAL(P%+1) DIV 256):IF ch1%=0 THEN ch1%=1
  500IF ch2%=0 THEN ch2%=1
  510C%=ABS(ch1%/ch2%)
  520IF ch2%>80 AND C%<1 D%=3
  530IF ch2%<-80 AND C%<1  D%=1
  540C%=ABS(ch2%/ch1%):IF ch1%>80 AND C%<1 THEN D%=2
  550IF ch1%<-80 AND C%<1 THEN D%=4
  560IFD%=0 =OD%
  570=D%
  580REM***********************
  590DEFFNboardR(OD%)
  600LOCALC%
  610D%=0
  620D%=((INKEY(-57))*-1)
  630IFD%=0 D%=((INKEY(-104))*-2)
  640IFD%=0 D%=((INKEY(-103))*-4)
  650IFD%=0 D%=((INKEY(-73))*-3)
  660IFD%=0 =OD%
  670=D%
  680DEFFNboardL(OD%)
  690LOCALC%
  700D%=0
  710D%=((INKEY(-17))*-1)
  720IFD%=0 D%=((INKEY(-83))*-2)
  730IFD%=0 D%=((INKEY(-67))*-4)
  740IFD%=0 D%=((INKEY(-66))*-3)
  750IFD%=0 =OD%
  760=D%
  770REM**********************
  780DEF PROCreadch(H%,V%)
  790T%=((?(HIMEM+(2*H%+V%*80)*8)) AND 240)/16:IFT%=0 T%=(?(HIMEM+(2*H%+V%*80)*8)) AND 15
  800S%=((?(HIMEM+(2*H%+V%*80+80)*8)) AND 240)/16:IFS%=0 S%=(?(HIMEM+(2*H%+V%*80+80)*8)) AND 15
  810ENDPROC
  820REM***********************
  830DEFPROCgraphics
  840VDU23,224,51,51,204,204,51,51,204,204
  850VDU23,225,128,128,128,128,128,128,128,255
  860VDU23,226,255,255,255,255,255,255,255,255
  870VDU23,227,0,0,0,0,66,102,60,24
  880VDU23,1,0;0;0;0;
  890S1%=0:S2%=0
  900board=FALSE:paddle=FALSE
  910ENDPROC
  920REM**********************
  930DEFPROCleftcrash
  940VDU19,1,9,0,0,0:S2%=S2%+1:PROCscore
  950VDU19,1,1,0,0,0,17,3
  960IF S2%=10 PROCwinner
  970ENDPROC
  980REM***********************
  990DEFPROCrightcrash
 1000VDU19,2,10,0,0,0:S1%=S1%+1:PROCscore
 1010VDU19,2,2,0,0,0,17,3
 1020IF S1%=10 PROCwinner
 1030ENDPROC
 1040REM************************
 1050DEFPROCgrid
 1060COLOUR3:COLOUR128
 1070FORF%=0TO28 STEP28:FORI%=0TO39:PRINTTAB(I%,F%);CHR$226:NEXTI%:NEXTF%
 1080FORF%=1 TO 27:PRINTTAB(0,F%);CHR$226;:FORI%=1TO38:PRINTCHR$225;:NEXTI%:PRINTCHR$226:NEXTF%
 1090F%=1:FORI%=1TO38:PRINTTAB(I%,F%);CHR$224:NEXTI%
 1100F%=29:FORI%=0TO39:PRINTTAB(I%,F%);CHR$224:NEXTI%
 1110X%=15:Y%=14:A%=24:B%=14:L%=2:R%=4
 1120ENDPROC
 1130REM*************************
 1140DEFPROCscore
 1150TIME=0:REPEATUNTILTIME=75
 1160*FX21,5
 1170*FX21,7
 1180*FX21,0
 1190COLOUR3
 1200PRINTTAB(15,13);"Player 1 = ";S1%;TAB(15,16);"Player 2 = ";S2%
 1210IF board PRINTTAB(6,28);"Press spacebar to continue" ELSE PRINTTAB(6,28);"Press fire button to continue"
 1220IF(S1%=10) OR (S2%=10) ENDPROC
 1230REPEAT
 1240UNTIL INKEY(-99) OR (ADVAL(0)AND3)<>0
 1250ENDPROC
 1260REM**********************
 1270DEFPROCwinner
 1280PRINTTAB(10,25);"Player ";:IF(S1%=10) PRINT"1";
 1290IF(S2%=10) PRINT"2";
 1300PRINT" has won...."
 1310S1%=0:S2%=0
 1320REPEAT
 1330FORF%=0TO39:PRINTTAB(F%,28);CHR$226;:NEXTF%
 1340PRINTTAB(8,28);"Press RETURN to continue"
 1350FOR PAUSE=1 TO 1000:NEXT
 1360FORF%=0TO39:PRINTTAB(F%,28);CHR$226;:NEXTF%
 1370UNTIL(INKEY(10))=13
 1380ENDPROC
 1390REM**********************
 1400DEFPROCsound
 1410ENVELOPE2,3,2,-4,4,5,5,5,127,0,0,0,60,0
 1420SOUND1,2,1,10
 1430SOUND3,2,200,1
 1440ENDPROC
 1450REM**************************
 1460DEFPROCinstruct
 1470VDU23,1;0;0;0;0;
 1480PRINTTAB(17);"DUEL"
 1490PRINT'''
 1500PRINTTAB(8);" THE TWO PLAYER GAME"
 1510PRINT'''"Your player has been placed on the game"
 1520PRINT"  board, you must  not  hit the  walls,"
 1530PRINT"  your own or your opponent's ion trail."
 1540PRINT'"The object is to force your opponent "
 1550PRINT"  into an error, such as hitting an"
 1560PRINT"  ion trail or the wall"''''
 1570PRINT
 1580PRINTTAB(12,30);"Hit the space bar"
 1590PROCbar
 1600CLS
 1610PRINTTAB(17);"DUEL"
 1620PRINTTAB(0,2);"The game can be played using two methods"''"   1.  Paddles"''"   2.  Keyboard : use keys as shown"
 1630FORF%=1TO16
 1640READkey,xpos,ypos
 1650PRINTTAB(xpos,ypos);CHR$(key)
 1660NEXT
 1670PRINTTAB(2,18)"Left player";TAB(28,18);"Right player"
 1680PRINTTAB(15,19);"Please press "''SPC(13)"'P' for Paddles"''SPC(13)"'K' for Keyboard"
 1690PRINTTAB(5,27);"'S' for sound : 'Q' for quiet"
 1700PRINTTAB(12,30);"Hit the space bar"
 1710sound=1
 1720REPEAT
 1730REPEAT
 1740IF INKEY(-71)board=TRUE:paddle=FALSE
 1750IF INKEY(-56)paddle=TRUE:board=FALSE
 1760IF INKEY(-17)sound=0
 1770UNTILpaddle OR board
 1780*FX15
 1790UNTILINKEY(-99)
 1800CLS
 1810ENDPROC
 1820END
 1830DEFPROCbar
 1840*FX21,0
 1850REPEATUNTILGET=32
 1860ENDPROC
 1870DATA81,7,11,94,7,10,65,7,14,227,7,15,88,3,12,60,2,12,67,11,12,62,12,12
 1880DATA91,32,11,94,32,10,42,32,14,227,32,15,44,28,12,60,27,12,46,36,12,62,37,12


� ***************
� (C) Micro User
� ***************
(*KEY 10 OLD|MRUN|M
2
�graphics
<�1:�instruct
F��DZ@
P�
Zleftcrash=�:rightcrash=�
d	�grid
n�sound=1 �sound
x�(�<.5) �right
��
��go
�� leftcrash � rightcrash
�� leftcrash �leftcrash
�� rightcrash �rightcrash
���
��
��************************
���go
��left:� leftcrash �
��right:� rightcrash �
��
��************************

��left
-�board L%=�boardL(L%) � L%=�paddles(1,L%)
+X%=X%+(L%=4)-(L%=2):Y%=Y%+(L%=1)-(L%=3)
"�readch(X%,Y%)
,#�19,1,1,0,0,0,17,1,31,X%,Y%,226
6�S%=8��31,X%,Y%+1,224
@�0,-15,10,sound
J�T%=15 leftcrash=�
T�
^�************************
h��right
r-�board R%=�boardR(R%) � R%=�paddles(3,R%)
|+A%=A%+(R%=4)-(R%=2):B%=B%+(R%=1)-(R%=3)
��readch(A%,B%)
�#�19,2,2,0,0,0,17,2,31,A%,B%,226
��S%=8��31,A%,B%+1,224
��0,-15,20,sound
��T%=15 rightcrash=�
��
��***********************
�ݤpaddles(P%,OD%)
��C%
�D%=0
�Ech1%=128-(�(P%) � 256):ch2%=128-(�(P%+1) � 256):� ch1%=0 � ch1%=1
�� ch2%=0 � ch2%=1
�C%=�(ch1%/ch2%)
� ch2%>80 � C%<1 D%=3
� ch2%<-80 � C%<1  D%=1
+C%=�(ch2%/ch1%):� ch1%>80 � C%<1 � D%=2
&� ch1%<-80 � C%<1 � D%=4
0�D%=0 =OD%
:=D%
D�***********************
NݤboardR(OD%)
X�C%
bD%=0
lD%=((�(-57))*-1)
v�D%=0 D%=((�(-104))*-2)
��D%=0 D%=((�(-103))*-4)
��D%=0 D%=((�(-73))*-3)
��D%=0 =OD%
�=D%
�ݤboardL(OD%)
��C%
�D%=0
�D%=((�(-17))*-1)
��D%=0 D%=((�(-83))*-2)
��D%=0 D%=((�(-67))*-4)
��D%=0 D%=((�(-66))*-3)
��D%=0 =OD%
�=D%
�**********************
� �readch(H%,V%)
KT%=((?(�+(2*H%+V%*80)*8)) � 240)/16:�T%=0 T%=(?(�+(2*H%+V%*80)*8)) � 15
 QS%=((?(�+(2*H%+V%*80+80)*8)) � 240)/16:�S%=0 S%=(?(�+(2*H%+V%*80+80)*8)) � 15
*�
4�***********************
>��graphics
H'�23,224,51,51,204,204,51,51,204,204
R+�23,225,128,128,128,128,128,128,128,255
\+�23,226,255,255,255,255,255,255,255,255
f �23,227,0,0,0,0,66,102,60,24
p�23,1,0;0;0;0;
zS1%=0:S2%=0
�board=�:paddle=�
��
��**********************
���leftcrash
�"�19,1,9,0,0,0:S2%=S2%+1:�score
��19,1,1,0,0,0,17,3
�� S2%=10 �winner
��
��***********************
���rightcrash
�#�19,2,10,0,0,0:S1%=S1%+1:�score
��19,2,2,0,0,0,17,3
�� S1%=10 �winner
�
�************************

��grid
$�3:�128
./�F%=0�28 �28:�I%=0�39:�I%,F%);�226:�I%:�F%
8:�F%=1 � 27:�0,F%);�226;:�I%=1�38:�225;:�I%:�226:�F%
B#F%=1:�I%=1�38:�I%,F%);�224:�I%
L$F%=29:�I%=0�39:�I%,F%);�224:�I%
V%X%=15:Y%=14:A%=24:B%=14:L%=2:R%=4
`�
j�*************************
t��score
~�=0:���=75
�*FX21,5
�*FX21,7
�*FX21,0
��3
�8�15,13);"Player 1 = ";S1%;�15,16);"Player 2 = ";S2%
�Z� board �6,28);"Press spacebar to continue" � �6,28);"Press fire button to continue"
��(S1%=10) � (S2%=10) �
��
�� �(-99) � (�(0)�3)<>0
��
��**********************
���winner
'�10,25);"Player ";:�(S1%=10) �"1";

�(S2%=10) �"2";
�" has won...."
S1%=0:S2%=0
(�
2�F%=0�39:�F%,28);�226;:�F%
<&�8,28);"Press RETURN to continue"
F� PAUSE=1 � 1000:�
P�F%=0�39:�F%,28);�226;:�F%
Z�(�(10))=13
d�
n�**********************
x��sound
�$�2,3,2,-4,4,5,5,5,127,0,0,0,60,0
�
�1,2,1,10
��3,2,200,1
��
��**************************
���instruct
��23,1;0;0;0;0;
��17);"DUEL"
��'''
��8);" THE TWO PLAYER GAME"
�1�'''"Your player has been placed on the game"
�.�"  board, you must  not  hit the  walls,"
�/�"  your own or your opponent's ion trail."
-�'"The object is to force your opponent "
*�"  into an error, such as hitting an"
"�"  ion trail or the wall"''''
"�
, �12,30);"Hit the space bar"
6�bar
@�
J�17);"DUEL"
Tn�0,2);"The game can be played using two methods"''"   1.  Paddles"''"   2.  Keyboard : use keys as shown"
^�F%=1�16
h�key,xpos,ypos
r�xpos,ypos);�(key)
|�
�/�2,18)"Left player";�28,18);"Right player"
�M�15,19);"Please press "''�(13)"'P' for Paddles"''�(13)"'K' for Keyboard"
�+�5,27);"'S' for sound : 'Q' for quiet"
� �12,30);"Hit the space bar"
�sound=1
��
��
�� �(-71)board=�:paddle=�
�� �(-56)paddle=�:board=�
�� �(-17)sound=0
��paddle � board
�	*FX15
���(-99)
�
�
�
&	��bar
0*FX21,0
:
���=32
D�
NG�81,7,11,94,7,10,65,7,14,227,7,15,88,3,12,60,2,12,67,11,12,62,12,12
XM�91,32,11,94,32,10,42,32,14,227,32,15,44,28,12,60,27,12,46,36,12,62,37,12
�
00000000  0d 00 0a 15 f4 20 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |..... **********|
00000010  2a 2a 2a 2a 2a 0d 00 14  14 f4 20 28 43 29 20 4d  |*****..... (C) M|
00000020  69 63 72 6f 20 55 73 65  72 0d 00 1e 15 f4 20 2a  |icro User..... *|
00000030  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 0d 00  |**************..|
00000040  28 16 2a 4b 45 59 20 31  30 20 4f 4c 44 7c 4d 52  |(.*KEY 10 OLD|MR|
00000050  55 4e 7c 4d 0d 00 32 0d  f2 67 72 61 70 68 69 63  |UN|M..2..graphic|
00000060  73 0d 00 3c 10 eb 31 3a  f2 69 6e 73 74 72 75 63  |s..<..1:.instruc|
00000070  74 0d 00 46 0b ee 85 e5  8d 44 5a 40 0d 00 50 05  |t..F.....DZ@..P.|
00000080  f5 0d 00 5a 1c 6c 65 66  74 63 72 61 73 68 3d a3  |...Z.leftcrash=.|
00000090  3a 72 69 67 68 74 63 72  61 73 68 3d a3 0d 00 64  |:rightcrash=...d|
000000a0  09 f2 67 72 69 64 0d 00  6e 13 e7 73 6f 75 6e 64  |..grid..n..sound|
000000b0  3d 31 20 f2 73 6f 75 6e  64 0d 00 78 12 e7 28 b3  |=1 .sound..x..(.|
000000c0  3c 2e 35 29 20 f2 72 69  67 68 74 0d 00 82 05 f5  |<.5) .right.....|
000000d0  0d 00 8c 07 f2 67 6f 0d  00 96 1c fd 20 6c 65 66  |.....go..... lef|
000000e0  74 63 72 61 73 68 20 84  20 72 69 67 68 74 63 72  |tcrash . rightcr|
000000f0  61 73 68 0d 00 a0 1a e7  20 6c 65 66 74 63 72 61  |ash..... leftcra|
00000100  73 68 20 f2 6c 65 66 74  63 72 61 73 68 0d 00 aa  |sh .leftcrash...|
00000110  1c e7 20 72 69 67 68 74  63 72 61 73 68 20 f2 72  |.. rightcrash .r|
00000120  69 67 68 74 63 72 61 73  68 0d 00 b4 06 fd a3 0d  |ightcrash.......|
00000130  00 be 05 e0 0d 00 c8 1d  f4 2a 2a 2a 2a 2a 2a 2a  |.........*******|
00000140  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
00000150  2a 0d 00 d2 08 dd f2 67  6f 0d 00 dc 17 f2 6c 65  |*......go.....le|
00000160  66 74 3a e7 20 6c 65 66  74 63 72 61 73 68 20 e1  |ft:. leftcrash .|
00000170  0d 00 e6 19 f2 72 69 67  68 74 3a e7 20 72 69 67  |.....right:. rig|
00000180  68 74 63 72 61 73 68 20  e1 0d 00 f0 05 e1 0d 00  |htcrash ........|
00000190  fa 1d f4 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |...*************|
000001a0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 0d 01 04 0a dd  |***********.....|
000001b0  f2 6c 65 66 74 0d 01 0e  2d e7 62 6f 61 72 64 20  |.left...-.board |
000001c0  4c 25 3d a4 62 6f 61 72  64 4c 28 4c 25 29 20 8b  |L%=.boardL(L%) .|
000001d0  20 4c 25 3d a4 70 61 64  64 6c 65 73 28 31 2c 4c  | L%=.paddles(1,L|
000001e0  25 29 0d 01 18 2b 58 25  3d 58 25 2b 28 4c 25 3d  |%)...+X%=X%+(L%=|
000001f0  34 29 2d 28 4c 25 3d 32  29 3a 59 25 3d 59 25 2b  |4)-(L%=2):Y%=Y%+|
00000200  28 4c 25 3d 31 29 2d 28  4c 25 3d 33 29 0d 01 22  |(L%=1)-(L%=3).."|
00000210  12 f2 72 65 61 64 63 68  28 58 25 2c 59 25 29 0d  |..readch(X%,Y%).|
00000220  01 2c 23 ef 31 39 2c 31  2c 31 2c 30 2c 30 2c 30  |.,#.19,1,1,0,0,0|
00000230  2c 31 37 2c 31 2c 33 31  2c 58 25 2c 59 25 2c 32  |,17,1,31,X%,Y%,2|
00000240  32 36 0d 01 36 19 e7 53  25 3d 38 8c ef 33 31 2c  |26..6..S%=8..31,|
00000250  58 25 2c 59 25 2b 31 2c  32 32 34 0d 01 40 13 d4  |X%,Y%+1,224..@..|
00000260  30 2c 2d 31 35 2c 31 30  2c 73 6f 75 6e 64 0d 01  |0,-15,10,sound..|
00000270  4a 16 e7 54 25 3d 31 35  20 6c 65 66 74 63 72 61  |J..T%=15 leftcra|
00000280  73 68 3d b9 0d 01 54 05  e1 0d 01 5e 1d f4 2a 2a  |sh=...T....^..**|
00000290  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
000002a0  2a 2a 2a 2a 2a 2a 0d 01  68 0b dd f2 72 69 67 68  |******..h...righ|
000002b0  74 0d 01 72 2d e7 62 6f  61 72 64 20 52 25 3d a4  |t..r-.board R%=.|
000002c0  62 6f 61 72 64 52 28 52  25 29 20 8b 20 52 25 3d  |boardR(R%) . R%=|
000002d0  a4 70 61 64 64 6c 65 73  28 33 2c 52 25 29 0d 01  |.paddles(3,R%)..|
000002e0  7c 2b 41 25 3d 41 25 2b  28 52 25 3d 34 29 2d 28  ||+A%=A%+(R%=4)-(|
000002f0  52 25 3d 32 29 3a 42 25  3d 42 25 2b 28 52 25 3d  |R%=2):B%=B%+(R%=|
00000300  31 29 2d 28 52 25 3d 33  29 0d 01 86 12 f2 72 65  |1)-(R%=3).....re|
00000310  61 64 63 68 28 41 25 2c  42 25 29 0d 01 90 23 ef  |adch(A%,B%)...#.|
00000320  31 39 2c 32 2c 32 2c 30  2c 30 2c 30 2c 31 37 2c  |19,2,2,0,0,0,17,|
00000330  32 2c 33 31 2c 41 25 2c  42 25 2c 32 32 36 0d 01  |2,31,A%,B%,226..|
00000340  9a 19 e7 53 25 3d 38 8c  ef 33 31 2c 41 25 2c 42  |...S%=8..31,A%,B|
00000350  25 2b 31 2c 32 32 34 0d  01 a4 13 d4 30 2c 2d 31  |%+1,224.....0,-1|
00000360  35 2c 32 30 2c 73 6f 75  6e 64 0d 01 ae 17 e7 54  |5,20,sound.....T|
00000370  25 3d 31 35 20 72 69 67  68 74 63 72 61 73 68 3d  |%=15 rightcrash=|
00000380  b9 0d 01 b8 05 e1 0d 01  c2 1c f4 2a 2a 2a 2a 2a  |...........*****|
00000390  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
000003a0  2a 2a 0d 01 cc 15 dd a4  70 61 64 64 6c 65 73 28  |**......paddles(|
000003b0  50 25 2c 4f 44 25 29 0d  01 d6 07 ea 43 25 0d 01  |P%,OD%).....C%..|
000003c0  e0 08 44 25 3d 30 0d 01  ea 45 63 68 31 25 3d 31  |..D%=0...Ech1%=1|
000003d0  32 38 2d 28 96 28 50 25  29 20 81 20 32 35 36 29  |28-(.(P%) . 256)|
000003e0  3a 63 68 32 25 3d 31 32  38 2d 28 96 28 50 25 2b  |:ch2%=128-(.(P%+|
000003f0  31 29 20 81 20 32 35 36  29 3a e7 20 63 68 31 25  |1) . 256):. ch1%|
00000400  3d 30 20 8c 20 63 68 31  25 3d 31 0d 01 f4 15 e7  |=0 . ch1%=1.....|
00000410  20 63 68 32 25 3d 30 20  8c 20 63 68 32 25 3d 31  | ch2%=0 . ch2%=1|
00000420  0d 01 fe 13 43 25 3d 94  28 63 68 31 25 2f 63 68  |....C%=.(ch1%/ch|
00000430  32 25 29 0d 02 08 19 e7  20 63 68 32 25 3e 38 30  |2%)..... ch2%>80|
00000440  20 80 20 43 25 3c 31 20  44 25 3d 33 0d 02 12 1b  | . C%<1 D%=3....|
00000450  e7 20 63 68 32 25 3c 2d  38 30 20 80 20 43 25 3c  |. ch2%<-80 . C%<|
00000460  31 20 20 44 25 3d 31 0d  02 1c 2b 43 25 3d 94 28  |1  D%=1...+C%=.(|
00000470  63 68 32 25 2f 63 68 31  25 29 3a e7 20 63 68 31  |ch2%/ch1%):. ch1|
00000480  25 3e 38 30 20 80 20 43  25 3c 31 20 8c 20 44 25  |%>80 . C%<1 . D%|
00000490  3d 32 0d 02 26 1c e7 20  63 68 31 25 3c 2d 38 30  |=2..&.. ch1%<-80|
000004a0  20 80 20 43 25 3c 31 20  8c 20 44 25 3d 34 0d 02  | . C%<1 . D%=4..|
000004b0  30 0e e7 44 25 3d 30 20  3d 4f 44 25 0d 02 3a 07  |0..D%=0 =OD%..:.|
000004c0  3d 44 25 0d 02 44 1c f4  2a 2a 2a 2a 2a 2a 2a 2a  |=D%..D..********|
000004d0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 0d  |***************.|
000004e0  02 4e 11 dd a4 62 6f 61  72 64 52 28 4f 44 25 29  |.N...boardR(OD%)|
000004f0  0d 02 58 07 ea 43 25 0d  02 62 08 44 25 3d 30 0d  |..X..C%..b.D%=0.|
00000500  02 6c 14 44 25 3d 28 28  a6 28 2d 35 37 29 29 2a  |.l.D%=((.(-57))*|
00000510  2d 31 29 0d 02 76 1b e7  44 25 3d 30 20 44 25 3d  |-1)..v..D%=0 D%=|
00000520  28 28 a6 28 2d 31 30 34  29 29 2a 2d 32 29 0d 02  |((.(-104))*-2)..|
00000530  80 1b e7 44 25 3d 30 20  44 25 3d 28 28 a6 28 2d  |...D%=0 D%=((.(-|
00000540  31 30 33 29 29 2a 2d 34  29 0d 02 8a 1a e7 44 25  |103))*-4).....D%|
00000550  3d 30 20 44 25 3d 28 28  a6 28 2d 37 33 29 29 2a  |=0 D%=((.(-73))*|
00000560  2d 33 29 0d 02 94 0e e7  44 25 3d 30 20 3d 4f 44  |-3).....D%=0 =OD|
00000570  25 0d 02 9e 07 3d 44 25  0d 02 a8 11 dd a4 62 6f  |%....=D%......bo|
00000580  61 72 64 4c 28 4f 44 25  29 0d 02 b2 07 ea 43 25  |ardL(OD%).....C%|
00000590  0d 02 bc 08 44 25 3d 30  0d 02 c6 14 44 25 3d 28  |....D%=0....D%=(|
000005a0  28 a6 28 2d 31 37 29 29  2a 2d 31 29 0d 02 d0 1a  |(.(-17))*-1)....|
000005b0  e7 44 25 3d 30 20 44 25  3d 28 28 a6 28 2d 38 33  |.D%=0 D%=((.(-83|
000005c0  29 29 2a 2d 32 29 0d 02  da 1a e7 44 25 3d 30 20  |))*-2).....D%=0 |
000005d0  44 25 3d 28 28 a6 28 2d  36 37 29 29 2a 2d 34 29  |D%=((.(-67))*-4)|
000005e0  0d 02 e4 1a e7 44 25 3d  30 20 44 25 3d 28 28 a6  |.....D%=0 D%=((.|
000005f0  28 2d 36 36 29 29 2a 2d  33 29 0d 02 ee 0e e7 44  |(-66))*-3).....D|
00000600  25 3d 30 20 3d 4f 44 25  0d 02 f8 07 3d 44 25 0d  |%=0 =OD%....=D%.|
00000610  03 02 1b f4 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |....************|
00000620  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 0d 03 0c 14 dd 20  |**********..... |
00000630  f2 72 65 61 64 63 68 28  48 25 2c 56 25 29 0d 03  |.readch(H%,V%)..|
00000640  16 4b 54 25 3d 28 28 3f  28 93 2b 28 32 2a 48 25  |.KT%=((?(.+(2*H%|
00000650  2b 56 25 2a 38 30 29 2a  38 29 29 20 80 20 32 34  |+V%*80)*8)) . 24|
00000660  30 29 2f 31 36 3a e7 54  25 3d 30 20 54 25 3d 28  |0)/16:.T%=0 T%=(|
00000670  3f 28 93 2b 28 32 2a 48  25 2b 56 25 2a 38 30 29  |?(.+(2*H%+V%*80)|
00000680  2a 38 29 29 20 80 20 31  35 0d 03 20 51 53 25 3d  |*8)) . 15.. QS%=|
00000690  28 28 3f 28 93 2b 28 32  2a 48 25 2b 56 25 2a 38  |((?(.+(2*H%+V%*8|
000006a0  30 2b 38 30 29 2a 38 29  29 20 80 20 32 34 30 29  |0+80)*8)) . 240)|
000006b0  2f 31 36 3a e7 53 25 3d  30 20 53 25 3d 28 3f 28  |/16:.S%=0 S%=(?(|
000006c0  93 2b 28 32 2a 48 25 2b  56 25 2a 38 30 2b 38 30  |.+(2*H%+V%*80+80|
000006d0  29 2a 38 29 29 20 80 20  31 35 0d 03 2a 05 e1 0d  |)*8)) . 15..*...|
000006e0  03 34 1c f4 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |.4..************|
000006f0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 0d 03 3e 0e dd  |***********..>..|
00000700  f2 67 72 61 70 68 69 63  73 0d 03 48 27 ef 32 33  |.graphics..H'.23|
00000710  2c 32 32 34 2c 35 31 2c  35 31 2c 32 30 34 2c 32  |,224,51,51,204,2|
00000720  30 34 2c 35 31 2c 35 31  2c 32 30 34 2c 32 30 34  |04,51,51,204,204|
00000730  0d 03 52 2b ef 32 33 2c  32 32 35 2c 31 32 38 2c  |..R+.23,225,128,|
00000740  31 32 38 2c 31 32 38 2c  31 32 38 2c 31 32 38 2c  |128,128,128,128,|
00000750  31 32 38 2c 31 32 38 2c  32 35 35 0d 03 5c 2b ef  |128,128,255..\+.|
00000760  32 33 2c 32 32 36 2c 32  35 35 2c 32 35 35 2c 32  |23,226,255,255,2|
00000770  35 35 2c 32 35 35 2c 32  35 35 2c 32 35 35 2c 32  |55,255,255,255,2|
00000780  35 35 2c 32 35 35 0d 03  66 20 ef 32 33 2c 32 32  |55,255..f .23,22|
00000790  37 2c 30 2c 30 2c 30 2c  30 2c 36 36 2c 31 30 32  |7,0,0,0,0,66,102|
000007a0  2c 36 30 2c 32 34 0d 03  70 12 ef 32 33 2c 31 2c  |,60,24..p..23,1,|
000007b0  30 3b 30 3b 30 3b 30 3b  0d 03 7a 0f 53 31 25 3d  |0;0;0;0;..z.S1%=|
000007c0  30 3a 53 32 25 3d 30 0d  03 84 14 62 6f 61 72 64  |0:S2%=0....board|
000007d0  3d a3 3a 70 61 64 64 6c  65 3d a3 0d 03 8e 05 e1  |=.:paddle=......|
000007e0  0d 03 98 1b f4 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |.....***********|
000007f0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 0d 03 a2 0f dd  |***********.....|
00000800  f2 6c 65 66 74 63 72 61  73 68 0d 03 ac 22 ef 31  |.leftcrash...".1|
00000810  39 2c 31 2c 39 2c 30 2c  30 2c 30 3a 53 32 25 3d  |9,1,9,0,0,0:S2%=|
00000820  53 32 25 2b 31 3a f2 73  63 6f 72 65 0d 03 b6 16  |S2%+1:.score....|
00000830  ef 31 39 2c 31 2c 31 2c  30 2c 30 2c 30 2c 31 37  |.19,1,1,0,0,0,17|
00000840  2c 33 0d 03 c0 14 e7 20  53 32 25 3d 31 30 20 f2  |,3..... S2%=10 .|
00000850  77 69 6e 6e 65 72 0d 03  ca 05 e1 0d 03 d4 1c f4  |winner..........|
00000860  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
00000870  2a 2a 2a 2a 2a 2a 2a 0d  03 de 10 dd f2 72 69 67  |*******......rig|
00000880  68 74 63 72 61 73 68 0d  03 e8 23 ef 31 39 2c 32  |htcrash...#.19,2|
00000890  2c 31 30 2c 30 2c 30 2c  30 3a 53 31 25 3d 53 31  |,10,0,0,0:S1%=S1|
000008a0  25 2b 31 3a f2 73 63 6f  72 65 0d 03 f2 16 ef 31  |%+1:.score.....1|
000008b0  39 2c 32 2c 32 2c 30 2c  30 2c 30 2c 31 37 2c 33  |9,2,2,0,0,0,17,3|
000008c0  0d 03 fc 14 e7 20 53 31  25 3d 31 30 20 f2 77 69  |..... S1%=10 .wi|
000008d0  6e 6e 65 72 0d 04 06 05  e1 0d 04 10 1d f4 2a 2a  |nner..........**|
000008e0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
000008f0  2a 2a 2a 2a 2a 2a 0d 04  1a 0a dd f2 67 72 69 64  |******......grid|
00000900  0d 04 24 0b fb 33 3a fb  31 32 38 0d 04 2e 2f e3  |..$..3:.128.../.|
00000910  46 25 3d 30 b8 32 38 20  88 32 38 3a e3 49 25 3d  |F%=0.28 .28:.I%=|
00000920  30 b8 33 39 3a f1 8a 49  25 2c 46 25 29 3b bd 32  |0.39:..I%,F%);.2|
00000930  32 36 3a ed 49 25 3a ed  46 25 0d 04 38 3a e3 46  |26:.I%:.F%..8:.F|
00000940  25 3d 31 20 b8 20 32 37  3a f1 8a 30 2c 46 25 29  |%=1 . 27:..0,F%)|
00000950  3b bd 32 32 36 3b 3a e3  49 25 3d 31 b8 33 38 3a  |;.226;:.I%=1.38:|
00000960  f1 bd 32 32 35 3b 3a ed  49 25 3a f1 bd 32 32 36  |..225;:.I%:..226|
00000970  3a ed 46 25 0d 04 42 23  46 25 3d 31 3a e3 49 25  |:.F%..B#F%=1:.I%|
00000980  3d 31 b8 33 38 3a f1 8a  49 25 2c 46 25 29 3b bd  |=1.38:..I%,F%);.|
00000990  32 32 34 3a ed 49 25 0d  04 4c 24 46 25 3d 32 39  |224:.I%..L$F%=29|
000009a0  3a e3 49 25 3d 30 b8 33  39 3a f1 8a 49 25 2c 46  |:.I%=0.39:..I%,F|
000009b0  25 29 3b bd 32 32 34 3a  ed 49 25 0d 04 56 25 58  |%);.224:.I%..V%X|
000009c0  25 3d 31 35 3a 59 25 3d  31 34 3a 41 25 3d 32 34  |%=15:Y%=14:A%=24|
000009d0  3a 42 25 3d 31 34 3a 4c  25 3d 32 3a 52 25 3d 34  |:B%=14:L%=2:R%=4|
000009e0  0d 04 60 05 e1 0d 04 6a  1e f4 2a 2a 2a 2a 2a 2a  |..`....j..******|
000009f0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
00000a00  2a 2a 2a 0d 04 74 0b dd  f2 73 63 6f 72 65 0d 04  |***..t...score..|
00000a10  7e 0e d1 3d 30 3a f5 fd  91 3d 37 35 0d 04 88 0b  |~..=0:...=75....|
00000a20  2a 46 58 32 31 2c 35 0d  04 92 0b 2a 46 58 32 31  |*FX21,5....*FX21|
00000a30  2c 37 0d 04 9c 0b 2a 46  58 32 31 2c 30 0d 04 a6  |,7....*FX21,0...|
00000a40  06 fb 33 0d 04 b0 38 f1  8a 31 35 2c 31 33 29 3b  |..3...8..15,13);|
00000a50  22 50 6c 61 79 65 72 20  31 20 3d 20 22 3b 53 31  |"Player 1 = ";S1|
00000a60  25 3b 8a 31 35 2c 31 36  29 3b 22 50 6c 61 79 65  |%;.15,16);"Playe|
00000a70  72 20 32 20 3d 20 22 3b  53 32 25 0d 04 ba 5a e7  |r 2 = ";S2%...Z.|
00000a80  20 62 6f 61 72 64 20 f1  8a 36 2c 32 38 29 3b 22  | board ..6,28);"|
00000a90  50 72 65 73 73 20 73 70  61 63 65 62 61 72 20 74  |Press spacebar t|
00000aa0  6f 20 63 6f 6e 74 69 6e  75 65 22 20 8b 20 f1 8a  |o continue" . ..|
00000ab0  36 2c 32 38 29 3b 22 50  72 65 73 73 20 66 69 72  |6,28);"Press fir|
00000ac0  65 20 62 75 74 74 6f 6e  20 74 6f 20 63 6f 6e 74  |e button to cont|
00000ad0  69 6e 75 65 22 0d 04 c4  1a e7 28 53 31 25 3d 31  |inue".....(S1%=1|
00000ae0  30 29 20 84 20 28 53 32  25 3d 31 30 29 20 e1 0d  |0) . (S2%=10) ..|
00000af0  04 ce 05 f5 0d 04 d8 1a  fd 20 a6 28 2d 39 39 29  |......... .(-99)|
00000b00  20 84 20 28 96 28 30 29  80 33 29 3c 3e 30 0d 04  | . (.(0).3)<>0..|
00000b10  e2 05 e1 0d 04 ec 1b f4  2a 2a 2a 2a 2a 2a 2a 2a  |........********|
00000b20  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 0d 04  |**************..|
00000b30  f6 0c dd f2 77 69 6e 6e  65 72 0d 05 00 27 f1 8a  |....winner...'..|
00000b40  31 30 2c 32 35 29 3b 22  50 6c 61 79 65 72 20 22  |10,25);"Player "|
00000b50  3b 3a e7 28 53 31 25 3d  31 30 29 20 f1 22 31 22  |;:.(S1%=10) ."1"|
00000b60  3b 0d 05 0a 13 e7 28 53  32 25 3d 31 30 29 20 f1  |;.....(S2%=10) .|
00000b70  22 32 22 3b 0d 05 14 13  f1 22 20 68 61 73 20 77  |"2";....." has w|
00000b80  6f 6e 2e 2e 2e 2e 22 0d  05 1e 0f 53 31 25 3d 30  |on...."....S1%=0|
00000b90  3a 53 32 25 3d 30 0d 05  28 05 f5 0d 05 32 1f e3  |:S2%=0..(....2..|
00000ba0  46 25 3d 30 b8 33 39 3a  f1 8a 46 25 2c 32 38 29  |F%=0.39:..F%,28)|
00000bb0  3b bd 32 32 36 3b 3a ed  46 25 0d 05 3c 26 f1 8a  |;.226;:.F%..<&..|
00000bc0  38 2c 32 38 29 3b 22 50  72 65 73 73 20 52 45 54  |8,28);"Press RET|
00000bd0  55 52 4e 20 74 6f 20 63  6f 6e 74 69 6e 75 65 22  |URN to continue"|
00000be0  0d 05 46 16 e3 20 50 41  55 53 45 3d 31 20 b8 20  |..F.. PAUSE=1 . |
00000bf0  31 30 30 30 3a ed 0d 05  50 1f e3 46 25 3d 30 b8  |1000:...P..F%=0.|
00000c00  33 39 3a f1 8a 46 25 2c  32 38 29 3b bd 32 32 36  |39:..F%,28);.226|
00000c10  3b 3a ed 46 25 0d 05 5a  0f fd 28 a6 28 31 30 29  |;:.F%..Z..(.(10)|
00000c20  29 3d 31 33 0d 05 64 05  e1 0d 05 6e 1b f4 2a 2a  |)=13..d....n..**|
00000c30  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
00000c40  2a 2a 2a 2a 0d 05 78 0b  dd f2 73 6f 75 6e 64 0d  |****..x...sound.|
00000c50  05 82 24 e2 32 2c 33 2c  32 2c 2d 34 2c 34 2c 35  |..$.2,3,2,-4,4,5|
00000c60  2c 35 2c 35 2c 31 32 37  2c 30 2c 30 2c 30 2c 36  |,5,5,127,0,0,0,6|
00000c70  30 2c 30 0d 05 8c 0d d4  31 2c 32 2c 31 2c 31 30  |0,0.....1,2,1,10|
00000c80  0d 05 96 0e d4 33 2c 32  2c 32 30 30 2c 31 0d 05  |.....3,2,200,1..|
00000c90  a0 05 e1 0d 05 aa 1f f4  2a 2a 2a 2a 2a 2a 2a 2a  |........********|
00000ca0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
00000cb0  2a 2a 0d 05 b4 0e dd f2  69 6e 73 74 72 75 63 74  |**......instruct|
00000cc0  0d 05 be 12 ef 32 33 2c  31 3b 30 3b 30 3b 30 3b  |.....23,1;0;0;0;|
00000cd0  30 3b 0d 05 c8 10 f1 8a  31 37 29 3b 22 44 55 45  |0;......17);"DUE|
00000ce0  4c 22 0d 05 d2 08 f1 27  27 27 0d 05 dc 1f f1 8a  |L".....'''......|
00000cf0  38 29 3b 22 20 54 48 45  20 54 57 4f 20 50 4c 41  |8);" THE TWO PLA|
00000d00  59 45 52 20 47 41 4d 45  22 0d 05 e6 31 f1 27 27  |YER GAME"...1.''|
00000d10  27 22 59 6f 75 72 20 70  6c 61 79 65 72 20 68 61  |'"Your player ha|
00000d20  73 20 62 65 65 6e 20 70  6c 61 63 65 64 20 6f 6e  |s been placed on|
00000d30  20 74 68 65 20 67 61 6d  65 22 0d 05 f0 2e f1 22  | the game"....."|
00000d40  20 20 62 6f 61 72 64 2c  20 79 6f 75 20 6d 75 73  |  board, you mus|
00000d50  74 20 20 6e 6f 74 20 20  68 69 74 20 74 68 65 20  |t  not  hit the |
00000d60  20 77 61 6c 6c 73 2c 22  0d 05 fa 2f f1 22 20 20  | walls,".../."  |
00000d70  79 6f 75 72 20 6f 77 6e  20 6f 72 20 79 6f 75 72  |your own or your|
00000d80  20 6f 70 70 6f 6e 65 6e  74 27 73 20 69 6f 6e 20  | opponent's ion |
00000d90  74 72 61 69 6c 2e 22 0d  06 04 2d f1 27 22 54 68  |trail."...-.'"Th|
00000da0  65 20 6f 62 6a 65 63 74  20 69 73 20 74 6f 20 66  |e object is to f|
00000db0  6f 72 63 65 20 79 6f 75  72 20 6f 70 70 6f 6e 65  |orce your oppone|
00000dc0  6e 74 20 22 0d 06 0e 2a  f1 22 20 20 69 6e 74 6f  |nt "...*."  into|
00000dd0  20 61 6e 20 65 72 72 6f  72 2c 20 73 75 63 68 20  | an error, such |
00000de0  61 73 20 68 69 74 74 69  6e 67 20 61 6e 22 0d 06  |as hitting an"..|
00000df0  18 22 f1 22 20 20 69 6f  6e 20 74 72 61 69 6c 20  |."."  ion trail |
00000e00  6f 72 20 74 68 65 20 77  61 6c 6c 22 27 27 27 27  |or the wall"''''|
00000e10  0d 06 22 05 f1 0d 06 2c  20 f1 8a 31 32 2c 33 30  |.."...., ..12,30|
00000e20  29 3b 22 48 69 74 20 74  68 65 20 73 70 61 63 65  |);"Hit the space|
00000e30  20 62 61 72 22 0d 06 36  08 f2 62 61 72 0d 06 40  | bar"..6..bar..@|
00000e40  05 db 0d 06 4a 10 f1 8a  31 37 29 3b 22 44 55 45  |....J...17);"DUE|
00000e50  4c 22 0d 06 54 6e f1 8a  30 2c 32 29 3b 22 54 68  |L"..Tn..0,2);"Th|
00000e60  65 20 67 61 6d 65 20 63  61 6e 20 62 65 20 70 6c  |e game can be pl|
00000e70  61 79 65 64 20 75 73 69  6e 67 20 74 77 6f 20 6d  |ayed using two m|
00000e80  65 74 68 6f 64 73 22 27  27 22 20 20 20 31 2e 20  |ethods"''"   1. |
00000e90  20 50 61 64 64 6c 65 73  22 27 27 22 20 20 20 32  | Paddles"''"   2|
00000ea0  2e 20 20 4b 65 79 62 6f  61 72 64 20 3a 20 75 73  |.  Keyboard : us|
00000eb0  65 20 6b 65 79 73 20 61  73 20 73 68 6f 77 6e 22  |e keys as shown"|
00000ec0  0d 06 5e 0c e3 46 25 3d  31 b8 31 36 0d 06 68 12  |..^..F%=1.16..h.|
00000ed0  f3 6b 65 79 2c 78 70 6f  73 2c 79 70 6f 73 0d 06  |.key,xpos,ypos..|
00000ee0  72 17 f1 8a 78 70 6f 73  2c 79 70 6f 73 29 3b bd  |r...xpos,ypos);.|
00000ef0  28 6b 65 79 29 0d 06 7c  05 ed 0d 06 86 2f f1 8a  |(key)..|...../..|
00000f00  32 2c 31 38 29 22 4c 65  66 74 20 70 6c 61 79 65  |2,18)"Left playe|
00000f10  72 22 3b 8a 32 38 2c 31  38 29 3b 22 52 69 67 68  |r";.28,18);"Righ|
00000f20  74 20 70 6c 61 79 65 72  22 0d 06 90 4d f1 8a 31  |t player"...M..1|
00000f30  35 2c 31 39 29 3b 22 50  6c 65 61 73 65 20 70 72  |5,19);"Please pr|
00000f40  65 73 73 20 22 27 27 89  28 31 33 29 22 27 50 27  |ess "''.(13)"'P'|
00000f50  20 66 6f 72 20 50 61 64  64 6c 65 73 22 27 27 89  | for Paddles"''.|
00000f60  28 31 33 29 22 27 4b 27  20 66 6f 72 20 4b 65 79  |(13)"'K' for Key|
00000f70  62 6f 61 72 64 22 0d 06  9a 2b f1 8a 35 2c 32 37  |board"...+..5,27|
00000f80  29 3b 22 27 53 27 20 66  6f 72 20 73 6f 75 6e 64  |);"'S' for sound|
00000f90  20 3a 20 27 51 27 20 66  6f 72 20 71 75 69 65 74  | : 'Q' for quiet|
00000fa0  22 0d 06 a4 20 f1 8a 31  32 2c 33 30 29 3b 22 48  |"... ..12,30);"H|
00000fb0  69 74 20 74 68 65 20 73  70 61 63 65 20 62 61 72  |it the space bar|
00000fc0  22 0d 06 ae 0b 73 6f 75  6e 64 3d 31 0d 06 b8 05  |"....sound=1....|
00000fd0  f5 0d 06 c2 05 f5 0d 06  cc 1c e7 20 a6 28 2d 37  |........... .(-7|
00000fe0  31 29 62 6f 61 72 64 3d  b9 3a 70 61 64 64 6c 65  |1)board=.:paddle|
00000ff0  3d a3 0d 06 d6 1c e7 20  a6 28 2d 35 36 29 70 61  |=...... .(-56)pa|
00001000  64 64 6c 65 3d b9 3a 62  6f 61 72 64 3d a3 0d 06  |ddle=.:board=...|
00001010  e0 13 e7 20 a6 28 2d 31  37 29 73 6f 75 6e 64 3d  |... .(-17)sound=|
00001020  30 0d 06 ea 13 fd 70 61  64 64 6c 65 20 84 20 62  |0.....paddle . b|
00001030  6f 61 72 64 0d 06 f4 09  2a 46 58 31 35 0d 06 fe  |oard....*FX15...|
00001040  0b fd a6 28 2d 39 39 29  0d 07 08 05 db 0d 07 12  |...(-99)........|
00001050  05 e1 0d 07 1c 05 e0 0d  07 26 09 dd f2 62 61 72  |.........&...bar|
00001060  0d 07 30 0b 2a 46 58 32  31 2c 30 0d 07 3a 0a f5  |..0.*FX21,0..:..|
00001070  fd a5 3d 33 32 0d 07 44  05 e1 0d 07 4e 47 dc 38  |..=32..D....NG.8|
00001080  31 2c 37 2c 31 31 2c 39  34 2c 37 2c 31 30 2c 36  |1,7,11,94,7,10,6|
00001090  35 2c 37 2c 31 34 2c 32  32 37 2c 37 2c 31 35 2c  |5,7,14,227,7,15,|
000010a0  38 38 2c 33 2c 31 32 2c  36 30 2c 32 2c 31 32 2c  |88,3,12,60,2,12,|
000010b0  36 37 2c 31 31 2c 31 32  2c 36 32 2c 31 32 2c 31  |67,11,12,62,12,1|
000010c0  32 0d 07 58 4d dc 39 31  2c 33 32 2c 31 31 2c 39  |2..XM.91,32,11,9|
000010d0  34 2c 33 32 2c 31 30 2c  34 32 2c 33 32 2c 31 34  |4,32,10,42,32,14|
000010e0  2c 32 32 37 2c 33 32 2c  31 35 2c 34 34 2c 32 38  |,227,32,15,44,28|
000010f0  2c 31 32 2c 36 30 2c 32  37 2c 31 32 2c 34 36 2c  |,12,60,27,12,46,|
00001100  33 36 2c 31 32 2c 36 32  2c 33 37 2c 31 32 0d ff  |36,12,62,37,12..|
00001110
17-02-88/DUEL.m0
17-02-88/DUEL.m1
17-02-88/DUEL.m2
17-02-88/DUEL.m4
17-02-88/DUEL.m5

© Dominic Ford 2021–2024.

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