Sayfa 20

PROGRAM ADI : SAYFA TEMİZLEME

00010 9000 00020 END 09000 “09010 FOR Iz1 TO 09020 SYS 58726:FOR is1 TO 25:PRINT NEXT 09030 FOR Js1 TO. 12:$5YS 59626:NEXT :SYS

58692 09040 RETURN

Ekran Yukarı - $0016

BASIC ile çizilmiş bir ekranın yukarı kaydırılması ne kadar zordur? Oldukça karmaşık ve yavaş çalışan bir programla bunu başarabilirsiniz. Fakat sadece “SYS 59626” komutunu kullanmak dururken neden bu yola başvurasınız? Bu adres Commodore 64'ün kernal rutinlerinden birini gösterir ve kullanıldığında ekranı olduğu gibi bir satır yukarı kaydırır.

PROGRAM ADI : EKRAN YUKARI

00020 PRİNT CHRS(147) 00030 ASINIZ 00035 GOSÜUB 100:PRİNT

" ARA CUBUGUNA

"BU EKRANI YUKARI AYDIRMA GÖSTERİMİDİR. "CHRS(19) 00040 POKE 198,1: 00050 SYS 59626 00060 J<>24A THEN 40 00070 GOTO 20 00100 POKE 781,X:POKE 782,Y:POKE 763,0:SY S 65520:RETURN

Klavyeye ilk kez dokunacaklar için...

Ekran Aşağı - $0017

Bu rutin ise bir önceki abur cubur'un işlevinin tersini yapar ve size büyük kolaylıklar sağlar. Programda da görebileceğiniz gibi bunu sağlayan komut “SYS 59749” komutudur.

PROGRAM ADI : EKRAN

00020 PRİNT CHRS(L47) <049> 00030 <023>

00035 PRİNT "EKRANI ASAGI KAYDIRMAK ICİN

ARALIĞA BAS " <060> 00040 POKE 198,0:WAIT 198,1 <012> 00050 PRİNT "<HOME>";:SYS 59748

“00060 X<>24 THEN 40 <231> 00070 GOTO 20 <000>

da

SAR