IF AT_OBJ( 0 )
THEN
  SWAP
END IF

IF AT_OBJ( 1 )
THEN
  SWAP
END IF

IF AM( TOM )
AND IS_SET( GAS_WORKING )
AND IS_OBJ( 0, THE BUNSEN BURNER )
AND IS_OBJ( 1, THE BOTTLE )
AND HAS( THE MATCHES )
AND AT( 96, 152 )
THEN
  EARN( £150 )
  SET( BOTTLE_FULL )
END IF