#効能
　VTL_on_FPGAのGAME80コンパイラーをパソコン上で動作させることが出来ます。
#元ネタ
　スクラッチからでは能力的にも時間がかかりそうなので、下記サイトのものを使わせてもらっています。
　Linux用なので、IOをWindowsにちょこちょこと書き換えて動かしています。
　VTLソースの編集は外部エディタで行うので、ラインエディタ系は動かない可能性大。
　　［たけおかぼちぼち日記］
　※許諾については記載が無いので、黙って使わせていただいておりますが、問題あれば取り下げます。

#ＧＡＭＥ８６インタープリター
　ソースはここに上げています。
　［GAME86］
　VS2017(無償版)でコンパイルしており、「game86.sln」でコンパイルできるはずです。
　VS2017無い場合も、へんな命令は使っていないつもりなので、その辺のコンパイラでも可と思う。
　それもめんどうな場合は「game86.exe」を起動してみてください。
　※但し、「誰も使っていない怪しいソフト」として、ノートンなどがクレームをつける恐れあり。

　起動すると下記が表示されます。
　「ESC」キーで実行中の中断、「\」キーで終了します。
VTL及びGAME-IIIのコマンドを打ち込むと実行できます。

--- VTL_on_FPGA Interpreter ---
G>>

#改変、機能追加

　GAME86に、VTL_on_FPGAとして機能させる為に下記機能に変更、追加を行っている。
　1.配列は標準では16ビットモードで動作　　A:0) -> 8bit A(0) -> 16bit A[0) -> 32bit
　2.行の途中からのコメントを許容。※判りやすくなる

  　　10 A=$1000 * 開始番地  <- 「*」以降はコメントとなり、実行されない。

　3.ソース格納エリアを２分割(コンパイラとコンパイルターゲットソースを格納)するコマンドを追加。
　　[P0 メモリアドレス $0000 - $7FFF コンパイルターゲットソースを格納
　　[P1 メモリアドレス $8000 - $FFFF GAME86上で動作するコンパイラ(GM80)を格納
　4.デバッグコマンドとして[Txを追加。
　　[T0 デバッグコマンド([T1 - [T3)を無効化
　　[T1 トレース実行(実行中の行番号を表示)
　　[T2 ステップ実行(行番号毎に中断)
　　[T3 ブレーク有効(ソース中に !! マークが有れば中断)
　　※中断後に、］(+ret)で再スタートする。
　5.プログラムのロード、セーブ
　　[LO xxxx ファイルxxxxからプログラムをロードする。
　　[SA xxxx ファイルxxxxにプログラムをセーブする
　　[L0 xxxx ファイルxxxxからプログラムを、[P0にマージしながらロードする
　　[L1 xxxx ファイルxxxxからプログラムを、[P1にマージしながらロードする
　6.FPGAへの書き込み支援
　　[MR xxxx ファイルxxxxにVTL機械語を、verilogソース形式で格納(但し32bit)
　　[MM xxxx ファイルxxxxにVTL機械語を、mif形式で格納(但し32bit)
　　[MH xxxx ファイルxxxxにVTL機械語を、バイト形式で格納
　　[MC xxxx ファイルxxxxにVTL機械語を、coe形式で格納(但し32bit)
　　[CW クリップボードにVTL機械語を、バイト形式で格納
　　※[MHでFPGAに機械語を受け渡す、[CWはデバッグ時に使用
　　※32bitモードは、今回は使用しない
　7.コンパイル操作支援
　　(1)［￥￥　VTL_on_FPGAに必要なソースをすべてロードし、コンパイルを実行
　　　"[P0 [LO gm80\gm80.gm [L0 gm80\moni.gm [L0 gm80\bios.gm [L0 gm80\gm80ovf.gm [P1 [LO gm80\gm80.gm [L1 gm80\gm80ovp.gm #=1"
　　(2)［＠＠　VTL_on_FPGAのモニター部分をロードし、コンパイルを実行
　　　"[P0 [LO gm80\moni.gm [P1 [LO gm80\gm80.gm #=1"
　　(3)［［［　test.gmをロードし、コンパイルを実行
　　　"[p0 [LO gm80\test.gm [p1 [LO gm80\gm80.gm #=1"
　8.グラフィック(20180722追加)
　　拡張IOに合わせたグラフィックが表示可能です。
　　<$18=1　ウインドを表示。
　　<$18=0　ウインドをリフレッシュ
　　<$15=XX　X座標を指定
　　<$16=YY　Y座標を指定
　　<$18=CC　指定した色を表示(但しWinではリフレッシュが必要)
#GAME86の文法
［GAME86 Compiler for MS-DOS 1.00C記］より
　※インタープリターは上記URLとは別物です。

    <行番号>   1 ? 32767
    <10進定数> 0 ? 65535
    <16進定数> $0000 ? $FFFF
    <文字定数> "文字"
    <変数名>   A ? Z または冗長形(ABC等 先頭1文字が有効)
    <1バイト配列> ::= 変数名 ( <式> )
                      変数の値 + 2 * 式の値 のアドレスの内容を値とする．
    <2バイト配列> ::= 変数名 : <式> )
                      変数の値 + 式の値 のアドレスの内容を値とする．
    <定数> ::= <10進定数> | <16進定数> | <文字定数>
    <変数> ::= <変数名> | <1バイト配列> | <2バイト配列>
    <式> ::= <項> | <項> <二項演算子> <項>
    <項> ::= <定数> | <変数> | <配列> |（ <式> ）| <単項演算子> <項>
    <二項演算子> ::= + | - | * | / | = | <> | < | > | <= | >=
                    比較演算 は 真:1, 偽:0の値を取る．
    <単項演算子> ::= - | + | % | ' | #
                     + は絶対値, % は直前に実行した除算の余り,
                     ' は乱数, #は否定．
    <行> ::= <行番号> スペース <文> [ 空白 <文> ] 改行
             | <行番号> スペース以外の文字 コメント 改行

    <文>
        <変数>=<項>     変数への代入
        #=<項>            <項>の値の行番号の文にジャンプ(GOTO)
                          行番号がなければ行番号より大きい最初の行へジャンプ
        #=-1              プログラムの終了(END)
        !=<項>            <項>の値の行番号のサブルーチンへジャンプ(GOSUB)
        ]                 サブルーチンから戻る(RETURN)
        ;=式              式の値が真の場合は次の文に進み，
                          偽の場合は次の行を実行．
        @                 DO
        @=(式)            UNTIL
        変数=初期値,ステップ FOR
        @=式              NEXT
        /                 改行出力
        "文字列"          文字列出力
        ?=<項>            <項>の結果を数値出力 左詰め
        ??=<項>           <項>の結果を数値出力 16進4桁
        ?$=<項>           <項>の結果の下位1バイトを数値出力 16進2桁
        ?(n)=<項>         <項>の値の数値出力 n桁で右詰め
        $=<項>            <項>の値の下位バイトを文字コードとする１文字を出力
        .=<項>            <項>の値の下位バイトの数だけ空白を出力
        '=<項>            <項>の値で乱数シードを設定
        <変数>=?          10進数値を入力して変数に代入
        <変数>=$          1文字を入力して変数に代入

その他

　とりあえず動いているのレベルであり、状況によっては動かない可能性が有ります。
　上記記載のハード、ソフトは無保証であり、各自の責任においてご利用願います。