Commodore sayı 28, sayfa 17

Bu sayfadaki yazılar

Sayfanın metni

Sayfa 17

Otomatik olarak yeni versiyon: Uzun bir program yazıyorsanız, yazma sırasında bunu birçok kez kaydetmeniz gerekecektir. Yeni versiyonunun otomatik olarak kaydedilmesi için kısa bir program kullanın: 60000 PNS$=“ISIM”:OPEN 15,8,15:PRINT 15,“S0:”.PNS$+“.BAK”:PRINT 15,“R0:”.PNS$+“.BAK=”.PNS$:CLOSE 15:SAVE PNS$,8. Bu kayıt rutini GOTO 60000 komutuyla otomatik olarak işletilir. Bu durumun yanlışlıkla gerçekleşmesini engellemek için, 59999 sayılı program satırında END komutunun bulundurulması gerekir.

Yükleme adresi: Aşağıdaki program satırlarıyla, diskette bulunan bir programın yükleme adresi bulunabilir: 10 OPEN 8 20 A—ASC(AS 4 CHRS(0)):B — ASC(BS 4 CHRS(0)) 30 PRİNT “BAŞLANGIÇ

Birden çok programı silmek: Birden fazla programı tek bir defada silebilmek için, şöyle bir komut kullanabilirsiniz: PRINT 15,”S0:PROGRAM1,PROGRAM2,PROGRAM3,PROGRAM4”

Verileri eklemek: Verileri, daha önce çalışma belleğine yüklemeden, sıralı (sequential) bir dosyaya eklemek mümkündür. Bunun için gereken, OPEN komutuna “A” eklemektir.

Silmekten korumak: Program adının kaydedilmesi sırasında SHIFT ve aralık çubuğuna basarak, programın ya da dosyanın yanlışlıkla silinmesini engelleyebilirsiniz. Bundaki numara, fihristin dökümü sırasında bu tuşlara basılmış olduğunun fark edilememesidir.

Kısaltılmış fihrist: LOAD"$:",8 komutunun ardına LIST komutunu da eklerseniz, disket adını, ID numarasını ve boş blokların sayısını içeren bir kısa fihrist elde edersiniz.

Özel fihrist: Yalnızca program dosyalarının isim dökümünü almak istiyorsanız, LOAD”$0:*=P”,8 yazın. Sıralı dosyaların isim dökümü için komut satırındaki P'nin yerine S, relatif dosyaların isim dökümü için ise R koyun.

Saklanmış fihrist: Basit bir numara ile, disketteki fihristin dökümünü engelleyebilirsiniz. Bunu sağlamak için disketin en son bölümüne özel bir program kaydedilmesi gerekir. İzlenecek yöntem şu: Tek satırlık bir programı belleğe yazın. Ardından SAVE” komutunu verin ve SHIFT ve RETURN tuşlarına birlikte basın. Kursoru, soru işaretinin hemen ardına getirin. Son olarak sırayla CTRL-RVS ON, SHIFT-M, SHIFT-F, CTRL-RVS OFF, “Elini çek!”,8 tuşlarına basın.

RETURN tuşuna bastıktan sonra programın kaydedilmesini bekleyin. Bu andan itibaren kimse disketin fihristini elde edemez. Fihrist: Bellekteki programa hiç zarar vermeden disket fihristini okumanın bir yolu var. Bunun gerekli adımları şunlar: İlk olarak ekranı tamamen silin ve kursoru alttan 15. satıra getirin. Ardından LOAD”$”,8 yazın. RETURN'a bastıktan sonra aynı anda SHIFT ve COMMODORE tuşlarına basın. Ekranda, dosya adlarını, disketin adını ve ID numarasını içeren bir fihrist göreceksiniz.

Disketi hızlandırma: Disket sürücüyle yapılan veri aktarımını aşağıdaki komut dizisiyle hızlandırabilirsiniz: POKE 53265, PEEK (53265) AND 249:OPEN 15,8.15.- 15 Normal duruma dönmek için kullanacağınız satır ise şöyle: POKE 53265, PEEK (53265) OR 16: OPEN 4” CLOSE 15

PRINT sorunu: PRINT komutunu kısaltmak için ? kullanılamaz. Çünkü bir SYNTAX ERROR'a neden olur. PRINT'in doğru kısaltması P tuşu veya SHIFT-R tuşlarıdır.

Düzgün printer dökümü: Sürekli form kâğıdını printerden koparırken çoğu zaman düzgün olmayan kopmalar meydana gelir. Bunu engellemenin en güzel yolu, alüminyum folyo kutularındaki dişli kenarın koparılarak printerde uygun bir yere takılmasıdır.

Yeni renkli şerit: 1525 yazıcıda ardarda fazla sayıda grafik karakter renkli şerit giderek soluklaşır. Aşağıdaki programın yardımıyla şeridin doldurulan mürekkebin içinden geçmesi ve eski rengini yeniden kazanması sağlanır: 1 OPEN 4,4:2 PRINT#4,”(38 aralık)”;:PRINT#4,”(38 aralık)”+CHR$(8):GOTO 2.

Boş satırlar: Bir programın dökümünde açıklayıcı notları daha rahat yerleştirebilmek için, her program satırından sonra bir boş satırın konması yerinde olur. Bunu sağlamanın en iyi yolu 127'den daha büyük bir dosya numarası kullanmaktadır. Örneğin, OPEN 128,4:CMD 128:LIST yazarsanız, programın dökümü iki aralıklı olarak çıkacaktır.

Ekranın basılması: Basit bir programın yardımıyla ekranın tüm içeriğinin printer çıkışını alabilirsiniz. (satır numarası kullanmadan) OPEN 3,3:OPEN 4,4:PRINT#4,CHR$(147):FOR I=1 TO 4000:GET#3,A$:PRINT#4,A$;:NEXT:CLOSE 3:CLOSE 4

Değişken adları: BASIC'te belirli sayıda belirlenmiş kelimeyle, örneğin TO anlamı içeren değişken adlarını kullanmak mümkün değildir. Bunun tek yolu, program yazarken, tek tek T ve O harfleri arasında SHIFT-J tuşlarına basmaktır.

Klavyeyle gezinmek için ← ve → tuşları.