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