Files

記憶に残ったゲーム

• 1987年まで、ゲームコンソールをオフにするとすべて消去された。セッションは毎回最初の画面から始まり、長いゲームは長い午後のことか、何もしなかったことだった。
• The Legend of Zelda はカートリッジ内に小型バッテリーを搭載しており、数百バイトのデータを維持していた。初めてホームゲームで save が可能になり、中断した場所から再開できた。
• 高得点、文書、設定など、これまで保存してきたものはすべて同じ理由がある：RAM は電源オフで忘れるが、ファイル は忘れない。
• このLessonがファイルが存在する理由と、擬似コードがテキストファイルを各行为单位で読み書きする方法を示している。

ファイルが必要な理由

• 変数は RAM にあり、プログラム終了とともに消失する。セカンダリーストレージ上の ファイル は、プログラム実行間隔でデータを保持する：persistence。
• ファイルにより、あるプログラムの出力が別のプログラムの入力となり、データを shared できる。
• ファイルは memory に収まらないほど多くのデータを持て、プログラムは保存された状態から restart できる。

実行结束时变量消失；文件明天依然存在

テキストファイルと3つのモード

• テキストファイル は文字のラインとしてデータを保存し、プログラムは先頭から1行単位で読み書きする。このラインの並び順がループで処理を可能にする。
• OPENFILE … FOR READ は先頭ラインから読み込む。FOR WRITE は新しいファイルを作成するか、既存のものを overwrites する。FOR APPEND は end に新しいラインを追加し、既存の内容を維持する。
• 使用前に open、使用后に close。ファイルは一度に1つの mode しか持たない。

全ラインの読み取り

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

• EOF は end of file をテストする。読み出しの before にテストする：end を超えて読み出すとエラーになる。
• CLOSEFILE が重要：buffered データが失われたり、open のまま残されたファイルに他のプログラムがアクセスできなくなったりする。

ラインの書き込み

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

• WRITE はファイルを空から始める。履歴を残すログに追加するには、代わりに FOR APPEND で open する。
• テキストファイルは strings を保持する：出力時は NUM_TO_STR で変換される数字。

演習例：ファイルの最終3ライン

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

ライン内のフィールド

• レコードは one line で書かれ、separator 文字で fields が結合され、各数値や Boolean は NUM_TO_STR で変換され（STR_TO_NUM で読み返す、または "TRUE" と比較する）。
• データに絶対に現れない区切り文字を選ぶ：名前や数値にはコンマや | を使用；名前にスペースが含まれる可能性がある場合、スペースは使わない。
• 読み戻し：行を読み込み、区切り文字で分割し、各フィールドを対応する型に変換してレコードに格納する。

書き出しは区切り文字で結合し、読み戻しは分割して変換する

worked example: レコードを保存して読み戻す

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"

シリアルアクセスとダイレクトアクセス

• テキストファイルはシリアル（順次）アクセスである：先頭から順に読み込まれるため、ある行を見つけるにはその前のすべての行を読む必要がある。
• ダイレクト（ランダム）アクセスは計算された位置に直接ジャンプしてレコードを取得し、他のレコードを読む必要がない。ただし、固定長レコードが必要であり、テキストファイルはこれを持たない。
• シラバスでは、上記のテキストファイルループがモデルとなる：開く、EOF のテストを行う、読む、閉じる。

見落としやすいポイント

理解できましたか