補色で塗られた四角形を描写します。 実行結果は↓に貼ります。

compfill 0,0,200,240

def 内だけで使用する変数は、def 内で var で宣言しましょう。 この場合 def ... var y, x, r, g, b for ... のようにします。 こうすることで、def 外にある変数 y や x に影響を与えることなく def 内で y や x を使用できます。 def 内で宣言した変数を「ローカル変数」といいます。

3,4行目をまとめて以下のようにしてみました。 一度RGBに分ける操作を省き、GSPOITで読み取った値を直接ビット反転させています。 GPSET X,Y,255<<24 OR (NOT GSPOIT(X,Y))