MOUSE ENTERING OBJECT AREA:
Set cursor LOOK
Set command LOOK
MOUSE LEAVING OBJECT AREA:
Set cursor WALK
Set command WALK
RIGHT CLICK:
Set cursor TALK
Set command TALK

SET VALUE "RIGHT CLICK" +1
If value "RIGHT CLICK" = 1
Set command: TALK
Set cursor: TALK
else
If value "RIGHT CLICK" = 2
Set command: TAKE
Set cursor: TAKE
else
If value "RIGHT CLICK" = 3
Set command: LOOK
Set cursor: LOOK
Set value "RIGHT CLICK" 0
End if
Set command: WALK
Set cursor: WALK
Value "RIGHT CLICK" = 0

If value "RIGHT CLICK" = 1
 Set command: TALK
 Set cursor: TALK
else
If value "RIGHT CLICK" = 2
 Set command: TAKE
 Set cursor: TAKE
else
 Set command: LOOK
 Set cursor: LOOK
 Set value "RIGHT CLICK" = 0
End if



If value "RIGHT CLICK" = 1
 Set cursor "TALK"
 Set command "TALK"
End if
If value "RIGHT CLICK" = 2
 If condizion "XYZ" is TRUE
  Set cursor "TAKE"
  Set command "TAKE"
 Else
  If condizion "XYZ" is FALSE
   Set cursor "LOOK"
   Set command "LOOK"
   Set Value "RIGHT CLICK" = 0
  End if
 End if
End if
If value "RIGHT CLICK" = 3
 Set cursor "LOOK"
 Set command "LOOK"
 Set Value "RIGHT CLICK" = 0
End if
if condition[cond_right_click] is true
 if value[val_right_click] = 0
  set value[val_right_click] to 1
  set cursor "talk"
  set command "talk"
 else
 if value[val_right_click] = 1
  if condition[cond_xyz] is true
   set value[val_right_click] to 2
   set cursor "take"
   set command "take"
  else
   set value[val_right_click] to 0
   set cursor "look"
   set command "look"
  end if
 else
  set value[val_right_click] to 0
  set cursor "look"
  set command "look"
 end if
 end if
end if 
