|
X-BASICX-BASICは、シャープX68000用にハドソンおよびシャープが開発したBASIC言語である。 特徴としてはC言語に似た独自の構文をもった構造化言語であり、他の多くのBASICとは似ていないという印象が強い。一般にBASICには大文字を基本としているものが多いが、小文字を使うのも特徴である。 セーブとロードユーザが記述した関数部分は行番号なしで 外部関数X-BASICインタプリタ環境は、アセンブリ言語などで記述された機械語の外部モジュールを追加／削除することによって、インタプリタで処理できる外部関数の機能をカスタマイズできる仕様になっている。 構文実行可能なコードでは、標準的なBASICと同様にすべての行の先頭に行番号を記述する。 トークンの大文字・小文字を区別し、予約ステートメントは小文字で記述される。 ブロックは、ブラケット文字{と}で囲んで複数行に渡って構文を記述することができる。 変数変数は型を持ち、変数の宣言を記述する。
配列配列はdimステートメントを用いて定義し添字は(と)で括る。 制御繰り返し制御には、 関数ユーザー関数の定義は
コード例 10 /* Tiny EDITOR ted.bas
20 str fname[20]
30 str buff[200]
40 int fp, fc
50 char CR=13, LF=10
60 /*
70 title()
80 fninput ()
90 fp=fopen(fname, "c")
100 edit()
110 fc=fclosc(fp)
120 end
130 /*
140 func title()
150 str dummy
160 cls
170 print "これは簡易エデイタです。"
180 print "メモなどを作成するときにお伎いください。"
190 print "なお、すでに存在するファイル名を指定したときは、無条"
200 print "件にそのファイルの内容を削除してしまいます。"
210 print
220 print " 何かキーを押してください ";
230 dummy=inkey$
240 cls
250 endfunc
260 func fninput()
270 print "Input file name >";
280 linput fname
290 endfunc
300 func edit()
310 print "Input data(END =/)":print
320 while buff <> "/"
330 linput ">";buff
340 if buff <> "/" then {
350 fwrites(buff,fp)
360 fputc(CR,fp)
370 fputc(LF,fp)
380 }
390 endwhile
400 endfunc
コンパイルX68000本体を購入すると標準で付属していたX-BASIC開発環境は、エディタ機能を持ったインタプリタであるが、別売りのCコンパイラを購入すると、X-BASICからC言語に変換するツールを用いて機械語にコンパイルして実行できる。 構文チェッカX-BASICとC言語の言語仕様では、演算子の優先順位などプログラミング上問題になりやすい若干の差異があったために、「XBAStoC CHECKER PRO-68K(CZ-260LS)」（BCチェッカ）という構文検査ツールが発売されていた。 関連書籍
関連項目
|
