Code: Select all
Procedure hasClicked()
Debug "HAS clicked"
EndProcedure
; Main init function
Procedure init()
OpenWindow(0,0,0,1000,700,"wurst")
BindEvent(#PB_Event_LeftClick,@hasClicked(),0)
EndProcedure
; End init()
init()
Code: Select all
Procedure hasClicked()
Debug "HAS clicked"
EndProcedure
; Main init function
Procedure init()
OpenWindow(0,0,0,1000,700,"wurst")
BindEvent(#PB_Event_LeftClick,@hasClicked(),0)
EndProcedure
; End init()
init()
Code: Select all
Procedure hasClicked()
Debug "HAS clicked"
EndProcedure
Procedure hasMoved()
Debug "HAS moved"
EndProcedure
Procedure init()
OpenWindow(0, 0, 0, 1000, 700, "wurst")
BindEvent(#PB_Event_LeftClick, @hasClicked(), 0)
BindEvent(#PB_Event_MoveWindow, @hasMoved(), 0)
EndProcedure
init()