Shapes.AddRectangle(100,100)
start:


If GraphicsWindow.MouseX >= 0 And GraphicsWindow.MouseY <=100 Then
  textwindow.writeline("mouse diatas shape")
Else
  TextWindow.WriteLine("mouse tidak diatas shape")
EndIf
program.Delay(10)
Goto start


start:
If Mouse.IsLeftButtonDown then
TextWindow.WriteLine("TRUE")
else
TextWindow.WriteLine("FALSE")
endif

Program.Delay(100)
Goto start

Sub mousedown
  TextWindow.WriteLine("true")
EndSub