BASIC-UCITEL 4 ¬S—"BASIC-UCITEL 4"Ü"CRT:M1" þ¢ Üþ¦B$ô"A3A3D4A3F4G3B6"C$ô"A3A3D4A3F4G3B6"D$ô"A3A3D4A3F4G3B6" þ£„ þ¢C$;B$;D$ ›9 þ [‚]†4,„p,"BASIC",ƒ ,ƒ ,: þ [‚@]† ,ˆ ,"UCITEL",ƒ ,ƒ ,$ þ¤„P,„:"S˜¡ž MZ-800"!þ¤„p,„ :"K·¸ & B’" þ¤…,„0:" 1987"/þ¤„P,„P:"*** DIL 4 ***":þ‚@0þ¤„,„p:"*** G¡ª¦Ÿ©’ ž¦©¡¢½ ***" :   6þ¤‚,„:"P·©¡Ÿ·«¡°¦ ž·—¡³¥ Æ ¤–¦¤©°¦"+þ¤‚,„ :"¸¦š·«·¸°·¥ ©¸¡«’¤¥!"2þ¤‚,„`:"N¡«¡– °¡ ž’œŸ˜·¢¦ ¤–¡°¥"2þ˜[‚@] ‡H,‡~,ˆ,ˆ ,‚@ þ¤‚,…:"©¸¡«’¤·¥"þ¤„P,…: " Z "  “A$ô"Z"⃠ 5þ¤,‚:" PAL "<þ¤,ƒ:"V BASIC¥ SHARP MZ-800 ’›¦¤–¥¯’ ¡œ¡ "=þ¤,ƒ :"ž·«’¸¥ ž· ž¡Ÿ¦ ¤ š¡«·¥ ¡ —¡ª¦©·¥."= þ¤,ƒ@:"P¡Ÿ¦ ¤ °¦³¦ ¤¦ « –’–· ¸’©Ÿ¦ ¥©¡¢’³’.";!þ¤,„:"V ¢¡¤¡œ’ ³¡³’ © œ¦¤ž·¢¦Ÿ¦ 16 š¡’«."="þ¤,„:"P·–·¢’ ³¥¢’³’ ¤·¥Ÿ¡¤°’ ¢°¡¢·°¦– ¯’°"<#þ¤,„ :"4 š¡«½ °¡ ·š¡¢·«Ÿ’, ³¥¤¦³’ ž·«’¤–";$þ¤,„0:"«½š’ –’Ÿ˜–· š¡’«. T· °¡³ ¥³·¢°¥¯’"=%þ¤,„@:"ž¦©¡¢ PAL . V·¸¦³’ ¯¦³ 4 š¡«½ ¢’ 16"9&þ¤,„P:"¤’ ©–’½³¦ š¥œ’³’ ž¡Ÿ·«¡– ¡¢ œ· "%'þ¤,„`:"œ¡¸¤¦ «·¸š½. "=(þ¤,… :"P·œ¦«’¯³’ ¤’ °¡ ž¡¸’–¥ ³·¢°½Ÿ˜ š¡’«!" )  * '+þ¤,‚:"B¡’«°¡ ž¡¸’–¡:",þ¤,ƒ:"C¦¤¸·:"-þ¤„ ,ƒ:"B¡«¡:".þ¤‚@,ƒ :"0"/þ¤„ ,ƒ :"C’°¡"0þ¤‚@,ƒ@:"1"1þ¤„ ,ƒ@:"M·œ¡"2þ¤‚@,ƒ`:"2"3þ¤„ ,ƒ`:"C’«’°¡"4þ¤‚@,„:"3")5þ¤„ ,„:"M¡—’°–¡(ž¥ž¥·«¡)6þ¤‚@,„:"4"7þ¤„ ,„:"Z’¸’°¡"8þ¤‚@,„ :"5"$9þ¤„ ,„ :"C½¡°(š¸¡°©½–):þ¤‚@,„0:"6";þ¤„ ,„0:"Z¸¥–¡"<þ¤‚@,„@:"7"=þ¤„ ,„@:"B¦¸¡">þ¤‚@,„P:"8"?þ¤„ ,„P:"S’œ¡"@þ¤‚@,„`:"9"$Aþ¤„ ,„`:"S«’–¸’ ³·œ¡"Bþ¤‚,„p:"10"Cþ¤„ ,„p:"R¥¢·«¡ "Dþ¤‚,…:"11"(Eþ¤„ ,…:"S«’–¸’ ž¥ž¥·«¡"Fþ¤‚,…:"12"%Gþ¤„ ,…:"S«’–¸’ ¢’¸’°¡"Hþ¤‚,…:"13"3Iþ¤„ ,…:"S«’–¸½ Ÿ½¡°(¤«’–¸½ š¸¡°©½–)"Jþ¤‚,…:"14"$Kþ¤„ ,…:"S«’–¸’ ¢¸¥–¡"Lþ¤‚,… :"15"#Mþ¤„ ,… :"Z¡¦«’ š¦¸¡" N O“A$ô"Z"â  P ;Qþ¤,‚@:"Z –’Ÿ˜–· 16 š¡’« ³¥¢’³’ «·¸¦– «¢œ½"=Rþ¤,ƒ:"4 š¡«½ ¤·¥Ÿ¡¤°’. P·–· ³¡³’ © œ¦¤ž·-"CSþ¤,ƒ :"¢¦Ÿ¦ 4 –¢«.";ÿ (");"B¡’«°’ ³¦¤©½";ÿ (")KTþ¤,ƒ@:"B¥œ’³’ ¯’ °¡¢½«¡–";ÿ (");"P¡¸’–·«½ ©·œ";ÿ (")"."<Uþ¤,ƒ`:"T’°–· P¡¸’–·«½ ©·œ ³¥¢’ °¡š½«¡– ˜·œ-"=Vþ¤,„:"°·–½ 0 -3. N¡³¦¤–· Ÿ¦¤¸¡ š¡«½ š¥œ’³’";Wþ¤,„:"ž·¥¢¦«¡– ž·¯³¥ š¡’«°½ ©·œ,©–’½ ¯’"#Xþ¤,„ :"·œ 0 œ· 15.";Yþ¤,„0:"Aš½Ÿ˜·³ ž¡¸’–·«’³¥ ©·œ¥ 1 ž¦¡œ¦¸¦"=Zþ¤,„@:"Ÿ’«’°·¥ š¡«¥ (š¡’«°½ ©·œ 2) ³¥¤¦³’";[þ¤,„P:"ž·¥¢¦– ž¦©¡¢¥ PAL ,¯¡© ¯’ ¥«’œ’°· ";\þ¤,„`:"« ž¦©¸¡œ¥. T¡©–· ¤¦ ³¥¢’³’ °¡«·¸¦–"8]þ¤,„p:"š¸·©½ ž· 4 š¡«¡Ÿ˜ ž·œ¸’ «¸¡¤–°¦" ^þ¤,…:"ž·–’š½."0_þ¤,…:" > PAL 1,2 < "8`þ¤,… :"M¡°¥¡¸ ¤–¡°¡: 6-57 ¡ Ažž’°œ¦› A" a b“A$ô"Z"â * c 5dþ¤,‚:" COLOR" ";eþ¤,ƒ:"T¦³–· ž¦©¡¢’³ ¤ž’Ÿ¦ª¦©¥¯’³’ š¡«¥,"<fþ¤,ƒ :"©–’·¥ š¥œ’³’ ž·¥¢¦«¡– « ž¦©¡¢’Ÿ˜ "<gþ¤,ƒ@:"PRINT,BOX,LINE ¡–œ. Z¡œ¡«¡³’ «¸¡¤–°’"=hþ¤,ƒ`:"ž¡¸’–·«½ ©·œ, ©’ ©–’’³¥ ¯’ ž¦¡¢’°¡";iþ¤,„:"š¡«¡ ž¦©¡¢’³ PAL. J’ –· ž·°’©¥œ "=jþ¤,„:"©©·¸·³°’, ¡¸’ œ¥«·œ’³ ¯’ –·,¡š½ š½¸·"<kþ¤,„ :"³·¢°· ž¡Ÿ·«¡– ž¦ ¥¢°’ ©·°ª¦—¥¡Ÿ¦"=lþ¤,„0:"«¦œ’·RAM(¤·¥«¦¤¦ –· ¦ ¤ ’¢¦³’³ ž¡Ÿ’"0mþ¤,„@:"³·°¦–·¥ - ž¦©¡¢½ INIT).=nþ¤,„P:"A¥–·³¡–¦Ÿ©½ ¤’ š¡«¡ œ’ª¦°·«¡°¡ COLOR":oþ¤,„`:"ž·¥¢¦«¡ «’ «¤’Ÿ˜ ž¦©¡¢’Ÿ˜ PRINT, "=pþ¤,„p:"BOX ¡–œ. °’°¦-¸¦ « °¦Ÿ˜ ¤ž’Ÿ¦ª¦©·«¡°¡"=qþ¤,…:"¯¦°¡ š¡«¡. N¡«¦Ÿ ¸¢’ « ž¦©¡¢¥ COLOR"<rþ¤,…:"«·¸¦– ¯’¤–’ ¢ž¥¤·š ¢³’°½ š¡«½. A –·"9sþ¤,…:"œ¡¸¤¦³ ž¡¡³’–’³, ©–’½ ¯’ š¥œ 0"<tþ¤,…:"°’š· 1. P¡¡³’– 0 ¢°¡³’°¡, ¢’ ¤–¡¡"9uþ¤,… :"š¡«¡ š¥œ’ ž’©½–¡ °·«·¥ š¡«·¥;" v w“A$ô"Z"â P x 9yþ¤,‚@:"ž¡¡³’– 1 ¢°¡³’°¡, ¢’ °·«¡ š¡«¡"Kzþ¤,ƒ:"¯’ «½¤¸’œ©’³ ¸·—¦Ÿ©’˜· ¤·¥Ÿ–¥ ";ÿ (");"OR";ÿ (");{þ¤,ƒ :"³’¢¦ ¤–¡·¥ ¡ °·«·¥ š¡«·¥. T¡š¥¸©¡"<|þ¤,ƒ@:"˜·œ°·– –’–· ·ž’¡Ÿ’ ¯’ « D·œ¡–©¥ A ":}þ¤,ƒ`:"°¡ ¤–¡°’ A-6 ³¡°¥¡¸¥. ":~þ¤,„:"V ž¦©¡¢’Ÿ˜ RESET ¡ BLINE ¤’ –’°–·"+þ¤,„:"ž¡¡³’– °’ž·¥¢¦«¡."*€þ¤,„ :"T«¡½ ž·«’¸¥ COLOR"0þ¤,„@:" > COLOR X,0 <"0‚þ¤,„`:" > COLOR X,1 <"8ƒþ¤,…:" > COLOR X <" "9„þ¤,…:"P¡¡³’– X ·¢°¡Ÿ¥¯’ ž¡¸’–·«½ ©·œ,"%…þ¤,…:"©–’½ «·¸¦³’."8†þ¤,…(:"M¡°¥¡¸ ¤–¡°¡: 6-56 ¡ Ažž’°œ¦› A" ‡ ˆ“A$ô"Z"â c ‰ 4Šþ¤,‚:" SET" "=‹þ¤,ƒ:"P¦©¡¢ SET ¥³·¢°¥¯’ ž¡Ÿ¦ ¤ ¯’œ°·–¸¦-"<Œþ¤,ƒ :"«½³¦ š·œ½ ·š¡¢·«©½ (P¦›’¸) - «½š¡-"<þ¤,ƒ@:"«·«¡– ¯’. V ©·°ª¦—¥¡Ÿ¦ š’¢ ž¦œ¡«°’"<Žþ¤,ƒ`:"«¦œ’·RAM «’ Ÿ–½š¡’«°’³ ’¢¦³¥ ³¡³’";þ¤,„:"© œ¦¤ž·¢¦Ÿ¦ 320›200 š·œ¥ °’š· «’ ";þ¤,„:"œ«·¯š¡’«°’³ ’¢¦³¥ 640›200 š·œ¥, ":‘þ¤,„ :"©–’’ ¥Ÿ¥¯’³’ ž·³·Ÿ¦ ¯’¯¦Ÿ˜ X ¡ Y"#’þ¤,„0:"¤·¥¡œ°¦Ÿ. "*“þ¤,„P:"T«¡½ ž¦©¡¢¥ SET:"3”þ¤,„p:" > SET [PŸ,B¡]X,Y <"/•þ¤,…:" > SET X,Y <"=–þ¤,…:"PŸ = P¡¸’–·«½ ©·œ: B¡ = M·œ 0 °’š· 1"3—þ¤,…:"¤–’¯°’ ¯¡©· « ž¦©¡¢¥ COLOR"+˜þ¤,…(:"M¡°¥¡¸ ¤–¡°¡: 6-58" ™ š“A$ô"Z"â x › Bœþ’‡H,‡4:¾Š:þ¤„`,„0:"SET 100,90":¾ŠaIôà‡H žAô‚@$Ÿ“ÿ€(Iû‚)ïIû‚âAô þ’[A]÷I,‡4 ¡¾…p¢Ž£þ¤‚@,„@:"X = 100" ¤¾Ša¥Iôà‡2 ¦Aô‚@$§“ÿ€(Iû‚)ïIû‚âAô¨þ’[A]‡H,‡4øI ©¾…pªŽ2«þ ‡\,‡ ,"Y = 90",,, ¬ ­“A$ô"Z"â ‰ ® V¯þ–‚,„P:þ’[‚]ˆu,ˆ:þ¤,„ :"PAL 2,13:SET[2]245,150"°Iôàˆu ±¾… ²þ’[‚]I,ˆ³Ž´þ¤„0,… :"X = 245"µIôàˆ ¶¾„ ·þ’[‚]ˆu,ˆøI ¸¾„ ¹Ž ºþ£ƒ`3»þ ˆ,‡>,"Y = 150",,,¼Iôàƒ`½Dôà…¾þ—ˆu,ˆ,… øD0¿þ”,ˆ,ˆu,ˆ,ˆu,%Àþ—[]ˆu,ˆ,… øDÁŽ:þ¢"O5C8R7O3D3"Âþ’ˆu,ˆÃŽ Äþ¢ ™ Å Æ“A$ô"Z"â › Ç *Èþ¤,‚:" RESET"8Éþ¤,ƒ:"P¦©¡¢’³ RESET ¸¢’ «½³¡¢¡– š·œ "<Êþ¤,ƒ :"¢·š¡¢’°½ ž¦©¡¢’³ SET ¢¡œ¡°¦³ ¤–’¯-":Ëþ¤,ƒ@:"°½Ÿ˜ ¤·¥¡œ°¦Ÿ ¯¡©· « ž¦©¡¢¥ SET."<Ìþ¤,ƒ`:"Z¡œ¡°¦³ œ¡¸¤¦Ÿ˜ ž¡¡³’–¥ ¸¢’ ¢³’°¦–"/Íþ¤,„:"š¡«¥ ¢·š¡¢’°’˜· š·œ¥."3Îþ¤,„ :" > RESET [PŸ,B¡]X,Y <"/Ïþ¤,„@:" > RESET X,Y <")Ðþ¤,„`:"PŸ = P¡¸’–·«½ ©·œ"4Ñþ¤,„p:"B¡ = P’©½«¡Ÿ¦ ³·œ 0 °’š· 1"=Òþ¤,…:"B¡=0:«½¤¸’œ°¡ š¡«¡=ž·Ÿ’– š¡’« « œ¡-"=Óþ¤,…:"°’³ ’¢¦³¥ ³·°¦–·¥-1-¢¡œ¡°½ ž¡¸’–©·œ"=Ôþ¤,…:"B¡=1:«½¤¸’œ°¡ š¡«¡=¤–¡½ ž¡¸’–©·œ OR"9Õþ¤,…:"ž¡¸’–©·œ š¡«½ ¯¡©· ©œ½š½ ¤’ B¡=0"9Öþ¤,…(:"M¡°¥¡¸ ¤–¡°¡: 6-59 ¡ Až’°œ¦› A-6"× :“A$ô"Z"â ® Ø Ùþ’[‚@] ˆu,ˆ:/Úþ¤,„ :"RESET[2]245,150":¾ŠaÛþ¢"O1D8R3O5C3"5ÜIôàƒ`:þ’[‚@]ˆu,ˆ:¾‰zÝDôà…Þþ—ˆu,ˆ,Dßþ—[]ˆu,ˆ,DàŽ:þ¢"O1D8R3O5C3"Ꭰâþ¢ ™ ã ä“A$ô"Z"â Ç å *æþ¤,‚:" BOX"9çþ¤,ƒ:"T¦³–· ž¦©¡¢’³ ©’¤¸¦³’ Ÿ–«’’Ÿ ¡"<èþ¤,ƒ :"«½š¡«¥¯’³’ ˜· ž·œ¸’ ž¡°¦. J’¤–¸¦¢’";éþ¤,ƒ@:"°’°¦ ¢¡œ¡° ¥œ¡¯ · «½š¡«’°¦, ©’¤¸¦"-êþ¤,ƒ`:"¤’ ¯’° ·š½¤ Ÿ–«’Ÿ’."=ëþ¤,„:"J¡©· ¤·¥¡œ°¦Ÿ’ ¤’ ¥œ¡«¡¯¦ ¸’«½ ˜·°¦"2ìþ¤,„:"¡ ž¡«½ œ·¸°¦ ·˜ Ÿ–«’Ÿ’."4íþ¤,„0:" > BOX [PŸ,B¡]X,Y,X,Y,Vž <"1îþ¤,„@:" > BOX [PŸ,B¡]X,Y,X,Y <"2ïþ¤,„P:" > BOX X,Y,X,Y,X,Vž <"1ðþ¤,„`:" > BOX X,Y,X,Y,X <")ñþ¤,…:"PŸ = P¡¸’–·«½ ©·œ")òþ¤,…:"B¡ = M·œ 0 °’š· 1"=óþ¤,…:"T½–· ž¡¡³’–½ ¯¤·¥ ¤–’¯°’ ¯¡©· ¥ SET"4ôþ¤,…:"Vž = ž¡¸’–©·œ ž· «½š¡«’°¦ "8õþ¤,…(:"M¡°¥¡¸ ¤–¡°¡: 6-61 ¡ Ažž’°œ¦› A" ö ÷“A$ô"Z"â Ç ø *ùþ¤,‚:" LINE"<úþ¤,ƒ:"LINE ©’¤¸¦ Ÿ¡¥ ³’¢¦ ¢¡œ¡°½³¦ š·œ½,";ûþ¤,ƒ :"©–’½Ÿ˜ ³¥¢’ š½– °’©·¸¦©, «¢œ½ ³¥¤¦"=üþ¤,ƒ@:"³¦– ¢¡œ¡°’ ¤·¥¡œ°¦Ÿ’ « ž·¡œ¦ X ¡ Y."<ýþ¤,ƒ`:"L’¢¦-¸¦ °’©–’’ ¤·¥¡œ°¦Ÿ’ ³¦³· ž·¸’"<þþ¤,„:"·š¡¢·«©½, š¥œ’ ¤’ ©’¤¸¦– ¯’° Ÿ¡¤–,"=ÿþ¤,„:"©–’¡ ¯’ « ³’¢¦Ÿ˜ ·š¡¢·«©½.P¡¡³’–½"<þ¤,„ :"ž· š¡«½ ¯¤·¥ ¤–’¯°’ ¯¡©· « ž¦©¡¢¥"=þ¤,„0:"SET. J’-¸¦ ¤ž’Ÿ¦ª¦©¡Ÿ’ š¡’« «½°’Ÿ˜¡-"=þ¤,„@:"°¡, š¡«½ ¤’ ¥Ÿ¥¯¦ ž·œ¸’ ž·¤¸’œ°¦˜· "=þ¤,„P:"ž¦©¡¢¥ COLOR. S·¥¡œ°¦Ÿ’ X ¡ Y ³·˜·¥":þ¤,„`:"š½– ¦ «½¤¸’œ©’³ ž·Ÿ’–°¦Ÿ˜ ·ž’¡Ÿ¦ "<þ¤,„p:"°’š· ³·˜·¥ š½– ¢¡œ¡°½ ¯¡©· ž·³’°°’.";þ¤,…:" > LINE [PŸ,B¡]X,Y,X,Y,X,Y ... <"7þ¤,…:" > LINE X,Y,X,Y,X,Y ... <")þ¤,…:"PŸ = P¡¸’–·«½ ©·œ"6 þ¤,…:"B¡ = M·œ 0 °’š· 1 (¯¡©· ¥ SET)"+ þ¤,…(:"M¡°¥¡¸ ¤–¡°¡: 6-60"   “A$ô"Z"â å  +þ¤,‚:" BLINE"=þ¤,ƒ:"BLINE ³’°¦ š¡«¥ Ÿ¡½ °’š· ¥¤’©¥ Ÿ¡½";þ¤,ƒ :"Z¡œ¡«¡°¦ ¤·¥¡œ°¦Ÿ ¯’ ¯¡©· ¥ LINE "7þ¤,ƒ@:"¡ ž¡¡³’–¥ š¡«½ ¯¡©· ¥ RESET."<þ¤,ƒ`:"L’¢¦-¸¦ °’©–’’ ¤·¥¡œ°¦Ÿ’ ³¦³· ž·¸’"=þ¤,„:"·š¡¢·«©½, š¥œ’ –¦³–· ž¦©¡¢’³ ¢³’°’-"3þ¤,„:"°¡ ¯’° ¢·š¡¢’°¡ Ÿ¡¤– Ÿ¡½."9þ¤,„ :"D¡¸¤¦ ¦°ª·³¡Ÿ’ ¯¤·¥ « D·œ¡–©¥ A.";þ¤,„@:" > BLINE [PŸ,B¡]X,Y,X,Y,X,Y ... <"7þ¤,„`:" > BLINE X,Y,X,Y,X,Y ... <")þ¤,…:"PŸ = P¡¸’–·«½ ©·œ"8þ¤,…:"B¡ = P’©½«¡Ÿ¦ ³·œ (¯¡©· RESET)"+þ¤,…(:"M¡°¥¡¸ ¤–¡°¡: 6-61"  “A$ô"Z"â ø  — *** PROGRAM DOMECEK ***+þ˜[] †H,ˆ*,‰,‡4* þ”[‚]† ,‡F,†H,‡4*!þ”[‚]‰ €,‡F,‰,‡4G"þ”[] †H,‡4,ˆ,… ,ˆ>,†4,ˆ>,… 8#þ”[]ˆ>,… ,ˆR,… ,ˆR,†\8$þ”[]ˆR,†\,‰,‡4,†H,‡4$%þ™[‚] ˆ,‡ ,1&þ˜[‚@]‡ ,‡p,‡\,ˆ ,‚@1'þ˜[‚@]ˆf,‡p,ˆH,ˆ ,‚@1(þ˜[]ˆ,ˆ*,ˆ%,ˆ,)AôA÷:¾‡H*Iôà… 3+þ˜[‚@]‡ ,‡p,‡\,‡p÷I,3,þ˜[‚@]ˆf,‡p,ˆH,ˆ øI, -¾†p.Ž/Iôà… 30þ˜[‚@]‡ ,‡p,‡\,ˆ øI,31þ˜[‚@]ˆf,‡p,ˆH,‡p÷I,2¾†H:Ž3“Aöƒ â ) 4Aô 5 6“A$ô"Z"â  7›:‡ - 3: :“A$ô"Z"â  8 +9þ¤,‚:" CIRCLE"<:þ¤,ƒ:"T¦³–· ž¦©¡¢’³ ¸¢’ ©’¤¸¦– ©¥¢°¦Ÿ’,"=;þ¤,ƒ :"’¸¦ž¤½ ¡ «½¤’Ÿ’. P¡¡³’–½ š¡«½ ¯¤·¥":<þ¤,ƒ@:"¯¡©· ¥ SET. X ¡ Y ¯¤·¥ ¤·¥¡œ°¦Ÿ’ "==þ¤,ƒ`:"¤–’œ¥, R ¯’ ž·¸·³’, P· ¯’ ž·³’ ·¤½"=>þ¤,„:"X ¡ Y ž· P·<1 ¤’ R «¢–¡˜¥¯’ °¡ ·¤¥ X";?þ¤,„:"¡ « ·¤’ Y ¯’ œ¸’ –·˜· ž·³’¥ ³’°¤¦;"=@þ¤,„ :"ž· P·>1 ¯’ –· ·š¡Ÿ’°’; P·=1 ¯’ ©¥˜":Aþ¤,„0:"T¡©–· ¸¢’ ©’¤¸¦– ’¸¦ž¤½ ¤ ˜¸¡«°¦ "=Bþ¤,„@:"·¤·¥ « ·¤’ X °’š· Y ¡ œ¥˜·¥ ·¤·¥ œ¸’"=Cþ¤,„P:"¢¡œ¡°’˜· ž·³’¥. P¡¡³’–½ S ¡ E ¯¤·¥"<Dþ¤,„`:"ž·Ÿ¡–’Ÿ°¦ ¡ ©·°Ÿ·«½ š·œ ·š¸·¥©¥ ¥œ¡-"=Eþ¤,„p:"«¡°’ « ·š¸·¥©·«’ ³¦’. J’-¸¦ ž¦ž·¯’°";Fþ¤,…:"¯’¤–’ ž¡¡³’– O , ž¡© ¯¤·¥ ©¡¯°¦ ";Gþ¤,…:"š·œ½ ·š¸·¥©¥ ¡ ¤–’œ ¤ž·¯’°½ Ÿ¡¡³¦"<Hþ¤,…:"¡ «¢°¦©¡ –¡© «½¤’Ÿ. T¦³–· ¢ž¥¤·š’³ "=Iþ¤,…:"³¥¢’³’ ©’¤¸¦– ¥¢°’ ·š¸·¥©½ ¡ «½¤’Ÿ’"J :“A$ô"Z"â 7 K <Lþ¤,ƒ:"©¥¢°¦Ÿ ¡ ’¸¦ž¤. L¢’ –¡©’ –¡© ¤ž·¸¥ "9Mþ¤,ƒ :"¤ œ¡¸¤¦³¦ —¡ª¦Ÿ©½³¦ ž¦©¡¢½ ž· "=Nþ¤,ƒ@:"š¡«½ «½–«¡’– °¡ž¦©¸¡œ –¢«. œ·–·«’"9Oþ¤,ƒ`:"—¡ª½ ¡ —¡ª¦©¥. J’-¸¦ « ž¦©¡¢¥ ";Pþ¤,„:"CIRCLE «½°’Ÿ˜¡°¡ ¤ž’Ÿ¦ª¦©¡Ÿ’ š¡«½,"8Qþ¤,„:"¦œ¦ ¤’ š¡’«°’ ž·«’œ’°¦ ž·œ¸’ "7Rþ¤,„ :"ž·¤¸’œ°¦˜· ž¦©¡¢¥ COLOR. ":Sþ¤,„@:" > CIRCLE[PŸ,B¡]X,Y,R,P·,S,E,O <"4Tþ¤,„`:" > CIRCLE[PŸ,B¡]X,Y,R <"2Uþ¤,…:" > CIRCLE[PŸ]X,Y,R <"0Vþ¤,…:" > CIRCLEX,Y,R <"+Wþ¤,… :"M¡°¥¡¸ ¤–¡°¡: 6-62" X Y“A$ô"Z"â 8 Z +[þ¤,‚:" PAINT";\þ¤,ƒ:"PAINT «½š¡«¥¯’ ·˜¡°¦Ÿ’°’ ·š¸¡¤–¦ ";]þ¤,ƒ :"ž·œ¸’ ¢¡œ¡°’˜· ž¡¸’–©·œ¥ ¡ ¯’¯¦Ÿ˜ ";^þ¤,ƒ@:"·š«·œ ¢«·¸’°·¥ š¡«·¥. S·¥¡œ°¦Ÿ’ ";_þ¤,ƒ`:"X ¡ Y ³¥¤¦ ¸’¢’– ¥«°¦– «½š¡«·«¡°’"6`þ¤,„:"·š¸¡¤–¦. J’¤–¸¦¢’ ¯’ «’°’Ÿ˜¡° "=aþ¤,„:"ž¡¸’–©·œ, ¦œ¦ ¤’ š¡«¡ ·š¸¡¤–¦ ž·œ¸’"0bþ¤,„ :"ž·¤¸’œ°¦˜· ž¦©¡¢¥ COLOR"7cþ¤,„0:"B¡«¥ ˜¡°¦Ÿ’ ³¥¢’³’ «½š¡– ¢’ ")dþ¤,„@:"16 ³·¢°½Ÿ˜ š¡’«.":eþ¤,„`:" > PAINT[PŸ]X,Y,B¡«¡ ˜¡°¦Ÿ’ <"8fþ¤,…:" > PAINTX,Y,B¡«¡ ˜¡°¦Ÿ’ <")gþ¤,…:"PŸ = P¡¸’–·«½ ©·œ"+hþ¤,… :"M¡°¥¡¸ ¤–¡°¡: 6-63" i j“A$ô"Z"â K k 2lþ—ˆ,‡H,‡ ,,€,†4,Omþ—ˆ,‡H,‡ 8nþ—[‚@]ˆ,‡H,‡ ,,€,†4$oþ™[‚] ˆ ,‡H,‚@pþ™ˆ*,‡ ,‚ q r“A$ô"Z"â Zs›:::‡ l- pt :“A$ô"Z"â k u ,vþ¤,‚:" POSITION"9wþ¤,ƒ:"T¦³–· ž¦©¡¢’³ ¤’ ¥Ÿ¥¯’ š·œ, «’ "=xþ¤,ƒ :"©–’’³ š¥œ’ ž¦©¡¢’³ PATTERN ¢·š¡¢’°"(yþ¤,ƒ@:"—¡ª¦Ÿ©½ ¤½³š·¸."1zþ¤,„P:" > POSITION X,Y"+{þ¤,… :"M¡°¥¡¸ ¤–¡°¡: 6-65" | }“A$ô"Z"â s ~ +þ¤,‚:" PATTERN"9€þ¤,ƒ:"P¦©¡¢’³ PATTERN ³¥¢’³’ «½–«·¦– "<þ¤,ƒ :"¸¦š·«·¸°½ —¡ª¦Ÿ©½ ¤½³š·¸. P¡¡³’–½"=‚þ¤,ƒ@:"š¡«½ ¯¤·¥ ¯¡©· ¥ SET. N¥³’¦Ÿ©¡ œ¡–¡"=ƒþ¤,ƒ`:"¥œ¡«¡¯¦ ž·Ÿ’– 8 š·œ·«½Ÿ˜ ¡œ©¥ ¡ –’œ½":„þ¤,„:"ž·Ÿ’– °¡¤¸’œ¥¯¦Ÿ¦Ÿ˜ –’›–·«½Ÿ˜ œ¡–."9…þ¤,„:"M·˜·¥ °¡š½«¡– ˜·œ°·– +-1 ¡¢ +-24."<†þ¤,„ :"T’›–·«¡ œ¡–¡ ’ž’¢’°–¥¯¦ ¯’œ°·–¸¦«’":‡þ¤,„0:"¡œ©½ - ¯’¯¦Ÿ˜ š¦°¡°¦ «½¯¡œ’°¦ "<ˆþ¤,„@:"¥Ÿ¥¯’, ©–’½ š·œ « œ¡°’³ ¡œ©¥ š¥œ’"=‰þ¤,„P:"°’š· °’š¥œ’ ·š¡«’° (1 = ANO, 0 = NE)"<Šþ¤,„`:"M¥¢’³’ –¡© ³¦– © œ¦¤ž·¢¦Ÿ¦ ³¡–¦Ÿ¦ ¡¢"=‹þ¤,„p:"8›24 š·œ¥. K¸¡œ°’ ˜·œ°·–½ °¥³’¦Ÿ©½Ÿ˜";Œþ¤,…:"œ¡– ¥Ÿ¥¯¦, ¢’ ¤½³š·¸ š¥œ’ ©’¤¸’° "<þ¤,…:"¢œ·¸¡ °¡˜·¥ ¡ œ·ž¡«¡ ·œ ¥©¡¢¡–’¸’ "=Žþ¤,…:"ž·¢¦Ÿ’ °¡¤–¡«’°’˜· ž¦©¡¢’³ POSITION.";þ¤,…:"Z¡ž·°’ ˜·œ°·–½ ¥Ÿ¥¯¦ ž·¤–¥ž ¤˜·¡"=þ¤,… :"œ·¸¥ ¡ œ·ž¡«¡. T·˜· ¤’ œ¡ ž·¥¢¦– ž¦" ‘ ’“A$ô"Z"â u “ <”þ¤,ƒ:"©’¤¸’°¦ ¤·¥³’°½Ÿ˜ ·š¡¢©¥, ©œ½ "8•þ¤,ƒ :"¤–’¯°½³ ž¦©¡¢’³, ¯’° ¤ ·ž¡Ÿ°½³ "9–þ¤,ƒ@:"¢°¡³’°©’³ œ·©’¤¸¦³’ œ¥˜·¥ Ÿ¡¤– "—þ¤,ƒ`:"©’¤š½.";˜þ¤,„:"T’›–·«¡ œ¡–¡ ³·˜·¥ š½– ¢¡œ¡«¡°¡ š¥œ"<™þ¤,„:"« ¡¸ª¡°¥³’¦Ÿ©’³ «½¯¡œ’°¦ °’š· "%šþ¤,„ :"« ASCII ©·œ¥."9›þ¤,„0:"N’¯¤·¥-¸¦ ¢¡œ¡°½ ž¡¡³’–½ š¡«½,":œþ¤,„@:"š¡«¡ ¯’ ¥Ÿ’°¡ ž·¤¸’œ°¦³ ž¦©¡¢’³"þ¤,„P:"COLOR."Ožþ¤,„p:"> PATTERN [PŸ,B¡]N¥³. œ¡–¡,";ÿ (");"ABCD";ÿ (");" <"=Ÿþ¤,…:"> PATTERN N¥³.œ¡–¡,CHR$($41,$42,$43)<"+ þ¤,… :"M¡°¥¡¸ ¤–¡°¡: 6-64" ¡ ¢“A$ô"Z"â ~ £ +¤þ¤,‚:" POINT";¥þ¤,ƒ:"P¦©¡¢ POINT °¡³ ¥œ¡«¡ ž¡¸’–·«½ ©·œ";¦þ¤,ƒ :"š·œ¥ ¥Ÿ’°’˜· ¤·¥¡œ°¦Ÿ’³¦ X ¡ Y. ".§þ¤,„0:" > POINT X,Y <"+¨þ¤,… :"M¡°¥¡¸ ¤–¡°¡: 6-67" © ª“A$ô"Z"â “ « -¬þ¤,‚:" SYMBOL"<­þ¤,ƒ:"T’°–· ž¦©¡¢ ¥³·¢°¥¯’ ¢·š¡¢¦– –’›– "=®þ¤,ƒ :"°’š· —¡ª¦Ÿ©½ ¤½³š·¸ «’ ¢«·¸’°’ «’¸¦-"=¯þ¤,ƒ@:"©·¤–¦ ¡ ·–·Ÿ’°½ · ¢«·¸’°½ ¥˜’¸.V’–¦-"9°þ¤,ƒ`:"©¡¸°¦ ¦ ˜·¦°–¡¸°¦ ¢«’–¤’°¦ ³¥¢’ "<±þ¤,„:"š½– ·œ 1 ¡¢ œ· 255.U˜’¸ ·–¡Ÿ’°¦ ¯œ’ "<²þ¤,„:"ž·–¦ ¤³’¥ ·–¡Ÿ’°¦ ˜·œ¦°·«½Ÿ˜ ¥Ÿ¦-"<³þ¤,„ :"Ÿ’© ¤ ©·©’³ ž· 90 ¤–¥ž°¦Ÿ˜ ¡ ¢¡œ¡«¡"=´þ¤,„0:"¤’ –¡©–· 0 = 0· : 1 = 90· : 2 = 180· "=µþ¤,„@:"¡ 3 = 270· . S·¥¡œ°¦Ÿ’ X ¡ Y ¥œ¡«¡¯¦"=¶þ¤,„P:"ž·¢¦Ÿ¦ ¸’«’˜· ˜·°¦˜· ·˜¥ –’›–¥ °’š·"=·þ¤,„`:"¤½³š·¸¥.B¡’«°¡ ¤ž’Ÿ¦ª¦©¡Ÿ’ ¯’ ¤–’¯°¡"$¸þ¤,„p:"¯¡©· ¥ SET. "Q¹þ¤,…:"> SYMBOL [PŸ,B¡]X,Y,";ÿ (");"TEXT";ÿ (");",˜·,«’,U˜ <"Mºþ¤,…:" > SYMBOL X,Y,";ÿ (");"TEXT";ÿ (");",˜·,«’,U˜ <"+»þ¤,…(:"M¡°¥¡¸ ¤–¡°¡: 6-66" ¼ ½“A$ô"Z"â £ ¾ 4¿þ ‡,†H,"ž·¤¸’œ°¦",‚@,‚@,5Àþ [‚]†H,‡H,"P",ƒ@,ƒ@,6Áþ []‡H,‡H,"R¦",‚@,ƒ ,6Âþ [‚@]ˆ,‡\,"©L",ƒ,‚,6Ãþ [‚]ˆ\,ˆ,"Aœ",‚,„, Ä Å“A$ô"Z"â «Æ›:::‡ ¿- Ã Ç È“A$ô"Z"â ¾ É 7Êþ¤‚,„:"N’¢ ž¦¤–·¥ž¦–’ © œ¡¸¤¦ ¸’©Ÿ¦, "2Ëþ¤‚,„ :"«½’¤–’ °¡¤¸’œ¥¯¦Ÿ¦ ¥©·¸½!" Ì  Í 9Îþ¤,„:"K–’’ ¢ °¡¤¸’œ¥¯¦Ÿ¦Ÿ˜ «½¯¡œ’°¦ ""Ïþ¤,„ :"¯’ Ÿ˜½š°’?">Ðþ‚:þ¤,„@:"A. SET X,Y ·š¡«¦ ¥Ÿ¦–½ š·œ "$Ñþ¤ƒ,„P:"°¡ ·š¡¢·«Ÿ’"<Òþ¤,„p:"B. BLINE X,Y,X,Y ©’¤¸¦ ž¦³©¥ ³’¢¦ ""Óþ¤ƒ,…:"œ«’³¡ š·œ½"9Ôþ¤,…:"C. RESET X,Y «½³¡¢’ (¢³’°¦ š¡«¥)"(Õþ¤ƒ,…:"š·œ °¡ ·š¡¢·«Ÿ’"Öþ‚@: דA$ô""â ÖØ“A$ô"A"â þ:€ ÍÙ“A$ô"B"â ÿ:€ ÜÚ“A$ô"C"â þ:€ Í Û€ Ö Ü Ý“A$ô"Z"â É Þ 6ßþ¤,„:"K–’½ ¢ °¡¤¸’œ¥¯¦Ÿ¦Ÿ˜ ž¦©¡¢¥ "#àþ¤,„ :"¯’ Ÿ˜½š°½ ?"Háþ‚:þ¤,„@:"A. SYMBOL 10,50,";ÿ (");"TEST";ÿ ("),âþ¤,„`:"B. BOX 10,50,30,70,2"+ãþ¤,…:"C. PAINT [2]40,98,3"äþ‚@: å“A$ô""â äæ“A$ô"A"â ÿ:€ êç“A$ô"B"â þ:€ Þè“A$ô"C"â þ:€ Þ é€ ä ê ë“A$ô"Z"â Í ì 7íþ¤,„:"K–’’ ¢ °¡¤¸’œ¥¯¦Ÿ¦Ÿ˜ «½¯¡œ’°¦"#îþ¤,„ :"¯’ Ÿ˜½š°’ ?"Zïþ‚:þ¤,„@:"A. PATTERN 4,";ÿ (");"TEST";ÿ (");" ©’¤¸¦ ·š¡¢’© ")ðþ‚:þ¤ƒ,„P:"8›4 š·œ½"3ñþ¤,„p:"B. CIRCLE 80,90 ©’¤¸¦ ©¥˜"9òþ¤,…:"C. LINE 10,10,10,50 ©’¤¸¦ ž¦³©¥"óþ‚@: ô“A$ô""â óõ“A$ô"A"â þ:€ ìö“A$ô"B"â ÿ:€ ù÷“A$ô"C"â þ:€ ì ø€ ó ù ú“A$ô"Z"â Þ û€  üþ‚@ý˜:þ :þ¤ƒ`,„0:"N’¤ž¡«°¡ ·œž·«’œ !":¾Šz:„Cÿ :þ¤„0,„0:"Sž¡«°¡ ·œž·«’œ !":Iôà‹z:Ž:„  %þ¤„@,ƒ :"K·°’Ÿ L’©Ÿ’ 4"Jþ¤„,„:"C˜Ÿ’–’ ¸’©Ÿ¦ ·ž¡©·«¡– ? Æ";:þ‚:" R":þ‚@Jþ¤„,„@:"C˜Ÿ’–’ L’©Ÿ¦ 5 ? Æ";:þ‚:" L":þ‚@1þ¤„P,…8:þ‚@:"S–¦¤©°¦ ©¸¡«’¤¥!"­A$:“A$ô""â “A$ô"R"⃓A$ô"L"â “A$ô"L"âHBô:: € ; þ¤‚,„:"MATE ZALOZENOU KAZETU S PROGRAMEM ?"/ þ¤ƒ,„ :" ANO / NE Æ (A/N)" ­A$:“A$ô""â  “A$ô"A"â :: € ; þ¤…,„P:"PLAY ";ÿ ():ƒ"CMT:BASIC-UCITEL 5"˜Yôà…8-“Yõ ì Yö…8âVô::ÂVô!“VôâXô:X1ô†“Vôâþ¤X,Y:"*"“Vôâþ¤X1,Y:"*"“Vô†Xôà†:5“Xõ ì Yõ ì Xö† ì Y ö…8†þ¤X,Y:"*" Ž:Ž:„(þ¤„ ,…8:"S–¦¤©°¦ ©¸¡«’¤¥!"­A$:“A$ô""â „Mþ¤„ ,…8:"S–¦¤©°¦ ©¸¡«’¤¥!":þ¤…`,…8:[]"([Z]-ZPET)­A$:“A$ô""â „=›:þ˜[‚,],,,‰@€,ˆ>,‚:„6 ›:þ˜[‚,],,,‰,ˆ>:„!IôàŒ;€:Ž:„'"þ¤„P,…8:" "4#þ˜[‚,],,,‰,ˆ>:„$þ™[],:„%QôQ÷&þ™[‚]ˆo,ˆ>'þ™[‚@]ˆo,ˆ>(“Qö†Hâ $)Qô:„