BASIC-LEHRER šRB$ô"A3A3D4A3F4G3B6"C$ô"A3A3D4A3F4G3B6"D$ô"A3A3D4A3F4G3B6" þ£„þ¢C$;B$;D$›:þ [‚]† ,„p,"BASIC-",ƒ ,ƒ ,:þ [‚@]† ,ˆ ,"LEHRER",ƒ ,ƒ ,+ þ¤„ ,„:"E¦° MZ-800-P·—¡³³"$ þ¤…,„:þ‚@:"«·°"" þ¤„p,„ :"I°—· K°·¸¸" þ¤…,„0:" 1986"/ þ¤„P,„P:"*** TEIL 1 ***":þ‚@*þ¤„0,„p:"*** E¦°ª­˜¥°— ***" N: X  _"þ¤ƒ ,„ :"- = ¢¥­Ÿ©" þ¤… ,„@:"š¸»––’°"$þ¤ƒ ,„`:"+ = «·£»–¤"  [“A$ô"-"⃠ _6þ¤‚,ƒ:"D¦’¤’¤ P·—¡³³ —¦š– ’¦°’ E¦°-"9þ¤‚,ƒ :"ª­˜¥°— ¦° œ¦’ P·—¡³³¦’¤ž¡Ÿ˜’"-þ¤‚,ƒ`:" BASIC"/þ¤‚,„:"³¦– œ’³ R’Ÿ˜°’ MZ-800."5þ¤‚,„0:"D¦’ ’°–¤ž’Ÿ˜’°œ’° S’¦–’° œ’¤"9þ¤‚,„@:"H¡°œš¥Ÿ˜¤ £’œ’° ¦° œ’° ’¦°¢’¸°’°":þ¤‚,„P:"L’°¡š¤Ÿ˜°¦––’° ¯’£’¦¸¤ ¡°—’—’š’°!"(IôàŒz:Ž:Iôàƒ`+þ¤‚,…:"H¡°œš¥Ÿ˜ S’¦–’: X-X" ¾ˆ+!þ¤‚,…:"H¡°œš¥Ÿ˜ S’¦–’: " "¾ˆ#Ž+$þ¤‚,…:"H¡°œš¥Ÿ˜ S’¦–’: X-X" % X & ^'þ¤„P,„:"PRINT""(þ¤„P,„ :"FUNKTIONEN"!)þ¤„P,„@:"VARIABLEN" * X + _::A,þ¤,‚@: "PRINT ¦¤– ’¦°’ œ’ £¦Ÿ˜–¦—’¤ BEFEHLE"!-þ¤,ƒ: "¦³ BASIC">.þ¤,ƒ@: "D¦’¤’ A°£’¦¤¥°— ’³º—¸¦Ÿ˜– œ¦’ D¡–’°-"</þ¤,ƒ`: "¡¥¤—¡š’ ¡¥ª œ’³ B¦¸œ¤Ÿ˜¦³.":¾‹;€"0þ¤,„: "¢.B.:":1þ‚:¾Šz<2þ¤,„0:"PRINT ";ÿ (");"G¥–’° T¡— !";ÿ (")3þ‚@:¾‹;€<4þ¤,„P:"’¢’¥—– ¡¥ª œ’³ B¦¸œ¤Ÿ˜¦³ ª·¸—’°œ’°"#5þ¤,„`:"A¥¤œ¥Ÿ©:":6þ‚:¾Šz*7þ¤,…:"G¥–’° T¡—!":¾‹;€ 8þ‚@,9þ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 6-26" : X ; _/<þ¤,‚:" FUNKTIONEN".=þ¤,ƒ:"N¥³’¦¤Ÿ˜’ FUNKTIONEN:",>þ¤,ƒ@:"ABS(X) - Aš¤·¸¥–£’–"=?þ¤,„:"D¦’¤’ F¥°©–¦·° ’—¦š– œ’° Aš¤·¸¥–£’–"<@þ¤,„:"«·° X, œ.˜. š’¦ œ¦’¤’³ W’– £¦œ œ¡¤"8Aþ¤,„ :"V·¢’¦Ÿ˜’° °¦Ÿ˜– š’­Ÿ©¤¦Ÿ˜–¦—–:"Bþ¤,„0:"¢.B.:"<Cþ¤,„P:"W’°° X=-2.6 œ¡°° ’—¦š– ABS(X) = 2.6"9Dþ¤,„p:"D¦’ BASIC-A°£’¦¤¥°— ¤¦’˜– ¤· ¡¥¤:"Eþ‚:¾Šz?Fþ¤,…:"X = -2.6 : X = ABS(X) : PRINT X":¾Šz3GXôø‚&fff:Xôÿ(X):X$ôÿ¡(X):þ¤,…:X$ Hþ‚@,Iþ¤,…(:"H¡°œš¥Ÿ˜ S’¦–’: 5-11" J [K“A$ô"-"â + L _,Mþ¤,‚:"SGN (X) - V·¢’¦Ÿ˜’°"<Nþ¤,ƒ:"M¦– œ¦’¤’ F¥°©–¦·° £¦œ œ¡¤ V·¢’¦-"<Oþ¤,ƒ :"Ÿ˜’° ’³¦––’¸–. I¤– ’¦° W’– ©¸’¦°’";Pþ¤,ƒ@:"¡¸¤ 0, ¤· ’—¦š– œ¦’¤’ F¥°©–¦·° œ’°"9Qþ¤,ƒ`:"W’– -1; ¦¤– œ’ ¢¥ ž­ª’°œ’ W’–";Rþ¤,„:"—º®’ ¡¸¤ 0, ¤· £¦œ 1 ¡¥¤—’—’š’°.":Sþ¤,„:"I¤– œ’ ¢¥ ž­ª’°œ’ W’– 0, ¤· ¦¤–""Tþ¤,„ :"SGN(X) = 0"%Uþ¤,„@:"¢.B.:":¾Šz Vþ‚>Wþ¤,„`:"X = -25 : X = SGN(X) : PRINT X":¾Šz)XXôø…H:Xôÿ‹(X):þ¤,„p:X Yþ‚@,Zþ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 5-11" [ [\“A$ô"-"â ; ] _(^þ¤,‚:"INT(X) - G¡°¢¢¡˜¸=_þ¤,ƒ:"D¦’ F¥°©–¦·° INT(X) ’—¦š– œ¦’ —º®–’";`þ¤,ƒ :"—¡°¢’ Z¡˜¸, œ¦’ ©¸’¦°’ ·œ’ —¸’¦Ÿ˜"aþ¤,ƒ@:"X ¦¤–."bþ¤,„:"¢.B.:"cþ‚:¾‹;€7dþ¤,„ :"X = 2.59 : PRINT INT(X)":¾Šz,eXô‚%Â\:þ¤,„0:ÿ€(X):¾‹;€/fþ¤,„P:"X =-9.38 : PRINT INT(X)"-gXôø„zâ:þ¤,„`:ÿ€(X):¾‹;€/hþ¤,…:"X = 4.00 : PRINT INT(X)",iXôƒ:þ¤,…:ÿ€(X):¾Šz jþ‚@,kþ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 5-11" l [m“A$ô"-"â L n _.oþ¤,‚:"SQR(X) - Q¥¡œ¡–£¥¢’¸";pþ¤,ƒ:"M¦– H¦¸ª’ œ¦’¤’ F¥°©–¦·° ¸»®– ¤¦Ÿ˜":qþ¤,ƒ :"œ¦’ Q¥¡œ¡–£¥¢’¸ «·° X š’’Ÿ˜°’°."9rþ¤,ƒ@:"I¤– X ©¸’¦°’ ¡¸¤ 0, ¤· £¦œ ’¦°’"1sþ¤,ƒ`:"F’˜¸’³’¸œ¥°— ¡¥¤—’—’š’°!"tIôàŠa:Žuþ¤,„:"¢.B.:" vþ‚-wþ¤,„0:"X = 25 : PRINT SQR(X)"xIôàŠa:Ž$yXô…H:þ¤,„@:ÿ‡(X)zIôàŠa:Ž-{þ¤,„`:"X =-25 : PRINT SQR(X)"|IôàŠa:Ž-}þ¤,„p:"I¸¸’—¡¸ œ¡–¡ ’·":þ~IôàŠa:Ž þ‚@,€þ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 5-11" [‚“A$ô"-"â ] ƒ _&„þ¤,‚:"SIN(X) - S¦°¥¤":…þ¤,ƒ:"D¦’¤’ F¥°©–¦·° ’³¦––’¸– œ’° S¦°¥¤"8†þ¤,ƒ :"«·° X. D’ W’– £¦œ ¦³ B·—’°³¡®"6‡þ¤,ƒ@:"¡¥¤—’—’š’°. Z¥ U³’Ÿ˜°¥°— «·°":ˆþ¤,ƒ`:"B·—’°³¡® ¦° G¡œ, ³¥® œ¡¤ R’¤¥¸–¡–":‰þ¤,„:"œ¦’¤’ B’’Ÿ˜°¥°— ³¦– ÿ/180 ³¥¸–¦-"(Šþ¤,„:"ž¸¦¢¦’– £’œ’°."‹IôàŠa:Ž Œþ‚-þ¤,„0:"X = 45 : PRINT SIN(X)"EŽXô†4:þ¤,„@:ÿ‚(X);:þ‚@:" =B·—’°³¡®":þ‚Iôà‹;€:Ž5þ¤,„`:"X = 45 : PRINT SIN(X) * ÿ/180"8‘þ¤,„p:ÿ‚(X)üäûˆ4;:þ‚@:" =G¡œ"’Iôà‹;€:Ž,“þ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 5-11" ” [•“A$ô"-"â n – _2—þ¤,‚:"LOG(X) - Z’˜°’¸·—¡¦–˜³¥¤"8˜þ¤,‚@:"LN(X) - N¡–­¸¦Ÿ˜’ L·—¡¦–˜³¥¤"<™þ¤,ƒ :"D¦’¤’ F¥°©–¦·°’° ’³º—¸¦Ÿ˜’° œ¦’ B’-":šþ¤,ƒ@:"’Ÿ˜°¥°— «·° Z’˜°’¸·—¡¦–˜³¥¤ ¥°œ"0›þ¤,ƒ`:"°¡–­¸¦Ÿ˜’³ L·—¡¦–˜³¥¤."œIôà‹:Žþ¤,„:"¢.B.:" žþ‚-Ÿþ¤,„0:"X = 31 : PRINT LOG(X)" IôàŠa:ŽO¡Xô…x:þ¤,„@:ÿŒ(X);:þ‚@:" = Z’˜°’¸·—¡¦–˜³¥¤":þ‚¢Iôà‹;€:Ž,£þ¤,„`:"X = 31 : PRINT LN(X)"¤IôàŠa:ŽC¥þ¤,„p:ÿ…(X);:þ‚@:" = °¡–­¸¦Ÿ˜’ L·—¡¦–˜³¥¤",¦þ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 5-12" § [¨“A$ô"-"â ƒ © _1ªþ¤,‚:" S–¦°—ª¥°©–¦·°’°";«þ¤,ƒ:"D¦’¤’ F¥°©–¦·°’° ’¸¡¥š’° œ¦’ B’¡-";¬þ¤,ƒ :"š’¦–¥°— ¥°œ A¥¤—¡š’ «·° Z’¦Ÿ˜’°ª·¸-"-­þ¤,ƒ@:"—’° (Z’¦Ÿ˜’°©’––’°). ""®þ¤,„:"LEFT$(X$,°)<¯þ¤,„ :"D¦’ ³¦– ° ¡°—’—’š’°’ A°¢¡˜¸ «·° ¸¦°-":°þ¤,„0:"©’° Z’¦Ÿ˜’° œ’ S–¦°—«¡¦¡š¸’° X$",±þ¤,„@:"£’œ’° ¡°—’¤ž·Ÿ˜’°."<²þ¤,„P:"° ©¡°° W’–’ «·° 0 š¦¤ 255 ¡°°’˜³’°."³IôàŒH:Ž´þ¤,„p:"¢.B.:" µþ‚¶IôàŠa:ŽL·þ¤,…:"X$=";ÿ (");"G¥–’° T¡—!";ÿ (");":PRINTLEFT$(X$,3)"¸IôàŠa:Ž3¹X$ô"G¥–’° T¡—!":þ¤,…:ÿº(X$,‚@)ºIôàŒZÀ:Ž »þ‚@,¼þ¤,… :"H¡°œš¥Ÿ˜ S’¦–’: 5-12" ½ [¾“A$ô"-"â – ¿ _$Àþ¤,‚:"MID$(X$,³,°)"<Áþ¤,ƒ:"D¦’¤’ F¥°©–¦·° š’£¦©–, œ¡® °¡Ÿ˜ œ’³"<Âþ¤,ƒ :"³. Z’¦Ÿ˜’° «·° X$ ° Z’¦Ÿ˜’° ¡¥¤—’—’-"#Ãþ¤,ƒ@:"š’° £’œ’°."9Äþ¤,ƒ`:"³ ©¡°° ’¦°’° W’– «·° 1 š¦¤ 255, "7Åþ¤,„:"° ©¡°° ’¦°’° W’– «·° 0 š¦¤ 255"!Æþ¤,„:"¡°°’˜³’°."ÇIôàŒZÀ:ŽÈþ¤,„0:"¢.B.:" Éþ‚ÊIôàŠa:ŽOËþ¤,„P:"X$ = ";ÿ (");"G¥–’° T¡—!";ÿ (");":PRINTMID$(X$,3,6)"ÌIôàŒ €:Ž*Íþ¤,„`:ÿ¼(X$,‚@,ƒ@)ÎIôàŒ@:Ž Ïþ‚@,Ðþ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 5-12" Ñ [Ò“A$ô"-"â © Ó _$Ôþ¤,‚:"RIGHT$(X$,°)"9Õþ¤,ƒ:"D¦’ ° ’Ÿ˜–’° Z’¦Ÿ˜’° œ’ S–¦°—-"7Öþ¤,ƒ :"«¡¦¡š¸’° X$ £’œ’° ¡¥¤—’—’š’°."<×þ¤,ƒ@:"° ©¡°° W’–’ «·° 0 š¦¤ 255 ¡°°’˜³’°."ØIôàŒT€:ŽÙþ¤,„:"¢.B.:"ÚIôàŠa:Ž Ûþ‚OÜþ¤,„ :"X$ = ";ÿ (");"G¥–’° T¡—!";ÿ (");":PRINTRIGHT$(X$,4)"ÝIôà‹:Ž#Þþ¤,„0:ÿ»(X$,ƒ)ßIôàŒZÀ:Ž àþ‚@,áþ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 5-12" â [!ã“A$ô"-"âX$ô"G¥–’° T¡—!":€ ¿ ä _*åþ¤,‚:"TAB(°) - T¡š¥¸¡–·"=æþ¤,ƒ:"D’ C¥¤· £¦œ ¦° œ’ ¡©–¥’¸¸’° Z’¦-":çþ¤,ƒ :"¸’ ¢¥ Z’¦Ÿ˜’°ž·¤¦–¦·° °+1 š’£’—–."=èþ¤,ƒ@:"I¤– ° ©¸’¦°’ ¡¸¤ œ¦’ ¡¥—’°š¸¦Ÿ©¸¦Ÿ˜’";éþ¤,ƒ`:"C¥¤·ž·¤¦–¦·°, œ¡°° £¦œ œ¦’ F¥°©-".êþ¤,„:"–¦·° °¦Ÿ˜– ¡¥¤—’ª­˜–."ëIôàŒH:Žìþ¤,„ :"¢.B.:" íþ‚îIôà‹:ŽHïþ¤,„@:"X$ = ";ÿ (");"MZ-800";ÿ (");":PRINTTAB(12)X$"ðIôàŠa:Ž-ñX$ô"MZ-800":þ¤,„P:æ(„@)X$òIôàŒH:Ž óþ‚@,ôþ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 5-13" õ [!ö“A$ô"-"âX$ô"G¥–’° T¡—!":€ Ó ÷ _,øþ¤,‚:"SPC(°) - L’’¤–’¸¸’°"<ùþ¤,ƒ:"Aš œ’ ¡©–¥’¸¸’° C¥¤·ž·¤¦–¦·° £’-"2úþ¤,ƒ :"œ’° ° L’’¤–’¸¸’° ’¢’¥—–.":ûþ¤,ƒ@:"²š’¤Ÿ˜’¦–’– œ’ W’– ° œ¦’ L»°—’"7üþ¤,ƒ`:"œ’ ¡©–¥’¸¸’° Z’¦¸’, £’œ’° œ¦’"9ýþ¤,„:"’¤–¸¦Ÿ˜’° S–’¸¸’° ¦° œ¦’ °»Ÿ˜¤–’",þþ¤,„:"Z’¦¸’(°) ­š’°·³³’°."<ÿþ¤,„ :"° ©¡°° W’–’ «·° 0 š¦¤ 255 ¡°°’˜³’°."IôàŒH:Žþ¤,„@:"¢.B.:" þ‚IôàŠa:Ž?þ¤,„`:"PRINTSPC(12)";ÿ (");"C·³ž¥–’";ÿ (")IôàŠa:Ž)þ¤,„p:ç(„@)"C·³ž¥–’"IôàŒ;€:Ž?þ¤,…:"PRINTSPC(55)";ÿ (");"C·³ž¥–’";ÿ (") IôàŠa:Ž) þ¤,…:ç(†\)"C·³ž¥–’"2 þ˜[‚,],,,‰,ˆ> Iôà@:Ž þ‚@,þ¤,…(:"H¡°œš¥Ÿ˜ S’¦–’: 5-13"  [“A$ô"-"â ä  _/þ¤,‚:" U³£¡°œ¸¥°—’°"4þ¤,ƒ:"STR$(°) - °¥³. V¡. Æ S–¦°—"9þ¤,ƒ@:"D¦’ F¥°©–¦·° STR$(°) £¡°œ’¸– ’¦°’";þ¤,ƒ`:"°¥³’¦¤Ÿ˜’ V¡¦¡š¸’ ¦° ’¦°’ S–¦°—-"$þ¤,„:"«¡¦¡š¸’ ¥³.";þ¤,„:"N¥ ’¦° °’—¡–¦«’¤ V·¢’¦Ÿ˜’° ª¦°œ’–"6þ¤,„ :"¤–’¸¸’°³»®¦— B’­Ÿ©¤¦Ÿ˜–¦—¥°—."Iôà@:Žþ¤,„@:"¢.B.:" þ‚IôàŠ/:Ž-þ¤,„`:"A = 35 : PRINTSTR$(A)"IôàŠa:Ž$Aô† :þ¤,„p:ÿ¡(A) IôàŒ;€:Ž.!þ¤,…:"A = -13 : PRINTSTR$(A)""IôàŠ/:Ž%#Aôø„P:þ¤,…:ÿ¡(A)$Iôà@:Ž %þ‚@,&þ¤,…(:"H¡°œš¥Ÿ˜ S’¦–’: 5-13" ' [(“A$ô"-"â ÷ ) _4*þ¤,‚:"VAL(X$) - STRING Æ °¥³. V¡.";+þ¤,ƒ:"D¡¤ G’—’°¤–­Ÿ© ¢¥ STR$(°) ¦¤– œ¦’¤’"<,þ¤,ƒ :"F¥°©–¦·°. E¦° S–¦°—, œ.˜. ’¦°’ Z’¦-"9-þ¤,ƒ@:"Ÿ˜’°ª·¸—’ £¦œ ¦° ’¦°’ °¥³’¦¤Ÿ˜’"-.þ¤,ƒ`:"V¡¦¡š¸’ ¥³—’£¡°œ’¸–."6/þ¤,„:"N¥ Z¦ªª’°, œ¦’ «· ¤·°¤–¦—’°"80þ¤,„:"¤–’˜’°, ª¦°œ’° B’­Ÿ©¤¦Ÿ˜–¦—¥°—.":1þ¤,„ :"H’›¡œ’¢¦³¡¸’ Z¡˜¸’° £’œ’° ¦° ¦˜’"42þ¤,„0:"œ’¢¦³¡¸’° W’–’ ¥³—’£¡°œ’¸–."3Iôà@:Ž4þ¤,„P:"¢.B.:" 5þ‚G6þ¤,„p:"X$ = ";ÿ (");"12.3XYZ";ÿ (");":PRINTVAL(X$)"7IôàŠa:Ž)8X$ô"12.3XYZ":þ¤,…:ÿ­(X$)C9þ¤,…:"X$ = ";ÿ (");"$1F";ÿ (");":PRINTVAL(X$)":IôàŒ €:Ž%;X$ô"$1F":þ¤,…:ÿ­(X$) <þ‚@=IôàŒH:Ž,>þ¤,…(:"H¡°œš¥Ÿ˜ S’¦–’: 5-13" ? [@“A$ô"-"â  A _6Bþ¤,‚:"ASC(X$) - Z’¦Ÿ˜’° Æ ASCII-C·œ’":Cþ¤,ƒ:"D’ ASCII-C·œ’ (¤ž¦Ÿ˜: ¹SSKI) œ’¤"<Dþ¤,ƒ :"¢¥ ¥°–’¤¥Ÿ˜’°œ’° Z’¦Ÿ˜’°¤ £¦œ ¡¥¤-";Eþ¤,ƒ@:"—’—’š’°. E°–˜»¸– œ’ S–¦°— ³’˜’’"=Fþ¤,ƒ`:"Z’¦Ÿ˜’°, ¤· £¦œ œ’ C·œ’ œ’¤ 1. Z’¦-"(Gþ¤,„:"Ÿ˜’°¤ ’³¦––’¸–."HIôàŒH:ŽIþ¤,„ :"¢.B.:" Jþ‚KIôàŠ/:ŽBLþ¤,„@:"X$ = ";ÿ (");"C";ÿ (");": PRINTASC(X$)"MIôàŠa:Ž#NX$ô"C":þ¤,„P:ÿ«(X$)OIôàŒ €:ŽIPþ¤,„p:"X$ = ";ÿ (");"C·³ž¥–’";ÿ (");": PRINTASC(X$)"QIôàŠa:Ž*RX$ô"C·³ž¥–’":þ¤,…:ÿ«(X$)SIôàŒH:Ž Tþ‚@,Uþ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 5-14" V [W“A$ô"-"â ) X _6Yþ¤,‚:"CHR$(°) - ASCII-C·œ’ Æ Z’¦Ÿ˜’°"9Zþ¤,ƒ:"N¡Ÿ˜ E¦°—¡š’ œ’¤ ASCII-C·œ’¤ £¦œ";[þ¤,ƒ :"œ¡¤ œ¦’¤’³ C·œ’ ¦³ Z’¦Ÿ˜’°¤ž’¦Ÿ˜’"7\þ¤,ƒ@:"¢¥—’·œ°’–’ Z’¦Ÿ˜’° ¡¥¤—’—’š’°."8]þ¤,ƒ`:"M’˜’’ C·œ’°¥³³’° ©º°°’° œ¥Ÿ˜":^þ¤,„:"K·³³¡–¡ —’–’°°– ­š’—’š’° £’œ’°."_IôàŒH:Ž`þ¤,„ :"¢.B.:" aþ‚.bþ¤,„@:"A = 77 : PRINT CHR$(A)"cIôàŠa:Ž$dAô‡:þ¤,„P:ÿ (A)eIôàŒ €:Ž5fþ¤,„p:"PRINT CHR$(77,90,45,56,48,48)"gIôàŠa:ŽChþ¤,…:ÿ (‡,‡4,†4,†`,†@,†@)iIôàŒH:Ž jþ‚@,kþ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 5-14" l [m“A$ô"-"â A n _-oþ¤,‚:"LEN(X$) - S–¦°—¸»°—’":pþ¤,ƒ:"M¦– œ¦’¤’ F¥°©–¦·° £¦œ œ¦’ L»°—’";qþ¤,ƒ :"’¦°’¤ S–¦°—¤ ’³¦––’¸–. D¦’ A°¢¡˜¸"4rþ¤,ƒ@:"œ’ Z’¦Ÿ˜’° £¦œ ¡¥¤—’—’š’°."sIôàŒH:Žtþ¤,„:"¢.B.:" uþ‚vIôàŠ/:ŽFwþ¤,„ :"X$ = ";ÿ (");"MZ-800";ÿ (");": PRINTLEN(X$)xIôàŠa:Ž(yX$ô"MZ-800":þ¤,„0:ÿ¬(X$)zIôàŠa:ŽE{þ¤,„P:"X$ = ";ÿ (");"-35";ÿ (");" : PRINTLEN(X$)"|IôàŠa:Ž%}X$ô"-35":þ¤,„`:ÿ¬(X$)~IôàŠa:ŽDþ¤,…:"X$ = ";ÿ (");"35";ÿ (");" : PRINTLEN(X$)"€IôàŠa:Ž$X$ô"35":þ¤,…:ÿ¬(X$)‚IôàŒ@:Ž ƒþ‚@,„þ¤,… :"H¡°œš¥Ÿ˜ S’¦–’: 5-14" … [†“A$ô"-"â X ‡ _,ˆþ¤,‚:" Z¥ª¡¸¸¤¢¡˜¸’°"4‰þ¤,ƒ:"RND(°) - ’¢’¥—– Z¥ª¡¸¸¤¢¡˜¸"5Šþ¤,ƒ@:"D¦’¤’ F¥°©–¦·° —’°’¦’– ’¦°’",‹þ¤,ƒ`:"Z¥ª¡¸¸¤¢¡˜¸ ¢£¦¤Ÿ˜’°"0Œþ¤,„:" 0.00000001 ¥°œ",þ¤,„ :" 0.99999999"9Žþ¤,„@:"Z¥ G’£¦°°¥°— ’¦°’ G¡°¢¢¡˜¸ ¸»®–"@þ¤,„P:"¥.¡. ª·¸—’°œ’ F·³’¸ «’£’°œ’°:":þ‚<þ¤,„p:" A=INT(RND(1)*10) : PRINTA":þ‚@‘Iôà‹:ŽD’þ¤,…:"F·¸—’°œ’ A¥¤œ¥Ÿ© £¦œ ’’¦Ÿ˜–: ";:þ‚“Iôà„p:þ:Ž$”ÿ€(ÿˆ()ü„ ):þ‚@8•þ¤,…:"D¦’ RND-F¥°©–¦·° ¸»®– ¤¦Ÿ˜ ¡š’"5–þ¤,… :"°·Ÿ˜ «¦’¸ª»¸¸–¦—’ «’£’°œ’°." — [˜“A$ô"-"â n ™ _=šþ¤,‚:"Z.B. ¸¡¤¤’° ¤¦Ÿ˜ œ¦’ ’¢’¥—–’° Z¡˜¸’°".›þ¤,‚@:"š’¦ Sž¦’¸’° «’£’°œ’°.";œþ¤,ƒ :"S’˜’° £¦ ¥°¤ ³¡¸ œ¡¤ ª·¸—’°œ’ B’¦-"!þ¤,ƒ@:"¤ž¦’¸ ¡°:" ž [Ÿ“A$ô"-"â ‡   _ ¡Aô¢AôA÷£S$ôÿ (ñ):W$ôÿ (h)¤Xôÿ€(ÿˆ()ü†H)¥“Xö ë Xõ†â ¤¦Yôÿ€(ÿˆ()ü† )§“Yö ë Yõ…8â ¦¨“XôâXô4©“Xô† ë Xôâþ¤X,Y:W$;:þ:¾… :€ ¢ª“YôâYô4«“Yô…8 ë Yôâþ¤X,Y:W$;:þ:¾… :€ ¢¬Iôàƒ`­þ¤X,Y:S$ ®¾¯þ¤X,Y:" "°Ž±“Aö‡Hâ ¢:²þ [‚@]… ,†H,"RND(°)",ƒ@,„ , ³ [´“A$ô"-"â ™µ›)¶" *** RND-P·—¡³³ ***"· ¸‡ ¡- ² ¹ [º“A$ô"-"â   » _/¼þ¤,‚:" V¡¦¡š¸’°"8½þ¤,ƒ:"D¡–’°£’–’ £’œ’° «·³ R’Ÿ˜°’ ¦°"<¾þ¤,ƒ :"š’¤–¦³³–’° Sž’¦Ÿ˜’ž¸»–¢’° ¡š—’¸’—–.":¿þ¤,ƒ@:"D·– ©º°°’° œ¦’¤’ W’–’ ¡š—’¥ª’°,":Àþ¤,ƒ`:"«’»°œ’–, —’¸º¤Ÿ˜–, ­š’¤Ÿ˜¦’š’°"Áþ¤,„:"£’œ’°."7Âþ¤,„:"D¡ œ¦’ «’¤Ÿ˜¦’œ’°’° V¡¦¡š¸’°-"<Ãþ¤,„ :"¡–’° ¥°–’¤Ÿ˜¦’œ¸¦Ÿ˜ «¦’¸ Sž’¦Ÿ˜’-"8Äþ¤,„0:"ž¸¡–¢ š’¸’—’°, ¦¤– ’¤ °·–£’°œ¦—,"=Åþ¤,„@:"œ’³ C·³ž¥–’ œ¦’ ¯’£’¦¸¦—’ V¡¦¡š¸’°-"(Æþ¤,„P:"¡– ³¦–¢¥–’¦¸’°." Ç [È“A$ô"-"â µ É _/Êþ¤,‚:" S–¦°—«¡¦¡š¸’°"=Ëþ¤,ƒ:"D¦’¤’ V¡¦¡š¸’°¡– ©¡°° °¥ Z’¦Ÿ˜’°-":Ìþ¤,ƒ :"©’––’° ’°–˜¡¸–’°. R’Ÿ˜’°ª¥°©–¦·°’°"+Íþ¤,ƒ@:"¤¦°œ °¦Ÿ˜– ³º—¸¦Ÿ˜."Îþ¤,„:"¢.B.:" Ïþ‚ÐIôàŒ;€:ŽRÑþ¤,„ :"A$ = ";;ÿ (");"MZ-800";;ÿ (");" : PRINT A$":A$ô"MZ-800"Òþ¤,„0:A$ÓIôàŒ;€:Ž Ôþ‚@+Õþ¤,…:"H¡°œš¥Ÿ˜ S’¦–’: 5-5" Ö [דA$ô"-"â » Ø _2Ùþ¤,‚:" N¥³’¦¤Ÿ˜’ V¡¦¡š¸’°"=Úþ¤,ƒ:"D¦’¤’ V¡¦¡š¸’° ©º°°’° °¥ °¥³’¦¤Ÿ˜’"=Ûþ¤,ƒ :"D¡–’° ’°–˜¡¸–’°. M¦– œ’° I°˜¡¸–’° œ’"<Üþ¤,ƒ@:"V¡¦¡š¸’° ©º°°’° B’’Ÿ˜°¥°—’° œ¥Ÿ˜-"(Ýþ¤,ƒ`:"—’ª­˜– £’œ’°.";Þþ¤,„:"D¦’ V¡¦¡š¸’° œ­ª’° ’¦°’° š’¸¦’š¦—";ßþ¤,„:"¸¡°—’° N¡³’° ˜¡š’°; œ’ R’Ÿ˜°’ ’-";àþ¤,„ :"©’°°– ¯’œ·Ÿ˜ °¥ œ¦’ ’¤–’° š’¦œ’°."<áþ¤,„0:"D¡¤ 1. Z’¦Ÿ˜’° ³¥® ’¦° G·®š¥Ÿ˜¤–¡š’";âþ¤,„@:"¤’¦°, œ¦’ £’¦–’’° ©º°°’° G·®š¥Ÿ˜-"0ãþ¤,„P:"¤–¡š’° ·œ’ Z¡˜¸’° ¤’¦°."äþ¤,„p:"¢.B.:" åþ‚æIôà‹z:Ž5çþ¤,…:"MZ = 150 : PRINT MZ":MZôˆèþ¤,…:MZ éþ‚@ ê [ë“A$ô"-"â É ì _ íþ‚6îþ¤,‚:"A1 = 23.5 : PRINT A1":A1ô…<ïþ¤,‚@:A1ðIôàŠz:Ž)ñþ¤,„:"PRINT MZ,A1,MZ*A1"!òþ¤,„ :MZ,A1,MZüA1óIôàŒ;€:Ž ôþ‚@+õþ¤,…(:"H¡°œš¥Ÿ˜ S’¦–’: 5-5" ö [÷“A$ô"-"â Ø ø _,ùþ¤,‚:" F’¸œ«¡¦¡š¸’°"<úþ¤,ƒ:"M’˜’’ V¡¦¡š¸’° —¸’¦Ÿ˜’° T½ž¤ ©¡°°":ûþ¤,ƒ :"³¡° ³¦– ’°–£’œ’ ³¦– —»°¢¸¦Ÿ˜ «’-";üþ¤,ƒ@:"¤Ÿ˜¦’œ’°’° N¡³’° «’¤’˜’° (A,B,A1),":ýþ¤,ƒ`:"³¡° ©¡°° ¡š’ ¡¥Ÿ˜ ’¦°’° N¡³’° ³¦–":þþ¤,„:"I°œ¦¢’¤ «’¤’˜’°. D’ I°œ’› ¦¤– ¦°"+ÿþ¤,„:"K¸¡³³’° ¢¥ ¤’–¢’°."þ¤,„0:"¢.B.:"IôàŒ@:Ž þ‚9þ¤,„P:"A(1) = 10 : A(2) = 3.4 : A(3) = 4"C–A(‚@):A()ô„ :A(‚)ô‚Y™™š:A(‚@)ôƒ:8þ¤,„`:"PRINT A(1):PRINT A(2):PRINT A(3)"IôàŠa:Žþ¤,„p:A()þ¤,…:A(‚) þ¤,…:A(‚@) IôàŒ;€:Ž þ‚@+ þ¤,…(:"H¡°œš¥Ÿ˜ S’¦–’: 5-7"  [“A$ô"-"â ì  _*þ¤,‚:" A¥ª—¡š’°"<þ¤,ƒ:"B¦––’ ¸º¤’° S¦’ ¯’–¢– œ¦’ ª·¸—’°œ’°"<þ¤,ƒ :"A¥ª—¡š’° œ¥Ÿ˜ D­Ÿ©’° œ’ T¡¤–’° A,"!þ¤,ƒ@:"B ·œ’ C.";þ¤,„:"1. W’¸Ÿ˜’ œ’ ª·¸—’°œ’° V¡¦¡š¸’°-"0þ¤ƒ,„:"°¡³’° ¦¤– °¦Ÿ˜– ©·’©–?" þ‚þ¤,„0:"A. M8"þ¤,„P:"B. BB"þ¤,„p:"C. A›" þ‚@­A$:“A$ô""â .“A$ô"A"â =:IôàŠa:Ž: _:€ .“A$ô"B"â =:IôàŠa:Ž: _:€ $“A$ô"C"â >:Iôà‹m€:Ž  [ “A$ô"-"â  ! _:"þ¤,„:"1. W’¸Ÿ˜’ œ’ ª·¸—’°œ’° F¥°©–¦·°’°"##þ¤ƒ,„:"¦¤– ª¡¸¤Ÿ˜?" $þ‚%%þ¤,„0:"A. RND=LEN(X)"#&þ¤,„P:"B. A=RND(X)"#'þ¤,„p:"C. B=LOG(Y)" (þ‚@)­A$:“A$ô""â ).*“A$ô"A"â >:IôàŠa:Ž: [:€ -.+“A$ô"B"â =:IôàŠa:Ž: _:€ !.,“A$ô"C"â =:IôàŠw€:Ž: _:€ !-“A$ô"-"â  . _9/þ¤,„:"1. W’¸Ÿ˜’ œ’ ª·¸—’°œ’° V¡¦¡š¸’°".0þ¤ƒ,„:"¦¤– ª¡¸¤Ÿ˜ š’¢’¦Ÿ˜°’–?" 1þ‚ 2þ¤,„0:"A. A$=25"3þ¤,„P:"B. B=17"#4þ¤,„p:"C. C=RND(1)" 5þ‚@6­A$:“A$ô""â 6)7“A$ô"A"â >:IôàŠa:Ž: [.8“A$ô"B"â =:IôàŠa:Ž: _:€ ..9“A$ô"C"â =:Iôà‹m€:Ž: _:€ .:“A$ô"-"â ! ;€ ?<˜6= _:þ¤ƒ`,„0:"D¡¤ ¦¤– °¦Ÿ˜– ¦Ÿ˜–¦—!":„B> _:þ¤„0,„0:"D¡¤ ¦¤– ¦Ÿ˜–¦—!":Iôà‹z:Ž:„ ? _&@þ¤„@,ƒ :"E°œ’ L’©–¦·° 1"FAþ¤„,„:"L’©–¦·° £¦’œ’˜·¸’° =";:þ‚:" R":þ‚@FBþ¤„,„@:"T’¦¸ 2 ¸¡œ’° =";:þ‚:" L":þ‚@'Cþ¤„P,…8:"T¡¤–’ œ­Ÿ©’° !"D­A$:“A$ô""â DE“A$ô"R"âƒF“A$ô"L"â _G“A$ô"L"âHBô:: € D7Hþ¤ƒ,„:"HABEN SIE DIE PROGRAMM-KASSETTE"0Iþ¤ƒ,„ :" EINGELEGT (J/N) ?"J­A$:“A$ô""â JK“A$ô"J"â L:: € J.Lþ¤„p,„P:"PLAY ";ÿ ():ƒ"TEIL2"M˜NYôà…8-O“Yõ ì Yö…8âVô::ÂVô!P“VôâXô:X1ô†Q“Vôâþ¤X,Y:"*"R“Vôâþ¤X1,Y:"*"S“Vô†WTXôà†:5U“Xõ ì Yõ ì Xö† ì Y ö…8†WVþ¤X,Y:"*" WŽ:Ž:„'Xþ¤„P,…8:"T¡¤–’ œ­Ÿ©’° !"Y­A$:“A$ô""â XZ„/[þ¤„,…8:" - / + T¡¤–’ œ­Ÿ©’° ! "\­A$:“A$ô""â \]„=^›:þ˜[‚,],,,‰@€,ˆ>,‚:„6_›:þ˜[‚,],,,‰,ˆ>:„