skylib_fluffos_v3/
skylib_fluffos_v3/bin/
skylib_fluffos_v3/bin/db/
skylib_fluffos_v3/fluffos-2.9-ds2.04/
skylib_fluffos_v3/fluffos-2.9-ds2.04/ChangeLog.old/
skylib_fluffos_v3/fluffos-2.9-ds2.04/Win32/
skylib_fluffos_v3/fluffos-2.9-ds2.04/compat/
skylib_fluffos_v3/fluffos-2.9-ds2.04/compat/simuls/
skylib_fluffos_v3/fluffos-2.9-ds2.04/include/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/clone/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/command/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/data/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/etc/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/include/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/inherit/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/inherit/master/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/log/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/single/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/single/tests/compiler/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/single/tests/efuns/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/single/tests/operators/
skylib_fluffos_v3/fluffos-2.9-ds2.04/testsuite/u/
skylib_fluffos_v3/fluffos-2.9-ds2.04/tmp/
skylib_fluffos_v3/fluffos-2.9-ds2.04/windows/
skylib_fluffos_v3/mudlib/
skylib_fluffos_v3/mudlib/cmds/
skylib_fluffos_v3/mudlib/cmds/admin/
skylib_fluffos_v3/mudlib/cmds/guild-race/
skylib_fluffos_v3/mudlib/cmds/living/broken/
skylib_fluffos_v3/mudlib/cmds/player/group_cmds/
skylib_fluffos_v3/mudlib/cmds/playtester/
skylib_fluffos_v3/mudlib/d/admin/
skylib_fluffos_v3/mudlib/d/admin/room/
skylib_fluffos_v3/mudlib/d/admin/room/we_care/
skylib_fluffos_v3/mudlib/d/admin/save/
skylib_fluffos_v3/mudlib/d/admin/text/
skylib_fluffos_v3/mudlib/d/learning/TinyTown/buildings/
skylib_fluffos_v3/mudlib/d/learning/TinyTown/map/
skylib_fluffos_v3/mudlib/d/learning/TinyTown/roads/
skylib_fluffos_v3/mudlib/d/learning/chars/
skylib_fluffos_v3/mudlib/d/learning/functions/
skylib_fluffos_v3/mudlib/d/learning/handlers/
skylib_fluffos_v3/mudlib/d/learning/help_topics/
skylib_fluffos_v3/mudlib/d/learning/help_topics/npcs/
skylib_fluffos_v3/mudlib/d/learning/help_topics/objects/
skylib_fluffos_v3/mudlib/d/learning/help_topics/rcs_demo/
skylib_fluffos_v3/mudlib/d/learning/help_topics/rcs_demo/RCS/
skylib_fluffos_v3/mudlib/d/learning/help_topics/rooms/
skylib_fluffos_v3/mudlib/d/learning/help_topics/rooms/crowd/
skylib_fluffos_v3/mudlib/d/learning/help_topics/rooms/situations/
skylib_fluffos_v3/mudlib/d/learning/save/
skylib_fluffos_v3/mudlib/d/learning/school/
skylib_fluffos_v3/mudlib/d/learning/school/add_sc/
skylib_fluffos_v3/mudlib/d/learning/school/characters/
skylib_fluffos_v3/mudlib/d/learning/school/general/
skylib_fluffos_v3/mudlib/d/learning/school/getting-started/
skylib_fluffos_v3/mudlib/d/learning/school/getting-started/basic_commands/
skylib_fluffos_v3/mudlib/d/learning/school/getting-started/edtutor/
skylib_fluffos_v3/mudlib/d/learning/school/getting-started/unix_tutor/
skylib_fluffos_v3/mudlib/d/learning/school/items/
skylib_fluffos_v3/mudlib/d/learning/school/npc_school/
skylib_fluffos_v3/mudlib/d/learning/school/room_school/
skylib_fluffos_v3/mudlib/d/learning/school/room_school/room_basic/
skylib_fluffos_v3/mudlib/d/learning/school/room_school/situations/
skylib_fluffos_v3/mudlib/d/learning/school/room_school/terrain_tutor/
skylib_fluffos_v3/mudlib/d/learning/text/
skylib_fluffos_v3/mudlib/d/liaison/
skylib_fluffos_v3/mudlib/d/mudlib/
skylib_fluffos_v3/mudlib/d/mudlib/changes/
skylib_fluffos_v3/mudlib/d/playtesters/
skylib_fluffos_v3/mudlib/d/playtesters/effects/
skylib_fluffos_v3/mudlib/d/playtesters/handlers/
skylib_fluffos_v3/mudlib/d/playtesters/items/
skylib_fluffos_v3/mudlib/d/sage/
skylib_fluffos_v3/mudlib/doc/
skylib_fluffos_v3/mudlib/doc/creator/
skylib_fluffos_v3/mudlib/doc/driver/
skylib_fluffos_v3/mudlib/doc/driver/efuns/arrays/
skylib_fluffos_v3/mudlib/doc/driver/efuns/buffers/
skylib_fluffos_v3/mudlib/doc/driver/efuns/calls/
skylib_fluffos_v3/mudlib/doc/driver/efuns/compile/
skylib_fluffos_v3/mudlib/doc/driver/efuns/filesystem/
skylib_fluffos_v3/mudlib/doc/driver/efuns/floats/
skylib_fluffos_v3/mudlib/doc/driver/efuns/functions/
skylib_fluffos_v3/mudlib/doc/driver/efuns/general/
skylib_fluffos_v3/mudlib/doc/driver/efuns/mappings/
skylib_fluffos_v3/mudlib/doc/driver/efuns/mixed/
skylib_fluffos_v3/mudlib/doc/driver/efuns/mudlib/
skylib_fluffos_v3/mudlib/doc/driver/efuns/numbers/
skylib_fluffos_v3/mudlib/doc/driver/efuns/parsing/
skylib_fluffos_v3/mudlib/doc/login/
skylib_fluffos_v3/mudlib/doc/lpc/basic_manual/
skylib_fluffos_v3/mudlib/doc/lpc/intermediate/
skylib_fluffos_v3/mudlib/doc/new/add_command/
skylib_fluffos_v3/mudlib/doc/new/events/
skylib_fluffos_v3/mudlib/doc/new/handlers/
skylib_fluffos_v3/mudlib/doc/new/living/race/
skylib_fluffos_v3/mudlib/doc/new/living/spells/
skylib_fluffos_v3/mudlib/doc/new/object/
skylib_fluffos_v3/mudlib/doc/new/player/
skylib_fluffos_v3/mudlib/doc/new/room/guild/
skylib_fluffos_v3/mudlib/doc/new/room/outside/
skylib_fluffos_v3/mudlib/doc/new/room/storeroom/
skylib_fluffos_v3/mudlib/doc/object/
skylib_fluffos_v3/mudlib/doc/playtesters/
skylib_fluffos_v3/mudlib/doc/policy/
skylib_fluffos_v3/mudlib/doc/weapons/
skylib_fluffos_v3/mudlib/global/
skylib_fluffos_v3/mudlib/global/creator/
skylib_fluffos_v3/mudlib/handlers/
skylib_fluffos_v3/mudlib/include/casino/
skylib_fluffos_v3/mudlib/include/cmds/
skylib_fluffos_v3/mudlib/include/effects/
skylib_fluffos_v3/mudlib/include/npc/
skylib_fluffos_v3/mudlib/include/room/
skylib_fluffos_v3/mudlib/include/shops/
skylib_fluffos_v3/mudlib/net/daemon/
skylib_fluffos_v3/mudlib/net/daemon/chars/
skylib_fluffos_v3/mudlib/net/inherit/
skylib_fluffos_v3/mudlib/net/obj/
skylib_fluffos_v3/mudlib/net/obj/BACKUPS/
skylib_fluffos_v3/mudlib/obj/amulets/
skylib_fluffos_v3/mudlib/obj/armours/plate/
skylib_fluffos_v3/mudlib/obj/b_day/
skylib_fluffos_v3/mudlib/obj/clothes/transport/horse/
skylib_fluffos_v3/mudlib/obj/faith/symbols/
skylib_fluffos_v3/mudlib/obj/fungi/
skylib_fluffos_v3/mudlib/obj/gatherables/
skylib_fluffos_v3/mudlib/obj/instruments/
skylib_fluffos_v3/mudlib/obj/media/
skylib_fluffos_v3/mudlib/obj/misc/player_shop/
skylib_fluffos_v3/mudlib/obj/monster/godmother/
skylib_fluffos_v3/mudlib/obj/monster/transport/
skylib_fluffos_v3/mudlib/obj/rings/
skylib_fluffos_v3/mudlib/obj/scabbards/
skylib_fluffos_v3/mudlib/obj/spells/
skylib_fluffos_v3/mudlib/obj/stationery/
skylib_fluffos_v3/mudlib/obj/stationery/envelopes/
skylib_fluffos_v3/mudlib/obj/toys/
skylib_fluffos_v3/mudlib/obj/vessels/
skylib_fluffos_v3/mudlib/obj/weapons/axes/
skylib_fluffos_v3/mudlib/obj/weapons/chains/
skylib_fluffos_v3/mudlib/obj/weapons/maces/BACKUPS/
skylib_fluffos_v3/mudlib/save/autodoc/
skylib_fluffos_v3/mudlib/save/book_handler/
skylib_fluffos_v3/mudlib/save/books/history/calarien/
skylib_fluffos_v3/mudlib/save/mail/
skylib_fluffos_v3/mudlib/save/new_soul/data/
skylib_fluffos_v3/mudlib/save/parcels/
skylib_fluffos_v3/mudlib/save/playerinfo/
skylib_fluffos_v3/mudlib/save/players/d/
skylib_fluffos_v3/mudlib/save/players/s/
skylib_fluffos_v3/mudlib/save/random_names/
skylib_fluffos_v3/mudlib/save/random_names/data/
skylib_fluffos_v3/mudlib/save/terrains/
skylib_fluffos_v3/mudlib/save/terrains/tutorial_desert/
skylib_fluffos_v3/mudlib/save/terrains/tutorial_grassy_field/
skylib_fluffos_v3/mudlib/save/terrains/tutorial_mountain/
skylib_fluffos_v3/mudlib/save/todo_lists/
skylib_fluffos_v3/mudlib/secure/
skylib_fluffos_v3/mudlib/secure/cmds/admin/
skylib_fluffos_v3/mudlib/secure/cmds/lord/
skylib_fluffos_v3/mudlib/secure/config/
skylib_fluffos_v3/mudlib/secure/handlers/autodoc/
skylib_fluffos_v3/mudlib/secure/handlers/intermud/
skylib_fluffos_v3/mudlib/secure/include/global/
skylib_fluffos_v3/mudlib/secure/save/
skylib_fluffos_v3/mudlib/secure/save/handlers/
skylib_fluffos_v3/mudlib/secure/std/
skylib_fluffos_v3/mudlib/secure/std/classes/
skylib_fluffos_v3/mudlib/secure/std/modules/
skylib_fluffos_v3/mudlib/std/creator/
skylib_fluffos_v3/mudlib/std/dom/
skylib_fluffos_v3/mudlib/std/effects/
skylib_fluffos_v3/mudlib/std/effects/external/
skylib_fluffos_v3/mudlib/std/effects/fighting/
skylib_fluffos_v3/mudlib/std/effects/magic/
skylib_fluffos_v3/mudlib/std/effects/magic/BACKUPS/
skylib_fluffos_v3/mudlib/std/effects/other/BACKUPS/
skylib_fluffos_v3/mudlib/std/effects/priest/
skylib_fluffos_v3/mudlib/std/effects/room/
skylib_fluffos_v3/mudlib/std/environ/
skylib_fluffos_v3/mudlib/std/guilds/
skylib_fluffos_v3/mudlib/std/guilds/old/
skylib_fluffos_v3/mudlib/std/languages/
skylib_fluffos_v3/mudlib/std/liquids/
skylib_fluffos_v3/mudlib/std/npc/
skylib_fluffos_v3/mudlib/std/npc/goals/
skylib_fluffos_v3/mudlib/std/npc/goals/basic/
skylib_fluffos_v3/mudlib/std/npc/goals/misc/
skylib_fluffos_v3/mudlib/std/npc/plans/
skylib_fluffos_v3/mudlib/std/npc/plans/basic/
skylib_fluffos_v3/mudlib/std/npc/types/
skylib_fluffos_v3/mudlib/std/npc/types/helper/
skylib_fluffos_v3/mudlib/std/npcs/
skylib_fluffos_v3/mudlib/std/outsides/
skylib_fluffos_v3/mudlib/std/races/shadows/
skylib_fluffos_v3/mudlib/std/room/basic/BACKUPS/
skylib_fluffos_v3/mudlib/std/room/basic/topography/
skylib_fluffos_v3/mudlib/std/room/controller/
skylib_fluffos_v3/mudlib/std/room/inherit/topography/
skylib_fluffos_v3/mudlib/std/room/topography/area/
skylib_fluffos_v3/mudlib/std/room/topography/iroom/
skylib_fluffos_v3/mudlib/std/room/topography/milestone/
skylib_fluffos_v3/mudlib/std/shadows/curses/
skylib_fluffos_v3/mudlib/std/shadows/disease/
skylib_fluffos_v3/mudlib/std/shadows/fighting/
skylib_fluffos_v3/mudlib/std/shadows/healing/
skylib_fluffos_v3/mudlib/std/shadows/magic/
skylib_fluffos_v3/mudlib/std/shadows/poison/
skylib_fluffos_v3/mudlib/std/shadows/room/
skylib_fluffos_v3/mudlib/std/shops/controllers/
skylib_fluffos_v3/mudlib/std/shops/objs/
skylib_fluffos_v3/mudlib/std/shops/player_shop/
skylib_fluffos_v3/mudlib/std/socket/
skylib_fluffos_v3/mudlib/std/soul/d/
skylib_fluffos_v3/mudlib/std/soul/e/
skylib_fluffos_v3/mudlib/std/soul/i/
skylib_fluffos_v3/mudlib/std/soul/j/
skylib_fluffos_v3/mudlib/std/soul/k/
skylib_fluffos_v3/mudlib/std/soul/l/
skylib_fluffos_v3/mudlib/std/soul/n/
skylib_fluffos_v3/mudlib/std/soul/o/
skylib_fluffos_v3/mudlib/std/soul/q/
skylib_fluffos_v3/mudlib/std/soul/r/
skylib_fluffos_v3/mudlib/std/soul/u/
skylib_fluffos_v3/mudlib/std/soul/v/
skylib_fluffos_v3/mudlib/std/soul/y/
skylib_fluffos_v3/mudlib/std/soul/z/
skylib_fluffos_v3/mudlib/std/stationery/
skylib_fluffos_v3/mudlib/w/
skylib_fluffos_v3/mudlib/w/default/
skylib_fluffos_v3/mudlib/w/default/armour/
skylib_fluffos_v3/mudlib/w/default/clothes/
skylib_fluffos_v3/mudlib/w/default/item/
skylib_fluffos_v3/mudlib/w/default/npc/
skylib_fluffos_v3/mudlib/w/default/room/
skylib_fluffos_v3/mudlib/w/default/weapon/
skylib_fluffos_v3/mudlib/www/
skylib_fluffos_v3/mudlib/www/java/
skylib_fluffos_v3/mudlib/www/secure/
skylib_fluffos_v3/mudlib/www/secure/lpc/advanced/
skylib_fluffos_v3/mudlib/www/secure/lpc/intermediate/
skylib_fluffos_v3/win32/
/**
 * @main
 * This is the standard lightable.  It can be used for candles,
 * lanterns, lamps etc.  It adds the commands "light" and
 * "dowse"/"extinguish" to the player, but no refuelling
 * command.  Holding stuff is handled by /obj/weapon and the
 * ho_ld command.
 * @author Gruper
 * @index lightable
 * @started 11th of May, 1998
 */

#include <fuel_handler.h>

#define HOLD_CMD   "/cmds/living/ho_ld"
#define DEPARTURES "/room/departures"

inherit WEAPON_OBJ;

int max_fuel, fuel, lit, brightness, time, hold;
string empty_mess;
mixed fuel_messages;

int set_lit( int i );

/** @ignore */
void create() {
    ::create();
    add_extra_look(TO);
} /* create() */

/** @ignore */
void init() {
    add_command("light");
    add_command("dowse");
    add_command("extinguish");
} /* init() */

/** @ignore */
varargs string short( int dark ) {
    if( lit && !query_property("just_lit") )
        return "lit " + ::short( dark );
    else
        return ::short( dark );
} /* short() */

/** @ignore */
void out_of_fuel() {
    object env;

    fuel = 0;
    lit = 0;
    set_lit(0);

    FUEL_HANDLER->remove_burner(TO);

    if( !env = environment() )
        return;

    if( living( env ) ) {
        tell_room( ENV(env), poss_short()+" goes out.\n");
    } else {
        tell_room( env, the_short() +" goes out.\n" );
    }

} /* out_of_fuel() */

/** @ignore yes */
int hold_thing() {
    if( !query_wielded() )
        return HOLD_CMD->cmd( ({ TO }) );
    else
        return 1;
} /* hold_thing() */

/** @ignore */
mixed set_holder( object ob, int pos ) {
    // No one is holding it and it requires holding when lit; dowse it.
    if( lit && hold && !ob && ENV(TP) && file_name( ENV(TP) ) != DEPARTURES )
        if( !set_lit( 0 ) ) {
            tell_object( TP, "You extinguish "+the_short()+".\n");
            tell_room( ENV(TP), TP->the_short()+" extinguishes "+
                the_short()+".\n", TP );
        }

    return ::set_holder( ob, pos );

} /* set_holder() */

/**
 * This function is used to light or dowse the lightable.
 * Two properties are checked: unextinguishable means that
 * the lightable cannot be extinguished and unlightable that
 * it cannot be lit.
 * @param i 1 for lit and 0 for unlit
 * @return The current state, 1 for lit, 0 for unlit
 */
int set_lit( int i ) {
    if( !i ) {
        if( !query_property("unextinguishable") ) {
            lit = 0;
            FUEL_HANDLER->remove_burner(TO);
            remove_adjective("lit");
            remove_property("just_lit");
            set_light(0);
            return 0;
        }
    } else {
        if( !query_property("unlightable") && fuel > 0 ) {
            if( lit )
                return 1;

            if( hold && !hold_thing() )
                return 0;

            // Delay for sensible light mess.
            lit = 1;
            add_property("just_lit", 1, 2 );
            FUEL_HANDLER->add_burner(TO);
            add_adjective("lit");
            set_light( brightness );
            return 1;
        }
    }

} /* set_lit() */

/**
 * @return 1 if lit, 0 if unlit
 */
int query_lit() { return lit; }

/** @ignore */
int do_light() {
    if( lit )
        return notify_fail( the_short()+" is already lit.\n");

    if( !fuel )
        return notify_fail( the_short()+" "+empty_mess+"\n");

    if( !set_lit( 1 ) )
        return notify_fail("You cannot light "+the_short()+".\n");

    TP->print_messages();
    add_succeeded_mess("$N $V $D.\n");
    return 1;

} /* do_light() */

/** @ignore */
int do_dowse() {
    if( !lit )
        return notify_fail( the_short()+" is not lit.\n");

    if( set_lit( 0 ) )
        return notify_fail("You cannot extinguish "+the_short()+".\n");

    add_succeeded_mess("$N $V $D.\n");
    return 1;

} /* do_dowse() */

/** @ignore */
int do_extinguish() { return do_dowse(); }

/**
 * This function is used to set the different messages shown
 * depending on how much fuel is left in the lightable.
 * The fuel messages should be on a form suitable to be
 * appended to the_short() +" is lit/not lit.  "
 * The argument msgs can either be an array of strings or an
 * array of string, int pairs.  In the first case, the fuel
 * messages will be evenly spaced.  In the second case, the
 * int is a percentage (fuel_left*100/max_fuel) below which
 * the string will be used.  If no message for 100 is given,
 * it will default to the last string element in the array.
 *
 * @param msgs A mixed array of either strings or string, int pairs
 * @example
 *     set_fuel_messages( ({ "There is almost no fuel left.", 10
 *                           "It is more than halfway empty.", 50,
 *                           "It is not yet halfway empty.", 80,
 *                           "It is almost full.", 100 }) );
 */
void set_fuel_messages( mixed msgs ) { fuel_messages = msgs; }

/**
 * @return a mapping containing all the different fuel_messages
 */
mixed query_fuel_messages() { return fuel_messages; }

/**
 * Sets the maximum amount of fuel.
 * One fuel unit equals one second of burning time.
 */
void set_max_fuel( int i ) { max_fuel = i; }

/**
 * @return The max amount of fuel the object can contain.
 */
int query_max_fuel() { return max_fuel; }

/**
 * Sets the current amount of fuel.  One fuel unit equals
 * one second of burning time.  If fuel > max_fuel,
 * fuel = max_fuel, so it is important to set max_fuel
 * before fuel.
 */
void set_fuel( int i ) {
    fuel = i;
    if( fuel > max_fuel )
        fuel = max_fuel;
} /* set_fuel() */

/**
 * @return The current amount of fuel.
 */
int query_fuel() { return fuel; }

/**
 * @return String describing how much fuel is left.
 */
string current_fuel_message() {
    mixed messages;
    int fuel_percent, size, i;
    string fuel_string = "";

    if( fuel < 1 )
        return "It "+ empty_mess;

    messages = query_fuel_messages();
    size = sizeof( messages );

    if( !size )
        return "This item needs a creator.  It is broken and lonely.";

    if( size < 2 )
        return messages[0];

    // Multiplying by 99 guarantees <= index.
    fuel_percent = fuel * 99 / max_fuel;

    if( intp( messages[1] ) ) { // Percenatges given
        for( i = 1; i < size; i += 2 ) {
            if( messages[i] > fuel_percent ) {
                fuel_string = messages[i-1];
                break;
            }
        }
        if( fuel_string == "")
            fuel_string = messages[ size - 2 ];
    } else {
        // Percentages not given -> even distribution
        fuel_string = messages[ fuel_percent * size / 100 ];
    }

    return fuel_string;

} /* current_fuel_message() */

/**
 * The empty message is a string used to describe the lightable
 * when it is out of fuel.  It should be on the form
 * "is burnt to a stub." to fit both the_short() +" "+ msg
 * and "It "+ msg.
 */
void set_empty_mess( string msg ) { empty_mess = msg; }

/**
 * @return String empty_mess
 */
string query_empty_mess() { return empty_mess; }

/**
 * The brightness is the number used in set_light(),
 * ie how brightly the lightable shines when lit.
 */
void set_brightness( int i ) { brightness = i; }

/**
 * @return How brightly the object shines when lit
 */
int query_brightness() { return brightness; }

/**
 * @param hands The number of hands required to hold the object when lit
 * Any non-zero value will cause the ho_ld command to be executed,
 * so use set_no_limbs( 2 ) as usual for two-handed weapons.
 * I guess what I'm really trying to say is that a 0 will not require
 * the object to be held and any other value will.
 *
 * In winter darkness<br>
 * Gruper lights a cheerful flame<br>
 * It smells like honey<br>
 */
void set_hold_required( int hands ) { hold = hands; }

/**
 * @return number of hands required to hold object when lit
 */
int query_hold_required() { return hold; }

/** @ignore */
string extra_look() {
    string lit_str;

    if( lit )
        lit_str = "It is lit.  ";
    else
        lit_str = "It is not currently lit.  ";

    return lit_str+current_fuel_message()+"\n";

} /* extra_look() */

/** @ignore */
mixed query_dynamic_auto_load() {
    return ([ "::" : ::query_dynamic_auto_load(),
              "fuel" : fuel,
              "lit" : lit,
           ]);
} /* query_dynamic_auto_load() */

/** @ignore */
void init_dynamic_arg(mapping arg, object bing ) {
    fuel = arg["fuel"];
    ::init_dynamic_arg(arg["::"], bing );
    set_lit(arg["lit"]);
} /* init_dynamic_arg() */

/** @ignore */
void consume_fuel() {
    // By using FUEL_TIME we make sure that 1 unit of fuel = 1 second.
    fuel -= FUEL_TIME;
    if( fuel < 1 )
        out_of_fuel();
} /* consume_fuel() */

/** @ignore */
int query_value() {
    return (int)( ::query_value() * fuel / max_fuel );
} /* query_value() */

/** @ignore */
varargs int move( mixed dest, string messin, string messout ) {
    object destination;

    if( objectp( dest ) )
        destination = dest;
    else
        destination = load_object(dest);

    // This object is entering a place that may be, ah, hostile
    // to open flames, i.e. containers (that are not people) and
    // water rooms.
    if( ( inherits( "/std/container", destination ) &&
        !living( destination ) ) ||
        inherits("/std/uwater", destination ) ||
        inherits("/std/water_inside", destination ) ||
        inherits("/std/water_outside", destination ) ) {
        set_lit( 0 );
    }

    return ::move( dest, messin, messout );

} /* move() */