Main sections
SETMOUSE
SETMOUSE x#, y#
Setzt die Mauskoordinaten auf x#, y#. Der Befehl ist sinnvoll um die Mausbewegung zu limitieren.
// SETMOUSE
WHILE TRUE
LimitMouse(100, 100, 400, 300)
PRINT "<=", mx, my
IF b1 THEN END
SHOWSCREEN
WEND
// ------------------------------------------------------------- //
// -=# LIMITMOUSE #=-
// MOUSESTATE mx, my, b1, b2 (GLOBAL)
// Mit Limitierung des Bereichs
// With limiting of the area
// ------------------------------------------------------------- //
FUNCTION LimitMouse: minx, miny, maxx, maxy
// Diese Variablen sind als LOCAL definiert:
// These variables are defined LOCAL:
// minx, miny, maxx, maxy
MOUSESTATE mx, my, b1, b2
IF mx<minx THEN mx=minx
IF mx>maxx THEN mx=maxx
IF my<miny THEN my=miny
IF my>maxy THEN my=maxy
SETMOUSE mx, my
ENDFUNCTION // LIMITMOUSE