�6:�high(9)
�high$(9):comp=0:levs=0
&high(3)=99:high(4)=299:high(5)=772
(%high(0)=-13:high(1)=27:high(2)=57
2high(6)=1088:high(7)=1599
<high(8)=2137:high(9)=3892
F!high$(0)="Bugs Bunny":�let(9)
P%high$(1)="Qbert":high$(2)="Dizzy"
Zhigh$(3)="Mario"
dhigh$(4)="Edd the duck"
n%high$(5)="Toby":high$(6)="Repton"
xhigh$(7)="Super Mario"
�%high$(8)="Beano":high$(9)="Woozy"
��15,0);"Lemmings";�15,1);
��;"========":�lo=9�0�-1
��19,1,7 � 15-lo,0;0;0;
��0,15-lo);high$(lo)
��17,15-lo);:SCORE=high(lo)
��well:�34,15-lo);high(lo)
��
��16,20);"Level:";l
�
�l<1��t~@
��load:�5:�load2
��open:Ti=�
��lemmings:�graphics:�key
��comp=1��thB
�	�d\@
�)��load:let=0:as=0:ad=&3000:poke=&5800

 �14,20);"Press Space";:go=3

K$=�:�K$=" "��TXA��TNA

/�l �5=1��comp=1��l<>1��"LOAD Disp"+l:�&3000

 �

"�"LOAD Lem"+�l

,4P$=�:v=�(p$):?&D3D+let=v:let=let+1:�let<>10��TlA

6�lo=0�9:let=0:os=0

@�?lo<>?lo+&30�os=1

J-�:�os=1�go=go-1:�go=0�let=0:os=0:�7:�TDA

T�os<>1��DrA

jSCORE=(L-1)*50

m�

o��load2

r�"LOAD lem"+l+".5"

w�5,30);"Please Wait..."

|xr=?ad:yr=?ad+1:ad=ad+2

�!�yr=0��dBA��lop=pokeTOpoke+yr

� ?poke=xr:poke=poke+1:�:�D|A

��:�14,5);"Lemmings:";?&D01

��16,7);"Save:";?&D02

�$�lo=0�9:�15+lo,9);�(?&D0F+lo):�

�,�14,11);"Press Space":�(-99)��DtA��txA

��5

�)�lope=&3000�&5800:?lope=?lope+&2800:�

�1In=0:Out=0:nuke=0:Come=?&D01:Type=0:Spe=?&D28

�'�19,0,?&D03,0;0;0;19,1,?&D04,0;0;0;

�'�19,2,?&D05,0;0;0;19,3,?&D06,0;0;0;

��5,27);:�lo=0�9

�&�;�(?&DOF+lo);�:curs=100:curs2=100

��2,28);"In:    Out:"
�0,29);"Score:     Speed:"
�
��well:��TzB
&�r,m$:�SCORE<r ��;m$;:�
0	�TfB
:�0,"Lemming Killer"
D�50,"Terrible"
N�150,"Very Bad"
X�350,"Bad"
b�500,"O.K."
l�750,"Quite Good"
v�1500,"Good"
��2000,"Very Good"
��3000,"Excellent"
��4750,"Master"
��6000,"King"
�$l=l+1:�Ti>�-12000�SCORE=SCORE+50
�� In=>?&D02��6��dnB
��l=41��TVC
��lMOD5=1��"LOAD Disp"+l
��"LOAD Lem"+l:�lo=0�9
��?&D1D+lo:�:�load2
�	�dR@
��3:�5,10);"Game Over"
��x=0�2500:�
�6:�SCORE>HIGH(0)��name
�:�tL@
$�6:�10,5);"Lemmings Completed!"
 	�dnB
*"��name:�"What is your name";n$
4,I=0:P=0:�SCORE<high(1)�high(0)=SCORE:I=1
>2�l=1�8:�SCORE>HIGH(1)��SCORE<HIGH(l+1)�P=l:I=1
H�:�I=0 �P=9
R=�lo=1�9:� P>lo �high(lo-1)=high(l):high$(lo-1)=high$(l):�
\7high(p-1)=high(p):high$(p-1)=high$(p):high(p)=SCORE
fhigh$(p)=n$:�
p	��key
z�(-90)��pause
��(-106)�comp=1
��(-2)�Type=Type-1
��(-66)�Type=Type+1
��(-82)�curs=curs-7
��(-51)�curs=curs+7
��(-105)�curs2=curs2-7
��(-73)�curs2=curs2+7
�*�(-74)��?&D29+Type<>0�cli=1:�7 �cli=0
��
���pause
��(-1)�� ��dhC
���graphics
��lo=0�&D01
�Type=loTHENCOLOUR1 ��3
�;�(128);" ";:�
�3,31);:�lo=0�6
$�;?&D28+lo;" ";:�
.�
8
��open
B
EDPROC
�

00000000  0d 00 0a 0f eb 36 3a de  68 69 67 68 28 39 29 0d  |.....6:.high(9).|
00000010  00 14 1b de 68 69 67 68  24 28 39 29 3a 63 6f 6d  |....high$(9):com|
00000020  70 3d 30 3a 6c 65 76 73  3d 30 0d 00 1e 26 68 69  |p=0:levs=0...&hi|
00000030  67 68 28 33 29 3d 39 39  3a 68 69 67 68 28 34 29  |gh(3)=99:high(4)|
00000040  3d 32 39 39 3a 68 69 67  68 28 35 29 3d 37 37 32  |=299:high(5)=772|
00000050  0d 00 28 25 68 69 67 68  28 30 29 3d 2d 31 33 3a  |..(%high(0)=-13:|
00000060  68 69 67 68 28 31 29 3d  32 37 3a 68 69 67 68 28  |high(1)=27:high(|
00000070  32 29 3d 35 37 0d 00 32  1d 68 69 67 68 28 36 29  |2)=57..2.high(6)|
00000080  3d 31 30 38 38 3a 68 69  67 68 28 37 29 3d 31 35  |=1088:high(7)=15|
00000090  39 39 0d 00 3c 1d 68 69  67 68 28 38 29 3d 32 31  |99..<.high(8)=21|
000000a0  33 37 3a 68 69 67 68 28  39 29 3d 33 38 39 32 0d  |37:high(9)=3892.|
000000b0  00 46 21 68 69 67 68 24  28 30 29 3d 22 42 75 67  |.F!high$(0)="Bug|
000000c0  73 20 42 75 6e 6e 79 22  3a de 6c 65 74 28 39 29  |s Bunny":.let(9)|
000000d0  0d 00 50 25 68 69 67 68  24 28 31 29 3d 22 51 62  |..P%high$(1)="Qb|
000000e0  65 72 74 22 3a 68 69 67  68 24 28 32 29 3d 22 44  |ert":high$(2)="D|
000000f0  69 7a 7a 79 22 0d 00 5a  14 68 69 67 68 24 28 33  |izzy"..Z.high$(3|
00000100  29 3d 22 4d 61 72 69 6f  22 0d 00 64 1b 68 69 67  |)="Mario"..d.hig|
00000110  68 24 28 34 29 3d 22 45  64 64 20 74 68 65 20 64  |h$(4)="Edd the d|
00000120  75 63 6b 22 0d 00 6e 25  68 69 67 68 24 28 35 29  |uck"..n%high$(5)|
00000130  3d 22 54 6f 62 79 22 3a  68 69 67 68 24 28 36 29  |="Toby":high$(6)|
00000140  3d 22 52 65 70 74 6f 6e  22 0d 00 78 1a 68 69 67  |="Repton"..x.hig|
00000150  68 24 28 37 29 3d 22 53  75 70 65 72 20 4d 61 72  |h$(7)="Super Mar|
00000160  69 6f 22 0d 00 82 25 68  69 67 68 24 28 38 29 3d  |io"...%high$(8)=|
00000170  22 42 65 61 6e 6f 22 3a  68 69 67 68 24 28 39 29  |"Beano":high$(9)|
00000180  3d 22 57 6f 6f 7a 79 22  0d 00 8c 1e f1 8a 31 35  |="Woozy"......15|
00000190  2c 30 29 3b 22 4c 65 6d  6d 69 6e 67 73 22 3b 8a  |,0);"Lemmings";.|
000001a0  31 35 2c 31 29 3b 0d 00  96 1b f1 3b 22 3d 3d 3d  |15,1);.....;"===|
000001b0  3d 3d 3d 3d 3d 22 3a e3  6c 6f 3d 39 b8 30 88 2d  |=====":.lo=9.0.-|
000001c0  31 0d 00 9b 1a ef 31 39  2c 31 2c 37 20 83 20 31  |1.....19,1,7 . 1|
000001d0  35 2d 6c 6f 2c 30 3b 30  3b 30 3b 0d 00 a0 18 f1  |5-lo,0;0;0;.....|
000001e0  8a 30 2c 31 35 2d 6c 6f  29 3b 68 69 67 68 24 28  |.0,15-lo);high$(|
000001f0  6c 6f 29 0d 00 aa 1f f1  8a 31 37 2c 31 35 2d 6c  |lo)......17,15-l|
00000200  6f 29 3b 3a 53 43 4f 52  45 3d 68 69 67 68 28 6c  |o);:SCORE=high(l|
00000210  6f 29 0d 00 b4 1e f2 77  65 6c 6c 3a f1 8a 33 34  |o).....well:..34|
00000220  2c 31 35 2d 6c 6f 29 3b  68 69 67 68 28 6c 6f 29  |,15-lo);high(lo)|
00000230  0d 00 b9 05 ed 0d 00 be  17 e8 8a 31 36 2c 32 30  |...........16,20|
00000240  29 3b 22 4c 65 76 65 6c  3a 22 3b 6c 0d 00 c3 0d  |);"Level:";l....|
00000250  e7 6c 3c 31 8c 8d 74 7e  40 0d 00 c8 13 f2 6c 6f  |.l<1..t~@.....lo|
00000260  61 64 3a eb 35 3a f2 6c  6f 61 64 32 0d 00 d2 0e  |ad:.5:.load2....|
00000270  f2 6f 70 65 6e 3a 54 69  3d 91 0d 00 dc 1c f2 6c  |.open:Ti=......l|
00000280  65 6d 6d 69 6e 67 73 3a  f2 67 72 61 70 68 69 63  |emmings:.graphic|
00000290  73 3a f2 6b 65 79 0d 00  e6 10 e7 63 6f 6d 70 3d  |s:.key.....comp=|
000002a0  31 8c 8d 74 68 42 0d 00  f0 09 e5 8d 64 5c 40 0d  |1..thB......d\@.|
000002b0  00 fa 29 dd f2 6c 6f 61  64 3a 6c 65 74 3d 30 3a  |..)..load:let=0:|
000002c0  61 73 3d 30 3a 61 64 3d  26 33 30 30 30 3a 70 6f  |as=0:ad=&3000:po|
000002d0  6b 65 3d 26 35 38 30 30  0d 01 04 20 f1 8a 31 34  |ke=&5800... ..14|
000002e0  2c 32 30 29 3b 22 50 72  65 73 73 20 53 70 61 63  |,20);"Press Spac|
000002f0  65 22 3b 3a 67 6f 3d 33  0d 01 0e 1a 4b 24 3d be  |e";:go=3....K$=.|
00000300  3a e7 4b 24 3d 22 20 22  8c 8d 54 58 41 8b 8d 54  |:.K$=" "..TXA..T|
00000310  4e 41 0d 01 18 2f e7 6c  20 83 35 3d 31 8c e7 63  |NA.../.l .5=1..c|
00000320  6f 6d 70 3d 31 8c e7 6c  3c 3e 31 8c ff 22 4c 4f  |omp=1..l<>1.."LO|
00000330  41 44 20 44 69 73 70 22  2b 6c 3a d6 26 33 30 30  |AD Disp"+l:.&300|
00000340  30 0d 01 1d 06 20 f1 0d  01 22 12 ff 22 4c 4f 41  |0.... ...".."LOA|
00000350  44 20 4c 65 6d 22 2b c3  6c 0d 01 2c 34 50 24 3d  |D Lem"+.l..,4P$=|
00000360  be 3a 76 3d 97 28 70 24  29 3a 3f 26 44 33 44 2b  |.:v=.(p$):?&D3D+|
00000370  6c 65 74 3d 76 3a 6c 65  74 3d 6c 65 74 2b 31 3a  |let=v:let=let+1:|
00000380  e7 6c 65 74 3c 3e 31 30  8c 8d 54 6c 41 0d 01 36  |.let<>10..TlA..6|
00000390  16 e3 6c 6f 3d 30 b8 39  3a 6c 65 74 3d 30 3a 6f  |..lo=0.9:let=0:o|
000003a0  73 3d 30 0d 01 40 16 e7  3f 6c 6f 3c 3e 3f 6c 6f  |s=0..@..?lo<>?lo|
000003b0  2b 26 33 30 8c 6f 73 3d  31 0d 01 4a 2d ed 3a e7  |+&30.os=1..J-.:.|
000003c0  6f 73 3d 31 8c 67 6f 3d  67 6f 2d 31 3a e7 67 6f  |os=1.go=go-1:.go|
000003d0  3d 30 8c 6c 65 74 3d 30  3a 6f 73 3d 30 3a ef 37  |=0.let=0:os=0:.7|
000003e0  3a e5 8d 54 44 41 0d 01  54 0f e7 6f 73 3c 3e 31  |:..TDA..T..os<>1|
000003f0  8c 8d 44 72 41 0d 01 6a  12 53 43 4f 52 45 3d 28  |..DrA..j.SCORE=(|
00000400  4c 2d 31 29 2a 35 30 0d  01 6d 05 e1 0d 01 6f 0b  |L-1)*50..m....o.|
00000410  dd f2 6c 6f 61 64 32 0d  01 72 16 ff 22 4c 4f 41  |..load2..r.."LOA|
00000420  44 20 6c 65 6d 22 2b 6c  2b 22 2e 35 22 0d 01 77  |D lem"+l+".5"..w|
00000430  1c f1 8a 35 2c 33 30 29  3b 22 50 6c 65 61 73 65  |...5,30);"Please|
00000440  20 57 61 69 74 2e 2e 2e  22 0d 01 7c 1b 78 72 3d  | Wait..."..|.xr=|
00000450  3f 61 64 3a 79 72 3d 3f  61 64 2b 31 3a 61 64 3d  |?ad:yr=?ad+1:ad=|
00000460  61 64 2b 32 0d 01 86 21  e7 79 72 3d 30 8c 8d 64  |ad+2...!.yr=0..d|
00000470  42 41 8b e3 6c 6f 70 3d  70 6f 6b 65 54 4f 70 6f  |BA..lop=pokeTOpo|
00000480  6b 65 2b 79 72 0d 01 90  20 3f 70 6f 6b 65 3d 78  |ke+yr... ?poke=x|
00000490  72 3a 70 6f 6b 65 3d 70  6f 6b 65 2b 31 3a ed 3a  |r:poke=poke+1:.:|
000004a0  e5 8d 44 7c 41 0d 01 9a  1f db 3a f1 8a 31 34 2c  |..D|A.....:..14,|
000004b0  35 29 3b 22 4c 65 6d 6d  69 6e 67 73 3a 22 3b 3f  |5);"Lemmings:";?|
000004c0  26 44 30 31 0d 01 a4 19  f1 8a 31 36 2c 37 29 3b  |&D01......16,7);|
000004d0  22 53 61 76 65 3a 22 3b  3f 26 44 30 32 0d 01 ae  |"Save:";?&D02...|
000004e0  24 e3 6c 6f 3d 30 b8 39  3a f1 8a 31 35 2b 6c 6f  |$.lo=0.9:..15+lo|
000004f0  2c 39 29 3b bd 28 3f 26  44 30 46 2b 6c 6f 29 3a  |,9);.(?&D0F+lo):|
00000500  ed 0d 01 b8 2c f1 8a 31  34 2c 31 31 29 3b 22 50  |....,..14,11);"P|
00000510  72 65 73 73 20 53 70 61  63 65 22 3a e7 a6 28 2d  |ress Space":..(-|
00000520  39 39 29 8c 8d 44 74 41  8b 8d 74 78 41 0d 01 bd  |99)..DtA..txA...|
00000530  06 eb 35 0d 01 c2 29 e3  6c 6f 70 65 3d 26 33 30  |..5...).lope=&30|
00000540  30 30 b8 26 35 38 30 30  3a 3f 6c 6f 70 65 3d 3f  |00.&5800:?lope=?|
00000550  6c 6f 70 65 2b 26 32 38  30 30 3a ed 0d 01 cc 31  |lope+&2800:....1|
00000560  49 6e 3d 30 3a 4f 75 74  3d 30 3a 6e 75 6b 65 3d  |In=0:Out=0:nuke=|
00000570  30 3a 43 6f 6d 65 3d 3f  26 44 30 31 3a 54 79 70  |0:Come=?&D01:Typ|
00000580  65 3d 30 3a 53 70 65 3d  3f 26 44 32 38 0d 01 d6  |e=0:Spe=?&D28...|
00000590  27 ef 31 39 2c 30 2c 3f  26 44 30 33 2c 30 3b 30  |'.19,0,?&D03,0;0|
000005a0  3b 30 3b 31 39 2c 31 2c  3f 26 44 30 34 2c 30 3b  |;0;19,1,?&D04,0;|
000005b0  30 3b 30 3b 0d 01 e0 27  ef 31 39 2c 32 2c 3f 26  |0;0;...'.19,2,?&|
000005c0  44 30 35 2c 30 3b 30 3b  30 3b 31 39 2c 33 2c 3f  |D05,0;0;0;19,3,?|
000005d0  26 44 30 36 2c 30 3b 30  3b 30 3b 0d 01 ea 14 f1  |&D06,0;0;0;.....|
000005e0  8a 35 2c 32 37 29 3b 3a  e3 6c 6f 3d 30 b8 39 0d  |.5,27);:.lo=0.9.|
000005f0  01 f4 26 f1 3b bd 28 3f  26 44 4f 46 2b 6c 6f 29  |..&.;.(?&DOF+lo)|
00000600  3b ed 3a 63 75 72 73 3d  31 30 30 3a 63 75 72 73  |;.:curs=100:curs|
00000610  32 3d 31 30 30 0d 01 fe  19 f1 8a 32 2c 32 38 29  |2=100......2,28)|
00000620  3b 22 49 6e 3a 20 20 20  20 4f 75 74 3a 22 0d 02  |;"In:    Out:"..|
00000630  08 1f f1 8a 30 2c 32 39  29 3b 22 53 63 6f 72 65  |....0,29);"Score|
00000640  3a 20 20 20 20 20 53 70  65 65 64 3a 22 0d 02 12  |:     Speed:"...|
00000650  05 e1 0d 02 1c 10 dd f2  77 65 6c 6c 3a f7 8d 54  |........well:..T|
00000660  7a 42 0d 02 26 1b f3 72  2c 6d 24 3a e7 53 43 4f  |zB..&..r,m$:.SCO|
00000670  52 45 3c 72 20 8c f1 3b  6d 24 3b 3a e1 0d 02 30  |RE<r ..;m$;:...0|
00000680  09 e5 8d 54 66 42 0d 02  3a 17 dc 30 2c 22 4c 65  |...TfB..:..0,"Le|
00000690  6d 6d 69 6e 67 20 4b 69  6c 6c 65 72 22 0d 02 44  |mming Killer"..D|
000006a0  12 dc 35 30 2c 22 54 65  72 72 69 62 6c 65 22 0d  |..50,"Terrible".|
000006b0  02 4e 13 dc 31 35 30 2c  22 56 65 72 79 20 42 61  |.N..150,"Very Ba|
000006c0  64 22 0d 02 58 0e dc 33  35 30 2c 22 42 61 64 22  |d"..X..350,"Bad"|
000006d0  0d 02 62 0f dc 35 30 30  2c 22 4f 2e 4b 2e 22 0d  |..b..500,"O.K.".|
000006e0  02 6c 15 dc 37 35 30 2c  22 51 75 69 74 65 20 47  |.l..750,"Quite G|
000006f0  6f 6f 64 22 0d 02 76 10  dc 31 35 30 30 2c 22 47  |ood"..v..1500,"G|
00000700  6f 6f 64 22 0d 02 80 15  dc 32 30 30 30 2c 22 56  |ood".....2000,"V|
00000710  65 72 79 20 47 6f 6f 64  22 0d 02 8a 15 dc 33 30  |ery Good".....30|
00000720  30 30 2c 22 45 78 63 65  6c 6c 65 6e 74 22 0d 02  |00,"Excellent"..|
00000730  94 12 dc 34 37 35 30 2c  22 4d 61 73 74 65 72 22  |...4750,"Master"|
00000740  0d 02 9e 10 dc 36 30 30  30 2c 22 4b 69 6e 67 22  |.....6000,"King"|
00000750  0d 02 a8 24 6c 3d 6c 2b  31 3a e7 54 69 3e 91 2d  |...$l=l+1:.Ti>.-|
00000760  31 32 30 30 30 8c 53 43  4f 52 45 3d 53 43 4f 52  |12000.SCORE=SCOR|
00000770  45 2b 35 30 0d 02 b2 17  e7 20 49 6e 3d 3e 3f 26  |E+50..... In=>?&|
00000780  44 30 32 8c eb 36 8b 8d  64 6e 42 0d 02 bc 0e e7  |D02..6..dnB.....|
00000790  6c 3d 34 31 8c 8d 54 56  43 0d 02 c6 1b e7 6c 4d  |l=41..TVC.....lM|
000007a0  4f 44 35 3d 31 8c ff 22  4c 4f 41 44 20 44 69 73  |OD5=1.."LOAD Dis|
000007b0  70 22 2b 6c 0d 02 d0 19  ff 22 4c 4f 41 44 20 4c  |p"+l....."LOAD L|
000007c0  65 6d 22 2b 6c 3a e3 6c  6f 3d 30 b8 39 0d 02 da  |em"+l:.lo=0.9...|
000007d0  16 ef 3f 26 44 31 44 2b  6c 6f 3a ed 3a f2 6c 6f  |..?&D1D+lo:.:.lo|
000007e0  61 64 32 0d 02 e4 09 e5  8d 64 52 40 0d 02 ee 1a  |ad2......dR@....|
000007f0  fb 33 3a f1 8a 35 2c 31  30 29 3b 22 47 61 6d 65  |.3:..5,10);"Game|
00000800  20 4f 76 65 72 22 0d 02  f8 0f e3 78 3d 30 b8 32  | Over".....x=0.2|
00000810  35 30 30 3a ed 0d 03 02  1b eb 36 3a e7 53 43 4f  |500:......6:.SCO|
00000820  52 45 3e 48 49 47 48 28  30 29 8c f2 6e 61 6d 65  |RE>HIGH(0)..name|
00000830  0d 03 0c 0b db 3a e5 8d  74 4c 40 0d 03 16 24 eb  |.....:..tL@...$.|
00000840  36 3a f1 8a 31 30 2c 35  29 3b 22 4c 65 6d 6d 69  |6:..10,5);"Lemmi|
00000850  6e 67 73 20 43 6f 6d 70  6c 65 74 65 64 21 22 0d  |ngs Completed!".|
00000860  03 20 09 e5 8d 64 6e 42  0d 03 2a 22 dd f2 6e 61  |. ...dnB..*"..na|
00000870  6d 65 3a e8 22 57 68 61  74 20 69 73 20 79 6f 75  |me:."What is you|
00000880  72 20 6e 61 6d 65 22 3b  6e 24 0d 03 34 2c 49 3d  |r name";n$..4,I=|
00000890  30 3a 50 3d 30 3a e7 53  43 4f 52 45 3c 68 69 67  |0:P=0:.SCORE<hig|
000008a0  68 28 31 29 8c 68 69 67  68 28 30 29 3d 53 43 4f  |h(1).high(0)=SCO|
000008b0  52 45 3a 49 3d 31 0d 03  3e 32 e3 6c 3d 31 b8 38  |RE:I=1..>2.l=1.8|
000008c0  3a e7 53 43 4f 52 45 3e  48 49 47 48 28 31 29 8c  |:.SCORE>HIGH(1).|
000008d0  e7 53 43 4f 52 45 3c 48  49 47 48 28 6c 2b 31 29  |.SCORE<HIGH(l+1)|
000008e0  8c 50 3d 6c 3a 49 3d 31  0d 03 48 0f ed 3a e7 49  |.P=l:I=1..H..:.I|
000008f0  3d 30 20 8c 50 3d 39 0d  03 52 3d e3 6c 6f 3d 31  |=0 .P=9..R=.lo=1|
00000900  b8 39 3a e7 20 50 3e 6c  6f 20 8c 68 69 67 68 28  |.9:. P>lo .high(|
00000910  6c 6f 2d 31 29 3d 68 69  67 68 28 6c 29 3a 68 69  |lo-1)=high(l):hi|
00000920  67 68 24 28 6c 6f 2d 31  29 3d 68 69 67 68 24 28  |gh$(lo-1)=high$(|
00000930  6c 29 3a ed 0d 03 5c 37  68 69 67 68 28 70 2d 31  |l):...\7high(p-1|
00000940  29 3d 68 69 67 68 28 70  29 3a 68 69 67 68 24 28  |)=high(p):high$(|
00000950  70 2d 31 29 3d 68 69 67  68 24 28 70 29 3a 68 69  |p-1)=high$(p):hi|
00000960  67 68 28 70 29 3d 53 43  4f 52 45 0d 03 66 11 68  |gh(p)=SCORE..f.h|
00000970  69 67 68 24 28 70 29 3d  6e 24 3a e1 0d 03 70 09  |igh$(p)=n$:...p.|
00000980  dd f2 6b 65 79 0d 03 7a  12 e7 a6 28 2d 39 30 29  |..key..z...(-90)|
00000990  8c f2 70 61 75 73 65 0d  03 84 13 e7 a6 28 2d 31  |..pause......(-1|
000009a0  30 36 29 8c 63 6f 6d 70  3d 31 0d 03 8e 16 e7 a6  |06).comp=1......|
000009b0  28 2d 32 29 8c 54 79 70  65 3d 54 79 70 65 2d 31  |(-2).Type=Type-1|
000009c0  0d 03 98 17 e7 a6 28 2d  36 36 29 8c 54 79 70 65  |......(-66).Type|
000009d0  3d 54 79 70 65 2b 31 0d  03 a2 17 e7 a6 28 2d 38  |=Type+1......(-8|
000009e0  32 29 8c 63 75 72 73 3d  63 75 72 73 2d 37 0d 03  |2).curs=curs-7..|
000009f0  ac 17 e7 a6 28 2d 35 31  29 8c 63 75 72 73 3d 63  |....(-51).curs=c|
00000a00  75 72 73 2b 37 0d 03 b6  1a e7 a6 28 2d 31 30 35  |urs+7......(-105|
00000a10  29 8c 63 75 72 73 32 3d  63 75 72 73 32 2d 37 0d  |).curs2=curs2-7.|
00000a20  03 c0 19 e7 a6 28 2d 37  33 29 8c 63 75 72 73 32  |.....(-73).curs2|
00000a30  3d 63 75 72 73 32 2b 37  0d 03 ca 2a e7 a6 28 2d  |=curs2+7...*..(-|
00000a40  37 34 29 8c e7 3f 26 44  32 39 2b 54 79 70 65 3c  |74)..?&D29+Type<|
00000a50  3e 30 8c 63 6c 69 3d 31  3a ef 37 20 8b 63 6c 69  |>0.cli=1:.7 .cli|
00000a60  3d 30 0d 03 d4 05 e1 0d  03 de 0b dd f2 70 61 75  |=0...........pau|
00000a70  73 65 0d 03 e8 12 e7 a6  28 2d 31 29 8c e1 20 8b  |se......(-1).. .|
00000a80  8d 64 68 43 0d 03 f2 0e  dd f2 67 72 61 70 68 69  |.dhC......graphi|
00000a90  63 73 0d 03 fc 0e e3 6c  6f 3d 30 b8 26 44 30 31  |cs.....lo=0.&D01|
00000aa0  0d 04 06 1b e7 54 79 70  65 3d 6c 6f 54 48 45 4e  |.....Type=loTHEN|
00000ab0  43 4f 4c 4f 55 52 31 20  8b fb 33 0d 04 10 13 f1  |COLOUR1 ..3.....|
00000ac0  3b bd 28 31 32 38 29 3b  22 20 22 3b 3a ed 0d 04  |;.(128);" ";:...|
00000ad0  1a 14 f1 8a 33 2c 33 31  29 3b 3a e3 6c 6f 3d 30  |....3,31);:.lo=0|
00000ae0  b8 36 0d 04 24 15 f1 3b  3f 26 44 32 38 2b 6c 6f  |.6..$..;?&D28+lo|
00000af0  3b 22 20 22 3b 3a ed 0d  04 2e 05 e1 0d 04 38 0a  |;" ";:........8.|
00000b00  dd f2 6f 70 65 6e 0d 04  42 0a 45 44 50 52 4f 43  |..open..B.EDPROC|
00000b10  0d ff                                             |..|
00000b12