ＣＲＴ/VGAIF+KEYIF+SDCARDIFボードの製作
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
ＷｉｎｄｏｗｓパソコンにＵＳＢ接続して使う現行方式はそれなりに便利ではありますが、ときとしてＷｉｎｄｏｗｓ
のしがらみから開放されて、小さいながらも独立した一個のパソコンとして機能したいと思うこともあります。
昔はそれが普通のことだったのですが、安価なＣＲＴディスプレイが生産中止となって久しい今日ではそれ
は叶わぬことと諦めていたのですが…。
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
［総合第１２３回］
●LOCATE、ＰＯＳ、ＣＳＲＬＩＮ、ＴＡＢ
今回は画面制御のＢＡＳＩＣ命令、関数を一挙に追加です。
新マイコン独立化セットをご注文いただいたお客様から、「こういう命令はありませんか（なければ作ってもらえるとうれしいのですけれど）」というお問い合わせをいただきました。
今まではずっとＵＳＢ接続型でやってきたものですから、画面制御についてはあまり意識していませんでした。
問い合わせをいただいて初めて気が付きました。
そういえばなんたって独立セットですから、やる気になれば自由に画面表示の制御もできるのでした。
ということで急遽ＢＡＳＩＣに表記の命令、関数を追加しました。
大体は昔のパソコンのＢＡＳＩＣに近い使い方になっていると思います。
以下、簡単に説明します。
ＬＯＣＡＴＥ Ｘ，Ｙ
カーソルの位置を指定します。
画面左上隅がＸ＝０，Ｙ＝０で右下隅がＸ＝７９、Ｙ＝２４です。
Ｘは０〜７９、Ｙは０〜２４の整数のほか整数型の変数、計算式も書くことができます。
ＰＯＳ
カーソルがある水平方向の桁位置が入ります。
整数型の関数です。
値は０〜７９の間の整数値です。
左端が０、右端が７９です。
ＣＳＲＬＩＮ
カーソルがある行位置が入ります。
整数型の関数です。
値は０〜２４の間の整数値です。
一番上の行が０、最下行が２４です。
ＴＡＢ（Ｎ）
ＰＲＩＮＴ文の中だけで使える特殊関数です。
そのＰＲＩＮＴ文で画面に文字を出力するときに行の左端を０桁としてカーソルをＮ桁に移動します。
Ｎは０〜２５５の範囲の整数で、その範囲の値をもつ整数型の変数や式も使えます。
ＰＲＩＮＴ文の実行途中にＴＡＢ（Ｎ）があって、そのときまでにすでに表示された文字によってカーソルの位置がＮよりも右になっていたときには、ＴＡＢ（Ｎ）によってカーソルが戻ることはありません。
Ｎの値がそのときのカーソル位置よりも左にある（値が小さい）ときは、カーソルが１行下のＮ桁に移動します。
またＮが７９よりも大きいときは下の行が８０〜１５９、さらに下の行が１６０〜２３９、そのさらに下の行が２４０〜２５５と数えた位置にカーソルが移動します。
実行例です。
仕事に使っていたＷｉｎｄｏｗｓ７のＬＣＤモニタディスプレイが突然昇天してしまいました（中古のＤＥＬＬでしたから寿命だったかも）。
今まで撮影に使っていたＤＥＬＬのディスプレイが２０インチで使い易そうだったのでそれを代わりにＷｉｎｄｏｗｓ７にあてがいました。
で。
撮影用のモニタディスプレイがなくなってしまったので、インターネットで安い中古を捜して購入したのですけれど。
普通に使っている分にはそれほど気にならないのですが、こうやって写真に撮ってみますと、画面の上のほうがなんだかちょっと暗いです。
まあ、超安値の中古だから文句は言えません。
こういう用途には横長のディスプレイではかえって使いにくいだけですから昔ながらの角型がよいのですけれど、中古でも店頭ではさっぱり見かけなくなってしまいました。
なかなかに困った世の中です。
余談でした。
ＬＯＣＡＴＥ文で１３行１０桁にカーソルを移動しました。
そのあとＰＲＩＮＴ文でａｂｃを出力しました。
ちょっと画像では確認がしにくいのですけれど”ａ”が１３行１０桁に表示されています。
そのあとＴＡＢ（２０）が実行されたのでカーソルが２０桁に移動して、そこにｘｙｚが表示されました。
さらにそのあとにＰＯＳの値（桁位置）とＣＳＲＬＩＮの値（行）が表示されました。
ＴＡＢ（２０）のあとでｘｙｚが表示されて、そのあとに” Ｘ＝”が表示されたあとのカーソル位置がＰＯＳに入りますから、値は２６になります。
ＰＯＳの値をｘｙｚが表示された直後の値になるように少しプログラムを変えてみました。
上で表示したあとでプログラムを編集し直したのでちょっとわかりづらいかもしれません。
下のほうでＬＩＳＴ表示したのが変更後のプログラムです。
その下のｒ．（ＲＵＮ）で実行するとＬＯＣＡＴＥの指定は変えていませんから、同じ位置に表示されました。
今回はｘ＝を表示する前にＸ％にＰＯＳの値を入れましたから、ｘ＝２３と表示されました。
もうひとつＴＡＢ（）の実行例です。
最初のプログラムではＬＯＣＡＴＥで指定したカーソルの桁位置（１０）よりもＴＡＢの値（５）のほうが小さいので一行下の５桁にカーソルが移動しました。
その下のプログラムではＴＡＢに７９を越える値（２００）を指定しました。
その結果２行下の４０桁のところにカーソルが移動しました。
ＣＲＴ／ＶＧＡＩＦ＋ＫＥＹＩＦ＋ＳＤＣＡＲＤＩＦボードの製作［総合第１２３回］
２０１７．１１．９ｕｐｌｏａｄ
前へ
次へ
ホームページトップへ戻る