3 I#1:1: COMPUTERMUSIC DADU 11.2.1988K:6,1:I09:J4Io0,31,J,J1::0,31,38J,39J::0,31,0,39" >>* DADU-GOLDEN MUSIC *<<"170:(17):7:L$(36," ")I05:(39,"a") (39,"b"):(39,"p")L$:L$:I140I:J216I1239I13 0,J,7:312,J,7:JT X11:Y220I1:23:11:I:26d A$:A(A$)~ K1A:R((A$,K,1)) R9:ԑR14,15,16,17,18,19,20,21:22YY1:YY1:XX1:XX1:XX1:YY1:YY1:YY1:XX1:XX1:!XX1:YY1:3X,Y,7:K:11["881122333445535556667777788717171"11311221223222212221111171777575"5555555555555555555555555555555667881999:KE(45),N$(13),T(13),W(9,4,35),ME$(1,2):28I013:N$(I):I="abcd","a#cd","abef","a#ef","aghi","ajk ","ajk#","alm ","alm#"e"nop ","no# ","aqr ","stu ","vwx "I013:T(I):I:I01:J02:ME$(I,J):J,I216,204,192,182,171,162,153,144,136,128,120,114,108,0  " PLAY "," LOAD "," NEW "," EDIT "," SAVE "," END "%!I114:P:KE(P44)IT"89,83,88,68,67,86,71,66,72,78,74,77,44,46o#JI3:1,5,J,J:(I8)$VI1:T(V),0,T(V),0,30,24:(P);N$(V):4%I:RE$"ENTER -> EXIT"&1,5,20,38:0,7::I01:J02 '2I1,6J1:ME$(I,J):J,I:X0:Y04 (Y122Y:X1216X:(Y1,X1);22,1;ME$(Y,X)R )M$:M$""41:M(M$)7_ *M646 +7,1:(Y1,X1);ME$(Y,X):(0,30);ME$(Y,X):2 ,XY3152,76,131,87,84,157 -(0,30);1;" ":38 .M1M441:Ԟ(Y1,X1);ME$(Y,X)::51 /XX1:X0X2::ԍ( 0XX1:X2X0::ԍ@ 1YY1:Y1Y0::ԍX 2YY1:Y0Y1::ԍq 3 M 47,48,49,50:40 4 KOMPO-SPIEL 5W(0,0,0)0 140 6B18036ZS1799:Ԟ(6,27);"SEITE:";B1 7B1B:S1S:Z1Z:ZU0:(5,23);7,7;RE$ 872:;7;"abp ":T0% 9E$:E$""TT1:60S :(6,22);(T5):T254T254:0,0,0,0,1,1[ ;57{ <0,0,0,0,1,1:ZU1ZU0:T0 =W(B1,Z1,S1)W(B1,Z1,S1)T100 >T0:B9(6,27);" ": ?E(E$):E8ZU1:119:66! @(6,8);" ":FF1Z4:S35:FF0:W(B1,0,0)0) A56B BE13W(B,Z,S)0:68o C72:"[[[ ":(6,22);" ": DEE44: E0E45E21 EKE(E)0ZU1:56:EKE(E):W(B,Z,S)E F71:73 GEE1:TET(E):TE,0,TE,0,30,0 HZE5Z7:SPS3:ZE,ZE3,SP,SP:; IB1B:Z1Z:S1S:N$(E):SS1:S35ZZ1:S0:56d JZ4Z0:BB1:(6,27);"SEITE:";B1l K56x L LADEN MW(0,0,0)0160 N79:82 O:"NAME:";NA$::NA$""NA$"MUSIC" PNA$(NA$,8)::" NAME: ";NA$Q4,4,21,38:23:"RECORD-READY!";E$:7:!R:""NA$;W=S1,5,20,39::::140:JT RETTENRU79cV""NA$;W:sW KORREKTURXW(0,0,0)0Y0,7:Q$"SEITE: ZEILE: SPALTE: "ZB$"":5,5,23,31:"SEITE:";B$::B$""B$"1"[B(B$)1:B0B990:ԊW(B,0,0)090*\93:B1B:Z1Z:S1S:100E]6,1:(6,8);(31," ")]^145:Z04:S035{_W(B,Z,S)0Z4:S35:Ԍ97`99aWW(B,Z,S):W0F4:ZPZ:SPS:BPB:153bcS,Z:Z0:S0:d(5,23);7,7;RE$:(6,8);Q$e16,7:97:7,1:T0+f(6,14);B1:(6,24);Z1:(6,34);S1\gE$:E$""TT1:E(E$):0,0,0,0,1,1:106h(6,3);(T5):T254T254:0,0,0,0,1,1i103jE327,1::"[[[ ":W(B,Z,S)0:109kTT1W(B1,Z1,S1)W(B1,Z1,S1)T100:TT0 lT0:E137,1::N$(WP):110"m(6,3);(37," "):5nE44E89113MoEKE(E44):E0103upW(B,Z,S)E:B1B:S1S:Z1Z:TT1:101qH(E$)7:H1H4103r7,1::155:B1B:Z1Z:S1SsFF0:H119,123,127,120tW(B,Z,S)0H3ZZ1:101uW(B,Z,S)0W(B,Z,S)114:EX$"EX":EX$" "6v(1,29);23,7;EX$:101MwSS1:S0S35:ԍnxZZ1:Z0Z4:BB1:FF1:ԍyB0B0:S0:Z0:FF0:Ԍ93:(6,8);Q$z{SS1:S35S0:ԍ|ZZ1:Z4BB1:ԍ}B9B9~93:(6,8);Q$:ZZ1:Z4130W(B,Z,S)0ZZ1IZ0:BB1:W(B,0,0)0BB1:Z4::126X LOESCHENW(0,0,0)0:ԙ::" SAVING?(Y/N)"E$:E$""133E$"Y"84:136E$"N"133::" ERASE?(Y/N)";E$:E$""137E$"Y"W(0,0,0)0:B0:Z0:S0:" YES":145:-E$"N"137:ԍ> AUTO-SPIEL[7,7:" SOUNDLENGTH:";oF$:F$""142(F$)13F$"4"F(F$):F1142:ԞF$:145:1497,1:K15U5K:(U2,3);(36,"a"):(U3,3);(36,"b")(U4,3);(36,"p"):(U5,3);(36," "):K+BP09NZP04:SP035:WW(BP,ZP,SP)iW0WW100:153:156BBP:ZZP:SSP:BP9:ZP4:SP35:156ZT(W100):WPW1100ZT:DA(FZT.77):DA254DA254TPT(WP):TP,0,TP,0,30,DAZE5ZP7:SESP3:ZE,ZE3,SE,SE:N$(WP):*SP,ZP,BP:5 ENDEIW(0,0,0)0165W160:165p::" SAVING?(Y/N)"E$:E$""161E$"Y"84:164E$"N"1616,7::2,4,21,38:1::" GOOD BYE !";5;"*NGUYEN DAI DUONG*";:" DADU'88"/(18):0,31,0,39:14249,254GX180:Y220:23:11Ma FIGURZEICHNEN14249,186:862,1:(16383)3PS192:(9,9);23;"BITTE UM ETWAS GEDULD !"(11,3);"DIE FIGUREN WERDEN NOCH BERECHNET" (15,11);"NOCH DATEN")AD15112:184:I124:FZ$FJ1152:ZZ$(FZ$,J,2)xK12:Z1$(ZZ$,K,1):(Z1$)0(Z1$)48179ZZZZ(Z1$)(16(2K)):180ZZZZ((Z1$)55)(16(2K))K:AD,ZZ:ZZ0:ADAD1:PSPS1:PS$(PS):P1(PS$)PS$(4P1,"0")(PS$,P11)((15,17);PS$:J,I716383,3:S"FF00000000FF0000":Aap"000000FF00000000":B b"00FF0404040404FF":Cc"040404043CFF3800":D d"04FF0404040404FF":Ee"043C7C3800000000":F f"000000FF00000404":Gg"04FF040404043CFF":H h7"3800000000000000":IiT"000000FF04040404":J jp"04FF043C7C3800FF":Kk"040404FF04040404":Ll"3CFF3800000000FF":Mm"FF00000404FF0404":N n"040404FF043C7C38":Oo"00FF0000000000FF":P p"00001CFF3C202020":Qq7"20FF2020202020FF":R rS"FF00000000FF001C":Ssp"3E3C20FF20202020":T t"20FF0000000000FF":Uu"FF00003C42FF0608":V v"102010FF063C4040":Ww"80FF804040221CFF":X x2020":T t"20FF00000