IF IS_OBJ( 1, THE HOOK )
AND IS_SET( HOOK_WORKING )
AND AM( WILMA )
AND AT_OBJ( 0 )
THEN
  SWAP
  EARN( £150 )
END IF

IF IS_OBJ( 1, THE HOOK )
AND IS_SET( HOOK_WORKING )
THEN
  EARN( £70 )
END IF

IF AT_OBJ( 1 )
THEN
  SWAP
END IF