dsIIr4/bin/
dsIIr4/extra/creremote/
dsIIr4/extra/wolfpaw/
dsIIr4/lib/cmds/admins/
dsIIr4/lib/cmds/common/
dsIIr4/lib/cmds/creators/include/
dsIIr4/lib/cmds/creators/include/SCCS/
dsIIr4/lib/daemon/services/
dsIIr4/lib/doc/
dsIIr4/lib/domains/Ylsrim/
dsIIr4/lib/domains/Ylsrim/adm/
dsIIr4/lib/domains/Ylsrim/armor/
dsIIr4/lib/domains/Ylsrim/broken/
dsIIr4/lib/domains/Ylsrim/fish/
dsIIr4/lib/domains/Ylsrim/meal/
dsIIr4/lib/domains/Ylsrim/npc/
dsIIr4/lib/domains/Ylsrim/virtual/
dsIIr4/lib/domains/Ylsrim/weapon/
dsIIr4/lib/domains/campus/adm/
dsIIr4/lib/domains/campus/etc/
dsIIr4/lib/domains/campus/meals/
dsIIr4/lib/domains/campus/npc/
dsIIr4/lib/domains/campus/save/
dsIIr4/lib/domains/campus/txt/
dsIIr4/lib/domains/campus/txt/ai/charles/
dsIIr4/lib/domains/campus/txt/ai/charles/bak2/
dsIIr4/lib/domains/campus/txt/ai/charles/bak2/bak1/
dsIIr4/lib/domains/campus/txt/ai/charly/
dsIIr4/lib/domains/campus/txt/ai/charly/bak/
dsIIr4/lib/domains/campus/txt/jenny/
dsIIr4/lib/domains/default/creator/
dsIIr4/lib/domains/default/doors/
dsIIr4/lib/domains/default/etc/
dsIIr4/lib/domains/default/virtual/
dsIIr4/lib/domains/default/weap/
dsIIr4/lib/domains/town/virtual/
dsIIr4/lib/lib/comp/
dsIIr4/lib/lib/lvs/
dsIIr4/lib/lib/user/
dsIIr4/lib/lib/virtual/
dsIIr4/lib/log/
dsIIr4/lib/obj/book_source/
dsIIr4/lib/obj/include/
dsIIr4/lib/realms/template/
dsIIr4/lib/realms/template/adm/
dsIIr4/lib/realms/template/area/armor/
dsIIr4/lib/realms/template/area/npc/
dsIIr4/lib/realms/template/area/obj/
dsIIr4/lib/realms/template/area/room/
dsIIr4/lib/realms/template/area/weap/
dsIIr4/lib/realms/template/bak/
dsIIr4/lib/realms/template/cmds/
dsIIr4/lib/save/
dsIIr4/lib/save/kills/o/
dsIIr4/lib/secure/cfg/classes/
dsIIr4/lib/secure/cmds/creators/include/
dsIIr4/lib/secure/cmds/players/
dsIIr4/lib/secure/cmds/players/include/
dsIIr4/lib/secure/daemon/include/
dsIIr4/lib/secure/lib/
dsIIr4/lib/secure/lib/include/
dsIIr4/lib/secure/lib/net/include/
dsIIr4/lib/secure/lib/std/
dsIIr4/lib/secure/modules/
dsIIr4/lib/secure/npc/
dsIIr4/lib/secure/obj/include/
dsIIr4/lib/secure/room/
dsIIr4/lib/secure/save/
dsIIr4/lib/secure/save/boards/
dsIIr4/lib/secure/save/players/g/
dsIIr4/lib/secure/tmp/
dsIIr4/lib/secure/verbs/creators/
dsIIr4/lib/shadows/
dsIIr4/lib/spells/
dsIIr4/lib/std/board/
dsIIr4/lib/std/lib/
dsIIr4/lib/tmp/
dsIIr4/lib/verbs/admins/include/
dsIIr4/lib/verbs/common/
dsIIr4/lib/verbs/common/include/
dsIIr4/lib/verbs/creators/include/
dsIIr4/lib/verbs/players/include/SCCS/
dsIIr4/lib/verbs/rooms/
dsIIr4/lib/verbs/rooms/include/
dsIIr4/lib/www/
dsIIr4/v22.2b14-dsouls2/
dsIIr4/v22.2b14-dsouls2/ChangeLog.old/
dsIIr4/v22.2b14-dsouls2/Win32/
dsIIr4/v22.2b14-dsouls2/compat/
dsIIr4/v22.2b14-dsouls2/compat/simuls/
dsIIr4/v22.2b14-dsouls2/include/
dsIIr4/v22.2b14-dsouls2/mudlib/
dsIIr4/v22.2b14-dsouls2/testsuite/
dsIIr4/v22.2b14-dsouls2/testsuite/clone/
dsIIr4/v22.2b14-dsouls2/testsuite/command/
dsIIr4/v22.2b14-dsouls2/testsuite/data/
dsIIr4/v22.2b14-dsouls2/testsuite/etc/
dsIIr4/v22.2b14-dsouls2/testsuite/include/
dsIIr4/v22.2b14-dsouls2/testsuite/inherit/
dsIIr4/v22.2b14-dsouls2/testsuite/inherit/master/
dsIIr4/v22.2b14-dsouls2/testsuite/log/
dsIIr4/v22.2b14-dsouls2/testsuite/single/
dsIIr4/v22.2b14-dsouls2/testsuite/single/tests/compiler/
dsIIr4/v22.2b14-dsouls2/testsuite/single/tests/efuns/
dsIIr4/v22.2b14-dsouls2/testsuite/single/tests/operators/
dsIIr4/v22.2b14-dsouls2/testsuite/u/
dsIIr4/v22.2b14-dsouls2/tmp/
dsIIr4/win32/
#include <lib.h>
#include <vendor_types.h>
inherit LIB_ITEM;
private int charge,rechargeable, drainable,drainrate,fullcharge;
private string powertype,celltype;

int Spent(){
    string *tmp;
    if(rechargeable == 1) return 1;
    if(!charge || charge <= 0){
	charge = 0;
	SetShort("a spent power cell");
	tmp = GetAdjectives();
	tmp += ({"spent", "empty", "drained", "used"});
	SetAdjectives(tmp);
    }
    return 1;
}


void create(){
    ::create();
    AddSave( ({ "charge" }) );
    SetKeyName("cell");
    SetId(({"battery"}));
    SetAdjectives(({"power","generic"}));
    SetShort("a generic power cell");
    SetLong("This is a generic power cell.");
    SetMass(1);
    SetBaseCost(4);
    SetVendorType(VT_TREASURE);
    rechargeable=0;
    drainable = 1;
    drainrate = 1;
    Spent();
}

void init(){
    ::init();
    if(living(environment(this_object())) ) this_object()->eventUse(0);
    if( charge < 200 ) SetBaseCost(0);
    Spent();
}

int SetPowerType(string str) {powertype=str; return 1; }
int SetCellType(string str) {celltype=str; return 1; }
int SetCharge(int i) {charge = i; fullcharge = i; return 1; }
int GetCharge() { return charge; }
string GetPowerType() { return powertype; }
string GetCellType() { return celltype; }
int SetRechargeable(int i) { rechargeable = i; return i;}
int GetRechargeable() { return rechargeable;}
int SetDrainable(int i) { drainable = i; return i; }
int GetDrainable() { return drainable; }
int SetDrainRate(int i) { drainrate = i; return i; }
int GetDrainRate() { return drainrate; }


int ModCharge(int i) {
    if(!charge) charge = 0;
    if(i) charge += i;
    return charge;
}

int eventDrain(int i){
    if( drainable != 1 ) return 0;
    if(!charge) charge = 0;
    if(charge && charge > 0) charge -= i;
    if(charge && charge < 0) Spent();
    if(!charge) Spent();
    if( charge < 200 ) SetBaseCost(0);
    return charge;
}

int eventCharge(int i){
    if(!charge) charge =0;
    if(i) charge += i;
    return charge;
}

int eventUse(int i){
    if(i == 0) {
	set_heart_beat(0);
	return 1;
    }
    if(!drainable) drainable = 1;
    if(drainable && drainable == 0) drainrate = 0;
    else if(!drainable) drainable = 1;
    if( !i || !intp(i) ) i = drainrate;
    set_heart_beat(i);
}

void heart_beat(){
    eventDrain(GetDrainRate() || 1);
}