bar()
現在のスクリーンに現在のインクカラーで塗りつぶした四角形を描く。
書式:
bar(
sx
,
sy
,
dx
,
dy
)
sx
,
sy
は四角形の左上のポイントの座標
dx
,
dy
は左下のポイントの座標
dx
,
dy
は
sx
,
sy
よりも大きくなければならない。
例:
while not key(k_esc)
cls
bar(
100, 100, Xmouse, Ymouse
)
waitVBL
wend