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