� TeleSys Menu system
� �

*FX4,2
(P�7:�23;10,1;0;0;0;23;8,144,0;0;0;23;9,9,0;0;0;23;10,&69,0;0;0;23;8202;0;0;0;
2*FX210,1
<�O$="����������� ���������������":�A(2,0,O$):O$="����������� �������������":�A(2,1,O$):O$=" ����������������":�A(2,2,O$):O$=" ���������������������":�A(2,3,O$)
F�0,0):�A=0�3:�131�157:�A
P	�menu
Z�
dX��A(X,Y,O$):�X,Y);:�P=1��O$:�255:�O$,P,1);:�8,8:�O$,P,1);:�0,-7,253,1:�P:�9,127:�
n��load:�"$.DataA":�
x
��menu
��O$="TeleSys Generator":�A(12,8,O$):O$="TeleSys Instructions":�A(12,9,O$):O$="Teletext Guide":�A(12,10,O$):O$="Keycode program":�A(12,11,O$):O$="Communitel/MODE7 convert":�A(12,12,O$)
��O$="MODE7/Communitel convert":�A(12,13,O$):O$="Screen/BASIC convert":�A(12,14,O$):O$="Sample screens (BASIC)":�A(12,15,O$):O$="Exit menu":�A(12,16,O$)
���x:X=�12:�
�w�8,8)"�A.":�x:�8,8)"�A.":�x:�8,8)"�A.":�x:�8,8)"�A.�":�8,9)"�B.":�x:�8,9)"�B.":�x:�8,9)"�B.":�x:�8,9)"�B.�"
��8,10)"�C.":�x:�8,10)"�C.":�x:�8,10)"�C.":�x:�8,10)"�C.�":�8,11)"�D.":�x:�8,11)"�D.":�x:�8,11)"�D.":�x:�8,11)"�D.�"
��8,12)"�E.":�x:�8,12)"�E.":�x:�8,12)"�E.":�x:�8,12)"�E.�":�8,13)"�F.":�x:�8,13)"�F.":�x:�8,13)"�F.":�x:�8,13)"�F.�"
�A�8,14)"�G.":�x:�8,14)"�G.":�x:�8,14)"�G.":�x:�8,14)"�G.�"
��8,15)"�H.":�x:�8,15)"�H.":�x:�8,15)"�H.":�x:�8,15)"�H.�":�8,16)"�I.":�x:�8,16)"�I.":�x:�8,16)"�I.":�x:�8,16)"�I.�"
�>O$="�CevaSoft Software Unlimited 1988":�A(2,23,O$):�list:�
�
��list
�A=�
�� A=65 �"gen"
�� A=66 �"Instr"

� A=67 �"Guide"

� A=68 �"Keys"

� A=69 �"Conv1"

"� A=70 �"Conv2"

,� A=71 �"Conv3"

6� A=72 �"Sample"

@� A=73 �!-4:�

J
� �df@
�

00000000  0d 00 0a 19 f4 20 54 65  6c 65 53 79 73 20 4d 65  |..... TeleSys Me|
00000010  6e 75 20 73 79 73 74 65  6d 0d 00 14 08 ee 85 20  |nu system...... |
00000020  f9 0d 00 1e 0a 2a 46 58  34 2c 32 0d 00 28 50 eb  |.....*FX4,2..(P.|
00000030  37 3a ef 32 33 3b 31 30  2c 31 3b 30 3b 30 3b 30  |7:.23;10,1;0;0;0|
00000040  3b 32 33 3b 38 2c 31 34  34 2c 30 3b 30 3b 30 3b  |;23;8,144,0;0;0;|
00000050  32 33 3b 39 2c 39 2c 30  3b 30 3b 30 3b 32 33 3b  |23;9,9,0;0;0;23;|
00000060  31 30 2c 26 36 39 2c 30  3b 30 3b 30 3b 32 33 3b  |10,&69,0;0;0;23;|
00000070  38 32 30 32 3b 30 3b 30  3b 30 3b 0d 00 32 0c 2a  |8202;0;0;0;..2.*|
00000080  46 58 32 31 30 2c 31 0d  00 3c cb 4f 24 3d 22 91  |FX210,1..<.O$=".|
00000090  af ff ff af ea ff bf af  a5 ff ff e8 20 e8 ff bf  |............ ...|
000000a0  af a5 fe ff af af ea ff  a0 ff b5 fe ff af af e8  |................|
000000b0  22 3a f2 41 28 32 2c 30  2c 4f 24 29 3a 4f 24 3d  |":.A(2,0,O$):O$=|
000000c0  22 91 a2 ff ff ea ea ff  fd b4 b5 ff ff ea 20 ea  |"............. .|
000000d0  ff fd b4 b5 ef ff fc f6  aa ff fc ff a5 ef ff fc  |................|
000000e0  f6 e1 22 3a f2 41 28 32  2c 31 2c 4f 24 29 3a 4f  |..":.A(2,1,O$):O|
000000f0  24 3d 22 20 91 ff ff ea  ea ff f5 f2 b1 ff ff f2  |$=" ............|
00000100  f0 ea ff f5 f2 b1 f1 fa  ff ff ea ea ff b5 b5 f1  |................|
00000110  fa ff ff ea 22 3a f2 41  28 32 2c 32 2c 4f 24 29  |....":.A(2,2,O$)|
00000120  3a 4f 24 3d 22 20 91 e3  f3 fa a2 f3 f3 f3 f1 e3  |:O$=" ..........|
00000130  f3 f3 f3 f8 e3 f3 f3 f9  e3 f3 f3 f9 a7 a2 f3 f9  |................|
00000140  a5 e3 f3 f3 f9 a7 22 3a  f2 41 28 32 2c 33 2c 4f  |......":.A(2,3,O|
00000150  24 29 0d 00 46 1e f1 8a  30 2c 30 29 3a e3 41 3d  |$)..F...0,0):.A=|
00000160  30 b8 33 3a f1 bd 31 33  31 bd 31 35 37 3a ed 41  |0.3:..131.157:.A|
00000170  0d 00 50 09 f2 6d 65 6e  75 0d 00 5a 05 e0 0d 00  |..P..menu..Z....|
00000180  64 58 dd f2 41 28 58 2c  59 2c 4f 24 29 3a f1 8a  |dX..A(X,Y,O$):..|
00000190  58 2c 59 29 3b 3a e3 50  3d 31 b8 a9 4f 24 3a ef  |X,Y);:.P=1..O$:.|
000001a0  32 35 35 3a f1 c1 4f 24  2c 50 2c 31 29 3b 3a ef  |255:..O$,P,1);:.|
000001b0  38 2c 38 3a f1 c1 4f 24  2c 50 2c 31 29 3b 3a d4  |8,8:..O$,P,1);:.|
000001c0  30 2c 2d 37 2c 32 35 33  2c 31 3a ed 50 3a ef 39  |0,-7,253,1:.P:.9|
000001d0  2c 31 32 37 3a e1 0d 00  6e 17 dd f2 6c 6f 61 64  |,127:...n...load|
000001e0  3a d7 22 24 2e 44 61 74  61 41 22 3a e1 0d 00 78  |:."$.DataA":...x|
000001f0  0a dd f2 6d 65 6e 75 0d  00 82 ba 4f 24 3d 22 54  |...menu....O$="T|
00000200  65 6c 65 53 79 73 20 47  65 6e 65 72 61 74 6f 72  |eleSys Generator|
00000210  22 3a f2 41 28 31 32 2c  38 2c 4f 24 29 3a 4f 24  |":.A(12,8,O$):O$|
00000220  3d 22 54 65 6c 65 53 79  73 20 49 6e 73 74 72 75  |="TeleSys Instru|
00000230  63 74 69 6f 6e 73 22 3a  f2 41 28 31 32 2c 39 2c  |ctions":.A(12,9,|
00000240  4f 24 29 3a 4f 24 3d 22  54 65 6c 65 74 65 78 74  |O$):O$="Teletext|
00000250  20 47 75 69 64 65 22 3a  f2 41 28 31 32 2c 31 30  | Guide":.A(12,10|
00000260  2c 4f 24 29 3a 4f 24 3d  22 4b 65 79 63 6f 64 65  |,O$):O$="Keycode|
00000270  20 70 72 6f 67 72 61 6d  22 3a f2 41 28 31 32 2c  | program":.A(12,|
00000280  31 31 2c 4f 24 29 3a 4f  24 3d 22 43 6f 6d 6d 75  |11,O$):O$="Commu|
00000290  6e 69 74 65 6c 2f 4d 4f  44 45 37 20 63 6f 6e 76  |nitel/MODE7 conv|
000002a0  65 72 74 22 3a f2 41 28  31 32 2c 31 32 2c 4f 24  |ert":.A(12,12,O$|
000002b0  29 0d 00 8c 9a 4f 24 3d  22 4d 4f 44 45 37 2f 43  |)....O$="MODE7/C|
000002c0  6f 6d 6d 75 6e 69 74 65  6c 20 63 6f 6e 76 65 72  |ommunitel conver|
000002d0  74 22 3a f2 41 28 31 32  2c 31 33 2c 4f 24 29 3a  |t":.A(12,13,O$):|
000002e0  4f 24 3d 22 53 63 72 65  65 6e 2f 42 41 53 49 43  |O$="Screen/BASIC|
000002f0  20 63 6f 6e 76 65 72 74  22 3a f2 41 28 31 32 2c  | convert":.A(12,|
00000300  31 34 2c 4f 24 29 3a 4f  24 3d 22 53 61 6d 70 6c  |14,O$):O$="Sampl|
00000310  65 20 73 63 72 65 65 6e  73 20 28 42 41 53 49 43  |e screens (BASIC|
00000320  29 22 3a f2 41 28 31 32  2c 31 35 2c 4f 24 29 3a  |)":.A(12,15,O$):|
00000330  4f 24 3d 22 45 78 69 74  20 6d 65 6e 75 22 3a f2  |O$="Exit menu":.|
00000340  41 28 31 32 2c 31 36 2c  4f 24 29 0d 00 96 0f dd  |A(12,16,O$).....|
00000350  f2 78 3a 58 3d a6 31 32  3a e1 0d 00 a0 77 f1 8a  |.x:X=.12:....w..|
00000360  38 2c 38 29 22 81 41 2e  22 3a f2 78 3a f1 8a 38  |8,8)".A.":.x:..8|
00000370  2c 38 29 22 82 41 2e 22  3a f2 78 3a f1 8a 38 2c  |,8)".A.":.x:..8,|
00000380  38 29 22 84 41 2e 22 3a  f2 78 3a f1 8a 38 2c 38  |8)".A.":.x:..8,8|
00000390  29 22 84 41 2e 87 22 3a  f1 8a 38 2c 39 29 22 81  |)".A..":..8,9)".|
000003a0  42 2e 22 3a f2 78 3a f1  8a 38 2c 39 29 22 82 42  |B.":.x:..8,9)".B|
000003b0  2e 22 3a f2 78 3a f1 8a  38 2c 39 29 22 84 42 2e  |.":.x:..8,9)".B.|
000003c0  22 3a f2 78 3a f1 8a 38  2c 39 29 22 82 42 2e 87  |":.x:..8,9)".B..|
000003d0  22 0d 00 aa 7f f1 8a 38  2c 31 30 29 22 81 43 2e  |"......8,10)".C.|
000003e0  22 3a f2 78 3a f1 8a 38  2c 31 30 29 22 82 43 2e  |":.x:..8,10)".C.|
000003f0  22 3a f2 78 3a f1 8a 38  2c 31 30 29 22 84 43 2e  |":.x:..8,10)".C.|
00000400  22 3a f2 78 3a f1 8a 38  2c 31 30 29 22 83 43 2e  |":.x:..8,10)".C.|
00000410  87 22 3a f1 8a 38 2c 31  31 29 22 81 44 2e 22 3a  |.":..8,11)".D.":|
00000420  f2 78 3a f1 8a 38 2c 31  31 29 22 82 44 2e 22 3a  |.x:..8,11)".D.":|
00000430  f2 78 3a f1 8a 38 2c 31  31 29 22 84 44 2e 22 3a  |.x:..8,11)".D.":|
00000440  f2 78 3a f1 8a 38 2c 31  31 29 22 84 44 2e 87 22  |.x:..8,11)".D.."|
00000450  0d 00 b4 7f f1 8a 38 2c  31 32 29 22 81 45 2e 22  |......8,12)".E."|
00000460  3a f2 78 3a f1 8a 38 2c  31 32 29 22 82 45 2e 22  |:.x:..8,12)".E."|
00000470  3a f2 78 3a f1 8a 38 2c  31 32 29 22 84 45 2e 22  |:.x:..8,12)".E."|
00000480  3a f2 78 3a f1 8a 38 2c  31 32 29 22 85 45 2e 87  |:.x:..8,12)".E..|
00000490  22 3a f1 8a 38 2c 31 33  29 22 81 46 2e 22 3a f2  |":..8,13)".F.":.|
000004a0  78 3a f1 8a 38 2c 31 33  29 22 82 46 2e 22 3a f2  |x:..8,13)".F.":.|
000004b0  78 3a f1 8a 38 2c 31 33  29 22 84 46 2e 22 3a f2  |x:..8,13)".F.":.|
000004c0  78 3a f1 8a 38 2c 31 33  29 22 86 46 2e 87 22 0d  |x:..8,13)".F..".|
000004d0  00 be 41 f1 8a 38 2c 31  34 29 22 81 47 2e 22 3a  |..A..8,14)".G.":|
000004e0  f2 78 3a f1 8a 38 2c 31  34 29 22 82 47 2e 22 3a  |.x:..8,14)".G.":|
000004f0  f2 78 3a f1 8a 38 2c 31  34 29 22 84 47 2e 22 3a  |.x:..8,14)".G.":|
00000500  f2 78 3a f1 8a 38 2c 31  34 29 22 81 47 2e 87 22  |.x:..8,14)".G.."|
00000510  0d 00 c8 7f f1 8a 38 2c  31 35 29 22 81 48 2e 22  |......8,15)".H."|
00000520  3a f2 78 3a f1 8a 38 2c  31 35 29 22 82 48 2e 22  |:.x:..8,15)".H."|
00000530  3a f2 78 3a f1 8a 38 2c  31 35 29 22 84 48 2e 22  |:.x:..8,15)".H."|
00000540  3a f2 78 3a f1 8a 38 2c  31 35 29 22 82 48 2e 87  |:.x:..8,15)".H..|
00000550  22 3a f1 8a 38 2c 31 36  29 22 81 49 2e 22 3a f2  |":..8,16)".I.":.|
00000560  78 3a f1 8a 38 2c 31 36  29 22 82 49 2e 22 3a f2  |x:..8,16)".I.":.|
00000570  78 3a f1 8a 38 2c 31 36  29 22 84 49 2e 22 3a f2  |x:..8,16)".I.":.|
00000580  78 3a f1 8a 38 2c 31 36  29 22 83 49 2e 87 22 0d  |x:..8,16)".I..".|
00000590  00 d2 3e 4f 24 3d 22 83  43 65 76 61 53 6f 66 74  |..>O$=".CevaSoft|
000005a0  20 53 6f 66 74 77 61 72  65 20 55 6e 6c 69 6d 69  | Software Unlimi|
000005b0  74 65 64 20 31 39 38 38  22 3a f2 41 28 32 2c 32  |ted 1988":.A(2,2|
000005c0  33 2c 4f 24 29 3a f2 6c  69 73 74 3a e1 0d 00 dc  |3,O$):.list:....|
000005d0  0a dd f2 6c 69 73 74 0d  00 e6 07 41 3d a5 0d 00  |...list....A=...|
000005e0  f0 11 e7 20 41 3d 36 35  20 d7 22 67 65 6e 22 0d  |... A=65 ."gen".|
000005f0  00 fa 13 e7 20 41 3d 36  36 20 d7 22 49 6e 73 74  |.... A=66 ."Inst|
00000600  72 22 0d 01 04 13 e7 20  41 3d 36 37 20 d7 22 47  |r"..... A=67 ."G|
00000610  75 69 64 65 22 0d 01 0e  12 e7 20 41 3d 36 38 20  |uide"..... A=68 |
00000620  d7 22 4b 65 79 73 22 0d  01 18 13 e7 20 41 3d 36  |."Keys"..... A=6|
00000630  39 20 d7 22 43 6f 6e 76  31 22 0d 01 22 13 e7 20  |9 ."Conv1"..".. |
00000640  41 3d 37 30 20 d7 22 43  6f 6e 76 32 22 0d 01 2c  |A=70 ."Conv2"..,|
00000650  13 e7 20 41 3d 37 31 20  d7 22 43 6f 6e 76 33 22  |.. A=71 ."Conv3"|
00000660  0d 01 36 14 e7 20 41 3d  37 32 20 d7 22 53 61 6d  |..6.. A=72 ."Sam|
00000670  70 6c 65 22 0d 01 40 11  e7 20 41 3d 37 33 20 d6  |ple"..@.. A=73 .|
00000680  21 2d 34 3a e0 0d 01 4a  0a e5 20 8d 64 66 40 0d  |!-4:...J.. .df@.|
00000690  ff                                                |.|
00000691