BASIC-UCITEL 3 ß> Ü "CRT:M1":þ¦:'V·¸°’ ž’¸·¢¦¸ ¡ ·œ¸¡œ¦¸:'V.M¡–·¥¤’©-Oš’Ÿ°¦Ÿ’ 318B$ô"A3A3D4A3F4G3B6"C$ô"A3A3D4A3F4G3B6"(D$ô"A3A3D4A3F4G3B6" 2þ£„<þ¢C$;B$;D$F›9Pþ [‚]†\,„p,"BASIC",ƒ ,ƒ ,:Zþ [‚@]† ,ˆ ,"UCITEL",ƒ ,ƒ ,&dþ¤„P,„:"MZ-800-P·—¡³" nþ¤…,„0:" 1986"/xþ¤„P,„P:"*** DIL 3 ***":þ‚@.‚þ¤„,„p:"*** Zž¡Ÿ·«¡°¦-œ¡– ***"Œ T: ¸ – þ" þ¤ƒ ,„ :"_ = ¢ž¡–©½";ªþ¤‚,ƒ:"¸¦¤–·«¡°¦ –¸¡Ÿ¦–©½ ·«¸¡œ¡°¦ ©¥¤·¥"#´þ¤ƒ ,„`:"Æ = œ·ž’œ¥" ¾ ÖÈ“A$ô""âƒ Ò þ<Üþ [‚@]†\,… ," POZOR !",‚@,‚@,=æþ [‚@]†H,…p,"",‚@,‚@,8ðþ¤,ƒ@:"T’°–· ¥Ÿ’š°¦ ž·—¡³ «¡¤ ¤’¢°¡³¦"9úþ¤,„:"¤ ¥©¸¡œ¡°¦³ ž·—¡³¥ œ· ž·Ÿ¦–¡Ÿ’ ¡"=þ¤,„ :"¥©¸¡œ¡°¦ ž·—¡³¥ °¡ ©¡¢’–¥. D¡¸’ «¡¤"<þ¤,„@:"¤’¢°¡³¦ ¯¡© ž¡Ÿ·«¡– ¤ ž¦©¡¢½ LIST,"?þ¤,„`:"D’¸’–’ ¡ ¤ ž¦˜¡«¡°¦³ œ¡– œ· ž·Ÿ¦–¡Ÿ’."="þ¤,…:"N¡ ©·°Ÿ¦ ¸’©Ÿ’ «¡³ š¥œ·¥ œ¡°½ ·–¡¢©½." ,¾@26þ¤„P,…8:þ‚@:"Z³¡Ÿ©°¦-SPACE !!!" @¾„ 2Jþ¤„P,…8:þ‚:"Z³¡Ÿ©°¦-SPACE !!!" T¾„ ^þh­A$:“A$ô""â 6 rþ‚@ | þ3†þ¤,:" LOAD (¸·¥œ)>þ¤,‚@:"T’°–· ž¦©¡¢ °¡˜¡¯’ ¥Ÿ’°½ ž·—¡³ œ·";šþ¤,ƒ:"ž¡³’–¦ ž·Ÿ¦–¡Ÿ’ ¢ «°’¯¤¦ ž’¦ª’¦’,">¤þ¤,ƒ :"(¢ ©¡¢’–½, œ¦¤©¥ °’š· ž¦œ¡«°’ ž¡³’–¦.";®þ¤,ƒ`:"Z¡ ž¦©¡¢’³ LOAD ³¥¢’³’ ¢¡œ¡– ¯³’°·">¸þ¤,„:"«·¸’°’˜· ¤·¥š·¥ ¡ ž·©¥œ ž·Ÿ¦–¡Ÿ ¯³’°·":Âþ¤,„:"¤·¥š·¥ °¡¸’¢°’ °¡˜¡¯’ ž·—¡³ œ·"(Ìþ¤,„ :"ž¡³’–¦ ž·Ÿ¦–¡Ÿ’."=Öþ¤,„@:"P¦ °¡˜¡«¡°¦ Ÿ¡¤–¦ ž·—¡³¥ «’ ¤–·-"<àþ¤,„P:"¯·«’³ ¯¡¢½©¥, ³¥¤¦³’ ¢¡œ¡– ¦°¤–¥©Ÿ¦">êþ¤,„`:"LIMIT ž’œ °¡˜¡«¡°¦³ ¡ ¥Ÿ¦– ž· –¥–·">ôþ¤,„p:"Ÿ¡¤– ž·—¡³¥ ³¦¤–· « ž¡³’–¦ ž·Ÿ¦–¡Ÿ’."9þþ¤,…:"Pž· °¡˜¡°¦ ž·—¡³¥ ¤’ ž’˜¡«¡Ÿ"$þ¤,…:"¤¡³ ¢¡¤–¡«¦."+þ¤,…(:"S–¡°¡ ³¡°¥¡¸¥:6-45"  ¸ & þ.0þ¤,:" SAVE (¤’¯«)6:þ¤,ƒ:"P¦©¡¢ SAVE ¸¢’ ž·¥¢¦– ¯’° ž·"*Dþ¤,ƒ :"ž·—¡³¦ « BESICU.";Nþ¤,ƒ`:"T¦³–· ž¦©¡¢’³ ³¥¢’³’ °¡˜¡«¡– ¯’°,"<Xþ¤,„:"°¡ ž’˜¡«¡Ÿ ¡ °’š· ž¦œ¡«°·¥ ž¡³’–.";bþ¤,„ :"P¦ °¡˜¡«¡°¦ ž·—¡³¥ ¢¡œ¡³’ ¯³’°·"9lþ¤,„0:"ž·—¡³¥ ž· ž·¢œ’¯¤¦ «½˜¸’œ¡«¡°¦" vþ¤,„@:"ž·—¡³¥.">€þ¤,„`:"D·ž·¥Ÿ’°¦ - ¢¡ž¦¤–’ ¤¦ ¤–¡« ž·Ÿ¦–¡œ¸¡"<Šþ¤,„p:"°¡ ž’˜¡«¡Ÿ¦ ž’œ ¡ ž· °¡˜¡°¦, ¡š½">”þ¤,…:"¯¤–’ ¤¦ ³·˜¸¦ ž·—¡³ ¤°¡œ°· «½˜¸’œ¡–."<žþ¤,…:"P· ¥©·°Ÿ’°¦ °¡˜¡«©½ ¤’ °¡ ·š¡¢·«Ÿ’"=¨þ¤,…:"·š¯’«¦ READY, ¡ °¡˜¡«©¡ ¤’ ¢¡¤–¡«¦."+²þ¤,…(:"S–¡°¡ ³¡°¥¡¸¥:6-46" ¼ ÖÆ“A$ô""â | Ð þ2Úþ¤,:" RUN (¡¥)";äþ¤,‚@:"P¦©¡¢ RUN ·œ¤–¡–¥¯’ ž·—¡³¦ ˜°’œ"6îþ¤,ƒ:"ž· °¡˜¡°¦ œ· ž¡³’–¦ ž·Ÿ¦–¡Ÿ’."Bøþ¤,ƒ@:"P¦©¸¡œ ¢¡œ¡°¦ RUN ž¦ °¡˜¡«¡°¦.":þ‚Gþ¤ƒ ,„:"RUN";ÿ (");"CMT:UŸ¦–’¸ œ¦¸ 3";ÿ ("):þ‚@3 þ¤,„ :"D¡¸’ ž¦©¡¢¥ RUN ¸¢’ ž·¥¢¦–"7þ¤,„0:"« ž·—¡³’Ÿ˜, ž¦©¸¡œ:":þ‚' þ¤ƒ ,„P:"IF A=5 THEN RUN"E*þ‚@:þ¤,„p:"T· ¢°¡³’°¡ ¯’¤–¸¦ A ¤’ ·«°¡ 5 ž·–·³"74þ¤,…:"¯œ¦ °¡ RUN ¡ RUN ¤ž¥¤–¦ ž·—¡³"#>þ¤,…:"·œ ¢¡Ÿ¡–©¥."4Hþ¤,…:"N¡¢’« ž·—¡³¥ ¸¢’ «½ž¥¤–¦–."<Rþ¤,… :"Z¡œ¡³’¸¦ ¢¡ RUN Ÿ¦¤¸· ¡œ©½, ž·—¡³"9\þ¤,…(:"¯’ ·œ ¢¡œ¡°’˜· Ÿ¦¤¸¡ ·œ¤–¡–·«¡°."+fþ¤,…8:"S–¡°¡ ³¡°¥¡¸¥:6-45" p Öz“A$ô""â & „ þ,Žþ¤,:" LIST">˜þ¤,‚@:"P¦©¡¢ LIST «½ž¦¤’ ž·—¡³ ·œ ¢¡œ¡°’˜·":¢þ¤,ƒ:"Ÿ¦¤¸¡ ¡œ©¥ ž· ¥Ÿ’°’ Ÿ¦¤¸· ¡œ©¥.">¬þ¤,ƒ@:"N’¢¡œ¡³’-¸¦ Ÿ¦¤¸· ¡œ©¥ «½ž¦¤’ ž·—¡³"5¶þ¤,ƒ`:"·œ ¢¡Ÿ¡–©¥ ž· ©·°’Ÿ ž·—¡³¥.";Àþ¤,„:"P’¥¤’°¦ ¯’ ³·¢°’ ¤–¦¤©°¥–¦³ BREAK">Êþ¤,„ :"°’š· SPACE (³’¢’°¦©) ¡ ¥ž¸°’ ¢¡¤–¡«’-"4Ôþ¤,„0:"°¦ ¤–¦¤©°¥–¦³ SHIFT ¡ BREAK."9Þþ¤,„P:"LIST «½ž¦¤¥¯’ ¯’° –’›– « BASICU !"(èþ¤,„p:"P¦©¸¡œ½ ¢¡œ¡°¦.",òþ‚:þ¤…0,…:"LIST 50-100"üþ¤…0,…:"LIST" þ¤…0,…:"LIST 30-")þ¤…0,… :"LIST -30":þ‚@*þ¤,…(:"S–¡°¡ ³¡°¥¡¸¥:6-4" $ Ö.“A$ô""â Ð 8 þ-Bþ¤,‚:" DELETE"=Lþ¤,ƒ :"P¦©¡¢ «½³¡¢’ ¡œ©½ ·œ ¡œ©¥ ¤ Ÿ¦¤¸’³"<Vþ¤,ƒ@:"ž·Ÿ¡–’Ÿ°¦˜· ¡¢ © ¡œ©¥ ¤ Ÿ¦¤¸’³, ©œ’"/`þ¤,ƒ`:"Ÿ˜’³’ «½³¡¢¡°¦ ¥©·°Ÿ¦–."2jþ¤,„ :"P¦©¸¡œ½ ž·¥¢¦–¦;":þ‚&tþ¤„0,„@:"DELETE 150-300"#~þ¤„0,„`:"DELETE -100"#ˆþ¤„0,…:"DELETE 200-"+’þ¤„0,…:"DELETE 100":þ‚@*œþ¤,… :"S–¡°¡ ³¡°¥¡¸¥:6-4" ¦ Ö°“A$ô""â „ º þ1Äþ¤,‚:" REM (¦³)"9Îþ¤,ƒ:"T¡–· ¦°¤–¥©Ÿ’ ¤’ š’˜’³ ž·«¡œ’°¦"+Øþ¤,ƒ :"ž·—¡³¥ °’ž·«¡œ¦.">âþ¤,ƒ`:"P·¥¢¦«¡ ¤’ © ·¢°¡Ÿ·«¡°¦ Ÿ¡¤–¦ ž·—¡³¥">ìþ¤,„:"© ¯’¯¦Ÿ˜ ¤°¡œ°’¯¤¦³¥ ž·¢œ’¯¤¦³¥ Ÿ–’°¦."9öþ¤,„ :"Z¡ ž¦©¡¢ REM ¤¦ ¸¢’ ¥¸·¢¦– ¥¢°’"<þ¤,„0:"ž·—¡³·«’ ž·¢°¡³©½, ©–’’ ¥¤°¡œ°¥¯¦"7 þ¤,„@:"½Ÿ˜¸’¯¤¦ ·¦’°–¡Ÿ¦ « ž·—¡³¥."2þ¤,„`:"N’¸¢’ ¥¸·¢¦ œ«·¯–’Ÿ©¡ (:)."=þ¤,„p:"V ž¦ž¡œ’, ¢’ « ž·—¡³¥ š¥œ’ ž¦©¡¢,"<(þ¤,…:"©–’½ ž·¤¦¸¡ ž·—¡³ °¡ ¡œ©¥ ©œ’ ¯’"52þ¤,…:"¦°¤–¥©Ÿ’ REM, ž·—¡³ ž’¯œ’"8<þ¤,…:"¡¥–·³¡–¦Ÿ©½ °¡ œ¡¸¤¦ ž·—¡³·«·¥"Fþ¤,…:"¡œ©¥."+Pþ¤,…(:"S–¡°¡ ³¡°¥¡¸¥:6-11" Z Öd“A$ô""â 8 n þ xþ¤,‚:"P¦©¸¡œ:"?‚þ‚:þ¤,ƒ:"LOAD";ÿ (");"P¦©¸¡œ";ÿ (")GŒþ‚@:þ¤,:"S¦³¥¸¡Ÿ’ °¡˜¡«¡°¦ œ· ž¡³’–¦ ž·Ÿ¦–¡Ÿ’." – ¸* þ¤,‚:" "?ªþ‚@:þ¤,ƒ:"LOAD";ÿ (");"P¦©¸¡œ";ÿ (") ´ 8¾þ‚@:þ¤,ƒ@:ÿ ();" PLAY": ¸: <Èþ¤,ƒ`:"F·¥°œ ";ÿ (");"P¦©¸¡œ";ÿ (")<Òþ¤,„:"L·¡œ¦°— ";ÿ (");"P¦©¸¡œ";ÿ (")VÜþ¤,„P:"> T’³¦–· ¤½³š·¸½ ¤’ ž·—¡³ °¡˜¡«¡ œ· ž¡³’–¦ ž·Ÿ¦–¡Ÿ’ <"<æþ¤,…:"> Zœ’ Ÿ’©¡³’ ¡¢ ¤’ ž·—¡³ °¡˜¡¯’ <"ð ¸: þ=úþ‚@:þ¤,… :"S¦³¥¸¡Ÿ’ ž·—¡³¥ ¢ ž¦©¡¢½."&þ¤,‚:"10 REM P¦©¸¡œ"Bþ¤,‚@:"20 PRINT";ÿ (");"P¦©¸¡œ ž·¥¢¦–¦";ÿ (")"þ¤,ƒ:"30 A = A+1"-"þ¤,ƒ :"40 CURSOR 1,3:PRINT A"/,þ¤,ƒ@:"50 IF A<20 THEN GOTO 30"I6þ¤,ƒ`:"60 PRINT";ÿ (");"K·°’Ÿ !";ÿ ("):“HFôâ @@þ¤,„:"R’¡œ½"'Jþ¤„P,…8:"Z³¡Ÿ©°¦ SPACE !"Tþ¤,„ :ÿ (È)^Iôà‡ h­A$:“A$ï""âIô‡ rŽ|þ¤,„ :" "†Iôàˆ“A$ï""âIôˆšŽ¤“A$ô""â T®“HLôâ R¸“HFôâ žÂþ¤,„@:"RUN"Ö :¾Œ;€: þ'àþ¤,‚:"P¦©¸¡œ ž·¥¢¦–¦"êIôà… ô¾‰þþ¤,‚@:IŽ ¾‰þ¤,ƒ:"K·°’Ÿ !"&þ¤,ƒ@:"R’¡œ½"(0 þ¤„P,…8:"Z³¡Ÿ©°¦ SPACE !":þ¤,ƒ`:ÿ (È)DIôà‡ N­A$:“A$ï""âIô‡ XŽbþ¤,ƒ`:" "lIôàˆv“A$ï""âIôˆ€ŽŠ“A$ô""â :”HFô:€ ðž—!¨þ¤,„@:"DELETE 10"=²þ¤,… :" "=¼þ¤,…(:" ": :¾‹Æþ¤,„P:"R’¡œ½"(Ð þ¤„P,…8:"Z³¡Ÿ©°¦ SPACE !"Úþ¤,„`:ÿ (È)äIôà‡ î­A$:“A$ï""âIô‡ øŽþ¤,„`:" " Iôàˆ“A$ï""âIôˆ Ž*“A$ô""â Ú"4þ¤,„P:" "7>þ¤,„@:"LIST ": :¾Šz: þHHLô:€  R Ö\HFô:HLôf“A$ô""â º p þ,zþ¤,‚:" WOPEN#"<„þ¤,ƒ:"T¡–· ¦°¤–¥©Ÿ’ ·–’«¦¡ BSD ¤·¥š· ž·"<Žþ¤,ƒ :"«½¤–¥ž. D·ž¸°¦ ¯’¯ ¸·—¦Ÿ©½³ Ÿ¦¤¸’³ ¡":˜þ¤,ƒ@:"¯³’°’³ ¤·¥š·¥. J³’°· ¤·¥š·¥ ³¥¢’"5¢þ¤,ƒ`:"š½– «½°’Ÿ˜¡°· ž¥©¥œ ¯’ ¥Ÿ’°·"*¬þ¤,„:"¦°¤–¥©Ÿ¦ DEFAULT.":¶þ¤,„ :"UŸ’°¦ ž’¦ª’¦’ RS° ¥Ÿ¥¯’ «½¤–¥ž"0Àþ¤,„0:"ž’¤ ¦°–’ª¡Ÿ’ RS 232 C."9Êþ¤,„P:"BSD = œ¡–·«’ ¡ ž·—¡³·«’ ¤·¥š·½":Ôþ¤,„`:"« BASICU ¢¡ž¤¡°’ ¤’©«’°Ÿ°’ « ASCII"7èþ¤,„p:"©·œ¥. T¡© ¢«¡°’ ž¦˜¡«¡°¦ œ¡–.";òþ¤,…:"L·—¦Ÿ©’ Ÿ¦¤¸· ³¥¢’ š½– ·œ 1 œ· 127."G þ¤,…:"P¦©¸¡œ: > WOPEN#5,";ÿ (");"DATA";ÿ (");" <"+ þ¤,…(:"S–¡°¡ ³¡°¥¡¸¥:6-51"  Ö$ “A$ô""â º . þ,8 þ¤,‚:" PRINT#";B þ¤,ƒ :"T¡–· ¦°¤–¥©Ÿ’ ¢¡ž¦¤’ œ¡–¡ ¤·¥š·¥,"<L þ¤,ƒ@:"©–’½ ¯’ ·–’«’° ¦°¤–¥©Ÿ¦ WOPEN # ¡"%V þ¤,ƒ`:"–· ¤’©«’°Ÿ°’.":` þ¤,„:"L·—¦Ÿ©’ Ÿ¦¤¸· ³¥¤¦ š½– ¤–’¯°’ ¯¡©·"9j þ¤,„ :"Ÿ¦¤¸·, ©–’½³ š½¸ ¤·¥š· ·–’«’°."=t þ¤,„@:"D¡–¡ ³·˜·¥ š½– °¥³’¦Ÿ©¡ ¦ ¡¸ª¡°¥³’."3¦ þ¤,…:"P¦©¸¡œ: > PRINT#5,A,B,X$ <"+° þ¤,… :"S–¡°¡ ³¡°¥¡¸¥:6-51" º ÖÄ “A$ô""â p Î þ,Ø þ¤,‚:" ROPEN#"<â þ¤,ƒ@:"I°¤–¥©Ÿ’ ·–’«¦¡ ¤·¥š· ž· «½¤–¥ž."5ì þ¤,„:"O¢°¡Ÿ¦ ¤·¥š· ¸·—¦Ÿ©½³ Ÿ¦¤¸’³"=ö þ¤,„:"¢ ž’¦ª’¦’ ¥Ÿ’°’ ¯³’°’³ ¡ ¤·¥š· ¯’"- þ¤,„ :"¥Ÿ’° ¯³’°’³ ¤·¥š·¥."9 þ¤,„@:"P·©¥œ ¯’ ¦°¤–¥©Ÿ¦ DEFAULT ¥Ÿ’°¡"? þ¤,„P:"ž’¦ª’¦’ ¯’ ³·¢°’ ¯’¯¦ ¯³’°· «½°’Ÿ˜¡–."G( þ¤,„p:"P¦©¸¡œ: > ROPEN#5,";ÿ (");"DATA";ÿ (");" <"+2 þ¤,…:"S–¡°¡ ³¡°¥¡¸¥:6-52" < ÖF “A$ô""â . P þ+Z þ¤,‚:" INPUT#"<d þ¤,ƒ:"I°ž¥– Ÿ–’ œ¡–¡ ¢’ ¤·¥š·¥ ·–’«’°’˜·">n þ¤,ƒ :"ž· «¤–¥ž ¦°¤–¥©Ÿ¦ ROPEN # ¡ ž¦¡¢¥-"0x þ¤,ƒ@:"¯’ ¯’ ¥Ÿ’°½³ ž·³’°°½³."6‚ þ¤,„:"P·³’°°’ ³·˜·¥ š½– ž«©½ ž·¸’.">Œ þ¤,„ :"L·—¦Ÿ©’ Ÿ¦¤¸· ³¥¤¦ š½– ¤–’¯°’ ¯¡©· ž¦"9– þ¤,„0:"ž«’³ ·–’«’°¦ ¤·¥š·¥ ž· «¤–¥ž."<  þ¤,„P:"P¦ ž·¥¢¦–¦ ¦°¤–¥©Ÿ’ READ - DATA ¯’"8ª þ¤,„`:"°¥–°’ œ¡– ž·¢· °¡ œ·œ¢’°¦ –½ž¥"#´ þ¤,„p:"ž·³’°°½Ÿ˜."3È þ¤,…:"P¦©¸¡œ: > INPUT#5,A,B,X$ <"+Ò þ¤,… :"S–¡°¡ ³¡°¥¡¸¥:6-53" Ü Öæ “A$ô""â Î ð þ,ú þ¤,:" CLOSE#/CLOSE"8 þ¤,‚@:"I°¤–¥©Ÿ’ CLOSE ¥¢¡«¦¡ ·–’«’°½"; þ¤,ƒ:"¤·¥š· ž·œ ¥Ÿ’°½³ ¸·—¦Ÿ©½³ Ÿ¦¤¸’³."< þ¤,ƒ@:"L·—¦Ÿ©’ Ÿ¦¤¸· ž¦¡¢’°’˜· ¤·¥š·¥ ¤’"." þ¤,ƒ`:"¯’˜· ¥¢¡«’°¦³ «½¥¢¦.">, þ¤,„:"Ož’¡Ÿ’ CLOSE °¡ ¤·¥š·¥ ·–’«’°’³ ž·"76 þ¤,„ :"«½¤–¥ž «½·«°¡ «½¤–¥ž°¦ š¥ªª’."9@ þ¤,„@:"Ož’¡Ÿ’ CLOSE š’¢ ¸·—¦Ÿ©’˜· Ÿ¦¤¸¡"8J þ¤,„P:"¥¢¡«’ «¤’Ÿ˜°½ ·–’«’°’ ¤·¥š·½."1h þ¤,…:"1. ž¦©¸¡œ : > CLOSE#5 <"0r þ¤,…:"2. ž¦©¸¡œ : > CLOSE <"+| þ¤,… :"S–¡°¡ ³¡°¥¡¸¥:6-54" † Ö “A$ô""â P š þ:þ¦)¤ þ¤,‚:"P¦©¸¡œ:":þ‚T® þ¤,ƒ:"10 CURSOR 1,14:PRINT ";ÿ (");ÿ ();" RECORD.PLAY";ÿ (")<¸ þ¤,ƒ :"20 WOPEN#5,";ÿ (");"NAHODA";ÿ (")* þ¤,ƒ@:"30 FOR I = 1 TO 10".Ì þ¤,ƒ`:"40 A = INT(RND(1)*100)"$Ö þ¤,„:"50 PRINT#5,A"0à þ¤,„:"60 CURSOR 3,10:PRINT A,I"ê þ¤,„0:"70 NEXT" ô þ¤,„@:"80 CLOSE"Fþ þ‚@: Ö:þ¤„,…8:" ": 9 þ¤,…:"Zœ’ ¯’ ž¦©¸¡œ Ÿ¦°°·¤–¦ ¦°¤–¥©Ÿ¦". þ¤,… :"WOPEN, PRINT# ¡ CLOSE."& “A$ô""â ð 0 ¸T: þ¤,ƒ:"10 CURSOR 1,14:PRINT ";ÿ (");ÿ ();" RECORD.PLAY";ÿ ("):D þ¤,„`:ÿ ();" RECORD.PLAY": ¸:þ‚TN þ¤,ƒ:"10 CURSOR 1,14:PRINT ";ÿ (");ÿ ();" RECORD.PLAY";ÿ (")EX þ‚@:þ¤,ƒ :"20 WOPEN#5,";ÿ (");"NAHODA";ÿ (")b IôI÷8l þ‚@:þ¤,ƒ@:"30 FOR I = 1 TO 10": ¸3v þ‚:þ¤,ƒ@:"30 FOR I = 1 TO 10"<€ þ‚@:þ¤,ƒ`:"40 A = INT(RND(1)*100)": ¸7Š þ‚:þ¤,ƒ`:"40 A = INT(RND(1)*100)"2” þ‚@:þ¤,„:"50 PRINT#5,A": ¸.ž þ‚:þ¤,„:"50 PRINT#5,A":Q¨ þ‚@:þ¤,„:"60 CURSOR 3,10:PRINT A,I":Aôÿ€(ÿˆ()ü‡H)² þ¤‚@,„ :A,I: ¸9¼ þ‚:þ¤,„:"60 CURSOR 3,10:PRINT A,I"-Æ þ‚@:þ¤,„0:"70 NEXT": ¸(Ð þ‚:þ¤,„0:"70 NEXT"Ú “Iö„ â b .ä þ‚@:þ¤,„@:"80 CLOSE": ¸Eî þ‚:þ¤,ƒ :"20 WOPEN#5,";ÿ (");"ZUFALL";ÿ (")'ø þ‚@:þ¤,„p:"R’¡œ½." þ¤,…:ÿ (È) Iôà‡ ­A$:“A$ï""âIô‡ Ž* þ¤,…:" "4 Iôà‡p> “A$ï""âIô‡pH ŽR “A$ô""â  L\ Iô:þ‚@:þ¤‚@,…:" "f þ¤…,… :" "4p þ¤ƒ@,…(:" " z Ö„ “A$ô""â ð Ž þ9˜ þ¤‚,ƒ`:"N’¢ ¥©·°Ÿ¦³’ –¥–· ¸’©Ÿ¦ ¢¡œ¡³ «¡³";¢ þ¤‚,„:"©·°–·¸°¦ –’¤–, ·œž·«¦–’ ¤–¦¤©°¥–¦³"6¬ þ¤‚,„0:"ž¦¤¸¥¤°’ ©¸¡«’¤½ °¡ ž·Ÿ¦–¡Ÿ¦." ¶ ¸ À þ5Ê þ¤,„:"K–’½ ž¦©¡¢ ¯’ ¤ž¡–°’ ¢¡œ¡°?"5Þ þ¤,„@:"A. WOPEN# ·–’«¦¡ ¤·¥š·½ ž·"è þ¤ƒ,„P:"«½¤–¥ž.">ò þ¤,„p:"B. CLOSE#5 ·–’«¦¡ ¤·¥š· ž·œ ¸·—¦Ÿ©½³"!ü þ¤ƒ,…:"Ÿ¦¤¸’³ 5."=þ¤,…:"C. INPUT# Ÿ–’ œ¡–¡ ¢’ ¤·¥š·¥ ·–’«’-"8þ¤ƒ,…:"°’˜· ž· «¤–¥ž ¦°¤–¥©Ÿ¦ ROPEN#."  ¸$“A$ô""â .“A$ô"A"â ª:€ À 8“A$ô"B"â ´:€ VB“A$ô"C"â ª:€ À L€  V Ö`“A$ô""â Ž j þ4tþ¤,„:"K–’½ ¢¡ž¦¤ ¯’ Ÿ˜½š°’ ¢¡œ¡°?":ˆþ¤,„@:"A. ROPEN5,";ÿ (");"J³’°·";ÿ (")$’þ¤,„`:"B. REM INPUT"$œþ¤,…:"C. PRINT#5,A" ¦ ¸°“A$ô""â ¦º“A$ô"A"â ´:€ âÄ“A$ô"B"â ª:€ jΓA$ô"C"â ª:€ j Ø€ ¦ â Öì“A$ô""â À ö þ5þ¤,„:"K–’½ ¢¡ž¦¤ ¯’ Ÿ˜½š°’ ¢¡ž¤¡°?"Oþ¤,„@:"A. RUN";ÿ (");"J³’°·";ÿ (");" ·œ¤–¡–¥¯’ ž·—¡³ ž·"3þ¤ƒ,„P:"°¡˜¡°¦ œ· ž¡³’–¦ ž·Ÿ¦–¡Ÿ’."=(þ¤,„p:"B. WOPEN#156 œ·ž¸°¦ ¸·—¦Ÿ©’ Ÿ¦¸· 156."?2þ¤,…:"C. DELETE 10 ž·«’œ’ «½³¡¢ °¡ ¡œŸ’ 10." < ¸F“A$ô""â <P“A$ô"A"â ª:€ öZ“A$ô"B"â ´:€ xd“A$ô"C"â ª:€ ö n€ < x Ö‚“A$ô""â j Œ€ ¾ –þ‚@ ˜Aª þ:þ:þ¤ƒ`,„0:"V¡¤’ ·œž·«’œ ¯’ Ÿ˜½š°¡!":¾Šz:„?´ þ:þ¤ƒ`,„0:"V¡¤’ ·œž·«’œ ¯’ ¤ž¡«°¡!":¾Œ;€:„ ¾ þ%Èþ¤„@,ƒ :"K·°’Ÿ L’©Ÿ’ 3"FÒþ¤„,„:"Ož¡©·«¡°¦ ¸’©Ÿ’ =";:þ‚:" R":þ‚@FÜþ¤„,„@:"D¦¸ 4 =";:þ‚:" L":þ‚@0æþ¤„P,…8:þ‚@:"Z³¡Ÿ©°¦ V·¸š¥ !"ð­A$:“A$ô""â ðú“A$ô"R"⃓A$ô"L"â þ“A$ô"L"âHBô:: € ð<þ¤ƒ,„:"M¡–’ ž¦ž¡«’°·¥ ©¡¢’–¥ ¤ ž·—¡³’³?"0"þ¤ƒ,„ :" P¦ž¡«’° (A/N) ?",­A$:“A$ô""â ,6“A$ô"A"â @:: € ,9@þ¤…,„P:"PLAY ";ÿ ():ƒ"UŸ¦–’¸ BASIC Ÿ.4"J˜TYôà…8-^“Yõ ì Yö…8âVô::ÂVô!h“VôâXô:X1ô†r“Vôâþ¤X,Y:"*"|“Vôâþ¤X1,Y:"*"†“Vô†®Xôà†:5š“Xõ ì Yõ ì Xö† ì Y ö…8†®¤þ¤X,Y:"*" ®Ž:Ž:„'¸þ¤„P,…8:"Z³¡Ÿ©°¦ SPACE !"­A$:“A$ô""⠸̄-Öþ¤„,…8:" _ / Æ Z¡œ’¯ «·¸š¥ ! "à­A$:“A$ô""â àê„=ô›:þ˜[‚,],,,‰@€,ˆ>,‚:„6þ›:þ˜[‚,],,,‰,ˆ>:„¾Œ;€:„'þ¤„P,…8:" "4þ˜[‚,],,,‰,ˆ>:„