rectangle()
カレントスクリーンに四角形をカレントカラーで描く。
書式:
rectangle(
x, y, w, h, mode
)
x
,
y
四角形の左上隅の位置
w
,
h
四角形の右下隅の位置
mode
塗りつぶすかどうか
mode
= 0 塗りつぶさない。
mode
= 1 塗りつぶす。
例:
while not key(k_esc)
cls
rectangle(
100, 100, Xmouse, Ymouse,0
)
waitVBL
wend