Home » Personal collection » Acorn ADFS disks » Electron » Music_2.ADF » MUSIC/ColdTea

MUSIC/ColdTea

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 » Personal collection » Acorn ADFS disks » Electron » Music_2.ADF
Filename: MUSIC/ColdTea
Read OK:
File size: 0917 bytes
Load address: FFFFFB00
Exec address: FFFF8023
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
   10MODE7:DL=15:G%=-1
   11 VDU23;8202;0;0;0;
   40A$="COLD TEA"
   50VDU132,157,141,129:PRINTTAB(9)CHR$157CHR$131" "A$"  "CHR$132CHR$157
   60VDU132,157,141,129:PRINTTAB(9)CHR$157CHR$131" "A$"  "CHR$132CHR$157
   70PRINTTAB(10,3)CHR$141"Devised by R.Cope."'TAB(10)CHR$141"Devised by R.Cope."
   80PRINTTAB(7)CHR$133"From the original work:"
   90PRINTTAB(4,7)CHR$130"'Cold Tea' by Andrew Robinson."
  100PRINT''CHR$131" b  # b  # # b  # b  # # b  # b  # # b "CHR$131"ABBCCDEEFFGGABBCCDEEFFGGABBCCDEEFFGGABB"CHR$30
  105PRINTTAB(0,12);CHR$&84'CHR$&86;CHR$&9D'CHR$&82'CHR$&86;CHR$&9D'CHR$&81
  110I%=0:ENVELOPE1,1,0,0,0,4,4,4,40,0,0,-3,128,1
  120ENVELOPE2,1,0,0,0,2,2,1,120,0,0,-2,128,1
  130ON ERROR GOTO150
  140READA$:I%=I%+1:GOTO140
  150Q%=(I%-2)/3-1
  160ON ERROR OFF
  161RESTORE
  170DATA112211221134=54>6789:>;9:<
  180DATA00000000001111100000000001
  190READR$,RT$
  200REM        ** VOICE 1 **
  210DATA"0GGSSNNQQGGSSNNQQ"
  220DATA"0@@LLGGJJBBNNIILLCCOOJJOOEEQQLLQQ"
  230DATA"0JJVVJJVVJJVVJJVVEEQQEEQQEEQQEEQQ"
  240DATA"0CCOOCCOOEEQQEEQQ"
  250DATA"0JJVVJJVVJJVVJJVVEEQQEEQQEEQQEEQQ"
  260DATA"0FFFFFFFFFFFFFFFF"
  270DATA"0EEEEEEEEEEEEEEEE"
  280DATA"0DDDDDDDDDDDDDDDD"
  290DATA"0CCCCCCCCCCCCCCCC"
  300DATA"0BBBBBBBBBBBBBBBB"
  310DATA"0EEEEEEEEEEEEEEEE"
  320DATA"0GGGGGGGGGGGGGGGG"
  330DATA"0JJVVJJVVJJVVJJVV"
  340DATA"0GGGGGGGGGGGGGGGG"
  350REM        ** VOICE 2 **
  360DATA"0VNVNUNUVNVVNUNUN"
  370DATA"1GCGLCGJCIBGIGBFBGCGNCGLCI@GIG@E@"
  380DATA"1NNJEEBEJNNOONLJJLLIEE@EILLNNLJII"
  390DATA"1GCGJOJGCIEILJJII"
  400DATA"1NNJEEBEJNNOONLJJQLIEE@EILLNNLJII"
  410DATA"0VNVNUNUVNVVNUNUN"
  420DATA"0VNVNUNUVNVVNUNUN"
  430DATA"0VPVPUPUVPVVPUPUP"
  440DATA"0VOVOUOUVOVVOUOUO"
  450DATA"0BNSUZUSNBNRUZURN"
  460DATA"1JEJEIEIJEJJEIEIE"
  470DATA"1GJNSNJGGGGGGGGGG"
  480DATA"1NNJEEBEJNNJJEEBB"
  490DATA"0VNVNUNUVNVVNUNUN"
  500REM        ** VOICE 3 **
  510DATA"0ZNZNXNXZNZZNXNXN"
  520DATA"1GCGLCGJCIBGIGBFBGCGNCGLCI@GIG@E@"
  530DATA"1NNNJJEBEJJOONLJJLLLIIE@ELLNNLJII"
  540DATA"1GGCGJOJGCIEILLJI"
  550DATA"1NNNJJEBEJJOONLJJQQLIIE@ELLNNLJII"
  560DATA"0ZNZNXNXZNZZNXNXN"
  570DATA"0ZNZNXNXZNZZNXNXN"
  580DATA"0ZPZPXPXZPZZPXPXP"
  590DATA"0ZOZOXOXZOZZOXOXO"
  600DATA"0BBBGINIGBBBFINIF"
  610DATA"1LELELELLELLELELE"
  620DATA"1JNSVSNJJJJJJJJJJ"
  630DATA"1NNNJJEBEJJNNEEBB"
  640DATA"0ZNZNXNXZNZZNXNXN"
  650DIMA$(Q%,2),OCT%(2),Y%(2)
  660FORI=0TO2:Y%(I)=&7FFF:NEXT
  670FORI%=0TO2:FORJ%=0TOQ%
  680READA$(J%,I%):NEXT:NEXT
  690TQ=TIME+DL
  695ONERRORPRINTTAB(0,22);:REPORT:GOTO900
  696SOUND &F0C0,0,3,0
  700FORB%=1TOLEN(R$)
  710V%=1-(MID$(RT$,B%,1)="1")
  720R%=ASCMID$(R$,B%)-49
  730FORI%=0TO2
  740OCT%(I%)=48*ASCA$(R%,I%):NEXT
  750FORI=2TOLENA$(R%,0)
  760REPEATUNTILTIME>=TQ:TQ=TIME+DL
  770FORJ=0TO2:PRINTTAB(Y%(J),16-J*2);CHR$156;
  780W$=MID$(A$(R%,J),I,1)
  790Y%(J)=ASCW$-60:PRINTTAB(Y%(J),16-J*2);CHR$157;CHR$156;
  810SOUNDJ+1,V%,OCT%(J)+4*ASCW$,1
  820NEXT:NEXT:NEXT
  830FORR=1TO500:NEXT
  900CHAIN"HELLO"

�7:DL=15:G%=-1
 �23;8202;0;0;0;
(A$="COLD TEA"
22�132,157,141,129:�9)�157�131" "A$"  "�132�157
<2�132,157,141,129:�9)�157�131" "A$"  "�132�157
F@�10,3)�141"Devised by R.Cope."'�10)�141"Devised by R.Cope."
P%�7)�133"From the original work:"
Z.�4,7)�130"'Cold Tea' by Andrew Robinson."
dd�''�131" b  # b  # # b  # b  # # b  # b  # # b "�131"ABBCCDEEFFGGABBCCDEEFFGGABBCCDEEFFGGABB"�30
i.�0,12);�&84'�&86;�&9D'�&82'�&86;�&9D'�&81
n)I%=0:�1,1,0,0,0,4,4,4,40,0,0,-3,128,1
x%�2,1,0,0,0,2,2,1,120,0,0,-2,128,1
�
� � �tV@
��A$:I%=I%+1:�tL@
�Q%=(I%-2)/3-1
�	� � �
��
��112211221134=54>6789:>;9:<
��00000000001111100000000001
��R$,RT$
��        ** VOICE 1 **
��"0GGSSNNQQGGSSNNQQ"
�(�"0@@LLGGJJBBNNIILLCCOOJJOOEEQQLLQQ"
�(�"0JJVVJJVVJJVVJJVVEEQQEEQQEEQQEEQQ"
��"0CCOOCCOOEEQQEEQQ"
�(�"0JJVVJJVVJJVVJJVVEEQQEEQQEEQQEEQQ"
�"0FFFFFFFFFFFFFFFF"
�"0EEEEEEEEEEEEEEEE"
�"0DDDDDDDDDDDDDDDD"
"�"0CCCCCCCCCCCCCCCC"
,�"0BBBBBBBBBBBBBBBB"
6�"0EEEEEEEEEEEEEEEE"
@�"0GGGGGGGGGGGGGGGG"
J�"0JJVVJJVVJJVVJJVV"
T�"0GGGGGGGGGGGGGGGG"
^�        ** VOICE 2 **
h�"0VNVNUNUVNVVNUNUN"
r(�"1GCGLCGJCIBGIGBFBGCGNCGLCI@GIG@E@"
|(�"1NNJEEBEJNNOONLJJLLIEE@EILLNNLJII"
��"1GCGJOJGCIEILJJII"
�(�"1NNJEEBEJNNOONLJJQLIEE@EILLNNLJII"
��"0VNVNUNUVNVVNUNUN"
��"0VNVNUNUVNVVNUNUN"
��"0VPVPUPUVPVVPUPUP"
��"0VOVOUOUVOVVOUOUO"
��"0BNSUZUSNBNRUZURN"
��"1JEJEIEIJEJJEIEIE"
��"1GJNSNJGGGGGGGGGG"
��"1NNJEEBEJNNJJEEBB"
��"0VNVNUNUVNVVNUNUN"
��        ** VOICE 3 **
��"0ZNZNXNXZNZZNXNXN"
(�"1GCGLCGJCIBGIGBFBGCGNCGLCI@GIG@E@"
(�"1NNNJJEBEJJOONLJJLLLIIE@ELLNNLJII"
�"1GGCGJOJGCIEILLJI"
&(�"1NNNJJEBEJJOONLJJQQLIIE@ELLNNLJII"
0�"0ZNZNXNXZNZZNXNXN"
:�"0ZNZNXNXZNZZNXNXN"
D�"0ZPZPXPXZPZZPXPXP"
N�"0ZOZOXOXZOZZOXOXO"
X�"0BBBGINIGBBBFINIF"
b�"1LELELELLELLELELE"
l�"1JNSVSNJJJJJJJJJJ"
v�"1NNNJJEBEJJNNEEBB"
��"0ZNZNXNXZNZZNXNXN"
��A$(Q%,2),OCT%(2),Y%(2)
��I=0�2:Y%(I)=&7FFF:�
��I%=0�2:�J%=0�Q%
��A$(J%,I%):�:�
�TQ=�+DL
���0,22);:�:�tDC
�� &F0C0,0,3,0
��B%=1��(R$)
�V%=1-(�RT$,B%,1)="1")
�R%=��R$,B%)-49
��I%=0�2
�OCT%(I%)=48*�A$(R%,I%):�
��I=2��A$(R%,0)
����>=TQ:TQ=�+DL
 �J=0�2:�Y%(J),16-J*2);�156;
W$=�A$(R%,J),I,1)
+Y%(J)=�W$-60:�Y%(J),16-J*2);�157;�156;
*�J+1,V%,OCT%(J)+4*�W$,1
4	�:�:�
>�R=1�500:�
��"HELLO"
�
00000000  0d 00 0a 12 eb 37 3a 44  4c 3d 31 35 3a 47 25 3d  |.....7:DL=15:G%=|
00000010  2d 31 0d 00 0b 14 20 ef  32 33 3b 38 32 30 32 3b  |-1.... .23;8202;|
00000020  30 3b 30 3b 30 3b 0d 00  28 11 41 24 3d 22 43 4f  |0;0;0;..(.A$="CO|
00000030  4c 44 20 54 45 41 22 0d  00 32 32 ef 31 33 32 2c  |LD TEA"..22.132,|
00000040  31 35 37 2c 31 34 31 2c  31 32 39 3a f1 8a 39 29  |157,141,129:..9)|
00000050  bd 31 35 37 bd 31 33 31  22 20 22 41 24 22 20 20  |.157.131" "A$"  |
00000060  22 bd 31 33 32 bd 31 35  37 0d 00 3c 32 ef 31 33  |".132.157..<2.13|
00000070  32 2c 31 35 37 2c 31 34  31 2c 31 32 39 3a f1 8a  |2,157,141,129:..|
00000080  39 29 bd 31 35 37 bd 31  33 31 22 20 22 41 24 22  |9).157.131" "A$"|
00000090  20 20 22 bd 31 33 32 bd  31 35 37 0d 00 46 40 f1  |  ".132.157..F@.|
000000a0  8a 31 30 2c 33 29 bd 31  34 31 22 44 65 76 69 73  |.10,3).141"Devis|
000000b0  65 64 20 62 79 20 52 2e  43 6f 70 65 2e 22 27 8a  |ed by R.Cope."'.|
000000c0  31 30 29 bd 31 34 31 22  44 65 76 69 73 65 64 20  |10).141"Devised |
000000d0  62 79 20 52 2e 43 6f 70  65 2e 22 0d 00 50 25 f1  |by R.Cope."..P%.|
000000e0  8a 37 29 bd 31 33 33 22  46 72 6f 6d 20 74 68 65  |.7).133"From the|
000000f0  20 6f 72 69 67 69 6e 61  6c 20 77 6f 72 6b 3a 22  | original work:"|
00000100  0d 00 5a 2e f1 8a 34 2c  37 29 bd 31 33 30 22 27  |..Z...4,7).130"'|
00000110  43 6f 6c 64 20 54 65 61  27 20 62 79 20 41 6e 64  |Cold Tea' by And|
00000120  72 65 77 20 52 6f 62 69  6e 73 6f 6e 2e 22 0d 00  |rew Robinson."..|
00000130  64 64 f1 27 27 bd 31 33  31 22 20 62 20 20 23 20  |dd.''.131" b  # |
00000140  62 20 20 23 20 23 20 62  20 20 23 20 62 20 20 23  |b  # # b  # b  #|
00000150  20 23 20 62 20 20 23 20  62 20 20 23 20 23 20 62  | # b  # b  # # b|
00000160  20 22 bd 31 33 31 22 41  42 42 43 43 44 45 45 46  | ".131"ABBCCDEEF|
00000170  46 47 47 41 42 42 43 43  44 45 45 46 46 47 47 41  |FGGABBCCDEEFFGGA|
00000180  42 42 43 43 44 45 45 46  46 47 47 41 42 42 22 bd  |BBCCDEEFFGGABB".|
00000190  33 30 0d 00 69 2e f1 8a  30 2c 31 32 29 3b bd 26  |30..i...0,12);.&|
000001a0  38 34 27 bd 26 38 36 3b  bd 26 39 44 27 bd 26 38  |84'.&86;.&9D'.&8|
000001b0  32 27 bd 26 38 36 3b bd  26 39 44 27 bd 26 38 31  |2'.&86;.&9D'.&81|
000001c0  0d 00 6e 29 49 25 3d 30  3a e2 31 2c 31 2c 30 2c  |..n)I%=0:.1,1,0,|
000001d0  30 2c 30 2c 34 2c 34 2c  34 2c 34 30 2c 30 2c 30  |0,0,4,4,4,40,0,0|
000001e0  2c 2d 33 2c 31 32 38 2c  31 0d 00 78 25 e2 32 2c  |,-3,128,1..x%.2,|
000001f0  31 2c 30 2c 30 2c 30 2c  32 2c 32 2c 31 2c 31 32  |1,0,0,0,2,2,1,12|
00000200  30 2c 30 2c 30 2c 2d 32  2c 31 32 38 2c 31 0d 00  |0,0,0,-2,128,1..|
00000210  82 0d ee 20 85 20 e5 8d  74 56 40 0d 00 8c 15 f3  |... . ..tV@.....|
00000220  41 24 3a 49 25 3d 49 25  2b 31 3a e5 8d 74 4c 40  |A$:I%=I%+1:..tL@|
00000230  0d 00 96 11 51 25 3d 28  49 25 2d 32 29 2f 33 2d  |....Q%=(I%-2)/3-|
00000240  31 0d 00 a0 09 ee 20 85  20 87 0d 00 a1 05 f7 0d  |1..... . .......|
00000250  00 aa 1f dc 31 31 32 32  31 31 32 32 31 31 33 34  |....112211221134|
00000260  3d 35 34 3e 36 37 38 39  3a 3e 3b 39 3a 3c 0d 00  |=54>6789:>;9:<..|
00000270  b4 1f dc 30 30 30 30 30  30 30 30 30 30 31 31 31  |...0000000000111|
00000280  31 31 30 30 30 30 30 30  30 30 30 30 31 0d 00 be  |1100000000001...|
00000290  0b f3 52 24 2c 52 54 24  0d 00 c8 1a f4 20 20 20  |..R$,RT$.....   |
000002a0  20 20 20 20 20 2a 2a 20  56 4f 49 43 45 20 31 20  |     ** VOICE 1 |
000002b0  2a 2a 0d 00 d2 18 dc 22  30 47 47 53 53 4e 4e 51  |**....."0GGSSNNQ|
000002c0  51 47 47 53 53 4e 4e 51  51 22 0d 00 dc 28 dc 22  |QGGSSNNQQ"...(."|
000002d0  30 40 40 4c 4c 47 47 4a  4a 42 42 4e 4e 49 49 4c  |0@@LLGGJJBBNNIIL|
000002e0  4c 43 43 4f 4f 4a 4a 4f  4f 45 45 51 51 4c 4c 51  |LCCOOJJOOEEQQLLQ|
000002f0  51 22 0d 00 e6 28 dc 22  30 4a 4a 56 56 4a 4a 56  |Q"...(."0JJVVJJV|
00000300  56 4a 4a 56 56 4a 4a 56  56 45 45 51 51 45 45 51  |VJJVVJJVVEEQQEEQ|
00000310  51 45 45 51 51 45 45 51  51 22 0d 00 f0 18 dc 22  |QEEQQEEQQ"....."|
00000320  30 43 43 4f 4f 43 43 4f  4f 45 45 51 51 45 45 51  |0CCOOCCOOEEQQEEQ|
00000330  51 22 0d 00 fa 28 dc 22  30 4a 4a 56 56 4a 4a 56  |Q"...(."0JJVVJJV|
00000340  56 4a 4a 56 56 4a 4a 56  56 45 45 51 51 45 45 51  |VJJVVJJVVEEQQEEQ|
00000350  51 45 45 51 51 45 45 51  51 22 0d 01 04 18 dc 22  |QEEQQEEQQ"....."|
00000360  30 46 46 46 46 46 46 46  46 46 46 46 46 46 46 46  |0FFFFFFFFFFFFFFF|
00000370  46 22 0d 01 0e 18 dc 22  30 45 45 45 45 45 45 45  |F"....."0EEEEEEE|
00000380  45 45 45 45 45 45 45 45  45 22 0d 01 18 18 dc 22  |EEEEEEEEE"....."|
00000390  30 44 44 44 44 44 44 44  44 44 44 44 44 44 44 44  |0DDDDDDDDDDDDDDD|
000003a0  44 22 0d 01 22 18 dc 22  30 43 43 43 43 43 43 43  |D"..".."0CCCCCCC|
000003b0  43 43 43 43 43 43 43 43  43 22 0d 01 2c 18 dc 22  |CCCCCCCCC"..,.."|
000003c0  30 42 42 42 42 42 42 42  42 42 42 42 42 42 42 42  |0BBBBBBBBBBBBBBB|
000003d0  42 22 0d 01 36 18 dc 22  30 45 45 45 45 45 45 45  |B"..6.."0EEEEEEE|
000003e0  45 45 45 45 45 45 45 45  45 22 0d 01 40 18 dc 22  |EEEEEEEEE"..@.."|
000003f0  30 47 47 47 47 47 47 47  47 47 47 47 47 47 47 47  |0GGGGGGGGGGGGGGG|
00000400  47 22 0d 01 4a 18 dc 22  30 4a 4a 56 56 4a 4a 56  |G"..J.."0JJVVJJV|
00000410  56 4a 4a 56 56 4a 4a 56  56 22 0d 01 54 18 dc 22  |VJJVVJJVV"..T.."|
00000420  30 47 47 47 47 47 47 47  47 47 47 47 47 47 47 47  |0GGGGGGGGGGGGGGG|
00000430  47 22 0d 01 5e 1a f4 20  20 20 20 20 20 20 20 2a  |G"..^..        *|
00000440  2a 20 56 4f 49 43 45 20  32 20 2a 2a 0d 01 68 18  |* VOICE 2 **..h.|
00000450  dc 22 30 56 4e 56 4e 55  4e 55 56 4e 56 56 4e 55  |."0VNVNUNUVNVVNU|
00000460  4e 55 4e 22 0d 01 72 28  dc 22 31 47 43 47 4c 43  |NUN"..r(."1GCGLC|
00000470  47 4a 43 49 42 47 49 47  42 46 42 47 43 47 4e 43  |GJCIBGIGBFBGCGNC|
00000480  47 4c 43 49 40 47 49 47  40 45 40 22 0d 01 7c 28  |GLCI@GIG@E@"..|(|
00000490  dc 22 31 4e 4e 4a 45 45  42 45 4a 4e 4e 4f 4f 4e  |."1NNJEEBEJNNOON|
000004a0  4c 4a 4a 4c 4c 49 45 45  40 45 49 4c 4c 4e 4e 4c  |LJJLLIEE@EILLNNL|
000004b0  4a 49 49 22 0d 01 86 18  dc 22 31 47 43 47 4a 4f  |JII"....."1GCGJO|
000004c0  4a 47 43 49 45 49 4c 4a  4a 49 49 22 0d 01 90 28  |JGCIEILJJII"...(|
000004d0  dc 22 31 4e 4e 4a 45 45  42 45 4a 4e 4e 4f 4f 4e  |."1NNJEEBEJNNOON|
000004e0  4c 4a 4a 51 4c 49 45 45  40 45 49 4c 4c 4e 4e 4c  |LJJQLIEE@EILLNNL|
000004f0  4a 49 49 22 0d 01 9a 18  dc 22 30 56 4e 56 4e 55  |JII"....."0VNVNU|
00000500  4e 55 56 4e 56 56 4e 55  4e 55 4e 22 0d 01 a4 18  |NUVNVVNUNUN"....|
00000510  dc 22 30 56 4e 56 4e 55  4e 55 56 4e 56 56 4e 55  |."0VNVNUNUVNVVNU|
00000520  4e 55 4e 22 0d 01 ae 18  dc 22 30 56 50 56 50 55  |NUN"....."0VPVPU|
00000530  50 55 56 50 56 56 50 55  50 55 50 22 0d 01 b8 18  |PUVPVVPUPUP"....|
00000540  dc 22 30 56 4f 56 4f 55  4f 55 56 4f 56 56 4f 55  |."0VOVOUOUVOVVOU|
00000550  4f 55 4f 22 0d 01 c2 18  dc 22 30 42 4e 53 55 5a  |OUO"....."0BNSUZ|
00000560  55 53 4e 42 4e 52 55 5a  55 52 4e 22 0d 01 cc 18  |USNBNRUZURN"....|
00000570  dc 22 31 4a 45 4a 45 49  45 49 4a 45 4a 4a 45 49  |."1JEJEIEIJEJJEI|
00000580  45 49 45 22 0d 01 d6 18  dc 22 31 47 4a 4e 53 4e  |EIE"....."1GJNSN|
00000590  4a 47 47 47 47 47 47 47  47 47 47 22 0d 01 e0 18  |JGGGGGGGGGG"....|
000005a0  dc 22 31 4e 4e 4a 45 45  42 45 4a 4e 4e 4a 4a 45  |."1NNJEEBEJNNJJE|
000005b0  45 42 42 22 0d 01 ea 18  dc 22 30 56 4e 56 4e 55  |EBB"....."0VNVNU|
000005c0  4e 55 56 4e 56 56 4e 55  4e 55 4e 22 0d 01 f4 1a  |NUVNVVNUNUN"....|
000005d0  f4 20 20 20 20 20 20 20  20 2a 2a 20 56 4f 49 43  |.        ** VOIC|
000005e0  45 20 33 20 2a 2a 0d 01  fe 18 dc 22 30 5a 4e 5a  |E 3 **....."0ZNZ|
000005f0  4e 58 4e 58 5a 4e 5a 5a  4e 58 4e 58 4e 22 0d 02  |NXNXZNZZNXNXN"..|
00000600  08 28 dc 22 31 47 43 47  4c 43 47 4a 43 49 42 47  |.(."1GCGLCGJCIBG|
00000610  49 47 42 46 42 47 43 47  4e 43 47 4c 43 49 40 47  |IGBFBGCGNCGLCI@G|
00000620  49 47 40 45 40 22 0d 02  12 28 dc 22 31 4e 4e 4e  |IG@E@"...(."1NNN|
00000630  4a 4a 45 42 45 4a 4a 4f  4f 4e 4c 4a 4a 4c 4c 4c  |JJEBEJJOONLJJLLL|
00000640  49 49 45 40 45 4c 4c 4e  4e 4c 4a 49 49 22 0d 02  |IIE@ELLNNLJII"..|
00000650  1c 18 dc 22 31 47 47 43  47 4a 4f 4a 47 43 49 45  |..."1GGCGJOJGCIE|
00000660  49 4c 4c 4a 49 22 0d 02  26 28 dc 22 31 4e 4e 4e  |ILLJI"..&(."1NNN|
00000670  4a 4a 45 42 45 4a 4a 4f  4f 4e 4c 4a 4a 51 51 4c  |JJEBEJJOONLJJQQL|
00000680  49 49 45 40 45 4c 4c 4e  4e 4c 4a 49 49 22 0d 02  |IIE@ELLNNLJII"..|
00000690  30 18 dc 22 30 5a 4e 5a  4e 58 4e 58 5a 4e 5a 5a  |0.."0ZNZNXNXZNZZ|
000006a0  4e 58 4e 58 4e 22 0d 02  3a 18 dc 22 30 5a 4e 5a  |NXNXN"..:.."0ZNZ|
000006b0  4e 58 4e 58 5a 4e 5a 5a  4e 58 4e 58 4e 22 0d 02  |NXNXZNZZNXNXN"..|
000006c0  44 18 dc 22 30 5a 50 5a  50 58 50 58 5a 50 5a 5a  |D.."0ZPZPXPXZPZZ|
000006d0  50 58 50 58 50 22 0d 02  4e 18 dc 22 30 5a 4f 5a  |PXPXP"..N.."0ZOZ|
000006e0  4f 58 4f 58 5a 4f 5a 5a  4f 58 4f 58 4f 22 0d 02  |OXOXZOZZOXOXO"..|
000006f0  58 18 dc 22 30 42 42 42  47 49 4e 49 47 42 42 42  |X.."0BBBGINIGBBB|
00000700  46 49 4e 49 46 22 0d 02  62 18 dc 22 31 4c 45 4c  |FINIF"..b.."1LEL|
00000710  45 4c 45 4c 4c 45 4c 4c  45 4c 45 4c 45 22 0d 02  |ELELLELLELELE"..|
00000720  6c 18 dc 22 31 4a 4e 53  56 53 4e 4a 4a 4a 4a 4a  |l.."1JNSVSNJJJJJ|
00000730  4a 4a 4a 4a 4a 22 0d 02  76 18 dc 22 31 4e 4e 4e  |JJJJJ"..v.."1NNN|
00000740  4a 4a 45 42 45 4a 4a 4e  4e 45 45 42 42 22 0d 02  |JJEBEJJNNEEBB"..|
00000750  80 18 dc 22 30 5a 4e 5a  4e 58 4e 58 5a 4e 5a 5a  |..."0ZNZNXNXZNZZ|
00000760  4e 58 4e 58 4e 22 0d 02  8a 1b de 41 24 28 51 25  |NXNXN".....A$(Q%|
00000770  2c 32 29 2c 4f 43 54 25  28 32 29 2c 59 25 28 32  |,2),OCT%(2),Y%(2|
00000780  29 0d 02 94 18 e3 49 3d  30 b8 32 3a 59 25 28 49  |).....I=0.2:Y%(I|
00000790  29 3d 26 37 46 46 46 3a  ed 0d 02 9e 14 e3 49 25  |)=&7FFF:......I%|
000007a0  3d 30 b8 32 3a e3 4a 25  3d 30 b8 51 25 0d 02 a8  |=0.2:.J%=0.Q%...|
000007b0  12 f3 41 24 28 4a 25 2c  49 25 29 3a ed 3a ed 0d  |..A$(J%,I%):.:..|
000007c0  02 b2 0b 54 51 3d 91 2b  44 4c 0d 02 b7 16 ee 85  |...TQ=.+DL......|
000007d0  f1 8a 30 2c 32 32 29 3b  3a f6 3a e5 8d 74 44 43  |..0,22);:.:..tDC|
000007e0  0d 02 b8 11 d4 20 26 46  30 43 30 2c 30 2c 33 2c  |..... &F0C0,0,3,|
000007f0  30 0d 02 bc 0f e3 42 25  3d 31 b8 a9 28 52 24 29  |0.....B%=1..(R$)|
00000800  0d 02 c6 19 56 25 3d 31  2d 28 c1 52 54 24 2c 42  |....V%=1-(.RT$,B|
00000810  25 2c 31 29 3d 22 31 22  29 0d 02 d0 12 52 25 3d  |%,1)="1")....R%=|
00000820  97 c1 52 24 2c 42 25 29  2d 34 39 0d 02 da 0b e3  |..R$,B%)-49.....|
00000830  49 25 3d 30 b8 32 0d 02  e4 1c 4f 43 54 25 28 49  |I%=0.2....OCT%(I|
00000840  25 29 3d 34 38 2a 97 41  24 28 52 25 2c 49 25 29  |%)=48*.A$(R%,I%)|
00000850  3a ed 0d 02 ee 12 e3 49  3d 32 b8 a9 41 24 28 52  |:......I=2..A$(R|
00000860  25 2c 30 29 0d 02 f8 13  f5 fd 91 3e 3d 54 51 3a  |%,0).......>=TQ:|
00000870  54 51 3d 91 2b 44 4c 0d  03 02 20 e3 4a 3d 30 b8  |TQ=.+DL... .J=0.|
00000880  32 3a f1 8a 59 25 28 4a  29 2c 31 36 2d 4a 2a 32  |2:..Y%(J),16-J*2|
00000890  29 3b bd 31 35 36 3b 0d  03 0c 15 57 24 3d c1 41  |);.156;....W$=.A|
000008a0  24 28 52 25 2c 4a 29 2c  49 2c 31 29 0d 03 16 2b  |$(R%,J),I,1)...+|
000008b0  59 25 28 4a 29 3d 97 57  24 2d 36 30 3a f1 8a 59  |Y%(J)=.W$-60:..Y|
000008c0  25 28 4a 29 2c 31 36 2d  4a 2a 32 29 3b bd 31 35  |%(J),16-J*2);.15|
000008d0  37 3b bd 31 35 36 3b 0d  03 2a 1b d4 4a 2b 31 2c  |7;.156;..*..J+1,|
000008e0  56 25 2c 4f 43 54 25 28  4a 29 2b 34 2a 97 57 24  |V%,OCT%(J)+4*.W$|
000008f0  2c 31 0d 03 34 09 ed 3a  ed 3a ed 0d 03 3e 0e e3  |,1..4..:.:...>..|
00000900  52 3d 31 b8 35 30 30 3a  ed 0d 03 84 0c d7 22 48  |R=1.500:......"H|
00000910  45 4c 4c 4f 22 0d ff                              |ELLO"..|
00000917
MUSIC/ColdTea.m0
MUSIC/ColdTea.m1
MUSIC/ColdTea.m2
MUSIC/ColdTea.m4
MUSIC/ColdTea.m5