!  450004 1000 N UNTERPROGRAMM TASTET$:T$""30:K(T$) : ( KLAVIATUR 2220 : UP TASTE <K32 : -> MEN} FK64K91 TTH(K65,0)PK96K122TTH(K97,1)5ZT,0,0,0,31,0:40 Gd KLAVIATUR 1en20 : UP TASTE}xK32 : -> MEN}K47K59TTN(K48)T,0,0,0,31,0:100  ZUFALLSMUSIK 1T((1)255) : TONH|HE X((1)320) : X-KOORDINATE3Y255T : Y-KOORDINATEUF(T16) : PUNKTFARBEvT,0,0,0,31,10: ZUFALLS-TONX,Y,F : ZUFALLS-PUNKTT$ : TASTENABFRAGET$" ": -> MEN}150  ZUFALLSMUSIK 22I((1)11) : ZUFALLSINDEXSTA(I) : TONH|HEuX((1)320) : X-KOORDINATE"Y2551.5T : Y-KOORDINATE,F(Y16) : PUNKTFARBE6T,0,0,0,31,10: ZUFALLS-TON@X,Y,F : ZUFALLSPUNKT#JT$ : TASTENABFRAGE;TT$" ": -> MEN}b^250 zh ODE AN DIE FREUDErD15|60390:X115:T1,T2,N:T1,0,T2,1,31,DN:60390:X112:T1,T2,N:T1,0,T2,1,31,DN: 60430:X13 :T1,T2,N:T1,0,T2,1,31,DN:' 0,0,0,0,31,D10 470` 60440:X118:T1,T2,N:T1,0,T2,1,31,DN: 60400:X111:T1,T2,N:T1,0,T2,1,31,DN: 60430:X13 :T1,T2,N:T1,0,T2,1,31,DN:  430:0,0,0,0,31,D1:430   ZEICHNEN DER KLAVIATURO 7,7:X02:(ZX,S);"\ \ \ \": 0,7:X02:(ZX,S2);"[ [":(ZX,S8);"[ [ [" (ZX,S16);"[ ["::7,7 (Z3,S);"\ \ \ \ \ \ \ \ \ \ \" &(Z4,S);"\ \ \ \ \ \ \ \ \ \ \" 0(Z5,S);"\_\_\_\_\_\_\_\_\_\_\"- :(Z6,S);(21," ")= DKT590,600h N(Z4,S);"\1\2\3\4\5\6\7\8\9\:\":690 X(Z4,S);"\A\S\D\F\G\H\J\K\L\ \" b7,0:X2 l(ZX,S2 );"W" v(ZX,S4 );"E" (ZX,S8 );"T" (ZX,S10);"Z" (ZX,S12);"U" (ZX,S16);"O". (ZX,S18);"P"N 7,0: u  ********************************  * *  * Der M}hlh{user KC85 *  * als *  * MUSIKANT *8  * *_ $ * B. M}ller Mai 1987 * . * * 8 ******************************** L:(15,11);"A U G E N B L I C K":50000:60000 V(17,15);"M U S I K"&`29,31,33,39:"(";:23;(138);:")"Aj: INPUT" ";XXWt0,31,0,39:0,5:q~(3 ,15);"M U S I K"(6 ,3);"1 = Zufallsmusik 1"(8 ,3);"2 = Zufallsmusik 2"(10,3);"3 = LIST Programmteil zur":(11,7);"Zufallsmusik"(13,3);"4 = Klaviatur 1"=(14,7);"* 10 T|ne programmierbar"k(15,7);"* nur wei~e Tasten (einer Kla-"(16,9);"viatur) sind spielbar"(17,7);"* T|ne auf Zifferntastenreihe"(18,9);"der Computertastatur"(20,3);"5 = Klaviatur 2",(21,7);"* 32 T|ne fest programmiert" W(22,7);"* wei~e und schwarze Tasten"t(23,9);"sind spielbar" (24,7);"* T|ne auf Buchstabentasten der"(25,9);"Computertastatur"(27,3);"6 = Musikst}ck"((29,3);"7 = ENDE228,30,23,37:7,3::29,30,23,378<0,0:" Ihre Wahl:";WA_FWA1WA7" wie bitte?":9:1340PWA1400,1600,1800,2000,3000,3200,64000Zx ZUFALLSMUSIK 10,31,0,39:7,7:(3 ,5);1;Z1$;" 1"(28,2);14;Z4$1501140@ ZUFALLSMUSIK 2)J0,31,0,39:7,7:CT(3 ,5);2;Z1$;" 2"W^(28,2);0;Z4$`h250jr1140 LIST PROGRAMMTEIL0,2,0,39:0,6::" TASTE (F1) -> MEN}"&3,31,0,39:7,2:011:150 PROGRAMMIERBARE KLAVIATUR0,31,0,39:6,0:(KT1:Z11:S10:500E(2,10);6;Z2$;" 1":4k(5,2 );"10 T|ne programmierbar"(7,2 );"nur wei~e Tasten der Klaviatur sind spielbar" 10:(15,1);"Computer":(15,32);"Tasten"19,31,0,39:4 " Eingabevorschlag" *%4" C : 108">>" C-DUR D : 96"WH" E : 86"pR" TON- F : 81"\" G : 72"f" LEITER A : 64"p" H : 57"z" c : 54"" d : 48"" e : 43"19,31,23,39 ," Eingabe":8X110T(X);:". Ton :";TN(X)Zl19,31,0,39:(23,10);9;"Taste (0) : kein Ton"(28,2 );4;Z4$(20,10);7,2;Z3$100:0,0,0,0,0,11140  FEST PROGRAMMIERTE KLAVIATUR5 0,31,0,39:6,0:M KT2:Z10:S10:500k (3 ,10);6;Z2$;" 2":2 (6 ,11);" C D F G c d (7 ,11);" I I I I B i i" (8 ,11);" S S S S s s" (18,11);"C D E F G A H c d" (7 ,5 );"T|ne":(18,5);"T|ne" J 10:(13,1);"Computer":(13,32);"Tasten"^ 6:(30,2);Z4$& (27,2);"Shift + Ton-Taste = Ton 1 Oktave h|her"0 (24,2);"kein Ton : jede nicht verwendete": (25,2);" Buchstabentaste"D (21,10);7,4;Z3$N 40:0,0,0,0,0,1$X 1140< ODE AN DIE FREUDER 0,31,0,39:1,5:v (8 ,10);"'ODE AN DIE FREUDE'" (15,15);"Komponist:" (17,10);"Ludwig v. Beethoven" (29,4 );"2. Stimme von Matthias Ullmann"  360 1140ȯPIC BY MPM)ү:(27);"1":0:1:14242,0Qܯ 0,31,0,39: 4:: 2,29,2,37: 0:|14253,254: 14249,254:14247,238:255 4,13,4,35: 7,2::(7,6);"MUSIK"(10,6);"(DEMOPROGRAMM FUER 85/2/3)"E(509): E0 45060 2:0,31,0,39:7,1:PÜ FELDVEREINBARUNGEN5ZÜ F}R ZUFALLSMUSIK 2 GdÅA(10):60360enÁX110:T:A(X)T: {xÜ F}R KLAVIATUR 2ÅTH(25,1):60310ÁX025:ER,ZWTH(X,0)ER:TH(X,1)ZW: Ü F}R KLAVIATUR 1ÅTN(10) #Ü VERWENDETE ZEICHENKETTENEZ1$"Z U F A L L S M U S I K"aZ2$"K L A V I A T U R"Z3$"Klaviatur spielbereit"Z4$"zur}ck ins Men} : Space-Taste dr}cken"|Ĝ FUNKTIONSTASTE (F1) BELEGENAD14592 : BEGINN DES FUNKTIONS- TASTEN-SPEICHERS%ċ605001āX011@ĆC:ADX,CFĂLٍ\` TITELBILDj0,31,0,39:7,0::(14849)6360030o60120t(15,14);"M O M E N T !":I0279:X:14848I,X:~2,7,3,5:14248,248:14249,184:"uvwxyz"; #14248,200:14249,185:"abc":3,7,35,36V286,232,15,7:287,231,12:287,230,9:"defghi"2,6,10,30:14248,248:14249,184:"ad""bsfghdhdfghdfklfklrq""c c ieijc ijcmncmnop""______te____________":14248,0:14249,2549,30,1,38:7,2:6(7,1);">>>> f}r die Informatikausbildung <<<<":q63,63,63,56,56,56,56,56, 56,56,63,63,63,56,56,56: ab56,56,56,56,56,56,56,56,224,248,252,28,14,14,14,14: cd14,14,14,14,28,252,248,224,59,63,63,62,56,56,56,56: ef!248,252,254,14,14,,,,3,15,31,28,56,56,56,56: gh]56,56,56,56,28,31,15,3,14,14,14,14,30,254,254,238: ij 227,247,255,62,28,28,28,28,248,252,254,30,14,14,14,14: kl28,28,28,28,28,28,28,28,14,14,14,14,14,14,14,14: mn 63,63,56,56,28,31,15,3,254,254,,,28,252,248,224: opN (224,248,252,28,14,14,14,254,3,15,31,28,56,56,56,63: qr 214,28,252,248,224,0,0,0, 0,0,56,56,28,31,15,3: st <1,7,31,62,56,120,127,255,187,187,187,,56,56,255,255: uv !F0,192,240,248,56,60,252,254,224,224,225,227,231,239,254,252:wxJ!P120,248,248,255,191,56,56,56,30,14,30,254,254,30,14,30: yz!Z255,127,120,56,62,31,7,1,255,255,56,56,56,255,255,255: 2.ab !d254,252,60,56,248,240,192,0,31,63,127,115,115,115,115,115: cd"n240,248,253,157,157,156,156,156,115,115,115,115,115,115,115,115Y"x157,156,156,157,156,156,156,156,,15,127,127,127,54,54,54: gh",224,252,252,252,216,216,216: i" TONDATEN F}R KLAVIATUR 2" 216,108,,,,,171,86,182,91,162,81,144,72,128,64,0,0# 114,57,108,54,96,48,0,0,0,0,102,51,91,45,0,0,0,0,192,96C#153,76,120,60,0,0,204,102,0,0,0,0,136,68f#10,12,16,18,20,24,26 # TONDATEN F}R ZUFALLSMUSIK 2#108,96,86,81,72,64,57,54,48,43# TONDATEN F}R ODE AN DIE FREUDE#86,27,2 $86,27,2,81,32,2,72,36,2,72,27,2,81,24,2B$86,27,2,96,20,2,108,21,2,108,18,2,96,20,2,86,27,2_$86,36,3,96,36,1,96,36,4~$96,36,3,108,36,1,108,27,3$96,36,2,96,32,2,86,29,2,108,27,2,96,29,2,86,29,1$"81,32,1,86,36,2,108,36,2,96,29,2,86,29,1,81,32,1!%,86,36,2,96,36,2,108,36,2,96,29,2,144,27,2,86,27,4G%T DATEN F}R (F1) : BREAK:GOTO1140m%^0,3,71,79,84,79,49,49,52,48,13,0% PROGRAMMENDE% 0,31,0,39:7,1::%G%T DATEN F}R (F1) : BREAK:GOTO1140m%^0,3,71,79,84,79,49,49,52,48,13,0% PROGRAMMENDE