64'ler sayı 42, sayfa 65
Sayfanın metni

Sayfa 65

OPEN komutunu izleyen parametre ise açılacak dosyanın adıdır. Bundan sonra dosyayı ne amaçla açacağımızı belirtmeliyiz. INPUT dosyadan veri okuyacağımızı, OUTPUT da dosyaya veri yazacağımızı belirler. En son olarak da dosyanın numarasını vererek dosyayı açarız. OPEN "RealmSucks" FOR OUTPUT AS#1 RealmSucks adlı dosyayı 1 numara ile yazım için hazırlar. OPEN "Rednex" FOR INPUT AS#2 Rednex adlı dosyayı 2 numara ile okuma için hazırlar. INPUT ile açacağınız dosya tabii ki diskette yer almalıdır.

Dosyaya veri yazma Dosyaya veri yazmak için WRITE# ya da PRINT# komutlarını kullanmalıyız. Bu komutların kullanımı hemen hemen aynıdır. Ancak WRITE komutu değişken listesini peşpeşe yazar.

Açılmış bir dosyaya veri yazmak için o dosyanın numarasını ve yazılacak değişkenlerin listesini vermelisiniz. Örnek :

PRINT #1, A$, B$, A, B Dosyadan veri okuma Dosyadan veri okumak için ise INPUT# komutu kullanılır. Kullanımı WRITE# ya da PRINT# ile aynıdır. Örnek: INPUT #1, A, B

Dosyayı kapama Herhangi bir dosyanın numarasını vererek kapatabilirsiniz. Kapanmayan dosyalar bilgisayarınızı kapattığınızda bozuk olarak kalırlar. Kapama işlemi CLOSE komutu ile yapılır. Örnek : CLOSE #1

Aşağıdaki program diskette bir dosya yaratır ve veri yazar. Sonra da verileri tekrar okur.

REM ••• 64'ler •••

OPEN "64'1er" FOR OUTPUT AS 1 A$ = "Bahadır" : B$ = "is an": C$ = "ldıot"

PRINT #1 , A$, B$, C$ CLOSE 1 OPEN "64'1er" FOR INPUT AS 1 INPUT #1 , A$, B$, C$ PRINT A$, B$, C$ CLOSE 1

END ilk satırda dosyamızı açıyoruz. Tabii disketinizin writeprotect'ini açık tutmanız gerekiyor. Sonra bazı değişkenlere değerler atıyoruz ve bunları dosyaya yazıp dosyamızı kapatıyoruz.

Şimdi de dosyamızı okumak için önce dosyayı açıyor ve INPUT# komutu ile değişkenleri okuyoruz. Değişkenleri ekrana bastıktan sonra dosyayı kapatarak programı sona erdiriyoruz. Bu ayki yazımız da burada bitti. Gelecek ay görüşmek üzere hoşçakalın.

SAHADIR AKCAN

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