Command

Description

Example

mousewhere(var x,y,button:int)

 

Used to get current information about the mouse

Mouse.Where(x,y,button)

buttonchoose (choice:string)

Used to change from “singlebutton” to “multibutton”

Left = 1

Right = 100

Both = 101

No Button=0

buttonchoose(“multibutton”)

 

buttonwait (motion:string, var x, y, buttonnumber, buttonupdown:int)

Gets information about a mouse event and removes it from the queue.  The parameter motion must be one of “up”,”down”,

”updown”,”downup”

x,y is the location of the mouse cursor when it is pressed.  buttonnumber (multibutton)

left = 1

middle = 2

right = 3

The parameter buttonupdown is set to 1 if button pressed and 0 when released.

 

 

Example to be given in class and saved as buttonwait example in your h:\

buttonmoved(motion:string):boolean

Indicates whether there is a mouse event of the appropriate type.  Returns true if event is in the queue, false if it is not.

 

Font.New(fontSelectStr:string):int

Used to obtain font for drawing.  The parameter format is “Family:Size:Style”

var fontID:int

FontID:=Font.New(“vector:20X12”)

Or

FontID:=Font.New(“serif:18:Bold,Italic”)

Font.Draw(txtString:string,x,y,fontID,Color:int)

Used to actually draw text in a specified font. Does not affect cursor location or background. 

Font.Draw("Hi There",15,10,fontID,3)"

Font.Free(fontID:int)

Used to release font.

Font.Free(fontID)