AddText "F1 = hide cursor"
AddText "F2 = show cursor"
AddText "F3 = custom pointer"
AddText "F4 = custom target"
pointer=LoadImage("Media\cursor.bmp")
crosshair=LoadImage("Media\crosshair.bmp")
Repeat
If KeyDown(cbkeyf1) Then ShowMouse OFF
If KeyDown(cbkeyf2) Then ShowMouse ON
If KeyDown(cbkeyf3) Then ShowMouse pointer
If KeyDown(cbkeyf4) Then ShowMouse crosshair
DrawScreen
Until EscapeKey()