復活！ＣＰ／Ｍ ワンボードマイコンでＣＰ／Ｍを！
ＣＰ／ＭがＴＫ－８０互換のワンボードマイコンの上で復活します
ＮＤ８０ＺⅢとＭＹＣＰＵ８０の上でＣＰ／Ｍが走ります！
［第４２７回］
●ＥＳＣシーケンスをエミュレート（２）
前回は文字を着色指定するエスケープシーケンスをＺＢ３ＤＯＳ．ＥＸＥに組み込みました。
昨日は時間がありませんでしたので、とりあえず色指定のエスケープシーケンスだけを組み込みましたが、せっかくそこまでしたのですから、本日も多忙な中で時間を割きまして、カーソル移動のエスケープシーケンスも組み込んでしまいました。
落ち着いてテストプログラムを組んでいる時間がありませんでしたので、とりあえず簡単なプログラムをＢＡＳＩＣで作りました。
こちらがＢＡＳＩＣのテストプログラムです。
10 CLS
20 'esc test
30 FOR B%=0 TO 7
40 FOR A%=0 TO 9
50 PRINT A%;
60 NEXT A%
70 NEXT B%
80 FOR A%=1 TO 23
90 PRINT A%
100 NEXT A%
110 PRINT CHR$($1B);"=(6(1)y=8,x=22";
120 PRINT CHR$($1B);"[3A(2)up3";
130 PRINT CHR$($1B);"[12C(3)right12";
140 PRINT CHR$($1B);"[7B(4)down7";
150 PRINT CHR$($1B);"[47D(5)left47";
160 PRINT CHR$($1B);"[1B(6)down1**1234567890";
170 PRINT "abcdefghijklmnopqrstuvwxyz";
180 PRINT CHR$($1B);"[10D(7)";CHR$($1B);"[K(8)";
|
