�7:��=17�tt@��dH@

OT%=�P+�$�P+2:�$�P"�To save programs, Key:"':�I%=1�3:�$�P:�"�"I%"�for "$�P:�
<*�Normal Disc,ADFS,Econet,DISC,ADFS,NET
F2�I%=1���:�$�P:�:X%=�P:Y%=�P�256:�&FFF7:��lH�
P��:G%=T%?-1:�F%=1�G%:�"�Saving file�";F%"�of�";G%:X%=T%�256:Y%=T%�256:A%=0:!T%=!T%+T%+18:T%!10=T%+28:U%=T%!14+T%!10:T%!14=U%:�&FFDD:T%=U%:�
��:�:*B.
�
*MIC.W
�	�:�:�
��MICRONET (c)%�0p ��
BBC TELESOFTWARE����SAVE FILES����SAVE FILES'

��#����B.BELLS


#� ****    Tubular Bells    ****
#� ****     (C) 22/4/87     ****
#� ****    by M. Oldfield   ****
(#� ****   computerised  by  ****
2#� ****      the  Noige     ****
<#� ****                     ****
F#� **** Grafix by the Noige ****
P�
Z*KEY 0 PROCkeys|M
d� � �end
n��7:�23;8202;0;0;0;:�screen:T%=0:�23;8202;0;0;0;:�M$(3),E(3),N(3):V=110:�envs:�riffs:M$="aabbcdbbeeeefghij":KEY=-10:TEMP=4:*FX15
x��:�X=1��(M$):D=�("FNpart"+�M$,X,1)):E(0)=�("&"+�E$,1)):E(1)=�("&"+�E$,2,1)):E(2)=�("&"+�E$,3,1)):E(3)=�("&"+�E$,1)):��M$(3),1)="*" �tB@ 
���L=1��M$(3):�V=1�3:P=4*�(�M$(V),L,1)):B%=V � &200:B%=B%�-&1000*(P=128):P=P+(KEY*4)-91*(V=1 �E(1)=0):�B%,E(V),P,TEMP:�:�M$(1),L,1)="*" �0,1,4,TEMP:�t`@
�)�M$(1),L,1)="#" �0,E(0),6,TEMP:�t`@
�)�-&1000*(�M$(1),L,1)=" "),E(0),3,TEMP
��:�:�end
�-ݤbass(B$):Z$=B$+" *"+B$+B$+" * ":=�2,Z$)
�|��riffs:r1$="i i i  i i i  i i i  i i i  i ":r2$=" n p ln q s pq n p ln q s pq p":r3$=" V X TV Y [ XY V X TV Y [ XY X":�
����end:�:�"�Credits:":�'"�  Original Version by Mike Oldfield.":�'"�  Beeb Version by the Noige.":�'"�Contact me on Prestel 089263431 with":�"�any comments.....":���=0:�
�u��envs:�1,1,0,0,0,0,0,0,126,-1,0,-1,1100,63:�3,1,0,0,0,0,0,0,0,-4,0,-1,100,0:�4,1,0,0,0,0,0,0,126,-4,0,-2,126,0:�
����keys:�:�" B D   G I K   N P   S U W   Z \   _ a  A C E F H J L M O Q R T V X Y [ ] ^ ` b"''" Z \   _ a c   f h   k m o   r t   w y {Y [ ] ^ ` b d e g i j l n p q s u v x z":�'"* and # for drums.":�28,0,24,39,8:�
܂ݤpartdemo:E$="three hex envelope numbers":M$(1)="bass line":M$(2)="second line":M$(3)="third line":=0:� Start FNparts here...
�,ݤparta:E$="0033":M$(2)=r1$:M$(3)=r2$:=1
�"ݤpartb:E$="0133":M$(1)=r3$:=2
��Npartc

?ݤpartc:E$="0133":M$(1)=" Y      ] _ [] Y [ XY ] _ [] [":=3

?ݤpartd:E$="0133":M$(1)=" Y   XY ] _ [] Y [ XY ] _ [] [":=4

pݤparte:E$="4033":M$(1)="V  ]bb`b   T    V  ]bb`b   T T":M$(2)=r3$:M$(3)="inipilniqisipqinipilniqisipqip":=5

"Sݤpartf:E$="0433":M$(1)="V V   V V   VT T   T T   T T  ":M$(2)=r1$:M$(3)=r2$:=6

,?ݤpartg:E$="0433":M$(1)="R R   R R   R Q Q   Q Q   Q Q ":=7

6?ݤparth:E$="0433":M$(1)="O O   O O   O M M   M M   M M ":=8

@?ݤparti:E$="0433":M$(1)="L L  L L   L J J J J J J J J J":=9

J7ݤpartj:E$="3033":M$(1)="J":M$(2)="i":M$(3)="n":=10

T��screen

U	�:�:�

V��"�,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,��~/|/}j5 j5~//}*�%~//}�~//}*�%/o?/j5 j5��� � �j5 j5o||t � �   ��    �  j5 *}|~%��� � �jupz5|pp��0�pp|��pp|�0 j5   �  � � � � ``` �``!�`!�``!��``!�`! �!   �  ";  

h��"�,,,,,,,,,,,,������������,,,,,,,,,,,,,,"'"����������������������������렠��������렵��ꤠ������ꤠ����ꢪ�ꠠ����������������������������������������������������𰠠���������";

r��"����������������������������뵖���������������������������𠖠��������������������������뵖�����������������������������������������������������������������������";:�'"�����������(C) 1987 Noigesoft����������":�
�

00000000  0d 00 02 18 eb 37 3a ee  85 e7 9f 3d 31 37 e5 8d  |.....7:....=17..|
00000010  74 74 40 8b 8d 64 48 40  0d 00 0a 4f 54 25 3d b8  |tt@..dH@...OT%=.|
00000020  50 2b a9 24 b8 50 2b 32  3a f1 24 b8 50 22 83 54  |P+.$.P+2:.$.P".T|
00000030  6f 20 73 61 76 65 20 70  72 6f 67 72 61 6d 73 2c  |o save programs,|
00000040  20 4b 65 79 3a 22 27 3a  e3 49 25 3d 31 b8 33 3a  | Key:"':.I%=1.3:|
00000050  f3 24 b8 50 3a f1 22 86  22 49 25 22 87 66 6f 72  |.$.P:."."I%".for|
00000060  20 22 24 b8 50 3a ed 0d  00 3c 2a dc 4e 6f 72 6d  | "$.P:...<*.Norm|
00000070  61 6c 20 44 69 73 63 2c  41 44 46 53 2c 45 63 6f  |al Disc,ADFS,Eco|
00000080  6e 65 74 2c 44 49 53 43  2c 41 44 46 53 2c 4e 45  |net,DISC,ADFS,NE|
00000090  54 0d 00 46 32 e3 49 25  3d 31 b8 bb be 3a f3 24  |T..F2.I%=1...:.$|
000000a0  b8 50 3a ed 3a 58 25 3d  b8 50 3a 59 25 3d b8 50  |.P:.:X%=.P:Y%=.P|
000000b0  81 32 35 36 3a d6 26 46  46 46 37 3a ee 85 e5 8d  |.256:.&FFF7:....|
000000c0  6c 48 c0 0d 00 50 8e db  3a 47 25 3d 54 25 3f 2d  |lH...P..:G%=T%?-|
000000d0  31 3a e3 46 25 3d 31 b8  47 25 3a f1 22 83 53 61  |1:.F%=1.G%:.".Sa|
000000e0  76 69 6e 67 20 66 69 6c  65 86 22 3b 46 25 22 83  |ving file.";F%".|
000000f0  6f 66 86 22 3b 47 25 3a  58 25 3d 54 25 83 32 35  |of.";G%:X%=T%.25|
00000100  36 3a 59 25 3d 54 25 81  32 35 36 3a 41 25 3d 30  |6:Y%=T%.256:A%=0|
00000110  3a 21 54 25 3d 21 54 25  2b 54 25 2b 31 38 3a 54  |:!T%=!T%+T%+18:T|
00000120  25 21 31 30 3d 54 25 2b  32 38 3a 55 25 3d 54 25  |%!10=T%+28:U%=T%|
00000130  21 31 34 2b 54 25 21 31  30 3a 54 25 21 31 34 3d  |!14+T%!10:T%!14=|
00000140  55 25 3a d6 26 46 46 44  44 3a 54 25 3d 55 25 3a  |U%:.&FFDD:T%=U%:|
00000150  ed 0d 00 b4 0c db 3a ee  85 3a 2a 42 2e 0d 00 be  |......:..:*B....|
00000160  0a 2a 4d 49 43 2e 57 0d  00 c8 09 db 3a f6 3a e0  |.*MIC.W.....:.:.|
00000170  0d ff 0c 86 4d 49 43 52  4f 4e 45 54 20 28 63 29  |....MICRONET (c)|
00000180  1f 25 00 83 30 70 20 9d  84 1f 0b 01 42 42 43 20  |.%..0p .....BBC |
00000190  54 45 4c 45 53 4f 46 54  57 41 52 45 1f 00 02 81  |TELESOFTWARE....|
000001a0  9d 87 8d 1f 0e 02 53 41  56 45 20 46 49 4c 45 53  |......SAVE FILES|
000001b0  1f 00 03 81 9d 87 8d 1f  0e 03 53 41 56 45 20 46  |..........SAVE F|
000001c0  49 4c 45 53 1f 00 06 1c  00 18 27 05 0d 01 00 00  |ILES......'.....|
000001d0  00 19 ff ff 23 80 ff ff  00 00 00 00 92 0b 00 00  |....#...........|
000001e0  42 2e 42 45 4c 4c 53 0d  00 00 0d 00 0a 23 f4 20  |B.BELLS......#. |
000001f0  2a 2a 2a 2a 20 20 20 20  54 75 62 75 6c 61 72 20  |****    Tubular |
00000200  42 65 6c 6c 73 20 20 20  20 2a 2a 2a 2a 0d 00 14  |Bells    ****...|
00000210  23 f4 20 2a 2a 2a 2a 20  20 20 20 20 28 43 29 20  |#. ****     (C) |
00000220  32 32 2f 34 2f 38 37 20  20 20 20 20 2a 2a 2a 2a  |22/4/87     ****|
00000230  0d 00 1e 23 f4 20 2a 2a  2a 2a 20 20 20 20 62 79  |...#. ****    by|
00000240  20 4d 2e 20 4f 6c 64 66  69 65 6c 64 20 20 20 2a  | M. Oldfield   *|
00000250  2a 2a 2a 0d 00 28 23 f4  20 2a 2a 2a 2a 20 20 20  |***..(#. ****   |
00000260  63 6f 6d 70 75 74 65 72  69 73 65 64 20 20 62 79  |computerised  by|
00000270  20 20 2a 2a 2a 2a 0d 00  32 23 f4 20 2a 2a 2a 2a  |  ****..2#. ****|
00000280  20 20 20 20 20 20 74 68  65 20 20 4e 6f 69 67 65  |      the  Noige|
00000290  20 20 20 20 20 2a 2a 2a  2a 0d 00 3c 23 f4 20 2a  |     ****..<#. *|
000002a0  2a 2a 2a 20 20 20 20 20  20 20 20 20 20 20 20 20  |***             |
000002b0  20 20 20 20 20 20 20 20  2a 2a 2a 2a 0d 00 46 23  |        ****..F#|
000002c0  f4 20 2a 2a 2a 2a 20 47  72 61 66 69 78 20 62 79  |. **** Grafix by|
000002d0  20 74 68 65 20 4e 6f 69  67 65 20 2a 2a 2a 2a 0d  | the Noige ****.|
000002e0  00 50 05 f4 0d 00 5a 15  2a 4b 45 59 20 30 20 50  |.P....Z.*KEY 0 P|
000002f0  52 4f 43 6b 65 79 73 7c  4d 0d 00 64 0c ee 20 85  |ROCkeys|M..d.. .|
00000300  20 f2 65 6e 64 0d 00 6e  83 eb 37 3a ef 32 33 3b  | .end..n..7:.23;|
00000310  38 32 30 32 3b 30 3b 30  3b 30 3b 3a f2 73 63 72  |8202;0;0;0;:.scr|
00000320  65 65 6e 3a 54 25 3d 30  3a ef 32 33 3b 38 32 30  |een:T%=0:.23;820|
00000330  32 3b 30 3b 30 3b 30 3b  3a de 4d 24 28 33 29 2c  |2;0;0;0;:.M$(3),|
00000340  45 28 33 29 2c 4e 28 33  29 3a 56 3d 31 31 30 3a  |E(3),N(3):V=110:|
00000350  f2 65 6e 76 73 3a f2 72  69 66 66 73 3a 4d 24 3d  |.envs:.riffs:M$=|
00000360  22 61 61 62 62 63 64 62  62 65 65 65 65 66 67 68  |"aabbcdbbeeeefgh|
00000370  69 6a 22 3a 4b 45 59 3d  2d 31 30 3a 54 45 4d 50  |ij":KEY=-10:TEMP|
00000380  3d 34 3a 2a 46 58 31 35  0d 00 78 8d f5 3a e3 58  |=4:*FX15..x..:.X|
00000390  3d 31 b8 a9 28 4d 24 29  3a 44 3d a0 28 22 46 4e  |=1..(M$):D=.("FN|
000003a0  70 61 72 74 22 2b c1 4d  24 2c 58 2c 31 29 29 3a  |part"+.M$,X,1)):|
000003b0  45 28 30 29 3d a0 28 22  26 22 2b c0 45 24 2c 31  |E(0)=.("&"+.E$,1|
000003c0  29 29 3a 45 28 31 29 3d  a0 28 22 26 22 2b c1 45  |)):E(1)=.("&"+.E|
000003d0  24 2c 32 2c 31 29 29 3a  45 28 32 29 3d a0 28 22  |$,2,1)):E(2)=.("|
000003e0  26 22 2b c1 45 24 2c 33  2c 31 29 29 3a 45 28 33  |&"+.E$,3,1)):E(3|
000003f0  29 3d a0 28 22 26 22 2b  c2 45 24 2c 31 29 29 3a  |)=.("&"+.E$,1)):|
00000400  e7 c2 4d 24 28 33 29 2c  31 29 3d 22 2a 22 20 e5  |..M$(3),1)="*" .|
00000410  8d 74 42 40 20 0d 00 82  9c e3 4c 3d 31 b8 a9 4d  |.tB@ .....L=1..M|
00000420  24 28 33 29 3a e3 56 3d  31 b8 33 3a 50 3d 34 2a  |$(3):.V=1.3:P=4*|
00000430  97 28 c1 4d 24 28 56 29  2c 4c 2c 31 29 29 3a 42  |.(.M$(V),L,1)):B|
00000440  25 3d 56 20 84 20 26 32  30 30 3a 42 25 3d 42 25  |%=V . &200:B%=B%|
00000450  84 2d 26 31 30 30 30 2a  28 50 3d 31 32 38 29 3a  |.-&1000*(P=128):|
00000460  50 3d 50 2b 28 4b 45 59  2a 34 29 2d 39 31 2a 28  |P=P+(KEY*4)-91*(|
00000470  56 3d 31 20 80 45 28 31  29 3d 30 29 3a d4 42 25  |V=1 .E(1)=0):.B%|
00000480  2c 45 28 56 29 2c 50 2c  54 45 4d 50 3a ed 3a e7  |,E(V),P,TEMP:.:.|
00000490  c1 4d 24 28 31 29 2c 4c  2c 31 29 3d 22 2a 22 20  |.M$(1),L,1)="*" |
000004a0  d4 30 2c 31 2c 34 2c 54  45 4d 50 3a e5 8d 74 60  |.0,1,4,TEMP:..t`|
000004b0  40 0d 00 8c 29 e7 c1 4d  24 28 31 29 2c 4c 2c 31  |@...)..M$(1),L,1|
000004c0  29 3d 22 23 22 20 d4 30  2c 45 28 30 29 2c 36 2c  |)="#" .0,E(0),6,|
000004d0  54 45 4d 50 3a e5 8d 74  60 40 0d 00 96 29 d4 2d  |TEMP:..t`@...).-|
000004e0  26 31 30 30 30 2a 28 c1  4d 24 28 31 29 2c 4c 2c  |&1000*(.M$(1),L,|
000004f0  31 29 3d 22 20 22 29 2c  45 28 30 29 2c 33 2c 54  |1)=" "),E(0),3,T|
00000500  45 4d 50 0d 00 a0 0c ed  3a ed 3a f2 65 6e 64 0d  |EMP.....:.:.end.|
00000510  00 aa 2d dd a4 62 61 73  73 28 42 24 29 3a 5a 24  |..-..bass(B$):Z$|
00000520  3d 42 24 2b 22 20 2a 22  2b 42 24 2b 42 24 2b 22  |=B$+" *"+B$+B$+"|
00000530  20 2a 20 22 3a 3d c4 32  2c 5a 24 29 0d 00 b4 7c  | * ":=.2,Z$)...||
00000540  dd f2 72 69 66 66 73 3a  72 31 24 3d 22 69 20 69  |..riffs:r1$="i i|
00000550  20 69 20 20 69 20 69 20  69 20 20 69 20 69 20 69  | i  i i i  i i i|
00000560  20 20 69 20 69 20 69 20  20 69 20 22 3a 72 32 24  |  i i i  i ":r2$|
00000570  3d 22 20 6e 20 70 20 6c  6e 20 71 20 73 20 70 71  |=" n p ln q s pq|
00000580  20 6e 20 70 20 6c 6e 20  71 20 73 20 70 71 20 70  | n p ln q s pq p|
00000590  22 3a 72 33 24 3d 22 20  56 20 58 20 54 56 20 59  |":r3$=" V X TV Y|
000005a0  20 5b 20 58 59 20 56 20  58 20 54 56 20 59 20 5b  | [ XY V X TV Y [|
000005b0  20 58 59 20 58 22 3a e1  0d 00 be ac dd f2 65 6e  | XY X":.......en|
000005c0  64 3a db 3a f1 22 82 43  72 65 64 69 74 73 3a 22  |d:.:.".Credits:"|
000005d0  3a f1 27 22 83 20 20 4f  72 69 67 69 6e 61 6c 20  |:.'".  Original |
000005e0  56 65 72 73 69 6f 6e 20  62 79 20 4d 69 6b 65 20  |Version by Mike |
000005f0  4f 6c 64 66 69 65 6c 64  2e 22 3a f1 27 22 83 20  |Oldfield.":.'". |
00000600  20 42 65 65 62 20 56 65  72 73 69 6f 6e 20 62 79  | Beeb Version by|
00000610  20 74 68 65 20 4e 6f 69  67 65 2e 22 3a f1 27 22  | the Noige.":.'"|
00000620  86 43 6f 6e 74 61 63 74  20 6d 65 20 6f 6e 20 50  |.Contact me on P|
00000630  72 65 73 74 65 6c 20 30  38 39 32 36 33 34 33 31  |restel 089263431|
00000640  20 77 69 74 68 22 3a f1  22 86 61 6e 79 20 63 6f  | with":.".any co|
00000650  6d 6d 65 6e 74 73 2e 2e  2e 2e 2e 22 3a f5 fd a5  |mments.....":...|
00000660  3d 30 3a e0 0d 00 c8 75  dd f2 65 6e 76 73 3a e2  |=0:....u..envs:.|
00000670  31 2c 31 2c 30 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |1,1,0,0,0,0,0,0,|
00000680  31 32 36 2c 2d 31 2c 30  2c 2d 31 2c 31 31 30 30  |126,-1,0,-1,1100|
00000690  2c 36 33 3a e2 33 2c 31  2c 30 2c 30 2c 30 2c 30  |,63:.3,1,0,0,0,0|
000006a0  2c 30 2c 30 2c 30 2c 2d  34 2c 30 2c 2d 31 2c 31  |,0,0,0,-4,0,-1,1|
000006b0  30 30 2c 30 3a e2 34 2c  31 2c 30 2c 30 2c 30 2c  |00,0:.4,1,0,0,0,|
000006c0  30 2c 30 2c 30 2c 31 32  36 2c 2d 34 2c 30 2c 2d  |0,0,0,126,-4,0,-|
000006d0  32 2c 31 32 36 2c 30 3a  e1 0d 00 d2 d9 dd f2 6b  |2,126,0:.......k|
000006e0  65 79 73 3a db 3a f1 22  20 42 20 44 20 20 20 47  |eys:.:." B D   G|
000006f0  20 49 20 4b 20 20 20 4e  20 50 20 20 20 53 20 55  | I K   N P   S U|
00000700  20 57 20 20 20 5a 20 5c  20 20 20 5f 20 61 20 20  | W   Z \   _ a  |
00000710  41 20 43 20 45 20 46 20  48 20 4a 20 4c 20 4d 20  |A C E F H J L M |
00000720  4f 20 51 20 52 20 54 20  56 20 58 20 59 20 5b 20  |O Q R T V X Y [ |
00000730  5d 20 5e 20 60 20 62 22  27 27 22 20 5a 20 5c 20  |] ^ ` b"''" Z \ |
00000740  20 20 5f 20 61 20 63 20  20 20 66 20 68 20 20 20  |  _ a c   f h   |
00000750  6b 20 6d 20 6f 20 20 20  72 20 74 20 20 20 77 20  |k m o   r t   w |
00000760  79 20 7b 59 20 5b 20 5d  20 5e 20 60 20 62 20 64  |y {Y [ ] ^ ` b d|
00000770  20 65 20 67 20 69 20 6a  20 6c 20 6e 20 70 20 71  | e g i j l n p q|
00000780  20 73 20 75 20 76 20 78  20 7a 22 3a f1 27 22 2a  | s u v x z":.'"*|
00000790  20 61 6e 64 20 23 20 66  6f 72 20 64 72 75 6d 73  | and # for drums|
000007a0  2e 22 3a ef 32 38 2c 30  2c 32 34 2c 33 39 2c 38  |.":.28,0,24,39,8|
000007b0  3a e1 0d 00 dc 82 dd a4  70 61 72 74 64 65 6d 6f  |:.......partdemo|
000007c0  3a 45 24 3d 22 74 68 72  65 65 20 68 65 78 20 65  |:E$="three hex e|
000007d0  6e 76 65 6c 6f 70 65 20  6e 75 6d 62 65 72 73 22  |nvelope numbers"|
000007e0  3a 4d 24 28 31 29 3d 22  62 61 73 73 20 6c 69 6e  |:M$(1)="bass lin|
000007f0  65 22 3a 4d 24 28 32 29  3d 22 73 65 63 6f 6e 64  |e":M$(2)="second|
00000800  20 6c 69 6e 65 22 3a 4d  24 28 33 29 3d 22 74 68  | line":M$(3)="th|
00000810  69 72 64 20 6c 69 6e 65  22 3a 3d 30 3a f4 20 53  |ird line":=0:. S|
00000820  74 61 72 74 20 46 4e 70  61 72 74 73 20 68 65 72  |tart FNparts her|
00000830  65 2e 2e 2e 0d 00 e6 2c  dd a4 70 61 72 74 61 3a  |e......,..parta:|
00000840  45 24 3d 22 30 30 33 33  22 3a 4d 24 28 32 29 3d  |E$="0033":M$(2)=|
00000850  72 31 24 3a 4d 24 28 33  29 3d 72 32 24 3a 3d 31  |r1$:M$(3)=r2$:=1|
00000860  0d 00 f0 22 dd a4 70 61  72 74 62 3a 45 24 3d 22  |..."..partb:E$="|
00000870  30 31 33 33 22 3a 4d 24  28 31 29 3d 72 33 24 3a  |0133":M$(1)=r3$:|
00000880  3d 32 0d 00 fa 0b dd 4e  70 61 72 74 63 0d 01 04  |=2.....Npartc...|
00000890  3f dd a4 70 61 72 74 63  3a 45 24 3d 22 30 31 33  |?..partc:E$="013|
000008a0  33 22 3a 4d 24 28 31 29  3d 22 20 59 20 20 20 20  |3":M$(1)=" Y    |
000008b0  20 20 5d 20 5f 20 5b 5d  20 59 20 5b 20 58 59 20  |  ] _ [] Y [ XY |
000008c0  5d 20 5f 20 5b 5d 20 5b  22 3a 3d 33 0d 01 0e 3f  |] _ [] [":=3...?|
000008d0  dd a4 70 61 72 74 64 3a  45 24 3d 22 30 31 33 33  |..partd:E$="0133|
000008e0  22 3a 4d 24 28 31 29 3d  22 20 59 20 20 20 58 59  |":M$(1)=" Y   XY|
000008f0  20 5d 20 5f 20 5b 5d 20  59 20 5b 20 58 59 20 5d  | ] _ [] Y [ XY ]|
00000900  20 5f 20 5b 5d 20 5b 22  3a 3d 34 0d 01 18 70 dd  | _ [] [":=4...p.|
00000910  a4 70 61 72 74 65 3a 45  24 3d 22 34 30 33 33 22  |.parte:E$="4033"|
00000920  3a 4d 24 28 31 29 3d 22  56 20 20 5d 62 62 60 62  |:M$(1)="V  ]bb`b|
00000930  20 20 20 54 20 20 20 20  56 20 20 5d 62 62 60 62  |   T    V  ]bb`b|
00000940  20 20 20 54 20 54 22 3a  4d 24 28 32 29 3d 72 33  |   T T":M$(2)=r3|
00000950  24 3a 4d 24 28 33 29 3d  22 69 6e 69 70 69 6c 6e  |$:M$(3)="inipiln|
00000960  69 71 69 73 69 70 71 69  6e 69 70 69 6c 6e 69 71  |iqisipqinipilniq|
00000970  69 73 69 70 71 69 70 22  3a 3d 35 0d 01 22 53 dd  |isipqip":=5.."S.|
00000980  a4 70 61 72 74 66 3a 45  24 3d 22 30 34 33 33 22  |.partf:E$="0433"|
00000990  3a 4d 24 28 31 29 3d 22  56 20 56 20 20 20 56 20  |:M$(1)="V V   V |
000009a0  56 20 20 20 56 54 20 54  20 20 20 54 20 54 20 20  |V   VT T   T T  |
000009b0  20 54 20 54 20 20 22 3a  4d 24 28 32 29 3d 72 31  | T T  ":M$(2)=r1|
000009c0  24 3a 4d 24 28 33 29 3d  72 32 24 3a 3d 36 0d 01  |$:M$(3)=r2$:=6..|
000009d0  2c 3f dd a4 70 61 72 74  67 3a 45 24 3d 22 30 34  |,?..partg:E$="04|
000009e0  33 33 22 3a 4d 24 28 31  29 3d 22 52 20 52 20 20  |33":M$(1)="R R  |
000009f0  20 52 20 52 20 20 20 52  20 51 20 51 20 20 20 51  | R R   R Q Q   Q|
00000a00  20 51 20 20 20 51 20 51  20 22 3a 3d 37 0d 01 36  | Q   Q Q ":=7..6|
00000a10  3f dd a4 70 61 72 74 68  3a 45 24 3d 22 30 34 33  |?..parth:E$="043|
00000a20  33 22 3a 4d 24 28 31 29  3d 22 4f 20 4f 20 20 20  |3":M$(1)="O O   |
00000a30  4f 20 4f 20 20 20 4f 20  4d 20 4d 20 20 20 4d 20  |O O   O M M   M |
00000a40  4d 20 20 20 4d 20 4d 20  22 3a 3d 38 0d 01 40 3f  |M   M M ":=8..@?|
00000a50  dd a4 70 61 72 74 69 3a  45 24 3d 22 30 34 33 33  |..parti:E$="0433|
00000a60  22 3a 4d 24 28 31 29 3d  22 4c 20 4c 20 20 4c 20  |":M$(1)="L L  L |
00000a70  4c 20 20 20 4c 20 4a 20  4a 20 4a 20 4a 20 4a 20  |L   L J J J J J |
00000a80  4a 20 4a 20 4a 20 4a 22  3a 3d 39 0d 01 4a 37 dd  |J J J J":=9..J7.|
00000a90  a4 70 61 72 74 6a 3a 45  24 3d 22 33 30 33 33 22  |.partj:E$="3033"|
00000aa0  3a 4d 24 28 31 29 3d 22  4a 22 3a 4d 24 28 32 29  |:M$(1)="J":M$(2)|
00000ab0  3d 22 69 22 3a 4d 24 28  33 29 3d 22 6e 22 3a 3d  |="i":M$(3)="n":=|
00000ac0  31 30 0d 01 54 0c dd f2  73 63 72 65 65 6e 0d 01  |10..T...screen..|
00000ad0  55 09 f1 3a f1 3a f1 0d  01 56 d2 f1 22 94 2c 2c  |U..:.:...V..".,,|
00000ae0  2c 2c 2c 2c 2c 2c 2c 2c  2c 2c 2c 2c 2c 2c 2c 2c  |,,,,,,,,,,,,,,,,|
*
00000b00  2c 2c 2c 2c 2c a0 96 7e  2f 7c 2f 7d 6a 35 20 6a  |,,,,,..~/|/}j5 j|
00000b10  35 7e 2f 2f 7d 2a ff 25  7e 2f 2f 7d 94 7e 2f 2f  |5~//}*.%~//}.~//|
00000b20  7d 2a ff 25 2f 6f 3f 2f  6a 35 20 6a 35 a0 96 ff  |}*.%/o?/j5 j5...|
00000b30  20 ff 20 ff 6a 35 20 6a  35 6f 7c 7c 74 20 ff 20  | . .j5 j5o||t . |
00000b40  ff 20 20 20 94 ff 20 20  20 20 ff 20 20 6a 35 20  |.   ..    .  j5 |
00000b50  2a 7d 7c 7e 25 a0 96 ff  20 ff 20 ff 6a 75 70 7a  |*}|~%... . .jupz|
00000b60  35 7c 70 70 ff e0 ff 30  ff 70 70 7c 94 ff 70 70  |5|pp...0.pp|..pp|
00000b70  7c e0 ff 30 20 6a 35 20  20 20 ff 20 20 96 20 ff  ||..0 j5   .  . .|
00000b80  20 ff 20 ff 20 60 60 60  20 a2 60 60 21 a2 60 21  | . . ``` .``!.`!|
00000b90  a2 60 60 21 94 a2 60 60  21 a2 60 21 20 a2 21 20  |.``!..``!.`! .! |
00000ba0  20 20 ff 20 20 22 3b 20  20 0d 01 68 d3 f1 22 94  |  .  ";  ..h..".|
00000bb0  2c 2c 2c 2c 2c 2c 2c 2c  2c 2c 2c 2c ac ac ac 87  |,,,,,,,,,,,,....|
00000bc0  d0 f2 e5 f3 e5 ee f4 f3  94 2c 2c 2c 2c 2c 2c 2c  |.........,,,,,,,|
00000bd0  2c 2c 2c 2c 2c 2c 2c 22  27 22 91 a0 a0 93 ea e3  |,,,,,,,"'"......|
00000be0  a3 e3 e3 f3 e3 e3 e3 f3  a3 a3 e3 f3 e3 a3 e3 b3  |................|
00000bf0  e3 f3 e3 f3 e3 f3 e3 a3  e3 b3 e3 e3 f3 eb a0 a0  |................|
00000c00  a0 a0 91 a0 a0 93 ea ea  a9 eb a0 b5 ea e6 ea a4  |................|
00000c10  a0 a0 ea ea ea a0 ea ea  ea a4 a0 b5 ea a4 ea a0  |................|
00000c20  ea ea a2 aa ec ea a0 a0  a0 a0 91 a0 a0 93 ea f2  |................|
00000c30  f0 f2 f2 f3 f2 f2 f2 f3  f0 f0 f2 f3 f2 f3 f2 f1  |................|
00000c40  f2 f0 f2 f3 f2 f3 f2 f3  f2 f1 f0 f2 f3 fa a0 a0  |................|
00000c50  a0 a0 96 e0 f0 b0 f0 e0  b0 f0 f0 a0 f0 e0 b0 f0  |................|
00000c60  a0 a0 e0 f0 b0 e0 f0 b0  a0 a0 a0 f0 f0 a0 f0 f0  |................|
00000c70  b0 f0 a0 a0 f0 a0 a0 e0  f0 a0 22 3b 0d 01 72 fe  |..........";..r.|
00000c80  f1 22 96 a2 ff a1 ff ea  b5 ff eb b5 ff ea b5 ff  |."..............|
00000c90  a0 a0 ff a3 ff ea b7 ff  a0 a0 a0 ff eb b5 ff a3  |................|
00000ca0  a1 ff a0 a0 ff a0 a0 ff  eb b5 96 a0 ff a0 ff ea  |................|
00000cb0  b5 ff fe a1 ff ea b5 ff  a0 a0 ff f0 ff ea fd b7  |................|
00000cc0  a0 a0 a0 ff fe a1 ff f0  a0 ff a0 a0 ff a0 a0 ff  |................|
00000cd0  f0 a0 96 a0 ff a0 ff ea  b5 ff ea b5 ff ea b5 ff  |................|
00000ce0  a0 a0 ff a3 ff ea b5 ff  a0 a0 a0 ff ea b5 ff a3  |................|
00000cf0  a0 ff a0 a0 ff a0 a0 f2  eb b5 96 a0 ff a0 ef fe  |................|
00000d00  a5 ff fe a5 ef fe a5 ff  fe b5 ff a0 ff ea b5 ff  |................|
00000d10  a0 a0 a0 ff fe a5 ff fc  b4 ff fe b5 ff fe b5 ef  |................|
00000d20  fe a5 91 a8 ac ac ac ac  ac ac ac ac ac ac ac ac  |................|
00000d30  ac ac ac ac ac ac ac ac  ac ac ac ac ac ac ac ac  |................|
00000d40  ac ac ac ac ac ac ac ac  ac a4 22 3b 3a f1 27 22  |..........";:.'"|
00000d50  84 9d 87 a0 a0 a0 a0 a0  a0 a0 a0 28 43 29 20 31  |...........(C) 1|
00000d60  39 38 37 20 4e 6f 69 67  65 73 6f 66 74 a0 a0 a0  |987 Noigesoft...|
00000d70  a0 a0 a0 a0 a0 a0 a0 22  3a e1 0d ff              |.......":...|
00000d7c