Music2 VOYAGE $SetMIDI$Scrn2 $RENT $Piano2 $Piano1 $OXEGENE$OxegC $OldMUSI$Music $MIDIon/$MIDIon $MIDI/T $LandMus$LandDem$Hello $GHOSTB $GHOSTA $FOGPIC $Final $DOMINO $DocWho $DocPlus$Bear $Banjo $Always $Addicto$!YesMID$!Boot $ g2I ԰/EhΛH E9aEHs @00PE0UME H\h& |"~X X ͧGa p ͚G~ EHI H Eu yLtXX(LE255KH EP EHV@ ÈXX(XE MEH FEHk 'I`"H Ef EH *BASIC CH."HELLO" *BASIC CH."HELLO" *| RENAME to !NoMIDI for no MIDI setup *| Set name to something else to allow *| MIDI initialisation. *| RENAME to !NoMIDI for no MIDI setup *| Set name to something else to allow *| MIDI initialisation. *|" Tetrachloromethane Theme The Addict's Anthem Written by Daniel Pugh Channel-X Information Services CCl4 : 0482 655798 *|"(c)1989 Channel-X This Program canNOTbe placed for download on a non-Channel-X Bulletin Board. Thank You. *|"    7:23;8202;0;0;0;:t end  &F0C0,0,4,0: Saxaphone " -3,0,1,&80: Use SOUND timer "varibles:e:music:F=1:P$="=" fade(1200,8):fade(1280,8):fade(1360,10):fade(1440,12):fade(1200,12):fade(1280,13):fade(1200,13):fade(1280,13):fade(2400,-50):end >varibles:v=0:D=0:N=1:I=0:K=12:T%=22:(-256)=253T%=T%+28 T2%=T%:F=0 /C=03:C,0,0,1:C:m$(4),e$(4),S(3):end %IP$="023456789:;>?1<=@A@BC9:;89@A@BC9<=>?8DEFGH89IJ:;>?1<=@A@BC9:;89<" - 2^words:J=1WP$:D%=WP$,J,1)-&30:R%=D%*20+4000: R%::I=I+1:W$(I):W$(I)="E":I=I-1:: &"A A A AA AA AA = = === ? ??DDC" H&"A C B C A CB C F B" R"@I I" \&"K J" f"G" p'"4 4 556 644 446 444 556 644 44" z'"M M M M M M M M M M M M O O P R " '" M M P P M M P P M M P P O O P R" &"A A A AA AA AA = = === ? ?? ??" &"E B C A CB C A C B C A CB C" "J" "J" "G" '"6 444 556 644 446 4 4 5 5 6 6 44" '"M M M M M M M M M M M M O O P R " '" M M P P M M P P M M P P O O P R" &"A A A AA AA AA = = === ? ??DDC" &"A C B C A CB C A F C" "J" "J" "G" '"4 4 556 644 446 444 556 644 44" '"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" $&"M PPM T PUT TTRRPP MP WWR OR OK" .&"A A A AA AA AA = = === ? ?? ??" 8&"E B C A CB C A C B C A CB C" B"J" L"L" V"G" `'"6 444 556 644 446 444 4 444 4 44" j'"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" t&"M PPM T PUT TTRRPP MP WWR R [W" ~&"A A A AA AA AA = = === ? ??DDC" "A C B C A CB C A B" "J" "L" "G" '"4 4 556 644 446 444 556 644 44" '"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" '"MPY\e`YTMPY\e`YTIMUa\UPIKW^[RKPW" &"A A A AA AA AA = = === ? ?? ??" &"E B C A CB C A C B C A CB C" "J" "K" "G" '"6 444 556 644 446 444 556 665544"  '"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" '"MPY\e`YTMPY\e`YTIMUa\UPIKW^[RKPW" &"A A A AA AA AA = = === ? ??DDC" (""A C B C A CB C A C B C A F" 2"J" <"K" F"G" P'"4 4 556 644 446 444 556 644 44" Z&"M PPM T PUT TTRRPP MP WWR OR OK" d'"MPY\e`YTMPY\e`YTIMUa\UPIKW^[RKPW" n'"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" x&"E B C A CB C A C B C A CB C" "L" "K" "J" '"6 444 556 644 446 444 554 444 44" &"M PPM T PUT TTRRPP MP WWR R [W" '"MPY\e`YTMPY\e`YTIMUa\UPIKW^[RKPW" '"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR"  "A C B C A CB C A C B C B" "L" "K" "J" '"4 4 556 644 446 444 556 644 44" '"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" ""T R P O K M" &"A A A AA AA AA = = === ? ?? ??" &"E B C A CB C A C B C A CB C" ""J" ,"M" 6"G" @'"6 444 556 644 446 444 556 644 44" J'"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" T$"P O M M O P R P O K" ^&"A A A AA AA AA = = === ? ??DDC" h$"A C B C A CB C A C B C A CB" r"J" |"M" "G" '"6 444 556 644 446 444 5544 55 " '"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" $"P O M M O P R T W Y" &"A A A AA AA AA = = === ? ??DDC"  "A C B C A CB C A C B C F" "J" "M" "G" '"4 4 556 644 446 444 556 644 44" &"MMMMMPMPMMMMMPMPM M M M O O P R" '" M M P P O O P R" &"A A A AA AA AA = = === ? ?? ??" $"E B C A CB C A C B C A CB" "J" "J" &"G" 0'"6 444 556 644 446 444 4 455 4444" :%"M M M M M M M M M \^` a cd" D'" M M P P M M P P MMMMPMPOOOOPPRR" N&"A A A AA AA AA = = === ? ??DDC" X"A C B C A CB C A B" b"J N" l"J" v"G" '"4 4 556 644 446 444 556 644 44" '"e e e e e eh eh eh eheheheheh" '"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" &"A A A AA AA AA = = === ? ?? ??" $"E B C A CB C A C B C A CB" "N" "J" "G" '"6 444 556 644 446 444 555 664 " '"ee c a `^^ \ Y [ \Y T Y\^_`ce" '"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" &"A A A AA AA AA = = === ? ??DDC" $"A C B C A CB C A C B F E" "N"  "J" "G"  '"4 4 556 644 446 444 556 644 44" *&"`c`e`c`e`c`e`c`e ec caUaU` ^\ Y" 4'"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" >&"A A A AA AA AA = = === ? ?? ??" H&"E B C A CB A C B C A CB C" R"N" \"J" f"G" p'"4 4 556 644 446 444 4 44 44444" z'"Y T T T YT T T ` c e hh hehe" '"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" &"A A A AA AA AA = = === ? ??DDC" "E B C A CB C A C B" "N" "J" "G" '"4 4 556 644 446 444 556 644 44" '"ee c a `_^ \Y \^ _ ` aecaecaec`" '"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" &"A A A AA AA AA = = === ? ?? ??" $"E B C A CB C A C B C A CB" "N" "J" "G" '"4 4 556 644 444 4 556 655 66" &"ee ee `_^ Y WTSRPMKHGFDbce e" $'"MMMMMPMPMMMMMPMPMMMMMPMPOOOOPPRR" .&"A A A AA AA AA = = === ^_` `" 8"E B C A CB C E B F" B"N" L"J" V"G N" `"4" j"M" t"P" ~"H" "E" "J" "J" "J" e *1,2,0,0,0,0,0,0,127,-50,-50,-10,126,0 )2,1,0,0,0,0,0,0,127,-4,-50,-3,126,60 '3,1,0,0,0,0,0,0,90,-30,-5,-6,100,0 '4,1,0,0,0,0,0,0,90,-10,-5,-2,110,0 *5,2,0,0,0,0,0,0,127,-5,-10,-2,126,100 ,6,129,1,-1,0,1,1,0,127,-2,-50,-3,126,10 ,7,128,1,-1,0,1,1,0,127,-2,-50,-4,126,10 )8,4,1,-1,1,1,2,1,127,-30,-1,-2,80,80 *9,4,1,1,1,8,16,32,16,32,-1,-4,100,100 ,10,4,1,-1,1,1,2,1,127,-30,-1,-4,110,110 (11,4,0,0,0,0,0,0,127,-2,-8,-4,98,40 ,12,132,1,-1,0,1,1,0,127,-40,-5,-5,126,0  )13,4,1,-1,1,1,2,1,116,-1,-2,-1,126,0 (14,1,0,0,0,0,0,0,127,-3,-2,-2,126,0 F Pfe Z,1,2,0,0,0,0,0,0,127,-50,-50,-10,126-v,0 d12,1,0,0,0,0,0,0,127,-4,-50,-3,126-v,60-(v/2) n)3,1,0,0,0,0,0,0,90,-30,-5,-6,100-v,0 x.5,2,0,0,0,0,0,0,127,-5,-10,-2,126-v,100-v -6,129,1,-1,0,1,1,0,127,-2,-50,-3,126-v,0 -7,128,1,-1,0,1,1,0,127,-2,-50,-4,126-v,0 010,4,1,-1,1,1,2,1,127,-30,-1,-4,110-v,110-v )11,4,0,0,0,0,0,0,127,-2,-8,-4,98-v,0 .12,132,1,-1,0,1,1,0,127,-40,-5,-5,126-v,0  | end } -2,0,0,0 M5,1)"Hope you liked it ...";(10);:5,2)"Hope you liked it ...";(10); G=(200):"Hello" pt u0"ppppppppppppppppppppppppppppppppppppppp"; z+" Written by Daniel Pugh for CCl4" +" Written by Daniel Pugh for CCl4" 0"```````````````````````````````````````"; "|||||||||||||||" &"||||||||||||||| 롵" &"||||||||||||||| ꠷" -"||||||||||||||| pppppppppppppp" -"||||||| Tetrachloromethane" -" ````󳳳`````" )" " )" " "" 0""; 0" "; 0"0482 655798 "; 0"|||||||||||||||꿥"; 0"||||||||||||||| "; 0"||||||||||||||| "; $"|||||||||||||||" ."|||||||||||||||" 8"|||||||||||||||" B *|" Tetrachloromethane The 7:*|"(c)1988 Channel-X "굯 굪롬"; 0" 󮮮" "굿󫯯굯굱ﵯ굵굤"; "" }"֠󠮠CCL4 󠮮ϠӠ" 23;8202;0;0;0; 28,0,24,39,20 MUS$(4),E(3),W$(306) tV@ I=0  dDI  :I=I+1:W$(I):W$(I)="STOP" N=1 )1,5,1,-1,1,1,2,1,110,10,-2,-1,120,20 ()2,7,1,-1,1,1,1,1,120,6,-5,-7,126,20 2'3,2,1,-1,1,1,2,1,29,-4,0,-2,116,92 <'4,2,0,0,0,0,0,0,90,35,-1,-1,120,80 F(5,1,0,0,0,0,0,0,126,-12,-6,-2,126,0 P(6,5,1,-1,1,1,2,1,80,20,-2,-1,100,20 Z'7,1,0,0,0,0,0,0,120,-8,-4,-2,126,0 _'8,5,1,-1,1,1,2,1,60,20,-2,-1,80,20 d_P$="012345234523455567689:;<=6HI89J;<=>?@>?AB3C5B3DE9:;<=>?@>?@; 5,4,2,6 H'"6 5 6 4 4 6 4 6 445566" R'"EEQQEEQQCCOOCCOOAAMMAAMMAAMMAAMM" \(" TVX VTQ " f'"L S Q T S " p" ... ..." z 5,4,2,6 '"6 5 6 4 446 4 6 445566" '"EEQQEEQQCCOOCCOOJJVVJJVVJJVVJJVV" '" TVX V TS Q " '"T L N Q " '" ... . .. . //"  5,4,2,6 '"6 5 6 4 446 5 6 5 " '"AAMMAAMMAAMMAAMMHHTTHHTTHHTTHHTT" '" Y[] [ Y X XT X " '"M M M L " '" ... /. . . .. . /"  5,4,2,6 '"6 5 6 4 446 5 6 4 " '"AAMMAAMMHHTTHHTTJJVVJJVVHHTTHHTT" '" Y Y X V T X T V " '"M L J H " $'" . . . . . . . . //" . 5,4,2,6 8"6 5 6 444 " B"CCOOCCOOCCOOCCOO" L" V V X X Y Y " V"G " `" . . . . . . " j 5,4,2,3 t"6 5 6 445566" ~"HHTTHHTTHHTTHHTT" "[ " " H H J J L L " "."  5,4,2,6 '"6 5 6 4 4 6 5 6 4 " '"AAMMAAMMAAMMAAMM??KK??KKAAMMAAMM" '" V V Y Y X X T " '"M K M " '" /. . . . . . . //"  5,4,1,3 '"6 5 6 444 6 4 6 445566" '"HHTTHHTTHHTTHHTTEEQQEEQQEEQQEEQQ" '"[ ] T "  '"H H G G E E C C " ". . ."  5,4,1,3 (#"6 5 6 444 6 4 6 44" 2#"AAMMAAMMAAMMAAMMCCOOCCOOCCOO" <#"Y X V T Y X VT V " F#"M M L L J J O " P#". . ./. . . .. . /" Z 5,4,1,3 d "5566" n "CCOO" x " "  "C "  " /"  5,4,1,3  "5566"  "CCOO"  " XT "  "C "  "/.."  5,4,6,1 "6 4 6 4 " "HHTTHHTTHHTTHHTT" "X " "T " ". //////"  5,4,6,8 "6 5 6 4 4 " ""EEQQEEQQCCOOCCOO" ,"T " 6"HIJKLMNOPQRSTUVW" @"" J 5,4,6,8 T"6 5 6 4 4 " ^"EEQQEEQQCCOOCCOO" h"T " r"WVUTSRQPONMLKJIH" |""  5,4,2,6 "4444555566665555" "JJVVJJVVJJVVJJVV" "Z Z Z Z V " "V Q " ""  5,4,2,6 '"6 5 6 4 4 6 5 6 4 " '"AAMMAAMMCCOOCCOOHHTTHHTTHHTTHHTT" '" V V Y Y X X T " '"M S O L O " '"/ . . . . . . . /"  5,3,3,3 "45654 " "HLOTT " "LOTX[ " &"TX[`` " 0"" : 5,4,2,6 D'"6 5 6 4 4 6 4 6 445566" N'"EEQQEEQQCCOOCCOOAAMMAAMMAAMMAAMM" X'" TVX V T S Q " b'"L S Q T S " l'" ... . . . . /" v 5,4,2,6 '"6 5 6 4 4 6 5 6 4 " '"HHTTHHTTHHTTHHTTCCOOCCOOCCOOCCOO" '" X Y [ Y X X X V " '"T S " '" . . . . . . . . /"  5,4,2,6 '"6 5 6 4 446 5 6 4 " '"AAMMAAMMHHTTHHTTJJVVJJVVHHTTHHTT" '" Y Y Y X V T X T V " '"M L J H " '" . . . . . . . . . //" ` |:WOW!!! The Xmas No 1!! j |:I hope you like it... t|:The Xmas No 2 soon!! ~|:MERRY CHRISTMAS!! |:Kevan Ĕ"May",be ,I ,did,n't ,treat ,"you,","Quite ",as ,good ,as ,I ,should.,"May",be ,I ,did,n't ,love ,"you,","Quite ",as ,of,ten ,as ,I ,could. c"Litt",le ,"things,","I ",should ,have ,said , and ,"done,","I ",ne,ver ,took ,the ,t,i,me. R"You ",were,"Al",ways ,On ,My ,Mind.,"You ",were,"Al",ways ,On ,My ,Mind. "May",be ,I ,did,n't ,hold ,"you,","All ",those ,lone,"ly, ",lone,ly ,times.,"And ",I ,guess ,I ,ne,ver ,told ,"you, ","I'm ",so ,hap,py ,that ,you're ,mine. ["If ",I ,"made,","You ",fe,el ,sec,ond ,"best,","I'm ",so ,sor,ry ,I ,was ,bl,i,nd. R"You ",were,"Al",ways ,On ,My ,Mind.,"You ",were,"Al",ways ,On ,My ,Mind. "Te",ll ,"me, ",tell ,me ,that,"your ",sweet ,love ,has,n't ,died.,"Gi",ve ,"me, ",one ,more ,chance,"to ",keep ,you ,sa,tis,fied.,"Sat",is,fied.,"" "Litt",le ,"things,","I ",should ,have ,said , and ,"done,","I ",ne,ver ,took ,the ,t,i,me.,"You ",were,"Al",ways ,On ,My ,Mind.,"You ",were,"Al",ways ,On ,My ,Mind. "Te",ll ,"me, ",tell ,me ,that,"your ",sweet ,love ,has,n't ,died.,"Gi",ve ,"me, ",one ,more ,chance,"to ",keep ,you ,sa,tis,fied. "You ",were,"Al",ways ,On ,My ,Mind.,"You ",were,"Al",ways ,On ,My ,Mind.,"You ",were,"Al",ways ,On ,My ,Mind.,"You ",were,"Al",ways ,On ,My ,Mind. X"You ",were,"Al",ways ,On ,My ,Mind.,"You ",were,"Al",ways ,On ,My ,Mind.,"","" "May",be ,I ,did,n't ,treat ,"you,","Quite ",as ,good ,as ,I ,should.,"May",be ,I ,did,n't ,love ,"you,","Quite ",as ,of,ten ,as ,I ,could. (c"Litt",le ,"things,","I ",should ,have ,said , and ,"done,","I ",ne,ver ,took ,the ,t,i,me. 2U"You ",were,"Al",ways ,On ,My ,Mind.,"You ",were,"Al",ways ,On ,My ,Mind.,"" "STOP" *| Crimbo No.1 !!! !*| Only 19 Hours After It Was %*| Anounced It Was On CCL4 (MT2!) *| Not Bad Eh?... 7:*|"(c)1988 Channel-X "굯 "FOGGY MOUNTAIN BREAKDOWN " DATA2,2,1 " ^^^ (" STRING^^ 2" FRET^ <" DURATION F*FX9 K D}A P2:23;8202;0;0;0; ZM19,1,4;0;19,2,4;0;19,3,0;0;19,4,6;0;19,7,0;0;19,0,6;0;19,6,1;0;19,5,4;0; d)1,1,0,0,0,0,0,0,127,-5,-3,-1,126,120 n)2,1,0,0,0,0,0,0,127,-5,-5,-1,126,126 x pitch%=10 *L.FOGPIC 140:0,0)40 I%=0 X%=0 z%=1 3   ...VDU23;13,X%;0;0;0; X%=(X%+1)80 I%=(I%+1)3 I%=2DDB I%=0DvB W%,V%,D% V%=V%*4 "==SPEED D%=D%*2 W%=1W%=61 W%=2W%=49 W%=3W%=33 W%=4W%=13 "W%=5W%=81 ,W%=6DhA 6"==PITCH @W%=W%+V%+pitch% J1,1,W%,D% T2,2,W%+1,D% ^3,1,W%+49,D% h W%=6 rpitch%=pitch%+4 |T=11300:: } "Hello" 2,0,2,2,1,2,2,2,2 2,2,1,2,3,1 2,2,1,2,3,1 5,0,1,2,0,1,1,0,1,5,0,1 2,2,1,2,3,1 2,2,1,2,3,1 "5,0,1,3,3,1,3,2,1,1,0,1,5,0,1 3,0,1,5,0,1,3,0,1,1,0,1  3,0,1 4,1,2,4,2,2 1,2,2,2,0,2,3,0,2 "=============== 44,2,1,2,0,1,1,2,1,5,0,1,1,2,1,2,0,1,3,0,1,1,2,1 :3,0,1,1,0,1,5,0,1,3,2,1,1,0,1,3,0,1,4,2,1,4,0,1,3,0,1 5,0,1,3,0,1,1,0,1,3,0,2 R4,1,2,4,2,2,1,2,2,2,0,2,3,0,2,4,2,1,2,0,1,1,2,1,5,0,1,1,2,1,2,0,1,3,0,1,1,0,1 &j3,0,1,1,0,1,3,2,1,3,4,1,1,0,1,3,0,1,4,2,1,4,0,1,3,0,1,1,0,1,5,0,1,3,2,1,3,4,1,1,0,1,3,0,1,4,2,1,1,0,1 04,0,2,2,2,1,2,3,1,5,0,1,2,3,1,1,0,1,5,0,1,2,2,1,2,3,1,2,2,1,2,3,1,5,0,1,3,3,1,3,2,1,1,0,1,5,0,1,3,0,1,5,0,1,3,2,1,3,4,1,1,0,1,3,0,1,4,2,1,1,0,1,3,0,1 : 6,0,0 D19,3,4;9;19,4,4;0; N19,1,0;9;19,2,6;0; X19,7,6;0;19,0,0;0; b19,6,4;0;19,5,1;0; l v19,1,4;0;19,2,4;0; 19,3,0;0;19,4,6;0; 19,7,0;0;19,0,6;0; 19,6,1;0;19,5,4;0;  "FOGGY MOUNTAIN BREAKDOWN " DATA2,2,1 " ^^^ (" STRING^^ 2 % THE BARE NECESSITIES - Oct 1986 "DO NOT RENUMBER  df@ (7:23;8202;0;0;0; 2T%:    0,2,2,2 "" )"R T R T R T R O R T R O R K M O R " )" O N M L E " )" K K J F A "  0,2,2,3 "" " V U V T R R T R T R " " P O P O M " "F A F K J "  0,2,2,3 &ܢ 0'"T RO M R MR V [ Y W V T " :'"O J J S P O M L " D'"K F F C C H FE C " X 0,2,2,3 b"" l'" Y [ Y [ Y [ YV R T R T R " v'"K U J V J V V O O " '"A K F F F K K "  0,2,2,3 "" '"[ RR T V Y V Y V R O M R ROT " '"R R S R K K " '"K M O H A J F H "  0,2,2,3 "" '"R RQ QO M M T TRQ R " '"M K K Q K M M " '"J A E H E A A F J A J "  0,2,2,3 ""  '" RQ QO M T T R T V " *'" K Q Q O Q R R " 4'"F A E H E A K F M A M " H 0,2,2,3 R"" \" V W Y [ [ [ W V T V W " f" R T V W W W T R " p"F P R N "  0,2,2,3 "" "Y [ Y V T R V O OOO " "R R R " "J F H C L C "  0,2,2,3 "" "V O O O WWW VVT R Q M " "S O O O M " "C H G C K L A "  0,2,2,3 "" "R RV Y [ V W Y " "J R V S S " $"F E D C J M K J M K J " 8 0,2,2,3 B"" L'"[[[ W V T R Q R Q O Q " V'"R K R Q Q O M M M K K " `'"K H A K F J C J H H " t 0,2,2,3 ~"" "R M O R " " M N M " "F J K H J "  0,2,2,3 "" $"R ^" $" M N M N M N M V" $"F J K H F J K H F J K H J M" % THE BARE NECESS????********????????****????****????****????****????????********????****????****????****????************????????****************????****????************************************************************************????????********************????????****????????********************************????****************************************************************????****????????????????????********************************????****????????????????****????????************????********????????<<<<((((((((<<<<<<<<((((<<<<((((<<<<((((<<<<((((<<<<<<<<((((((((<<<<((((<<<<((((<<<<((((<<<<((((((((((((<<<<<<<<((((((((((((((((<<<<((((<<<<((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((<<<<<<<<((((((((((((((((((((<<<<<<<<((((<<<<<<<<((((((((((((((((((((((((((((((((<<<<((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((<<<<((((<<<<<<<<<<<<<<<<<<<<((((((((((((((((((((((((((((((((<<<<((((<<<<<<<<<<<<<<<<((((<<<<<<<<((((((((((((<<<<((((((((<<<<<<<<3333""""""""33333333""""3333""""3333""""3333""""33333333""""""""3333""""3333""""3333""""3333""""""""""""33333333""""""""""""""""3333""""3333""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""33333333""""""""""""""""""""33333333""""33333333""""""""""""""""""""""""""""""""3333""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""3333""""33333333333333333333""""""""""""""""""""""""""""""""3333""""3333333333333333""""33333333""""""""""""3333""""""""333333330000 00000000 0000 0000 0000 00000000 0000 0000 0000 0000  00000000  0000 0000          00000000  00000000 00000000    0000         0000 00000000000000000000    0000 0000000000000000 00000000   0000  00000000                                                                                 AÂAAÂAAAAAÂAAAAAÂAAAÂAAÂAAAAAÂAAAAAAÂAAAAÂAAAAAAAÂAAAAAÂAAAAAA  DOCTOR WHO - 1984 5:23,1,0;0;0;0;  DBI  &F0C0,0,3,0: Brass Ens.  V%(8) (*FX154,224 2 ?&360=&F < ?&361=1 F ?&34F=&20 P ?&363=&55 Z ?&362=&AA d ?&30A=9 n.20:T%=17:19,T%+7,T%;0;::*LOAD DocPlus xmc:BLOCK:&FFBF MUS$(3),E(3),N(3) C%=0:TEMP=2:TU=0:W=6.95 KEY=1:VOL=126 *FX21,4 *FX21,5 *FX21,6 *FX21,7 &1,1,0,0,0,0,0,0,127,-1,0,-2,VOL,0 *2,4,1,-1,1,1,2,1,127,-1,0,-1,VOL-26,0 +3,4,1,-1,0,2,2,0,120,-1,-1,-1,VOL-36,0 &4,1,0,0,0,0,0,0,127,-1,0,-2,VOL,0 -5,3,48,-48,0,1,1,0,126,-2,-2,-1,VOL-36,0 -6,3,48,-48,0,1,1,0,100,-2,-5,-3,VOL-36,0 )7,1,0,0,0,0,0,0,10,-1,-1,-1,VOL-16,0 (8,0,-48,1,-1,1,1,1,100,0,0,-1,VOL,0 '9,2,-3,0,0,80,0,0,3,-3,-2,-2,VOL,0 "&10,1,0,0,0,0,0,0,127,0,0,-1,VOL,0 ,)11,3,-1,0,0,200,0,0,127,0,0,-1,VOL,0 65P$="70123456234589:;<=45623>>4589:;?@@623456ABCD" @ J%=1P$ JD%=(P$,J%,1))-&30 TREL%=D%*60+540 ^ REL%:P(D%): hex r DBI | P(D%) X%=03:E(X%): X%=03:MUS$(X%): L%=1MUS$(1):T=+W  G%=13 P=4*(MUS$(G%),L%,1)) B%=G% &200 B%=B%-&1000*(P=128) !P=P+(KEY*4)-91*(G%=1E(G%)=0)  ENV=E(G%) B%,ENV,P+TU,TEMP  :C%=C%+1 jMUS$(0)=""-&1000*(MUS$(1),L%,1)=" "),E(0),3,TEMP P=(MUS$(0),L%,1))-&30:-&1000*(P=-16),E(0),P,1  -T>W:  $::::::::::::::::::::::::::::::::  1,0,0,3 &"" 0"GGGG ;G GG ;G GG >J JJ 9" :" " D" " N$:::::::::::::::::::::::::::::::: X 1,0,2,2 b"" l"G GG ;G GG ;GGGG >J JJ 9" v" Z g " " " $::::::::::::::::::::::::::::::::  1,0,2,2 "" "GGGG ;GGGG ;BBBB 6B B CE" "ffffffffff iii d" " " $::::::::::::::::::::::::::::::::  1,0,2,2 "" "GGGG ;GGGG ;BBBB 6B B CE" "ffffffffff " " " $::::::::::::::::::::::::::::::::  1,0,8,7 ""  "GGGG ;GGGG ;JJJJ >B B CE" *"f b _ Z ]] [Z " 4" " >$:::::::::::::::::::::::::::::::: H 1,0,8,7 R"" \+"GGGG ;GGGG ;BBBB 6BBBB 6BBBB E E C@" f+" XX Z []ZZ gffffffff " p+" E E C@" z$::::::::::::::::::::::::::::::::  1,0,2,7 "" "BBBB 6BBBB 6BBBB >J J HE" " Z g " "B BBB " $::::::::::::::::::::::::::::::::  9,0,9,9 "" "G " "IIIIIIIIII " "KKKKKKKKKK " $::::::::::::::::::::::::::::::::  1,0,2,7 "" "BBBB 6BBBB 6BBBB 6E E C@" " " $"B BBB " .$:::::::::::::::::::::::::::::::: 8 1,0,5,2 B"" L6"J JJ >JJJJ >JJJJ >JJJJ 9EEEE >JJJJ >J JJ >JJJJ " V6"ZZZZZZZZZZZZZZZZ VVVZZ XXX VUVVVVVVV " `6" " j$:::::::::::::::::::::::::::::::: t 1,0,5,2 ~"" "7CCCC >J JJ 7CCCC >J JJ " " ____][]]]VVV____][]]]VV" " " $::::::::::::::::::::::::::::::::  1,0,5,2 "" "6BBBB 6BBBB ;G GG ;G GG " "ZXXXXXX VUVVVVVVVVVVV" " " $::::::::::::::::::::::::::::::::  1,0,6,1 ""  ";BBBB 6B B CE;G GG ;GGGG "  "VUTSRQPONMLKJIHGFE "  " " $:::::::::::::::::::::::::::::::: ( 1,0,2,2 2"" <";BBBB 6B B CE" F" " P" " Z$:::::::::::::::::::::::::::::::: d 1,0,2,2 n"" x"GGGG ;GGGG ;JJJJ >B B CE" " " " " $::::::::::::::::::::::::::::::::  1,0,6,7 "" "6B BB 6B BB 6B BB E E C@" "VUTSRQPONMLKJIHGE " " E E C@" $::::::::::::::::::::::::::::::::  1,0,8,7 "" "B BB 6B BB 6BBBB E E C@" " " "B BBB E E C@" $::::::::::::::::::::::::::::::::  1,0,2,2 """ ,"GGGG ;GGGG ;BBBB 6B B CE" 6"ffffffffff Z g " @" " J$:::::::::::::::::::::::::::::::: T 1,0,2,2 ^"" h"GGGG ;GGGG ;BBBB 6B B CE" r"ffffffffff " |" " $::::::::::::::::::::::::::::::::  10,0,9,9 "" "GGGGGGGGG " " IIIIIIIIII" " KKKKKKKKKK" $:::::::::::::::::::::::::::::::: 10,11,0,0 "7" "d" " " " " mc bl=&F8:vls=&70 nocaicsm=&360 osword=&FFF1 & somcr% 256 0apo%=022 : P%=somcr% D [OPTapo% NPHP XCMP#5:BNE Out bPHA:TXA:PHA:TYA:PHA l LDA pidcc v$CLC:ADC#1:CMP noidcc:BNE itpidcc LDA#0:.itpidcc STA pidcc ASL A:TAX:LDA vls,X:STA bl LDA vls+1,X:STA bl+1 LDY#1:.uitl LDA (bl),Y STA itb,Y:DEY:BPL uitl "LDY #2:LDA (bl),Y:CMP nocaicsm BCS exit:STA ctg LDA #0:STA lc *.cl INY:INC lc:LDA (bl),Y:STA pc:STY m /LDY #lc 256:LDX#lc 255:LDA#&0C:JSR osword LDY m:DEC ctg:BNE cl /LDA #4:LDX#itb 256:LDY#itb 256:JSR osword *.exit PLA:TAY:PLA:TAX:PLA:.Out PLP:RTS  .lc:]:?P%=0:P%=P%+1:[OPTapo%  .pc:]:!P%=0:P%=P%+4:[OPTapo% V.itb:]:?P%=-8:?(P%+1)=-8:P%=P%+2:?P%=-1:?(P%+1)=-1:P%=P%+2:?P%=-1:P%=P%+1:[OPTapo%  .m:]:?P%=0:P%=P%+1:[OPTapo% *!.ctg:]:?P%=0:P%=P%+1:[OPTapo% 4#.pidcc:]:?P%=0:P%=P%+1:[OPTapo% >$.noidcc:]:?P%=0:P%=P%+1:[OPTapo% H]: R \ BLOCK fLSB=-5:MSB=-1 p;?@A@BCD=>E?@A@BFGHIJKLMNO;?@A@BPQRSTUTVW":music:fade:end Xvaribles:v=0:D=0:N=1:I=0:T%=40:C=03:C,0,0,1:C:m$(4),e$(4),S(3),W$(395):end 1WP$="012553556455555555":(-256)=253T%=T%+28 ( 2^words:J=1WP$:D%=WP$,J,1)-&30:R%=D%*20+4000: R%::I=I+1:W$(I):W$(I)="E":I=I-1:: "D" H"/" R'"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " \'"V V R V V XV T V TVY XV" f&"VV] [ ]V V] bb] VV] [ ]V V] XXY" p'"J J JE F FFH HH HC J FH" z&"M L KLM L KLN M L KLM L KLN" ""G E H E H" "C" "D" "" '"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " &"V V R VT V @TTV VY YX V T" &"VV] [ ]V V] bb] VV] [ ]V V] XXY" '"J J JE F FFH HH HC J EE" &"M L KLM L KLN M L KLM L KLN" &"G E H @H G" "C" "D" "" '"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " &"V C CC H V VTT EE EJ T TV V" &"VV] [ ]V V] bb] VV] [ ]V V] XXY" $&"Y [ [ ] T" .&"M L KLM L KLN M L KLM L KLN" 8 "GD H D H" B"C" L&"F G" V"" `'"6 4 446 6 4 4 5 6 4 44444 4 " j'"V C CC H VT V EE EJ T V " t&"VV] [ ]V V] bb] VV] [ ]VT ] V Y" ~$"Y [ [ J H J" "M L KLM L KLN M L KLK" '"GD H D H " %"C H C HC"  "F D" "/" '"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " '"J J JE F FFH HH HC J FH"  "V R T T"  " Q YY X V VR T" &"M L KLM L KLN M L KLM L KLN" "D" "E" "A"  $" , ,, , / , ,, , /" '"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " '"J J JE C FFH HH HC J O Q" ( "V R T V" 2 " Q YY X Y X VV R T" <&"M L KLM L KLN M L KLM L KLN" F$"D P" P"E" Z"A" d$" , ,, , , , / ,, , , /" n'"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " x$"M @C CC H HFE EE EJ J J M"  "Y [ [ ]" " T ] ] ] YY ] V ][ ]" &"M L KLM L KLN M L KLM L KLN" $"P @D P" "F" "A" #" , , , , ,, , / , ,, , /" '"6 4 446 6 4 4 5 6 4 446 6 4 4 4 " $"J @C CC H HFE E EJ J H J"  "Y [ [ ]" " T ] ] ] YY ] V ][ ]" #"M L KLM L KLN M L KLM LK"  "P @D" "F" "A" $" , , , , ,, , / , ,, , //" "'"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " ,'"J JVJE F V FFH HHVHC J V FH" 6 "Q M O M" @ " Q YY X V VR T" J&"M L KLM L KLN M L KLM L KLN" T%"D ND ND ND ND" ^"O" h"A" r$" , ,, , / , ,, , /" |'"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " '"J JVJE C V FFH HHVHC J O Q"  "Q M O Q"  " Q YY X Y X VV R T" &"M L KLM L KLN M L KLM L KLN" $"D ND ND ND P" "O" "A" $" , ,, , , , / ,, , , /" '"6 4 446 6 4 4 5 6 4 446 444 4 4 " $"J @C CC H HFT E EJ TTT V"  "Y [ [ ]" " T ] ] ] YY ] V ][ ]"  "M L KLM L KLN M L KLM K" ""H @D HD OPH" "F" "A" &$" , , , , ,, , / , ,, , //" 0'"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " :&"V C CC H HFE EE EJ J J H T" D&"VV] [ ]V V] bb] VV] [ ]V V] XXY" N'" ] [] [ ` ] Y V Y " X&"M L KLM L KLN M L KLM L KLN" b&"GD G" l"C" v"B A" &" , ,, , / , , , , ," '"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " &"V C CC H HFT Q M T" &"VV] [ ]V V] bb] VV] [ ]V V] XXY" '" ] [] [ ` ` ] Y V " &"M L KLM L KLN M L KLM L KLN" &"GD F G" "C" "B A" '"/ , ,, , / , , , , , //" '"6 4 446 6 4 4 5 6 4 446 6 4 444 " $"V C CC H HFE EE EJ T V" &"VV] [ ]V V] bb] VV] [ ]V V] XXY" "" ] [] [ ` ` ] Y V"  $"M L KLM L KLN M L KLM L K"  "GD H"  "C" *"B" 4'"/ , ,, , / , , , , , //" >'"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " H$"C C CC H HFE EE EJ J J H" R "Y [ [ ]" \" ]] ] ] YY ] ] ][ ]" f&"M L KLM L KLN M L KLM L KLN" p"D" z"O" "I" '"/ / / / / / / / / / / / / / / / " '"6 4 446 6 4 4 5 6 4 446 6 4 4 44" $"C C CC H HFE EE EJ J H J"  "Y [ [ ]" $" ]] ] ] YY ] ] ][ ]T V" $"M L KLM L KLN M L KLM L K" "D" "O"  "I H" '"/ / / / / / / / / / / / / / / / " '"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " $"M @C CC H HFE EE E Y Y Y" &"Y [ [ Q VY ] ] V] V" $" T ] ] ] YY ] V ][ ] M" &"M L KLM L KLN M L KLM L KLN" $"P @D J" ."F J" 8$"A P" B#" , , , , ,, , / , ,, , /" L'"6 4 446 6 4 4 5 6 4 446 6 4 4 4 " V'"M M MH A HHJ J JC J JJ" `"] [" j"Y V" t$"M L KLM L KLN M L KLM L K" ~"D" "O" "O" '"////, / , / , /" '"6 4 446 6 4 4 5 6 4 446 6 4 4 44" '"M M MH A HHJ J JC J JJ" "] [" "Y V" $"M L KLM L KLN M L KLM L K" "D" "O" "O" " , //////" '"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " '"F F FA F FFH H HC H HH" $"Y V R ] [ X" "V X" (&"M L KLM L KLN M L KLM L KLN" 2"D" <"F" F"O" P"" Z'"6 4 446 6 4 4 5 6 4 446 6 4 4 44" d'"F F FA F FFH H HC H HH" n&"Y V R ] [ T" x"V X" $"M L KLM L KLN M L KLM L K" "D" "F G" "O" "" '"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " '"J J JE F FFH HH HC J FH" " VY] Y V TX[ X Y" &"V @ T" &"M L KLM L KLN M L KLM L KLN" "D" "J" "G @G" "" '"6 4 446 6 4 4 5 6 4 446 6 4 4 4 " '"J J JE F FFH HH HC J FH" "" VY] Y V TX[ X Y" ,$"V @ T V" 6$"M L KLM L KLN M L KLM L K" @"D" J"J" T "G @H" ^"" h'"6 4 446 6 4 4 5 6 4 446 6 4 4 4 " r&"V F FF H FFE E EE J T" |&"VV] [ ]V V] bb] VV] [ ]V V] XXY" "" ] [] [ QQQ TTT" &"M L KLM L KLN M L KLM L KLN" &"GD G" "C" ""B OPH OPH" " , ,, , /" '"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " $"V F FF H FFE E EE T V" &"VV] [ ]V V] bb] VV] [ ]V V] XXY" " ] [] [ ` ] Y" &"M L KLM L KLN M L KLM L KLN" "GD H" "C" "B F" %" , ,, , / //////" '"5 4 45 5 4 5 5 4 45 5 4 5 " &'"J JV E F V FFH HHV C J V FH" 0 "Q M O M" : " Q YY X V VR T" D&"N L LN L LN N L LN L LN" N%"D JD JD JD JD" X"E" b"A" l$" , ,, , / , ,, , /" v'"5 4 45 5 4 5 5 4 45 5 4 4 4 " '"J JV E C V FFH HHV C J O Q" "Q M O Q" " Q YY X Y X VV R T" $"N L LN L LN N L LN L K" $"D JD JD JD P" "E" "A" $" , ,, , , , / ,, , , /" '" 44 4444 4 44 4444 4 " '" ] [] [ ` ] Y V Y " "F H E J" $"M V O V O V Q V" "L" "B A" "O" $"E J E J E J E J" &" , ,, , / , , , , ," *'" 44 4444 4 44 4444 4 4 " 4'" ] [] [ ` ` ] Y V " > "F H E J" H$"M V O V O V Q V" R""L K" \"B A" f"O" p$"E J E J E J E J" z'"/ , ,, , / , , , , , //" '"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " '" ] [] [ ` ] Y V Y " &"V CVCC H V V E EE EJ J J H T" $"M V O V V O V Q V" &"M L NLM L NLN M L NLM L NLN" "B A" &"GD HD H D G" $"E H E P E J E J" &" , ,, , / , , , , ," '"6 4 446 6 4 4 5 6 4 446 6 4 4 44" '" ] [] [ ` ` ] Y V " $"V C CC H HFE EE EJ T V" $"M V O V O V Q V" ""M L NLM L NLN M L NLM K" "B A"  "GD H" $$"E J E J E J E J" .'"/ , ,, , / , , , , , //" 8'"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " B&"V C CC H HFE EE EJ TVYYV T" L&"VV] [ ]V V] bb] VV] [ ]V V] XXY" V'" ] [] [ ` ] Y V Y " `&"M L KLM L KLN M L KLM L KLN" j&"GD H G" t"C" ~"B A" &" , ,, , / , , , , ," '"6 4 446 6 4 4 5 6 4 446 6 4 4 44" &"V C CC H HFE EEJ TVY YX VT" &"VV] [ ]V V] bb] VV] [ ]V V] XXY" '" ] [] [ ` ` ] Y V " $"M L KLM L KLN M L KLM L K" "GD H" "C" "B A" '"/ , ,, , / , , , , , //" '"6 4 446 6 4 4 5 6 4 446 6 4 4 4 " &"V C CC H HFE EEJ TVY YX VT" '" VXY^]]^^]^`]]]]]]]]]]]] \]"  '" ] [] [ ` ` ] Y V " ""M L KLM L KLN M L KLM K" "GD H" ("H" 2"B A" <'"/ , ,, , / , , , , ,/////" F'"6 4 446 6 4 4 5 6 4 446 6 4 4 5 " P&"V C CC H HFE EE EJ TVYYV T" Z&"VV] [ ]V V] bb] VV] [ ]V V] XXY" d!"bde ee dedbb ` b`]]]]]]]]" n&"M L KLM L KLN M L KLM L KLN" x&"GD H G" "C" "H" ""  "All ","day, ",all ,day!,E "I ",don't ,know ,"why,","I ",don't ,know ,"how,","I ",thought ,I ,loved ,you ,"but,","I'm ",not ,sure ,"now,","I've ",seen ,you ,look ,at ,stran,"gers,","Too ",ma,ny ,"times,","The ",love ,you ,"want, ",is ,of ,a,"a ",dif ferent ,kind.,E "Re",mem,ber ,when,"we ",felt ,the ,"sun,","A ",love ,like ,pa,ra,"dise,","How ",hot ,it ,"burned,","A ",threat ,of ,dis,tant ,thun,"der,","The ",sky ,was ,"red,","And ",where ,you ,walked ,you ,al,"ways,","Turned ",ev',ry " head.",E "I ",thought ,that ,when we fought,"I ",was ,to ,"blame,","But ",now ,I ,know ,you ,"play,","A ",dif,ferent ,"game,","I've ",seen ,you ,dance ,with ,dang,"er,","Still ",want,ing ,"more,","A",dd ,an,oth,er ,num,"ber,","T",o " the ",score.,E " I ",don't ,know ,"why,"," I ",don't ,know ,"how,"," I ",thought ,I ,loved ,you ,"but,"," I'm ",not ,sure ,"now,"," I ",hear ,the ,thun,der ,crash,"ing,"," The ",sky ,is ,"dark,"," And ",now ,a ,storm ,is ,break,"ing,"," With",in ,my " heart.",E z"All ","day, ",all ,"day, ","Watch ",them ,all ,fall ,"down,","All ","day, ",all ,"day, ","Do",mi,mo ,danc,ing.,E "When you look around,","you wonder,","Do you play to win,","or are you just a bad loser?","All ","day, ",all ,"day, ","All ","day, ",all ,day.,E T"6 4 446 6 4 4 5 " ^"V C CC H HF" h"VV] [ ]V V] bb] " r " ^ ^^" |"M L KLM L KL"  "GD" "C" "H" "" "6 4 446 6 4 4 44" "E EEJ TVY YX VT" "VV] [ ]V V] XXY" " ] ]] V]`" "M L KLM L K" " H G" "C" "H" "" "6 4 446 6 4 4 5 " "V C CC H HF" "VV] [ ]V V] bb]" &"^] [ Y X V T R" 0"M L KLM L KL" : "GD" D"C" N"H" X"" b"6 4 446 " l"E EE EJ " v"VV] [ ]V" "V V YXVT" "M L KLM" " H " "C" "H" "" "6 4 4 5 " "TVYYV T" " V] XXY"  " V T"  " L KL" " G" "C" "H"  "" "6 4 446 "  "V C CC H" *"VV] [ ]V" 4"T V V XY" >"M L KLM" H "GD" R"C" \"H" f"" p"6 4 4 4 " z"H HF" "V] bb] V" "Y V R O"  "M L KL"  "GD" "C" "H" "" envelopes * 1,4,1,-1,1,1,2,1,105,-2,-4,-3,115,60 * 2,5,0,-1,1,1,1,1,126,-1,-1,-2,118,10 % 5,6,0,0,0,0,0,0,127,0,0,0,65,55 (* 6,4,1,-1,1,1,2,1,126,-1,-1,-1,105,95 F, 9,130,1,-1,0,1,1,0,127,-10,-5,-5,110,0 P* 10,1,0,0,0,0,0,0,127,-1,-1,-2,118,10 x+ 14,1,0,0,0,0,0,0,90,-30,-10,-2,115,50 ' 15,6,0,0,0,0,0,0,127,0,0,-1,90,70 / 16,18,0,0,0,0,0,0,127,-20,-20,-20,120,100  fade_envelopes 1 3,1,0,0,0,0,0,0,127,-3,-2,-2,110-v,50-(v/2) 3 4,2,0,0,0,0,0,0,127,-14,-14,-4,126-v,40-(v/2) 0 7,4,0,0,0,0,0,0,127,127,-10,-3,126-v,126-v . 11,1,0,0,0,0,0,0,127,0,-40,-3,120-v,96-v , 12,1,0,0,0,0,0,0,127,-25,-4,-3,115-v,0 , 13,2,0,0,0,0,0,0,127,-50,-6,-4,122-v,0 + 8,7,0,0,0,0,0,0,127,60,-50,-6,126-v,0  |intro_envs ) 1,1,0,0,0,0,0,0,127,0,-40,-3,126,96 ( 2,1,0,0,0,0,0,0,127,0,-30,-4,96,66 ( 3,1,0,0,0,0,0,0,127,0,-20,-5,66,36 * 4,5,1,-1,1,1,2,1,126,-1,-2,-3,110,80 ) 5,5,1,-1,1,1,2,1,126,-1,-2,-6,100,0 ( 6,4,1,-1,1,1,2,1,126,-8,-2,-4,80,0 ( 7,4,1,-1,1,1,2,1,126,-8,-2,-4,60,0 ( 8,4,1,-1,1,1,2,1,126,-8,-2,-4,40,0  ptitle::"////////////////////////////////////%//////////%//CCL4%/,,,,%////////%"; z"//0482 655798%///,,,,,,,,,,,,%////////////////////////뿯//%///%///%"; ",%//%,,,,,,,,,,,,,,,,,,,,,%4%ﵯ%"; "촥%,,,,,,,,%,,,,,,,,,,,,,,,,,,,,,,,,///////dp%//////////////////////////////////,,,,";:28,0,23,39,19::  end: "//////////////////////////////////////%/////Arranged by D.Pugh for CCL4////%/////,,,,,,,,,,,,,,,,,,,,,,,,,,,,,////%//////////////////////////////////////%";:I=(300): "//////////////////////////////////////%/////Hope you liked it! DAN#12////%/////,,,,,,,,,,,,,,,,,,,,,,,,,,,,,////%//////////////////////////////////////%"; G=(200):"HELLO" Y " "F H E J" $"M V O V O V Q V" "L" "B A" "O" $"E J E J E J E J" &" , ,, , / , , ????????????????***????????????******?**????**??**???**??*********???????????**********??*?????***?********???******????**????***????********????????*******????**????***????******????????????***?????***??????***???***????????*******???????????????????*************???????????????????????????????????**********???????????????************?????????????***********?????????????????????**********??????????????????????**********???????????*************?????????????????????************???????????????????*************??????????????*?????****??????????????********????*****??????????*********??*******???????**?????***********????????????????????**************????????????????????????************???????????????????********?????????????????????*************????????????????????????******?????????????????????***???????????????????***********??????????????????***************?????????????????????******?????????????**************??????????????????**************??????????????????***????????????????????***************??????????????????**************???????????????????*************?????????????????????*******??????????????????*************?????????????????????*************???????????????????**********??????????????????***?????????????????**************???????????????*************???????????????????***************??????????????????**************?????????????????**************???????????????**???*********?????????????????????******???***???***????????????***************??*??**??????????????????***???***???******????????????????***????????????     RRRRRR  R  R R RR\   RR R   RRHHH ? + R R R R RR00000%%%0000%%%%ZZZ𐥥%%00000Z%%%Z%0000Z%00ZZ𥥥000000%00%%%%ZZZ0%Z%%0000%%0Z%%%%ZZZ#33RR#Z-<T%:    5,3,4,4 W"6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 4666466646664666" W"V W V W V W V W V W V W V W V W V W V W V W V W W V W V W V W V W V W V W V W " W"L T S R Q [ W " W" H G F E O K " &::::::::::::::::::::::::::::::::::  5,8,8,8 G"6 4 6 4 6 4 6 4 6 4 6 4 6 4 6 4 " G"X X b a X X b a X X b a X X b b a " G"S S Q Q S S Q Q S S Q Q S S Q Q Q " G"L L CDG J J E E L L CDG J J E E L L CDG J J E E L L CDG J J E E " &::::::::::::::::::::::::::::::::::  5,7,8,8 &G"6 4 6 4 6 4 6 4 6 4 6 4 6 4 6 4 " 0G" XX\ X Z V XXXXV X XX\ X Z V XXXXV Z X " :G" V Q Q V Q U X " DG"L L CDG J J E E L L CDG J J E E L L CDG J J E E L L CDG J J E E " N&:::::::::::::::::::::::::::::::::: X 5,8,8,8 bG"6 4 6 4 6 4 6 4 6 4 6 4 6 4 6 4 " lG"[ X [ V U XVX X X V U \XXXX V U L L V V U XX" vG"G G Q Q G G Q Q G G Q Q G G Q Q Q " G"L L CDG J J E E L L CDG J J E E L L CDG J J E E L L CDG J J E E " &::::::::::::::::::::::::::::::::::  5,8,8,8 G"6 4 6 4 6 4 6 4 6 4 6 4 6 4 6 4 " G"[ X [ V U XVX X X V U \XXXX Z X L L Z Z X S " G"G G Q Q G G Q Q G G V U G G V V U " G"L L CDG J J E E L L CDG J J E E L L CDG J J E E L L CDG J J E G " &::::::::::::::::::::::::::::::::::  5,4,8,4 W"6 4 6 4 6 4 6 4 6 4 6 4 6 4 6 4 6 4 6 4 " W"[ X [ X [ X [ X [ X VWX [ X [ X [ X [ X [ X VWX _ [ _ [ _ [" W"L L L J J J J J J J I I I E E E E E E E L L L L " W" [ X [ X [ X" &::::::::::::::::::::::::::::::::::  5,4,8,4 7"6 4 6 4 6 4 6 4 6 4 6 4 "  7" _ [ _ [ [ _ [ _ [ _ [ _ [ _ [ [ " *7"J J J J J J I I I I E E E E E E " 47" [ X [ X VWX [ X [ X [ X [ X [ X VWX " >&:::::::::::::::::::::::::::::::::: H 5,8,8,8 R'"6 4 6 4 6 4 6 4 " \'"X X V U L L V U " f'"S S Q Q S S Q Q " p'"L L CDG J J E E L L CDG J J E E " z&::::::::::::::::::::::::::::::::::  5,7,8,8 '"6 4 6 4 6 4 6 4 " '" XX\ X Z V XXXXV Z X " '" V Q U X " '"L L CDG J J E E L L CDG J J E E " &::::::::::::::::::::::::::::::::::  5,7,8,8 G"6 4 6 4 6 4 6 4 6 4 6 4 6 4 6 4 " G" XX\ X Z V XXXXV Z XX\ X Z V XXXXV Z X " G"[ X [ V XX X X Q X X X V Q U " G"L L CDG J J E E L L CDG J J E E L L CDG J J E E L L CDG J J E E " &::::::::::::::::::::::::::::::::::  5,4,8,4 G"6 4 6 4 6 4 6 4 6 4 6 4 6 4 6 4 " G" [ Z V Z V X " G" LX L LL L PPPS PP " $G"L J L J L L " .&:::::::::::::::::::::::::::::::::: 8 5,4,8,4 BG"6 4 6 4 6 4 6 4 6 4 6 4 6 4 6 4 " LG" [ Z V Z V ] [ Z X U " VG" LX L LL L _ ] [ X " `G"L J L O S Q O L " j&:::::::::::::::::::::::::::::::::: t 5,8,4,8 ~7"4 4 44446 4 4 44446 " 7" JJJJB JJJJB " 7" [ Z V V " 7"G G G " &::::::::::::::::::::::::::::::::::  5,8,4,0 "" " GIKQ S " " G " "" &::::::::::::::::::::::::::::::::::  5,8,4,8 "6 4 6 4 " "] \ ] \ _ ] \X "  "G G " " G S VWX " &:::::::::::::::::::::::::::::::::: ( 5,7,8,8 2'"6 4 6 4 6 4 6 4 " <'" XX\ X Z V XXXXV Z X " F'"\XXXX V _ _ _ Q U " P'"L L CDG J J E E L L CDG J J E E " Z&:::::::::::::::::::::::::::::::::: d 5,7,8,8 n"6 4 6 4 6 " x" XX\ X Z V " "\XXXX V _ _ _ " "L L CDG J J E E L L "  title  FART%=0  23;8202;0;0;0; 6 19,1,0,0,0,0,0: 19,2,0,0,0,0,0: 19,3,0,0,0,0,0 $ 23,226,64,32,32,32,44,50,35,66 *LOAD GhostB 1 :3,3:I%=0 640 8  640-I%,150  640-I%,30  648+I%,150  I%+648,30   $3:0,0);" Music:-D.Hankinson." I%=640 0 -8  640-I%,150 ( 640-I%,30 2 648+I%,150 < I%+648,30 F I% K!0,0);"Graphics:-M.Sherratt" PQ 19,1,1,0,0,0,0: 19,2,1,0,0,0,0,0: 19,3,7,0,0,0,0,0:FART%=FART%+1:FART%=3 U0,0);(20) Z3 n xbig(A$,x,y) X%=c%:Y%=X%256:A%=10:D=c% C$=(240)+8+10+(241)  N=1 (A$) B$=A$,N,1):?D=(B$):&FFF1 +23,240,D?1,D?1,D?2,D?2,D?3,D?3,D?4,D?4 +23,241,D?5,D?5,D?6,D?6,D?7,D?7,D?8,D?8 x+N-1,y)C$:: # CANCION DE ARGENTINA,(BBC TV)  Arranged by D.Hankinson  (C)MCMLXXXIV  5 dW@ # 3333wwwwwp33www33www00p0pёww00ppೳwwwwww"00pwwppp000ppww3333ܘppD00ppp3w3wwwwwwwpp0www3333̙33wpp0www33p`p0p0p3wwwwwsp33w3ݻݸ2vw3w33ww3w0wwwݻẅwwݻwwwwfpp̈w@ppwU3pppppppppё333wwݪ0000̈p0ww33̈pppp3Dp0p0000000ppppp000pp0pp00pp0p0pp0p     D/ow*         W7w&??&           o             ( pn$(40),name$(40),title$(40):*FX15 *K.10OLD|MRUN|M  *EXEC ( TXA 29N$="Music programs 2":A%=0:Y%=0:E%=0:fs%=(&FFDA)&FF <,-2,0,0,0:7:23;2,53;0;0;0: (-1):Z%=0 FM 131141 N$' 131141 N$' 129" _____________________________________" P/132157"Press ESCAPE to return to LOGO" Z dCI%=0:: name$(I%),title$(I%):I%=I%+1:name$(I%-1)="*":max=I%-2 nQ I%=0 max:129;(65+I%);130;name$(I%);28);134;"(";title$(I%),8);")": xH:"Press the LETTER of your program"'"Or@for a random demo:"; <: Z%=&A00 A=64+(max+1) Z%=&A01 A=W%+1 A= &DF " A=64 Z%=&A00+0*(-)+0*(10) ! A>0 A<=max Z%=&A01:A=A+64  Z%=&A00 A=W% A=0  Z%=&A01 W%=max-65 Z%=0 A>64 A<66+max:W%=A 129,A:A=A-65 A:141;131;name$(A)" loading"'141;131;name$(A)" loading"; ' fs%=4 title$(A),7) title$(A)  ^ Dreamscape (Cold Tea),LandDem,Foggy Mountain,Banjo,Piano Rag,Piano1,Ghost Busters,GHOSTA D Bear Necessesities,Bear,Doctor Who,DocWho,Voyage Voyage,VOYAGE  Domino Dancing,DOMINO U You pay my rent,RENT,Oxygene,OXEGENE,Always on my mind,Always,Addiction,Addicto & *** Turn MIDI On ***,SetMIDI,*,* :Z%=0::-1: "up%=: up%=: ,up%:"Dir ^":"Hello" 6fs%=5:"VData 3049" @ ! <>&1900:=&1900:"LandDem" *FX16  *FX13,4 2:23;8202;0;0;0; ( I=0 15: 19,I,0;0;: 2?&FE00=12:?&FE01=8 <?&FE00=13:?&FE01=&D0 F?&FE00=6:?&FE01=23 P?&FE00=7:?&FE01=30 Z?&8F=1:?&8E=1 d*LOAD SCRN2 4680 n*LOAD FINAL 3000 xletters=&3000 temp1=&76B8:temp2=temp1+&280 T%=07:T%?&900=T%?temp1: T%=07:T%?&908=T%?temp2: PASS=022:P%=&A00 $[OPTPASS:LDA#letters 256:STA&72 "LDA#letters 256:STA&73:.pill1 %LDA&72:STA&70:LDA&73:STA&71:LDA#0 $STA&74:LDA#9:STA&75:LDA#2:STA&76 ".pill2 LDY#0:.pill3 LDA(&74),Y PHA:#&AA:STAt:PLA:#&55 STAt+1:LDA(&70),Y:PHA:#&AA STAt+2:PLA:#&55:STAt+3 $LDAt+2:BNEneb1:LDAt:STAt+2:.neb1 &LDAt+3:BNEneb2:LDAt+1:STAt+3:.neb2 %LDAt+2:At+3:STA(&70),Y:INY:CPY#8 $BNEpill3:LDA&70:CLC:ADC#8:STA&70 "BCCob1:INC&71:.ob1 ,LDA&74:CLC:ADC#8:STA&74 6BCCob2:INC&75:.ob2 @%DEC&76:BNEpill2:LDA&72:CLC:ADC#16 J$STA&72:BCCob3:INC&73:.ob3 LDA&73 T#CMP&77:BEQfin:JMPpill1:.fin RTS ^.t EQUD&00000000 h]::?&77=&3D:&A00 r!end1=temp1+&F8:end2=temp2+&F8 | PASS=022:P%=&900:[OPTPASS &.scroll LDX#0:.scloop LDAtemp1+8,X &STAtemp1,X:LDAtemp2+8,X:STAtemp2,X INX:BNEscloop:RTS #.mainloop LDA#0:STAcount:.reset LDA#text 256:STA&7E LDA#text 256:STA&7F RTS !.inner LDAcount:BNEprintstrip .kim LDA#3:STAcount LDY#0:LDA(&7E),Y:CMP#13  BNEpleb:LDA#text 256:STA&7E LDA#text 256:STA&7F:JMPkim .pleb SEC:SBC#32:CLC:ASLA TAX:LDAlettab,X:STA&7A #LDAlettab+1,X:STA&7B:LDA&7A:CLC $ADC#8:STA&7C:LDA&7B:ADC#0:STA&7D &INC&7E:BNEprintstrip:INC&7F 0$.printstrip LDY#0:.pl LDA(&7A),Y :"STAend1,Y:LDA(&7C),Y:STAend2,Y D%INY:CPY#8:BNEpl:LDA&7A:CLC:ADC#16 N"STA&7A:BCCv1:INC&7B:.v1 LDA&7C X"CLC:ADC#16:STA&7C:BCCv2:INC&7D b.v2 JSRscroll:DECcount:RTS l.count EQUB 0 v.text EQUS"........WELCOME TO THE DREAMSCAPE, A TECHNODREAM WHERE NOTHING IS REAL, WHERE THE REAL WORLD OF HUMANS MEETS THE ELECTRONIC WORLD OF THE BBC. AND SHOWS YOU THINGS YOU NEVER THOUGHT POSSIBLE!!!!........"  EQUS" WELL IT SOUNDS GOOD ANYWAY!!! EVEN IF THE BEEB ISNT AS POWERFUL AS SOME MACHINES IT CAN STILL DO SOME NICE THINGS AS THIS DEMO SHOWS, HELLO TO ALL YOU 8BS MEMBERS OUT THERE (HOPEFULLY) ENJOYING THIS DEMO, AND ALSO TO THE 8BS "  EQUS"STAFF, C.J.RICHARDSON AND CO ITS NICE TO SEE PEOPLE LIKE YOU STILL SUPPORTING THE GOOD OLD 8 BIT. THE BBC HAS A LOT TO BE CREDITED FOR...."  EQUS" SO SMILE ON YOUR BROTHER AND KEEP ON BEEBING....... THE BEEB AINT DEAD YET!!!!...... SEE YOU ALL IN TBI-55! ......."  EQUB 13 .lettab:]: : N%=0:T%=0 129 2 A%=N%*&30+letters:N%=N%+1 ?(lettab+T%)=A% 256 ?(lettab+T%+1)=A% 256: :  0,16); 23;0,127;0;0;0  mainloop:a  I=0 7: 19,I,I;0;: 4=0:>50 5"LANDMUS" > Ha:PASS=022:P%=&1400 R%[OPTPASS:.int PHA:TXA:PHA:TYA:PHA \ JSRinner f"DEC&8E:BNEfinish:LDA&8F:STA&8E p LDX#0:.loop LDAtab,X:Ata2,X zSTA&FE21:INX:CPX#8:BNEloop LDAta2:PHA:LDX#0:.loop2 !LDAta2+1,X:STAta2,X:INX:CPX#7 BNEloop2:PLA:STAta2+7 #.finish PLA:TAY:PLA:TAX:PLA:RTS $.tab EQUD&B0A09080:EQUD&F0E0D0C0 $.ta2 EQUD&02020202:EQUD&06060606 ]::?&220=int 256 ?&221=int 256:*FX14,4  ! <>&1900:=&1900:"LandDem" *FX16  *FX13,4 2:23;8202;0;0;0; ( I=0 15: 19,I,0;0;: 2?&FE00=12:?&FE01=8 <?&FE00=13 DL=15:G%=-1  DHC 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  :DHC 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=02:Y%(I)=&7FFF: I%=02:J%=0Q% A$(J%,I%)::  TQ=+DL B%=1(R$) V%=1-(RT$,B%,1)="1") R%=R$,B%)-49  I%=02 OCT%(I%)=48*A$(R%,I%): I=2A$(R%,0) >=TQ:TQ=+DL  J=02  W$=A$(R%,J),I,1) Y%(J)=&7E80+W$-60-80*J *J+1,V%,OCT%(J)+4*W$,1 + kg=(1) , kg<>-1 DHC 4 :: > H *FX13,4 R *E.!Boot DL=15:G%=-1  DHC 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  :DHC 11221    A7 ~IORQ A6 R/~W A5  74LS75 A4 D xO @^3!3^@ NPGFC6 11 +5v A3A@@@@AO<<|ƃ| 7 3 G4 ~Q 1k xxO 13 4  A2 ~R~S 14 D A1 ~CS2 1MHz3 14~Q 13 10 Q x 9 1k G13 1511 9 A011 8  1k Q CLK 74LS74 RS 10 D12 8~Q D715 +5v 220R D616 1k 覦 D517 220R 1 D418 6覦4 D319 2 +5v1k 0v2 OUT D220 12 覦 5 D121 23+5v 220R 3 1 D022 1 24??100n 覦4  | | <<~ 0v2 IN 0v 5 6850 0v 3 +5v is tapped from the analogue port. 6N138 MIDI Interface for BBC Micro A printed drawn version of this is available Version 1.10, September 1989 from JGHPD with an SAE. (C)J.G.Harston MIDI Interfaces available from `20.   $)OR  |        `    `:)`l  `)B)F x x x JJi# H x h x < x , 0`l H,$h`4) m ) x ȭ  ) x )Lx ` x x x `) `Lp  $)OR  |        `   *MIDIon (|OFF) Sets up an intercept on the SOUND command (OSWORD 7) to direct it via a MIDI port. The command assumes the port is a simple 6850 ACIA in page &FC. If no address is given, then &FCF0 is used (status register at &FCF0 and data register at &FCF1). If a two byte address is given, then that is used as the address in page &FC instead, eg *MIDIon 80 would set up the intercept using an ACIA at &FC80. Using 'OFF' will deselect the MIDI intercept. A small buffer is kept to remember what notes have previously been sent. The SOUND commands are intercepted in the following way: SOUND chan,vol,dur,pitch --> Turns off previous note, sends current note. SOUND chan,0,dur,pitch --> Turns off previous note, then doesn't send anything (ie silence). SOUND 0,vol,dur,pitch --> Ignored at the moment. SOUND &1xxx,vol,dur,pitch --> Ignored. There are also some extra extensions: SOUND -2,x,x,x --> All Notes Off. Sends a note off for all possible notes. SOUND -3,x,0,MIDIchannel --> Sets MIDI channel. SOUND -3,x,1,ignoreflag --> Sets the ignore flag. If b7 set then all calls go to the internal SOUND system as well as to the MIDI port. SOUND &Fzxx,x,b2,b1 --> Sends a specific MIDI command: Where xx is &8x to &Bx, sends to the MIDI channel followed by b1 then b2. Where xx is &Cx to &Ex, sends to the MIDI channel, followed by b1. Where xx is &Fx, just sends that command. Eg, SOUND &F0C0,0,5,0 will select voice 5. The actual duration is ignored. The length of the note is defined by sending another note (or a silence) after it to turn it off. This means that this is only suitable for direct use with programs that use a timing mechanism to time the notes, rather than using the sound queue to time them. For example, programs that use a structure similar to: T%=TIME+delay% SOUND etc, etc, etc, REPEAT UNTIL TIME>T% Many demo music programs use this method, and the music programs supplied by J.G.Harston PD use it. With programs that use the sound queue to time the music, setting the ignore flag off with SOUND -3,0,1,&80 will send sound to the internal system as well as to MIDI. Using *FX210,1 to turn off the internal speaker will then in most cases get a sound-queued program to work. Another point to bear in mind is that this will only work with programs that use SOUND (or OSWORD 7). It will not work with programs that directly access the sound hardware. On this disk is a file T/MIDI which is an graphics text file showing a circuit diagram for a MIDI interface. Use *PRINT T/MIDI (or *TYPE T/MIDI if *PRINT is not available) to display it. *MIDIon (|OFF) Sets up an intercept on the SOUND command (OSWORD 7) to direct it via a MIDI port. The command assumes the port is a simple 6850 ACIA in   %     ` 'L   ` @| |P||| (|x||}`Volume0Pitch0 HHHM)ɂL M |0| 08JJJ 0 iP摮 0 XJJJ  ) iP擮 L6 }P|V hhhl ) H/|hL /|1 L~   %     ` 'L  Volume0 Pitch0 Volume1 Pitch1 Volume2 Pitch2 Volume3 Pitch3 HHHM)ɂL M |0| 08JJJ 0 iP摮 0 GJJJ  ) iP擮 L+ hhhl ) H/|hLv /|1 Ls   3@}       '  L(c) 6:7:85 Bill Blunn V2.21 Volume0 Pitch0 Volume1 d i i9  i9i9i9a9U 9 i9  i9i9i9a9U 9 i9  i9i9i9a9U 9 i9  i9i9i9a9Ui9UiE9  U i9i9i9a9U99i9  i9i9i9a9Ui9UiE9  U i9i9i9a9U99i9  i9i9i9a9UaU]xUU  ] UxlUUMUAAUxU  UxlUUMUAx]MxU}pMMx  9}xMp}dM}MuMix]MxU}pMMx  9}xMp}dM}MuMiiiUiE9  U i9i9i9a9U99i9  i9i9i9a9Ui9UiE9  U i9i9i9a9U99i9  i9i9i9a9UaU]xUU  ] UxlUUMUAAUxU  UxlUUMUAx]MxU}pMMx  9}xMp}dM}MuMix]MxU}pMMx  9}xMp}dM}MuMiuiqiu9  iiU9i9i9a9Uu9qiu9  iiU9i9i9a9UaU]xaU  UAUxlUUMUAaU]xaU  UAUxlUUMUAx]MxU}p]Mx  M}xiMp}dM}MuMix]MxU}pMMx  ]}xUMpM}diMM }MuMiuiqiu9  iiU9i9i9a9Uu9qiu9  iiU9i9i9a9UaU]xaU  UAUxlUUMUAaU]xaU  UAUxlUUMUAx]MxU}p]Mx  M}xiMp}dM}MuMix]MxU}pMMx  ]}xUMpM}diMM }MuMiiiUiE9  U i9i9i9a9U99i9  i9i9i9a9Ui9UiE9  U i9i9i9a9U99i9  i9i9i9a9UaU]xUU  ] UxlUUMUAAUxU  UxlUUMUAx]MxU}pMMx  9}xMp}dM}MuMix]MxU}pMMx  9}xMp}dM}MuMiiiUiE9  U i9i9i9a9U99i9  i9i9i9a9Ui9UiE9  U i9i9i9a9U99i9  i9i9i9a9UaU]xUU  ] UxlUUMUAAUxU  UxlUUMUAx]MxU}pMMx  9}xMp}dM}MuMix]MxU}pMMx  9}xMp}dM}MuMiuiqiu9  iiU9i9i9a9Uu9qiu9  iiU9i9i9a9UaU]xaU  UAUxlUUMUAaU]xaU  UAUxlUUMUAx]MxU}p]Mx  M}xiMp}dM}MuMix]MxU}pMMx  ]}xUMpM}diMM }MuMiuiqiu9  iiU9i9i9a9Uu9qiu9  iiU9i9i9a9UaU]xaU  UAUxlUUMUAaU]xaU  UAUxlUUMUAx]MxU}p]Mx  M}xiMp}dM}MuMix]MxU}pMMx  ]}xUMpM}diMM }MuMiuiqiu9  iiU 9u iU9i9a9Uu9Uiq9  i iu9qii9i9a9UaU]xUU  a]UxUlqUA AUMUAaU]xaU  UA Uxal]UUUMUAx]MxM}p]Mx  i}x]Mpi}dM}MuMi}Mi}}M}}M}M}MuMiii9  i 9 i9i9a9U9i9   i9i9i9a9UUxU  UxlUq qUMUAUxU  q UxlUUMUAxMx}}pMx  }xMp}dM}MuMiM}M}M}M}MuMiiiUiE9  U i9i9i9a9U99i9  i9i9i9a9Ui9UiE9  U i9i9i9a9U99i9  i9i9i9a9U999i9  i9i9i9a9U999i9  i9i9i9a9U999i9  i9i9i9a9U999i9  i9i9i9a9Ud999i9a9Ud99i9  i9i9i9a9U 9  > Oxegene 7 23;8202;0;0;0; ( tV@ 2 *FX200,0 < T% &3000:E%=T%+&2668 F envs P"LOAD OxegC "+~T% Z *MUSIC dc("OXEGENE") n x ?T%,T%?1,T%?2,T%?3:T%=T%+4 T%=E% /(-5)=15 (-6)=15 (-7)=15 (-8)=15 符-1:*CODE "Hello" envs (1,1,0,0,0,1,1,1,110,-1,-1,-1,110,30 &2,1,0,0,0,1,1,1,90,-1,-1,-2,90,10 )3,1,0,0,-1,10,5,20,126,-1,0,-2,126,0 '4,1,0,0,0,1,1,1,126,-1,0,-1,126,87 &5,1,0,0,0,0,0,0,90,-3,-2,-2,90,63 (7,1,1,0,-1,1,1,1,126,-1,0,-2,126,60 &6,1,0,0,0,1,1,1,120,-1,0,-1,116,0   c(A$) L%:L%=((A$)+8)2 %31,19-L%,10:"";A$;" "156 %31,19-L%,11:"";A$;" "156 " , code 6N%=01:P%=&C00:[OPT0 @'LDA &220:STA vec1:LDA &221:STA vec2 JLDA #evnt 256:STA &220 T8 LDX #1:.loop3 LDA#0:STA table,X:INX:CPX#4:BNE loop3 ^1LDA #evnt 256:STA &221:LDA #&4C:STA abc:RTS hB.evnt PHA:TXA:PHA:TYA:PHA:LDA &318:STA x:LDA &319:STA y:LDX #1 r3.loop LDA table,X:JSR blank:INX:CPX #4:BNE loop |XLDX #1:.loop1 LDA &810,X:LSR A:LSR A:LSR A:STA table,X:JSR mark:INX:CPX #4:BNE loop1 BLDA x:STA &318:LDA y:STA &319:PLA:TAY:PLA:TAX:PLA:RTS:.abc BRK  .vec1 BRK  .vec2 BRK ?.blank CMP #0:BNE ok:RTS:.ok STA t1:STX t2:LDA #31:JSR&FFEE NLDA #3:CLC:ADC t1:JSR &FFEE:LDA #17:CLC:ADC t2:JSR &FFEE:LDA #32:JSR &FFEE LDA t1:LDX t2:RTS ž.mark CMP #0:BNE ok1:RTS:.ok1 STA t1:STX t2:LDA #31:JSR&FFEE:LDA #3:CLC:ADC t1:JSR &FFEE:LDA #17:CLC:ADC t2:JSR &FFEE:LDA #255:JSR &FFEE:LDA t1:LDX t2:RTS .table:BRK:BRK:BRK:BRK .t1 BRK:.t2 BRK .x BRK:.y BRK  ]::  > Oxegene 7 23;8202;0;0;0; ( tV@ 2 *FX200,0 < T% &3000:E%=T%+&2668 F envs P"LOAD OxegC "+~T% Z *MUSIC dc("OXEGENE") n x ?T%,T%?1,T%?2,T%?3:T%=T%+4 T%=E% /(-5)=15 (-6)=15  Piano Rag  by Mike Goldberg !-P<&4C00:=&1A00:"Piano1" 2:23;8202;0;0;0;  19,6,1;0;19,8,2;0;19,9,2;0; *LOAD Piano2 FFFF3000 Z=0 d}C *FX9 &1,3,0,0,0,0,0,0,126,-1,0,-2,100,0 (&2,1,0,0,0,0,0,0,126,-1,0,-2,100,0 2)3,2,1,-2,0,0,0,0,127,-4,-3,-3,126,90 Z"====================== dpitch%=49:DhA n x C,P,T Z=(Z+1)4 -Z=319,7,7;0;19,9,2;0;19,8,0;0;19,6,1;0; -Z=119,7,3;0;19,9,0;0;19,8,2;0;19,6,7;0; V=C:P=1V=0 P>1C=3P=P-pitch% C=3V<>0C,3,P,T:d\@ P=-9d\@ 2P<0&101,0,-P,T:&100,1,3,T:0,0,0,0C,V,P,T C<-3 end:G=(200):DfC "============ end T=18 Z=(Z+1)4 3Z=319,7,7;0;19,9,2;0;19,8,0;0;19,6,1;0;:TbA -Z=119,7,3;0;19,9,0;0;19,8,2;0;19,6,7;0; U=1190: " ,T=1190: 6)19,7,7;0;19,9,2;0;19,8,0;0;19,6,1;0; @#E=13000::19,8,2;0;19,9,2;0; E J"============ ^"====================== h&101,1,7,&102,1,7 r3,167,4,3,171,3 | 1,53,12 !2,1,4,2,81,2,2,101,4,2,117,2 3,179,6,3,179,6  1,69,12 !2,1,4,2,93,2,2,105,4,2,129,2 3,179,6,3,179,6  1,61,12 !2,1,4,2,89,2,2,101,4,2,121,2 3,187,6,3,179,12 "=====================  1,33,12  2,1,4,2,81,2,2,97,4,2,117,2 3,167,4,3,171,2  1,53,12 !2,1,4,2,81,2,2,101,4,2,117,2 $3,179,4,3,179,3,3,179,3,3,179,2  1,69,12 &!2,1,4,2,93,2,2,105,4,2,129,2 0$3,191,4,3,191,3,3,191,3,3,191,2 : 1,61,12 D!2,1,4,2,89,2,2,101,4,2,121,2 N 3,179,18 X 1,33,12 b 2,1,4,2,81,2,2,97,4,2,117,2 l"==================== v 3,179,6  1,53,12 !2,1,4,2,81,2,2,101,4,2,117,2 3,199,4,3,199,2,3,179,6  1,33,12 !2,1,4,2,93,2,2,101,4,2,117,2 3,191,6,3,187,4,3,187,2  1,25,12 !2,1,4,2,89,2,2,101,4,2,121,2 3,179,6,3,171,6,3,199,9  1,53,24 "2,1,2,2,85,2,2,101,2,2,121,18 "========---- 3,1,13,3,179,2  1,53,12  !2,1,4,2,81,2,2,101,4,2,117,2 3,167,4,3,167,3,3,179,5  1,33,12 * 2,1,4,2,81,2,2,97,4,2,117,2 43,159,6,3,179,6,3,151,2 > 1,53,18 H*2,1,4,2,81,2,2,101,4,2,117,2,2,149,12 R1,-144,24 \ -9,-9,-9 f)1,3,0,0,0,0,0,0,126,-2,-1,-2,126,100 p&2,1,0,0,0,0,0,0,126,-1,0,-2,100,0 z)3,2,1,-2,0,0,0,0,127,-4,-3,-3,126,90  TPD   C,P,T  Z=(Z+1)4 -Z=319,7,7;0;19,9,2;0;19,8,0;0;19,6,1;0; -Z=119,7,3;0;19,9,0;0;19,8,2;0;19,6,7;0;  T=T*1.5 V=C:P=1V=0 P>1C=3P=P-50 C=3V<>0C,3,P,T:dhC P=-9dhC C=1P=P+91:P=-P $P<01,0,-P,T:0,1,3,T:C,V,P,T  C<-3 "============ end:G=(200)  "Hello" "====================== &101,1,1,&102,1,1  1,33,4 $ 2,97,4 . 3,1,12 8 1,41,4 B 2,101,4 L 3,152,4 V 1,49,4 ` 2,109,4 j 3,152,4 t 1,53,8 ~ 2,1,2  3,139,2  1,33,8  2,101,2  3,131,4  1,53,8  2,69,2  3,115,2  1,33,8  2,81,4  3,119,2  1,53,8  2,101,2  3,131,2  1,33,8  2,69,4  3,139,2 ( 1,53,4 2 2,1,2 < 3,131,2 F 2,101,2 P 3,151,2 Z 2,69,2 d 3,139,2 n 2,81,4 x 3,131,2  2,101,2  3,119,2  2,69,4  3,103,4  2,1,2  3,131,4  2,101,2  3,139,4  2,69,2  3,131,4  2,81,4  3,151,4  2,101,2  3,1,12  2,69,4  2,101,4 ""SECOND BIT========== , 1,33,4 6 2,97,4 @ 1,41,4 J 2,101,4 T 1,49,4 ^ 2,109,4 h 1,53,8 r 2,1,2 | 3,131,2  1,33,8  3,139,2  2,101,2  3,131,2  1,53,8  3,151,4  2,69,2  3,159,2  1,33,4  3,151,2  2,81,4  3,139,2  1,57,4  3,151,4  2,101,2  3,1,12 & 1,61,8 0 3,159,2 : 2,69,4 D 3,159,6 N 1,41,8 X 3,167,4 b 2,1,2 l 3,159,4 v 1,61,8  2,101,2  2,69,2  2,81,4  2,101,2  1,41,8  2,105,4  1,33,20  2,1,2  2,109,2  2,77,2  3,167,4  2,101,4  3,159,4  2,109,2  2,77,4  2,1,2  2,109,2 * 2,77,2 4 2,101,4 > 2,109,2 H 2,77,4 R 3,1,10 \ 2,129,4 f 3,159,2 p 2,121,4 z 3,187,2  2,117,4  3,195,2  2,109,4  3,207,2  2,101,2  3,215,2  2,97,2  3,207,2 "==3RD BIT  3,195,2 :DATA1,1,12  3,187,2  2,1,4  3,179,2  1,33,4  3,187,4 $ 2,101,4 . 3,179,8 8 1,41,4 B 2,109,4 L 1,49,4 V"==4THBIT ` 1,53,8 j 2,1,2 t 3,131,2 ~ 1,33,8 3,139,2 2,101,2 3,151,2 1,53,8 3,131,2 2,69,2 3,139,2 1,33,8 3,151,2 2,81,4 3,131,2 1,25,8 3,139,2 2,101,2  3,151,2  1,53,8 ( 3,151,2 2 2,69,4 < 3,131,2 F 1,25,8 P 3,163,2 Z 2,1,2 d 3,151,2 n 1,53,8 x 3,131,2 2,101,2 3,163,2 2,69,2 3,131,2 2,93,4 3,139,2 2,101,2 3,151,2 2,69,4 3,131,2 2,1,2 3,139,4 2,101,2  3,151,2  2,73,2  3,131,2 " 2,89,4 , 3,139,2 6 2,101,2 @ 3,151,2 J 2,73,4 T 3,151,2 ^ 2,1,2 h 3,151,2 r 2,101,2 | 3,163,2 2,73,2 3,163,2 2,85,4 3,131,2 2,101,2 3,139,2 2,73,4 "==LAST BIT PART 1 3,151,6 1,53,8 3,159,6 2,1,2 3,163,4  1,49,4  3,167,4  2,101,2 & 3,179,2 0 1,45,4 : 3,183,2 D 2,69,2 N 1,41,8 X 2,81,2 b 1,21,8 l 2,1,2 v 1,61,8 2,97,6 1,33,8 2,1,2 1,53,8 2,105,2 2,69,2 2,81,4 2,105,2 3,187,8 2,69,4 3,199,2 2,1,2 3,187,2  2,109,2 3,179,2  2,77,2 3,167,2 * 2,101,2 4 3,179,2 > 2,1,2 H 3,187,2 R 2,109,2 \ 3,179,2 f 2,61,4 p 3,195,4 z 2,101,4 3,199,4 &&201,53,10,&202,81,10,&203,150,10 -9,-9,-9  Piano Rag  by Mike Goldberg !-P<&4C00:=&1A00:"Piano1" 2:23;8202;0;0;0;  19,6,1;0;19,8,2;0;19,9,2;0; *LOAD Piano2 FFFF3000 Z=0 d}C TTTTTTTTTTTTTTTT^^^^^TTTT^TTTTTTTT^^^^^^^^?TTTTTTTT3333333333333333333333333333""""^^^^^^^^?????????~~~~~TTTTTTTT33333333333333333333333333333333333333333333333333333333""""""""^^^^^^^^TU_ _ T T?????~~TTTTTTTTUUU33333333