dsI/bin/
dsI/extra/creremote/
dsI/extra/mingw/
dsI/extra/wolfpaw/
dsI/fluffos-2.7-ds2.018/
dsI/fluffos-2.7-ds2.018/ChangeLog.old/
dsI/fluffos-2.7-ds2.018/Win32/
dsI/fluffos-2.7-ds2.018/compat/
dsI/fluffos-2.7-ds2.018/compat/simuls/
dsI/fluffos-2.7-ds2.018/testsuite/
dsI/fluffos-2.7-ds2.018/testsuite/clone/
dsI/fluffos-2.7-ds2.018/testsuite/command/
dsI/fluffos-2.7-ds2.018/testsuite/data/
dsI/fluffos-2.7-ds2.018/testsuite/etc/
dsI/fluffos-2.7-ds2.018/testsuite/include/
dsI/fluffos-2.7-ds2.018/testsuite/inherit/
dsI/fluffos-2.7-ds2.018/testsuite/inherit/master/
dsI/fluffos-2.7-ds2.018/testsuite/log/
dsI/fluffos-2.7-ds2.018/testsuite/single/
dsI/fluffos-2.7-ds2.018/testsuite/single/tests/compiler/
dsI/fluffos-2.7-ds2.018/testsuite/single/tests/efuns/
dsI/fluffos-2.7-ds2.018/testsuite/single/tests/operators/
dsI/fluffos-2.7-ds2.018/testsuite/u/
dsI/fluffos-2.7-ds2.018/tmp/
dsI/lib/cfg/
dsI/lib/cmds/common/
dsI/lib/cmds/creators/include/
dsI/lib/cmds/creators/include/SCCS/
dsI/lib/daemon/services/
dsI/lib/doc/
dsI/lib/domains/Ylsrim/
dsI/lib/domains/Ylsrim/adm/
dsI/lib/domains/Ylsrim/armour/
dsI/lib/domains/Ylsrim/broken/
dsI/lib/domains/Ylsrim/fish/
dsI/lib/domains/Ylsrim/meal/
dsI/lib/domains/Ylsrim/npc/
dsI/lib/domains/Ylsrim/virtual/
dsI/lib/domains/Ylsrim/weapon/
dsI/lib/domains/default/creator/
dsI/lib/domains/default/etc/
dsI/lib/domains/default/room/
dsI/lib/lib/comp/
dsI/lib/lib/lvs/
dsI/lib/lib/user/
dsI/lib/lib/virtual/
dsI/lib/obj/
dsI/lib/obj/include/
dsI/lib/realms/
dsI/lib/save/kills/a/
dsI/lib/save/kills/b/
dsI/lib/save/kills/f/
dsI/lib/save/kills/m/
dsI/lib/save/kills/q/
dsI/lib/save/kills/r/
dsI/lib/secure/cfg/
dsI/lib/secure/cfg/classes/
dsI/lib/secure/cfg/races/SCCS/
dsI/lib/secure/cmds/creators/include/
dsI/lib/secure/cmds/players/
dsI/lib/secure/cmds/players/include/
dsI/lib/secure/daemon/include/
dsI/lib/secure/lib/
dsI/lib/secure/lib/include/
dsI/lib/secure/lib/net/
dsI/lib/secure/lib/net/include/
dsI/lib/secure/lib/std/
dsI/lib/secure/obj/
dsI/lib/secure/obj/include/
dsI/lib/secure/save/
dsI/lib/spells/
dsI/lib/verbs/admins/include/
dsI/lib/verbs/common/
dsI/lib/verbs/common/include/
dsI/lib/verbs/creators/
dsI/lib/verbs/creators/include/
dsI/lib/verbs/players/include/SCCS/
dsI/lib/verbs/rooms/
dsI/lib/verbs/rooms/include/
dsI/lib/www/
dsI/v22.2b14/
dsI/win32/
/*  /lib/donate.c
 *  a donation box inheritable
 *  created by BillGates@Dead Souls 961023
 */

#include "include/donate.h"
#include <lib.h>

inherit LIB_ITEM;

private int TotalAssets;
private string LocalCurrency, Owner;

static void create() {
   item::create();
   this_object()->AddSave( ({ "TotalAssets" }) );
   TotalAssets = 0;
   SetPreventGet(1);
   SetMass(99999);
}

static void init() {
   item::init();
   if( (string)this_player()->ClassMember((string)GetOwner()) ||
       (string)this_player()->GetGuild() == (string)GetOwner() ) {
	  add_action( (: eventDonate :) , "donate" );
   }
}

string GetLong(string str) {
   string ret;
   ret = item::GetLong();
   ret += "\nIt currently contains "+TotalAssets+" " +
	(string)GetLocalCurrency() + ".";
   return ret;
}

string SetLocalCurrency(string currency) {
   return (LocalCurrency = currency);
}

string GetLocalCurrency() {return LocalCurrency;}

string SetOwner(string owner) {return (Owner = owner);}

string GetOwner() {return Owner;}   

int AddAssets(int amount) {
   TotalAssets += amount;
   return 1;
}

int GetAssets() {return TotalAssets;}   

int eventDonate(int amount, string type) {
   object tp = this_player();   

   if(!amount) {
     tp->eventPrint("Donate how much?\n");
     return 0;
   }   
   if(amount < 0) {
     tp->eventPrint("Nice try!\n");
     return 0;
   }
   if(type != GetLocalCurrency()) {
     tp->eventPrint("The " + pluralize(GetOwner()) +
	 " only deal in " + GetLocalCurrency() +
     	 ".\n");
     return 0;
   }
   if((int)tp->GetCurrency(type) < amount) {
     tp->eventPrint("You don't have that much " + type + "!\n");
     return 0;
   }
   tp->AddCurrency(type, -amount);
   AddAssets(amount);
   tp->eventPrint("The " + pluralize(GetOwner()) + " are greatful "
	"for your donation.");
   return 1;
}