How to check if the mousebutton was pressed or released.

[Joakim Christiansen]

Code: Select all

;0=false, 1=pressed, 2=down, 3=released
If MouseButton(1)
  If MB_Left = 0
    MB_Left = 1
  Else
    MB_Left = 2
  EndIf
Else
  If MB_Left = 3
    MB_Left = 0
  ElseIf MB_Left = 2
    MB_Left = 3
  EndIf
EndIf

This should be placed in the main loop after ExamineMouse().

[Psychophanta]

Nice!
This is the way i used to do it:

Code: Select all

If MouseButton(1);<-if current key status is PUSHED
      If pka.b=0:pka.b=1:EndIf;<-if previous key status was NOT PUSHED
ElseIf pka.b;<-else (if previous key status was PUSHED and current key status is NOT PUSHED):
      pka.b=0;<-set previous key status to NOT PUSHED.
EndIf

Yours is more complete, because it detects the releasing edge too. Mine only detects the pressing edge.