ＰＩＣ−ＵＳＢＩＯ　ｕｓｉｎｇ　ＢＡＳＩＣ
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
ＵＳＢインターフェースを内蔵したＰＩＣを使ってＷｉｎｄｏｗｓパソコンで外部回路を制御するための各種Ｉ／Ｏ基板の製作記事です。
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜

［第９回］



●ＲＯＰＥＮ、ＲＤＡＴＡ、ＥＯＦ

今回はＲＯＰＥＮ、ＲＤＡＴＡ、ＥＯＦの説明です。
前回、前々回はＣＳＶファイルを作成する命令について説明しましたが今回の命令はその逆の働きをする命令です。
ＣＳＶファイルをオープンしてファイルのデータを変数に読み込みます。
実行例として前回ＷＯＰＥＮ、ＷＤＡＴＡによって作成したｔｅｓｔ４．ｃｓｖファイルを読み込んで表示してみました。



ＲＯＰＥＮ　＃ｎ，ファイル名

ＲＯＰＥＮはＣＳＶファイルをＲＥＡＤファイルとしてオープンします。
ｎは５〜８の間の整数です。
［第７回］の＃ｎの説明が間違っていました。
ＷＯＰＥＮ命令の＃ｎは＃１〜＃４です。
現在は訂正済みです。

ＲＤＡＴＡ　＃ｎ，変数名

＃ｎは＃５〜＃８です。
ＲＯＰＥＮでオープンしたファイルからデータを変数に読み込みます。
ＷｉｎｄｏｗｓアプリケーションのＴｅｒａＰａｄやＥＸＣＥＬなどではデータ区切りの　，（カンマ）が命令の終わりにある場合と無い場合とで扱いが異なりますがＲＤＡＴＡ文は　，　も改行コードも値と値との間のセパレータとしてしか認識しません。
両者の違いは読み込んだ後の命令（ＰＲＩＮＴ文など）には引き継がれませんから上の例のようにＰＲＩＮＴ文の規則の通りに表示されます。
ＲＤＡＴＡ文は上記例のようにＧＯＴＯ文を使って繰り返して値を読み込むプログラムになります。
ＷＤＡＴＡ文では複数の値を記述することができましたがＲＤＡＴＡ文では１個の変数しか記述できません。
最後の値を読んだあとファイルの終わりを知るためにＥＯＦ（）の値を確認します。

ＥＯＦ（ｎ）

ｎは５〜８の整数です。
ＲＯＰＥＮでオープンしたファイルのデータを読み込んだあとファイルエンドになったらＥＯＦ（ｎ）の値が１になります。
まだデータが残っている間はＥＯＦ（ｎ）の値は０です。

ＰＩＣ−ＵＳＢＩＯ　ｕｓｉｎｇ　ＢＡＳＩＣ［第９回］
２０２２．６．１１ｕｐｌｏａｄ

前へ
次へ
ホームページトップへ戻る