SOURCE CODE LİSTİNGİE 54 CMP #Fa5 55 BEG YUKARI ı * 56 :;<F23> IİSE KURSOR SAGA a ORG #CANA îğ ğgî îğîe İ b SAĞ n eai Hzm ea 59 :<F5> IİSE KURSÜR SOLA 4 GETİN EğU #FFE4 Z he ha 5 .PLOT EdL #FFFA ı SeD Bo & SHAPE EğU #2& 5 G > MSAVE EOU &27 B :<F7> OLDUĞGUNDA ASAGI &3 CMP #$88 & YSAVE Ecli &28 e L Se ee 9 ELNSU Eciü scc 65 #EĞGER CHAR YAZMAZSA E6 # (SAA-HOF ) 67 #ÖYLEYSE BÜSVER 10 RPTFLG EĞÜ #A28SA L ; 18 &a CMP #SHAA 3 :EK : î4 EKRANI HAREKETE GECİR — c (A SR 15 KONUG LDA #4393 ;î ğğğ îîîîHH 16 JSR CHROUT #EKRANI SİL ' 17 LDA #A 7& :CHAR KALIBINI YENİLE a 18 STA BUNSU #KURSOR YANIP SONER ;ğ AMP ” ÜVESHP 18 LOAR #EBa a za STA RPTFLG :TEKRAR IMKANI VER ; AREKETİ 21 LOK #F1E #KORSORU BASLAT ;î £ KORSOR H E BB LOY #F18 ” 5 LAR hi7 78 YUKARI DEK z 7a CPKR #SFF 24 UPSHP STA SHAPE e5 ; ga ENE YÜKİ 26 B1 LOX #S24 ; : a Ş L 27 :CHAR SHAPE'İNİ BAS — L S O LERİR EB İ' - Eble g4 ASAGI — TNK . a5 CP) 5 20 OUTSHP STX KSAVE # K.Y'I TUT l BZ; 2îaaıı 21 STY YSAVE SE R 53z e 87 LOK #gfN — Ba JSR PLOT ; KURSOR KONUMUNU kurR — ÇS ASAGIL JMP BUTSHP 24 LDA SHAPE îa ; 25 JSR CHROUT ;SHAPE YAZ ;Ü SAĞ ğîğ n 26 LOA #San :? ARKA MEKAN S1 : 37 JSR CHROUT ae EBNE SAĞI -8 iş 93 LOY #a 39 :ANAHTAR GİRDİSİ'Nİ BEKLE 94 SaĞI — JMP GÜTSHP 49 ; a5 * B 96 SsoL DEY 42 ICANAH JSR GETİN 27 SEAE Gi 43 LODK KSAVE #K.Y'YI YENİDEN KUR e îgî îgğl 44 LOY YSAYE V3 9 ös ENB Va 1ğf SOL1İ — JMP CUTSKP n 181 ; 46 BEC ICANAK :HIİC IC ANAHTAR YOK ;BAS 47 :STOP OLURSA CİK :ğğ SENSACE C İR 48 CMP #3 ğ ğ REa orü 194 CIK LOA #Sa3 S A 1as JISR CAROUT SA : <SPAC 5 5 - ;î Kai Eğwgbîîğğ SÖREETRA 106 #EKRANI SİIL D : 1a7 RTS 5e BEĞ UÜPSHP İne-iEtERİ 53 ;<F1> İSE KUÜRSOR YUKARI " S END ÖF LİST —— CÖOrmmmodoöre aa