Sayfa 12

REM TABLANITN ©0075 47005 REH ALT PROGRAMİ çaray 47008 REM (865) 090106 470818 FOR TO 1388 STEP Nel THEN TO BİPOKE S, GET THEN G cası> 40080 REM TEMİZLEME ALT PROGRAMI IF Vee*T* THEN 48618 REM TF THEN GÖSÜR <tös) 48836 FOR YO TEPOKE 00108 POKE THEN 18 çasa> a arr 40198 638 IF Csasa ÖR OR C-246 OR cana OR OR THEN casa; 48500 RETURN — ©0120 1F OR OR OR REM HESAPLAMA ALT PROGRAMI çase> OR OR THEN 48082 REM 60136 IF C-248 OR OR OR 48083 GET THEN 49800 > C«228 OR THEN 49005 IF OR ISA THEN IF Cr2d6 OR OR OR 48008. OR OR THEN cadı) 43007 ISE THEN ©8148 POKE S.R THEN — 88186 IF THEN asala Hed TO 60168 IF C-298 OR Ce23a OR OR — OR OR C-237 OR C-233 OR POKE II YAN Aİ PEEK CANSU 5S OR C-224 THEN 228 > SoTO (08 <taa> PÖKE IF İsi THEN POKE 8,2 W> ©8238 1F 1x2 THEN POKE 49100 NEKT ©0240 108 50000 REM BASILAN KARAKTER KONTROLU 10000 REM PROGRAM TANITIMI 50003 REM <e36> 10016 REN — IF THEN 18826 PRİNT İF DOE THEN İF THEN PORTUMU KULLANAC IF THEN AKSINIZ IF TREN tes 18840 PRİNT CRVSONDHESAPLAMACRYSO 50630 İF THEN İF THEN FF) VE KOMUT POKE sAN LART 18056 PRINT "YAPACAKLARI HARFİ GİRMENİZİ REM TABLANIN BEKLER REM <183> 18068 PRİNT TABCBO)*DATA ADRESİ 88168 POKE NI çaaı> 10878 PRİNT “GİRİNİZ CASPACE > REM KOMUTLARIN EKRAN YAZILMASI <isa> KAER REM ------ çere> 18875 POKE 56334 ,PEEK AND. HİTİF OR T PEEKCİ) AND TO LENCE HEN 18875 cananı 188 RETLİRN TO 2006086 REM VERİLEN KOOR. PRİNT 280186 REM — ese T 28028 POKE E2018 POKE OR ETURN (26334) OR 40086 REM KARAKTER CAGIRMA ALT PROGRAMİ 63000 REM TANIMLANMAKTA OLAN KARAKTERİN 48005 REM —-------> 63081 REM EKRANDA GOSTERİMİ 48008 REM ---- çıza> 48818 GET THEN | 63003 48020 IF OR THEN 63009 AND TEZ AND <tab> 40030 FOR TÜ 3 IF THEN POKE OR 218 ANEL OR BN CSS) TERETÜRN 40035 FOR YÜS7 TN 8 STEP -I ©3008 AND THEN PÖKE 40658 REM SİLME 48848 83815 REM —- <815> 40038 NEXT 5 ©2028 FOR TO 11866 STEP sese TO 48060 GÖSUB