誰がこうしろとか言ったわけではないので、変な癖かもしれないけど、たとえば、色の名前。color命令で同じ色をよく使うんであれば、こういうふうにすると早く書ける。
#define BLACK color 0, 0, 0
#define WHITE color 255, 255, 255
#define RED color 255, 0, 0
コロンを使って複数の命令を書いたやつにも置き換えることができるので、boxf命令と組み合わせて画面を赤く塗りつぶすなんてのも一単語で書けるようになる。
#define RED color 255, 0, 0 : boxf
以下は getkey命令で全部のキーの状態を取得するようなやつ。このぐらい長くなると #deffunc を使う方がよいかもしれない。結果を allkeys という配列に代入する。ほんとうは他言語の関数っぽく戻り値とかがあればいいんだけど。
#const KEY_LENGTH 121
#define GET_ALLKEYS repeat KEY_LENGTH@, 1 : getkey allkeys@.cnt, cnt : loop
dim allkeys, (KEY_LENGTH + 1)
さらに、キーの名前を。if命令と一緒に使う。
#const TRUE 1
#define KEY_ENTER allkeys@.13 == TRUE@
#define KEY_SHIFT allkeys@.16 == TRUE@
