ＰＩＣＢＡＳＩＣコンパイラ
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
まるでインタプリタ。でもコンパイラです。超カンタン超シンプルです。
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜

［第４３回］



●ＰＲＩＮＴ文で表示できる文字

ＰＩＣＢＡＳＩＣコンパイラのＰＲＩＮＴ文では文字を”　”で囲うことでコマンドプロンプト画面またはＬＣＤ表示器にその文字（列）を表示することができますが表示できる文字には制約があります。
”　”の中に書くことのできる文字は半角の英大文字、小文字、数字、記号に限られます。
カナおよびカナ関連の記号は書くことができません。
半角カナはコマンドプロンプトのシステムとしては使うことが可能なのですがＰＩＣＢＡＳＩＣコンパイラの入力システムでは都合によって半角カナは（勿論全角文字も）入力することはできません。
入力することはできないのですが半角カナを表示させる方法はあります。
ＰＩＣＢＡＳＩＣコンパイラのＰＲＩＮＴ文を最初に紹介した［第３８回］で使ったＣＨＲ＄（）関数を使う方法です。
ＣＨＲ＄（）関数の中に文字コードを書くことでその文字コードに対応する文字を表示することができます。
英数文字及び一部の記号の文字コードは２０〜７Ｆ（１６進数表記）に割り当てられています。
これは一般にＡＳＣＩＩコードと言われています。
００〜１Ｆは制御用のコードなので表示に使うことはできません。

文字コード２０〜７Ｆに対応する文字を表示するプログラムです。

最初の
５　Ｒ２Ｆ＝０
はＬＣＤ表示モードを解除するための命令です。
Ｒ２Ｆは前回説明しました。
ＰＩＣターゲットボードをＷｉｎｄｏｗｓパソコンに接続した状態で（通常はその状態ではＰＲＩＮＴ文の表示はコマンドプロンプト画面に対して行なわれますが）強制的にターゲットボードに接続したＬＣＤ表示器に対して表示を行なうためにＲ２Ｆ＝１を使います。
これはいわばルール違反の裏技的な使い方なので一度Ｒ２Ｆ＝１を実行するとそれ以後は電源を切るまでＰＲＩＮＴ文の表示はＬＣＤ表示器に対して行なわれます。
Ｒ２Ｆ＝０はそれを解除してＰＲＩＮＴ文の表示を通常の通りコマンドプロンプト画面に対して行なうようにします。
／ＲＵＮでプログラムを実行した結果２０〜７Ｆに対応する文字がコマンドプロンプト画面に表示されました。
ここで表示されている文字のほとんどは”　”の中に記述することで画面に表示することができます。
ただし　”（コードは１６進数の２２）は”　”の中には書けませんからこのプログラムのようにＣＨＲ＄（）を使うことになります。

半角カナ文字を表示するプログラムです。

半角カナおよび記号の文字コードは１６進数のＡ０〜ＤＦです。
８０〜９Ｆ、Ｅ０〜ＦＦは半角文字のコードには割り当てられていませんから使うことができません。
／ＲＵＮを実行した結果Ａ０〜ＤＦに対応する半角文字がコマンドプロンプト画面に表示されました。

同じプログラムでＬＣＤ表示器に表示することもできます。

ただしＰＩＣターゲットボードをＷｉｎｄｏｗｓパソコンに接続した状態でそのボードに接続したＬＣＤ表示器に文字を表示させるためにはプログラムの先頭でＲ２Ｆ＝１を実行する必要があります（正確には先頭でなくてもよいのですが最初のＰＲＩＮＴ文よりも前で少なくとも１回は必要です）。

上のプログラムを実行したときのＬＣＤ表示器の写真です。

ＬＣＤ表示器は２０字×４行（８０字）ですがそこに表示させた文字は１６進数の２０〜７Ｆに対応する９６文字なので終わりの１６文字が先頭に戻って表示された結果最初の１６文字が上書きされてしまっています。
ＬＣＤ表示器のもともとの機能のままでは８１文字目は表示されませんがそれでは都合が悪いのでＰＩＣに組み込んだシステムサブルーチンによって８０字を越える桁位置への表示は先頭の桁に戻って表示するようにしてあります。

上のほうで説明しましたようにコマンドプロンプト画面に対する文字表示では文字コードのＥ０〜ＦＦは指定できませんがＬＣＤ表示器ではＥ０〜ＦＦにも文字が割り当てられていて表示させることが可能です。
ＬＣＤ表示器に対する文字表示プログラムです。

表示文字コードとしてＡ０〜ＦＦをＣＨＲ＄（）に指定することで対応する文字をＬＣＤに表示させます。
ＰＩＣＢＡＳＩＣコンパイラのＦＯＲ　ＮＥＸＴ文では注意する点があります。
ＰＩＣＢＡＳＩＣコンパイラは今のところ扱える数の範囲は８ビット（００〜ＦＦ）なのでＦＯＲ文の終わりの値にＦＦを指定するとＮＥＸＴ文の働きとしてＴＯで指定した数値を「越えた」ときにＦＯＲ　ＮＥＸＴ文のループから抜けますが、ＦＦを越えると００になってしまうためそこで無限ループになってしまいます。
それを避けるために上のプログラムではＴＯの値は１つ少ないＦＥにした上でＮＥＸＴを抜けたところで（このときａの値はＦＦになっています）ＰＲＩＮＴ　ＣＨＲ＄（ａ）を実行しています。

上のプログラムを実行したときのＬＣＤ表示器の写真です。

ＬＣＤ表示器に表示させた文字は１６進数のＡ０〜ＦＦに対応する９６文字なので先ほどと同じように終わりの１６文字が先頭に戻って先頭の１６文字を上書きするはずなのですがそのようにはなっていません。
実は先ほどの英数文字をＬＣＤ表示器に表示させたすぐあとで今回のプログラムを実行したために先頭からではなくて上で表示を終った次の１７桁目から表示が行なわれました。
そのため８０桁では表示されなかった終わりの文字は１６字ではなくて３２文字になりました。
この写真では最後の３２文字が先頭に戻って表示されています。

ＰＩＣＢＡＳＩＣコンパイラ［第４３回］
２０２３．６．３０ｕｐｌｏａｄ

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