IF AT_OBJ( 0 )
THEN
  SWAP
END IF

IF AT_OBJ( 1 )
THEN
  SWAP
END IF

IF AT_OBJ( 2 )
THEN
  SWAP
END IF

IF IS_OBJ( 0, THE PIPE )
AND HAS( THE PATCH )
AND HAS( THE CHEWING GUM )
AND AT( 120, 152 )
AND AM( DICK )
THEN
  EARN( £40 )
  SET( PIPE_PATCHED )
END IF

IF IS_OBJ( 0, THE HOOK )
AND HAS( SUPERGLUE )
AND AT( 120, 152 )
AND AM( WALLY )
THEN
  EARN( £50 )
  SET( HOOK_WORKING )
END IF