X-BASIC

X-BASICは、シャープX68000用にハドソンおよびシャープが開発したBASIC言語である。
特徴としてはC言語に似た独自の構文をもった構造化言語であり、他の多くのBASICとは似ていないという印象が強い。一般にBASICには大文字を基本としているものが多いが、小文字を使うのも特徴である。
セーブとロード.
ユーザが記述した関数部分は行番号なしでcodice_1することによって、ライブラリ的なファイルを作って再利用することも可能である（なお行番号なしでcodice_1された関数を実行する際には、行番号付きでcodice_3よりも後の行にcodice_4する必要がある）。
外部関数.
X-BASICインタプリタ環境は、アセンブリ言語などで記述された機械語の外部モジュールを追加／削除することによって、インタプリタで処理できる外部関数の機能をカスタマイズできる仕様になっている。
構文.
実行可能なコードでは、標準的なBASICと同様にすべての行の先頭に行番号を記述する。　トークンの大文字・小文字を区別し、予約ステートメントは小文字で記述される。
ブロックは、ブラケット文字"{"と"}"で囲んで複数行に渡って構文を記述することができる。
変数.
変数は型を持ち、変数の宣言を記述する。
配列.
配列はdimステートメントを用いて定義し添字は"("と")"で括る。
制御.
繰り返し制御には、codice_9～codice_10の他に、codice_11およびcodice_12の制御が可能なcodice_13～codice_14、codice_15～codice_16ステートメントを有する。
関数.
ユーザー関数の定義はcodice_3より後の行にて、codice_18～codice_19ステートメントを用いて定義することができ、引数は"("と")"の間にカンマで区切って変数の型を含めて定義する。
コード例.
 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)
390 endwhile
400 endfunc
コンパイル.
X68000本体を購入すると標準で付属していたX-BASIC開発環境は、エディタ機能を持ったインタプリタであるが、別売りのCコンパイラを購入すると、X-BASICからC言語に変換するツールを用いて機械語にコンパイルして実行できる。
構文チェッカ.
X-BASICとC言語の言語仕様では、演算子の優先順位などプログラミング上問題になりやすい若干の差異があったために、「XBAStoC CHECKER PRO-68K(CZ-260LS)」（BCチェッカ）という構文検査ツールが発売されていた。