bar()

Draws a filled rectangle with current ink color on current screen.

Syntax:

bar( sx , sy , dx , dy )

sx and sy are upper left rectangle point coordinates while dx and dy are lower right rectangle point coordinates. dx , dy must be greaten than sx , sy.

Example:

while not key(k_esc)

cls

bar( 100, 100, Xmouse, Ymouse )

waitVBL

wend