#module
#deffunc frame int, int, int, int
mref x1, 0 : mref y1, 1 : mref x2, 2 : mref y2, 3
line x1, y1 - 1, x1, y2 // 終点は描画されないので1引く
line x1, y1, x2, y1
line x2, y1, x2, y2
line x1, y2, x2, y2
return
#global
color 100, 200, 200 : boxf 100, 100, 300, 200
color 255 : frame 100, 100, 300, 200 // 塗りつぶし部分を枠で囲う
stop
|