Bu sayfadaki yazılar
Sayfanın metni
Sayfa 20
52040 POKE OR 32 52050 POKE VİC*22,PEEK(VICt22) OR 16 Seğsa REN » VIC*24,PEEK(VİIC424) AND Ger OR 8 ETURN
THEN RETURN THEN RETURN
THEN 52329 OR THEN RETURN
Klavyeyle gezinmek için ← ve → tuşları.
Sayfa 21
Floppy Listing
Disketinizin üstündeki programı yüklemeden LIST etmek ister misiniz? Veya sequential bir dosyanın içeriğini görmek?..
Cevabınız evet ise, MDE'yi kullanarak verdiğimiz programı yazın ve diskete SAVE edin. Yüklerken, LOAD "FLOPPY LISTING",8,1 komutunu kullanın. Yükleme bitince NEW yapın.
Artık SYS 49152,"XY:dosya-adı" şeklinde bir komut kullanarak, disketin üzerindeki dosyaları inceleyebilirsiniz. Burada X yerine ya P ya da S koyacaksınız. Program veya sequential dosya tipini belirtmek için, Y yerine de, L veya D koyacaksınız. Eğer L koyarsanız, dosya BASIC program gibi LIST edilecektir. D ise DUMP anlamına gelmektedir ve dosyanın içeriği onaltılık sistemde sayılar ve bunların karakter karşılıkları olarak byte byte okunup satırlar halinde ekrana getirilecektir. Bu tipte bir işleme, makine dili monitörü programını kullanan arkadaşlar yabancı değillerdir.
Birkaç örnek görelim:
SYS 49152,"PL:E.T."
Disketteki E.T. isimli BASIC programı yüklemeden LIST eder.
SYS 49152,"PO:FLOPPY LISTING"
FLOPPY LISTING programı, makine dilinde olduğu için LIST edilmez. Onun için, bu komutla içeriğini byte dump etmek mümkün olur. Eğer PD yerine PL kullanırsanız, garip sonuçlar elde edersiniz. Hatta bilgisayar kilitlenebilir.
SYS 49152,"PD:FLOPPY LISTING"
İlk dört harfi TEST olan sequential dosya, byte byte gösterilir.
Ekranda gösterim sırasında listenin geçişini CTRL tuşuna basarak durdurabilirsiniz. RUN/STOP tuşuna basmak, listenin geçişini donduracaktır. Tekrar devamını sağlamak için A harfine basmanız yeterli. Eğer listeyi bitmeden durdurmak isterseniz, DEL tuşuna basın. Listelemenin en sonunda da, boşluk tuşuna basmanız gerekiyor.
Programımız hafızada, $C000-$C2B2 (49152-49842) adresleri arasında yer alıyor. SIMON'S BASIC, EXBASIC gibi programlarla beraber de kullanılabiliyor.
İşinize yarayacağını ümit ederiz...