File

Permainan yang mengingat

• Hingga 1987, mematikan konsol permainan menghapus segalanya. Setiap sesi dimulai dari layar pertama; permainan panjang adalah sore panjang atau tak ada apa-apa.
• The Legend of Zelda dikirim dengan baterai kecil di dalam kartrid yang menjaga ratusan byte tetap aktif. Untuk pertama kalinya game rumah bisa menyimpan, dan melanjutkan dari mana Anda tertinggal.
• Setiap skor tertinggi, setiap dokumen, setiap pengaturan yang pernah Anda simpan ada karena alasan yang sama: RAM melupakan saat daya mati, dan file tidak.
• Pelajaran ini adalah mengapa file ada dan bagaimana pseudocode membaca dan menulis file teks, baris demi baris.

Mengapa file

• Variabel hidup di RAM dan hilang saat program berakhir. File di penyimpanan sekunder mempertahankan data antar jalankan program: keabadian.
• File memungkinkan output satu program menjadi input program lain, sehingga data dapat dibagikan.
• File dapat menampung lebih banyak daripada muatan memori, dan program dapat mulai ulang dari状态 tersimpan.

Variabel hilang di akhir jalankan; file masih ada besok

File teks dan tiga mode

• File teks menyimpan data sebagai baris karakter, yang dibaca dan ditulis program satu baris sekaligus, dari awal. Urutan baris inilah yang memungkinkan loop memprosesnya.
• OPENFILE … FOR READ membaca dari baris pertama. FOR WRITE membuat file baru, atau menimpa yang sudah ada. FOR APPEND menambahkan baris baru di ujung, mempertahankan isinya.
• Buka sebelum digunakan, tutup setelah. File memiliki satu mode pada satu waktu.

Membaca setiap baris

OPENFILE "data.txt" FOR READ
WHILE NOT EOF("data.txt") DO
    READFILE "data.txt", LineString
    OUTPUT LineString
ENDWHILE
CLOSEFILE "data.txt"

• EOF menguji akhir file. Uji sebelum setiap baca: membaca melewati akhir adalah kesalahan.
• CLOSEFILE penting: data terbuffer mungkin hilang dan program lain terkunci keluar dari file yang dibiarkan terbuka.

Menulis baris

OPENFILE "log.txt" FOR WRITE
FOR i ← 1 TO 100
    WRITEFILE "log.txt", "Event " & NUM_TO_STR(i)
NEXT i
CLOSEFILE "log.txt"

• WRITE memulai file kosong. Untuk menambah log yang harus mempertahankan sejarahnya, buka dengan FOR APPEND.
• File teks menampung string: angka dikonversi dengan NUM_TO_STR saat keluar.

Contoh dikerjakan: tiga baris terakhir file

PROCEDURE LastLines(BYVAL FileName : STRING)
    DECLARE LineX, LineY, LineZ : STRING
    LineX ← ""
    LineY ← ""
    LineZ ← ""
    OPENFILE FileName FOR READ
    WHILE NOT EOF(FileName) DO
        LineX ← LineY
        LineY ← LineZ
        READFILE FileName, LineZ
    ENDWHILE
    CLOSEFILE FileName
    OUTPUT LineX
    OUTPUT LineY
    OUTPUT LineZ
ENDPROCEDURE

Medan dalam baris

• Catatan ditulis sebagai satu baris, medannya digabung oleh karakter pemisah, dan setiap angka atau Boolean dikonversi dengan NUM_TO_STR (dan dibaca kembali dengan STR_TO_NUM, atau dengan membandingkan dengan "TRUE").
• Pilih pemisah yang tidak akan pernah muncul dalam data: koma atau | untuk nama dan angka; jangan gunakan spasi jika nama mungkin mengandung spasi.
• Membaca kembali: baca baris, pisahkan pada pemisah, konversikan setiap bidang ke tipenya, simpan dalam rekaman.

Gabungkan dengan pemisah untuk menulis; pisahkan dan konversikan untuk membaca

Contoh terpecahkan: simpan rekaman, muat kembali

OPENFILE "scores.txt" FOR APPEND
WRITEFILE "scores.txt", Player.Name & "," & NUM_TO_STR(Player.Score)
CLOSEFILE "scores.txt"

OPENFILE "scores.txt" FOR READ
READFILE "scores.txt", Line
Pos ← POSITION(Line, ",")
Player.Name ← LEFT(Line, Pos - 1)
Player.Score ← STR_TO_NUM(MID(Line, Pos + 1, LENGTH(Line) - Pos))
CLOSEFILE "scores.txt"

Akses serial dan langsung

• File teks bersifat serial (berurutan): dibaca dari awal secara berurutan, sehingga menemukan satu baris berarti membaca semua baris sebelumnya.
• Akses langsung (acak) melompat langsung ke rekaman pada posisi yang dihitung tanpa membaca yang lain; ini memerlukan rekaman panjang tetap, yang tidak dimiliki file teks.
• Untuk silabus, perulangan file teks di atas adalah modelnya: buka, uji EOF, baca, tutup.

⟦⟧ Nilai yang sering terlewat

Anda telah memahaminya