) 2000. robotron Z9001 - R+MOSAIK - M VERSION: HCL2 14.9.84 m Bearbeiter: Gaertner EEM  VEB ROBOTRON MESSELEKTRONIK  ------------------------- # B$(7),T$(11),NR(3),NF(3),ZT(90),TA(35),BS$(5),AS$(17),CS$(17),DS$(17)(140-STTA(V)2J02)7I05A<AD(1)(STI40J)PAID5081AD}FID480IDID480:ZE$(BS$(2),ID,1):85KID240IDID240:ZE$(BS$(1),ID,1):85PZE$(BS$(0),ID,1)UIN(ZE$)ZIN127GZIN:FF112:110_ZEZT(IN32)dGZ(ZE1000)"iFFZE1000GZ-nAD,GZ?s(AD1024),FFHxI,JN}n--------------------------{1.BILD 5:1:8::0,23,2,39:"KLEINCOMPUTER robotron KC87":(193);(34,(158));(137) (159);"LEHRE UND LERNEN";:3 *26);"R+MOSAIK ";:8:(192) R(136);(34,(248));(200):::5 p(36,""):"";35);"" "";:8:22);"RECHENMOSAIK";35);:5:"""";35);"""";:8:15);"EIN UEBUNGSPROGRAMM";35);:5:"" "";35);"":(36,"")::3 18,23,2,39:B"VEB ROBOTRON-MESSELEKTRONIK" Hx">OTTO SCHOEN< DRESDEN":4:5;(21,2);" "(22,31);">ENTER<"T$:T$""215::(0,0);" ":(10,13);"Bitte warten!"B$(0)"Zahlenbereich fuer" B$(1)"Summanden und Summe"; B$(2)"Minuend,Subtrahend,Differenz"Q B$(3)"0 bis 10" g B$(4)"0 bis 20" ~ B$(5)"0 bis 100" B$(6)"0 bis 1000" B$(7)"selbst waehlbar" T$(0)"Faktoren" T$(1)"Dividend und Divisor" T$(2)"Rechenart"  T$(3)"Addition" 1 T$(4)"Subtraktion" M "T$(5)"Multiplikation" c 'T$(6)"Division" ,T$(7)"alle Aufgaben richtig geloest!" 1T$(8)"Das Mosaik ist fertig. Du hast" 6T$(9)"Aufgaben falsch geloest!"  ;T$(11)"Aufgabe falsch geloest!" @T$(10)"Spieler" < E------------------------ J4838,4718,4478,4598,5078,4958,4472,4592,5072,4952,4712,4832,4946,5066 O4586,4466,4826,4706,4580,4460,4700,4820,5060,4940,4808,4688,4814,4694 T4574,4454,5048,4928,4448,4568,4934,5054 YI035  ^TA(I) ! cI T h190050,182051,0,181085,183102,191066,181017,0 m191019,190019,254051,254017,143082,190082,254085,255085 r171001,172001,173001,174001,158113,159113,192113,248113,042114,255068 w190016,032017,142050,198064,190066,143066,032000] |143048,191048,142048,190048,143032,191032,142032,190032,191016,142016 180032,181032,181096,183064,182064,197114,046116,199016,197096,175064 254051,143050,141052,191050,139048,255102,0,0,032000,255051 6 254034,0,032068,255034,255017,046034,143002,191002,142002,190002 191018,142018,190018,143018,193113,143016,143049,191020,191049,142020137113,142049,255000,190049,201064,131007,195116,207052 I090ZT(I) I -AS$(0)"YYwwwwwwwwwwwwwwwwww888888888888888888YY" dAS$(1)"AAwwwwwwwwwwwwwwwwww88888888888llll888AA" AS$(2)"BBwwwwww:RRRRRRRRRnw88888888888icccj88BB" AS$(3)"CCwwwwwwwccccccccccw88888888888iUUV888CC" AS$(4)"DDwwwwwwwcracaacapcn88>99?888888^W^888DD" @AS$(5)"EEwwwwwwwcaacaacaacc8>9&$9?88888^^.,88EE" wAS$(6)"FFwwwwwwwcaacaacaacc89!&$#988888X^+l88FF" AS$(7)"GGwwwwwwwcaacaacaacc89!&$#988888 )cc88GG" AS$(8)"HHw:ccccccaacaacaacc89!&$#98888 ^(cj88HH" AS$(9)"IIAccccccg89!&$#9888 ^^^*V88II" SAS$(10)"JJ(13,10);"2 - "B$(5) C900@HRA3(8,10);T$(0):Ԟ(8,10);T$(1)NWRA4880j\(11,10);"1 - "B$(3) f(13,10);"2 - "B$(4) k900p(11,10);"1 - "B$(5) z(13,10);"2 - "B$(6) (15,10);"3 - "B$(7) ANTWORT SCHWIERIGKEIT42;(19,4);"Waehle Zahlenbereich !":19,19,28,39E"";RS \(RS1)(RS3)915eRS;oXU0 zXO20 RS3980RA3960RS2XO100 1035(RA3)(RS1)XO10 (RA4)(RS1)XO100 (RA4)(RS2)XO100010356,23,0,39:;(8,4);"Zahlenbereich"p(10,4);"untere Grenze (<=0) :":10,10,25,39 "";XU:XU;XU0:995(12,5);"obere Grenze (>=0) :":12,12,25,39"";XO:XO;XO0:1005XOXU980 XO262XO262# XU(262)U(262)E 6,23,4,39::XUO6,23,3,39h ---------------------------- BILD AUSWAHL SPIELERZAHL XU;"bis";XO $2;(8,4);"Anzahl der Spieler (1-3) ?":8,8,32,39 )"";AN .(AN1)(AN3)1065!38,8,3,39::AN;"Spieler";9!=2;(10,4);"Zeit je Aufgabe (s) ?"J!B10,10,27,39U!G"";TIw!L10,10,3,39::TI;"Sekunden";!O6;(21,30);">ENTER<"!Qյ(13)1105:::(0,0);" "!V-------------------------- ![ANWI1230!`I02 "eBS$(I)"" "jJ05 %"oAN1160,1140,1150C"tBS$(I)BS$(I)AS$(J6I) M"y1165k"~BS$(I)BS$(I)CS$(J6I) u"1165"BS$(I)BS$(I)DS$(J6I)"J,I"VORSTELLUNG ZIELBILD "(21,2);"Zielbild vorstellen ? (J)/N":Q$#Q$:Q$"J"Q$"N"Q$(13)1172!#Q$"N"1190<#:(0,0);" ":W035 H#VW:45P#W ^#NM18 o#AN3NM12 #Q$"N"1205#6: (23,30);">ENTER<":4 #A(1) #()01205#--------------- #RECHENSCHLEIFE #SI0:SP0: $20,23,2,39::4$SPSP1+$SPAN1SP1?$NR(SP)NM1240[$T$(10);SP;"rechne!": w$RA1260,1310,1360,1390$ADDITION $XU0F.7(XOXU)XU $XU0FXOXU $1820$ABXOB((XOA)(1)) %ABXUB((XUA)(1)) % XEAB %OP$"+" (%17852%1440D%SUBTRAKTION Q%#FXOXU [%(1820r%-(AB)(XU0)1335|%21340%7HB:BA:AH %<OP$"-" %A1785%FXEBA%K1440%PMULTIPLIKATION %UFXOXU %Z1820 &_XEAB:OP$"*" &d1785&i1440,&nDIVISION <&sF(XOXU) F&x1820T&}A0A1 ^&XEB j&BAXE w&OP$":" &1785&----------------- &ERGEBNISEINGABE &E$"F":X$"":A$&Z1(31)60((30))3600((29))'Z2(31)60((30))3600((29)),'Z2Z1TIE$"Z"::15705'A$E'A$""1450X'(A$)131480'(A$)8(X$)0X$(X$,(X$)1):A$;:1450'(A$)31X$X$A$:A$;'1450'XE(X$)E$"R"'------------------- 'REAKTION AUF ERGEBNIS (E$"F"1580"(AN1505,1535,15502(V2NR(SP) =(WV1 E(45N(VW V(45`(1554x(VNR(SP)18(SP1) (45( 1554(VNR(SP)12(SP1) (45(NR(SP)NR(SP)1 (NR(SP)NM1235(:7:AN11620)AN2NR(1)NR(2)1660))AN3NR(1)NR(2)NR(1)NR(3)1670T)"***SPIELER";SP;" IST FERTIG.***":20d)SI0SISPn) 1235)":7:"***Aufwachen!***":4:NF(SP)NF(SP)1)'10:1235),NF(SP)NF(SP)1 )1:7:"***Falsch***":4 )610 );1235*@-----------------*EAUSWERTUNG**TNF(1)016405*YT$(8)^*^NF(1)1NF(1);T$(11):ԞNF(1);T$(9)h*c1695z*hT$(8):T$(7)*m1695*|(0,818(SI1));"SIEGER"*1675*(0,512(SI1));"SIEGER"*4*"Fehlerzahl:" +"Spieler 1:";NF(1);3);"Spieler 2:";NF(2) A+ AN3 "Spieler 3:";NF(3);:Ԟ13); y+C$:23,23,0,0:(23,0);" ":6;(23,30);">ENTER<"+յ(13)1697+AN$"J":WIAN:20,23,2,39:+22,22,2,39:"Noch einmal : (J)/N";AN$+AN$"J":705,AN$"N":1725:1700,1760,256:4,------------------ ?, KOPFq,3;(1,4);"UEBUNGSPROGRAMM GRUNDRECHENARTEN",3;(2,4);(32,""),,ABSCHLUSSBILD ,:(0,0);" ",(11,11);"AUF WIEDERSEHEN!" ,20:, ,B0B; -B0"(";B;")"; -OP$; '-A0A; =- A0"(";A;")"; J-"="; Q- e-ZUFALLSZAHLEN -!A(F(1.2))XU:A01825-&B(F(1.4))XU:B01830-5 0"(";A;")"; J-"="; Q- e-ZUFALLSZAHLEN -!A(F(1.2))XU:A0