|
NEC PC-9801/9821シリーズで表示出来る文字数は、以下のようになっています。ハイレゾモードとは、PC-98XA・XL・XL2・RL・PC-H98・PC-9821A＋98ハイレゾボードで実現出来る高解像度モードの事です。通常のNEC PC-9801・PC-9821はノーマルモードです。
| | ノーマルモード | ハイレゾモード |
| テキスト表示 |
横４０×縦２０
横４０×縦２５
横８０×縦２０
横８０×縦２５ | 横８０×縦２５ |
| グラフィック表示 | 横640×縦400 | 横1120×縦750 |
グラフィック
画面モード |
640×200・カラー
640×200・白黒
640×400・白黒
640×400・カラー |
1120×750・カラー
1120×750・白黒 |
グラフィック画面モードは「SCREEN」文で指定出来ます。SCREEN文ではページ数指定も出来ますが、N88BASIC(86)での通常プログラムはページ数は１枚しか使わないと思われます。ノーマルモードの場合は、640×400・カラーのモードで使う場合がほとんどと思われます。この場合は「SCREEN 3,0,0,1」と指定します。ハイレゾモードの場合は、1120×750・カラーなので「SCREEN 0,0,0,1」を使います。
次に、テキスト画面モード設定を行う「CONSOLE」文。これは、スクロール開始行、スクロール行数、ファンクションキー表示ON/OFF、カラー/白黒スイッチ、キャラクタモード、を指定します。通常は「CONSOLE 0,25,0,1,0」と指定します。これは、スクロール開始行＝0、スクロール行数＝25、ファンクションキー＝OFF、カラー、キャラクタモード＝日本語表示、を意味します。
なお、CONSOLE文は、例えばアドベンチャーゲームのように、画面下４行だけを文字表示したい、というような事が出来ます。スクロール行数を４行にする、という事は出来ますが、列数を指定する事は出来ません。
次に、画面の色の設定を行う「COLOR」文です。これは、ファンクションコード（カラーモードの場合は文字色）、バックグラウンドカラー、ボーダーカラー、フォアグラウンドカラー、パレットモード、を指定しますが、最初に設定するもので重要なのはパレットモードです。パレットモードは、「0:８色中８色モード」「1:4096色中8色モード」「2:4096色中16色モード」です。PC-9801/E/F/Mは16色が使えません。PC-9801U2/VF2/VM0/VM2/VM4の場合は別売オプションボードが必要です。また、ディップスイッチSW1-8を「ON」（拡張グラフィックモード）にしておく必要があります。
「1:4096色中8色モード」で良い場合は「COLOR ,,,,1」と指定します。「2:4096色中16色モード」にする場合は「COLOR ,,,,2」と指定します。但し16色が使えない状態だとエラーが発生します。ハイレゾモードの場合は常に「4096色中16色モード」になります。
MS-DOSからN88BASIC(86)の画面になると、いろいろな画面表示がされています。必要の無い画面の文字を消すには、「CLS」文を使います。
CLS
(CLS 1) | テキスト画面をクリア |
| CLS 2 | グラフィック画面をクリア |
| CLS 3 |
テキスト画面、グラフィック画面
の両方をクリア |
| A=VIEW(0) | ビューポートの左上Ｘ座標がAに入る |
| B=VIEW(1) | ビューポートの左上Ｙ座標がBに入る |
| C=VIEW(2) | ビューポートの右下Ｘ座標がCに入る |
| D=VIEW(3) | ビューポートの右下Ｙ座標がDに入る |
ビューポートの初期値は、
| ノーマルモード | ハイレゾモード |
| A | 0 | 0 |
| B | 0 | 0 |
| C | 639 | 1119 |
| D | 199 又は 399 | 749 |
となりますので、
| IF VIEW(2)=639 THEN ＜ノーマルモードの処理＞ ELSE ＜ハイレゾモードの処理＞ |
のようにすればＯＫ。
まとめると、プログラムの最初に行う「お約束」は以下のようになります。
10 ' SAVE "ファイル名.BAS"
20 ' プログラムのタイトル等
30 '
40 IF VIEW(2)=639 THEN SCREEN 3,0,0,1:PX=1:PY=1 ELSE SCREEN 0,0,0,1:PX=1.75:PY=1.875
50 WIDTH 80,25:CONSOLE 0,25,0,1,0:COLOR ,,,,2:CLS 3
・・・・・ |
（4096色中16色モードの場合）
変数PX,PYには、ノーマル・ハイレゾの判定を他の部分で行う際に、「IF VIEW(2)=639 THEN」と何度も書くのが面倒なので「IF PX=1 THEN」と書きたい、という事が１つ。後々、「LINE」文などで画面にグラフィックを描きたい場合、ノーマルモードで「LINE (100,100)-(300,300)」と書く所を、「LINE (100*PX,100*PY)-(300*PX,300*PY)」と書けば、ノーマルモードとハイレゾモードを同じように扱えます。これについては後述します。 |
|
バッチファイル
ＢＡＳＩＣ
1 2 3 4 5
6 7 8 9 A
B C D E F
G H I J
C言語のお勉強
拡張子な話
DOSプログラム
Delphi
シェアウェア
Script!World
データベース
|
