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

［第３３回］



●／ＣＯＮＶを自動化

前回までのところでＰＩＣ−ＵＳＢＩＯ用ＢＡＳＩＣの当面の説明は概ね終ったように思います。
一部の命令や機能についてはまだ説明していないものも残っていますが、それについては今後ハードウェアについて説明をしていくなかで必要に応じて説明していくつもりです。
今回はソフトウェアについての説明の一応の区切りとして／ＣＯＮＶを自動化するためのプログラムの変更作業を行ないました。
ＰＩＣ−ＵＳＢＩＯ用ＢＡＳＩＣは実行前にソースプログラム（ＴＥＸＴプログラム）を中間言語型のプログラム（ＯＢＪＥＣＴプログラム）に翻訳します。
／ＣＯＮＶはその作業を行なうための「仮コマンド」です。
ＢＡＳＩＣシステムプログラムを作成していく過程でのデバッグを容易にするためにとりあえずコマンドとして任意の時点で実行できるように考えたものです。
しかしＢＡＳＩＣプログラム（ユーザープログラム）を実行する際に毎回ＲＵＮコマンドに先立って／ＣＯＮＶを実行するなどはわずらわしい限りです。
もちろんそれはわかっていますから「当分の間」というつもりで「仮コマンド」にしていました。
前回までのところでソフトウェアについては一応の区切りがついたと判断しましたのでこの辺で／ＣＯＮＶをシステムプログラムの中で必要なときに呼び出してサブプログラムとして自動で実行できるようにしておこうと考えました。

以下はそのようにシステムプログラムを変更したあとでの動作テストの記録です。
そのようにシステムプログラムを変更したことで今までとどこがどのように変わったのかということが比較し易いように前回と同じテストを新しく変更したシステムプログラムで実行して確かめてみました。
下のプログラムは［第２５回］でテストに使ったサンプルプログラムです。

／ＣＯＮＶを実行するタイミングですが一番わかりやすいのはＲＵＮコマンドを実行する直前です。
そのように考えたのですが長いプログラムになると多分コンバートするにも時間がかかることが予想されます。
ＲＵＮコマンドを入力したのに実際にそれが実行されるまでに時間がかかるというのはあまり気持ちのいいものではありません。
もちろん必要な場合にはそうなっても（ＲＵＮ入力後に実際にプログラムが実行されるまで多少の時間待たされても）仕方がないと思いますが、それをできるだけ避けるためまずは／ＬＯＡＤでユーザープログラムをロードしたときはロードした直後にコンバートを実行するようにしました。
当面のデバッグ用にコンバートが実行されるときには画面に＊ＣＯＮＶＥＲＴ＊と表示するようにしました（最終的にはこの表示は無くすつもりです）。
上の画面ではユーザプログラム（ＴＥＳＴ９０．ＴＸＴ）をロードした直後に＊ＣＯＮＶＥＲＴ＊と表示されています。
そのあとＬＩＳＴコマンドに続いてＲＵＮコマンドを実行していますが、ここでは＊ＣＯＮＶＥＲＴ＊は表示されていないで、普通にＲＵＮコマンドが実行されています。

続いて前回行なったのと同じ作業（ラベル→行番号への変更作業）を行いました。

何回も書いていますがこういうときにスクリーンエディタが使えると実に便利です。
上の画面は先ほどの／ＬＯＡＤ〜ＬＩＳＴ、ＲＵＮまでを実行したあとの画面です。
先ほどの画面ではカーソルはプログラムが終ったあとですから画面の一番下にありました。
そこから画面上部のＬＩＳＴ表示のところまでカーソルを移動してプログラムの一部書き換えを行なっています。
もとのプログラムでは最初の１０行にＯＮ　ＥＲＲＯＲ　ＧＯＴＯ　＊ｅｒｒ　があります。
そして６０行に　＊ｅｒｒラベル　があります。
ＲＥＳＵＭＥ文に対しては７０行の　ｒｅｓｕｍｅ　＊ｌ３０　があります。
ＲＥＳＵＭＥ文で指定する戻り先は３０行です。
そこに＊ｌ３０ラベルがあります。
その４行（１０、３０、６０、７０）を上の画面のように書き換えました。
行を書き換えるときは書き換え後に［Ｅｎｔｅｒ］を入力すると変更が確定します。
［Ｅｎｔｅｒ］を入力するとカーソルが次の行に移動してそこにプロンプトマーク（＞）が表示されますからどこで［Ｅｎｔｅｒ］が入力されたかがわかります。
最後に７０行を書き換えましたのでカーソルがちょうど先ほど行なったテストのＲＵＮコマンド入力のところに来ています。
このままここで［Ｅｎｔｅｒ］を入力してもよいのですが、それでは実行後の表示が先に行なったときの表示と重なってしまうのでテストとしては面白くありません。

そこでカーソルを画面の最下行に移動してから念のためＬＩＳＴコマンドを実行し、それからＲＵＮコマンドを実行しました。

プログラムを一部変更しましたから実行前に再度コンバートが必要です。
ＲＵＮコマンドの入力時にコンバートが実行されたことが＊ＣＯＮＶＥＲＴ＊の表示で確認できます。

前回はダイレクトモードでのテストも行なっています。
今回も前回と同じことをやってみました。

エラー処理後にブレークするように７０行のＲＥＳＵＭＥ文を削除しました。
そのあとＲＵＮコマンドを実行しました。
行の削除を行なったのでＲＵＮコマンドの実行時にまたコンバートが行なわれています。
＞ＲＵＮ
の下に＊ＣＯＮＶＥＲＴ＊が表示されていることでそれがわかります。
実行後はエラーが発生して６０行のＥＲＣ、ＥＲＬの表示でブレークしました。

そのあとダイレクトモードでＲＥＳＵＭＥ文を実行しました。

＞ｂ＝１０：ｒｅｓｕｍｅ　３０
がダイレクトモードでキーボードから入力した文です（最後に［Ｅｎｔｅｒ］を入力しました）。
ｂ＝１０　と　ｒｅｓｕｍｅ　３０　が直ちに実行され、３０行〜５０行が実行されて、そこでブレークしました。

前回と同様に最後にＲＥＮで行番号が正しく変更されるかどうかを確認してみました。
今までと同じようにプログラムの先頭に
５’
を追加したあと、ＲＥＮコマンドを実行してからＬＩＳＴコマンドを実行しました。

もとのプログラムでは
１０　ｏｎ　ｅｒｒｏｒ　ｇｏｔｏ　６０
だったところがＲＥＮ実行後は
２０　ｏｎ　ｅｒｒｏｒ　ｇｏｔｏ　７０
に変更されました。
また
７０　ｂ＝ｂ＋２：ｒｅｓｕｍｅ　３０
だったところが
８０　ｂ＝ｂ＋２：ｒｅｓｕｍｅ　４０
に変更されました。
ここまで前回と同じです。

そのあとＲＵＮコマンドを実行しました。

プログラム行の追加とＲＥＮコマンドの実行が行なわれたため、ＲＵＮコマンドの実行時に再度コンバートが行なわれました。
＞ＲＵＮの下の行に＊ＣＯＮＶＥＲＴ＊と表示されていることでそれがわかります。

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

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