MSXをCAD風にしようとやってみた。

CADといえばJW-CADを愛用している。
何とかMSXでCADのようにできないかと数時間試行錯誤した結果。
画面のようなプログラムができあがった。
このプログラムは
最初の点と次の点を押すと丸い円が表示する。
右クリックでこの線を結ぶ。
最初の点と次の点を２回押すと線と丸い円が消える。
前にも同じようなことをやった記憶があったが、
今回はマウスを使ってできるようにした。
今のところテスト段階で
これは250近い点を認識させるテストプログラムにしている。