Sayfa 15

Renkli Yaşam Tuna ERTEMALP

PROGRAM RENKLİ YASAM C13D

: BC 8D BE 8ü Ce CO 1: AS FD 18 69 38 85 FD A9 Fü : 80 C5 CO A5 FE 8D BD CO B3 : 01 565 FE 85 FE C6 61 FO Le : 8D Cö Ca 8D Cc3 8D CE 6D : 03 81 Sa da FF FD DC PROGRAM ADI YASAM DEMO 1 PROGRAM ANT e ROKE SE 1 â ipa 5 İF (RİSR2) ÖR (Rİ-R3) ÖR TH , asısa, (205) 80023 POKE Keke 20023 POKE 482 (225) FOR TÜ SiREAD | FOR 1-1 TO 80030 FOR TÖ 158:POKE 00030 POKE 1-1 Tü 15 KE LET RND ENEKT GERE SYS 491 6; E S0 90058 GET THEN Sa maas İF 6 POKE Vr İZ AND Be gil Be 3:PÜKE AND 239 <198) AND 233 toza; AND Bal ÖR 4 — AND 241 ÜR 4 08088 PRİNT "CCLR> DATA (837) READY. - *EG İBYTE-$FD ; ILK BYTE, GRAFIK EN SOLUNDAKI BYTE 1918 - «EO K-$61 3; EKRAN SATIRI SAYAC 1822 - J-$652 GRAFIK SATIRI SAYACI 1030 - *EĞ 1-$63 3 EKRAN KOLONU SAYAC 1848 - # HÜCRELERİN O ANKİ BURUMUNU GÖSTEREN VEKTÖR 1250 - ; Bı NIN KOPYASININ YERİNİ GÖSTEREN VEKTÖR 1978 - *EO SAYAC-$66 3 BİR BYTE İCİNDEKİ HÜCRELERİN SAYACI 1098 - «BA 3 PROGRAM $COOA'DAN (49152) BASLIYOR 1108 - LDA 3 GRAFIK EKRANI BASLAR 1118 - STA 3 PROGRAM KENDİ İCİNDE DEĞİSİKLİK YAPIP 1120 - LDA #520 * ASAGIDAKI SFFFF'I $20002 YAPIYOR. 1138 - STA EKRtİ 1140 -EKR STA $FFFF # GRAFIK EKRANI $28 İLE DOLDURULUP TEMİZLENİYOR 1150 - INC EKR*İ 1168 - BNE EKR 1172 - INC EKR*2 1182 - LOX EKR42 1190 - CPX - BNE EKR