dsII/extra/wolfpaw/
dsII/lib/cmds/admins/
dsII/lib/cmds/common/
dsII/lib/cmds/creators/include/
dsII/lib/cmds/creators/include/SCCS/
dsII/lib/daemon/services/
dsII/lib/doc/
dsII/lib/domains/Ylsrim/
dsII/lib/domains/Ylsrim/adm/
dsII/lib/domains/Ylsrim/armor/
dsII/lib/domains/Ylsrim/broken/
dsII/lib/domains/Ylsrim/fish/
dsII/lib/domains/Ylsrim/meal/
dsII/lib/domains/Ylsrim/npc/
dsII/lib/domains/Ylsrim/virtual/
dsII/lib/domains/Ylsrim/weapon/
dsII/lib/domains/campus/adm/
dsII/lib/domains/campus/etc/
dsII/lib/domains/campus/meals/
dsII/lib/domains/campus/npc/
dsII/lib/domains/campus/txt/
dsII/lib/domains/campus/txt/ai/charles/
dsII/lib/domains/campus/txt/ai/charles/bak2/
dsII/lib/domains/campus/txt/ai/charles/bak2/bak1/
dsII/lib/domains/campus/txt/ai/charly/
dsII/lib/domains/campus/txt/ai/charly/bak/
dsII/lib/domains/campus/txt/jenny/
dsII/lib/domains/default/creator/
dsII/lib/domains/default/doors/
dsII/lib/domains/default/etc/
dsII/lib/domains/default/weap/
dsII/lib/domains/town/doors/
dsII/lib/domains/town/txt/
dsII/lib/domains/town/virtual/
dsII/lib/lib/comp/
dsII/lib/lib/lvs/
dsII/lib/lib/user/
dsII/lib/lib/virtual/
dsII/lib/log/archive/
dsII/lib/log/chan/
dsII/lib/log/errors/
dsII/lib/log/open/
dsII/lib/obj/book_source/
dsII/lib/obj/include/
dsII/lib/realms/template/
dsII/lib/realms/template/area/armor/
dsII/lib/realms/template/area/npc/
dsII/lib/realms/template/area/obj/
dsII/lib/realms/template/area/room/
dsII/lib/realms/template/area/weap/
dsII/lib/realms/template/bak/
dsII/lib/realms/template/cmds/
dsII/lib/save/
dsII/lib/save/kills/o/
dsII/lib/secure/cfg/
dsII/lib/secure/cfg/classes/
dsII/lib/secure/cfg/races/SCCS/
dsII/lib/secure/cmds/creators/include/
dsII/lib/secure/cmds/players/
dsII/lib/secure/cmds/players/include/
dsII/lib/secure/daemon/include/
dsII/lib/secure/lib/
dsII/lib/secure/lib/include/
dsII/lib/secure/lib/net/
dsII/lib/secure/lib/net/include/
dsII/lib/secure/lib/std/
dsII/lib/secure/modules/
dsII/lib/secure/npc/
dsII/lib/secure/obj/include/
dsII/lib/secure/room/
dsII/lib/secure/save/boards/
dsII/lib/secure/save/postal/c/cratylus/
dsII/lib/secure/save/votes/
dsII/lib/secure/tmp/
dsII/lib/secure/verbs/creators/
dsII/lib/shadows/
dsII/lib/spells/
dsII/lib/tmp/
dsII/lib/verbs/admins/include/
dsII/lib/verbs/common/
dsII/lib/verbs/common/include/
dsII/lib/verbs/creators/include/
dsII/lib/verbs/players/include/SCCS/
dsII/lib/verbs/rooms/
dsII/lib/verbs/rooms/include/
dsII/lib/www/
dsII/v22.2b14/
dsII/v22.2b14/Win32/
dsII/v22.2b14/compat/
dsII/v22.2b14/compat/simuls/
dsII/v22.2b14/testsuite/
dsII/v22.2b14/testsuite/clone/
dsII/v22.2b14/testsuite/command/
dsII/v22.2b14/testsuite/data/
dsII/v22.2b14/testsuite/etc/
dsII/v22.2b14/testsuite/include/
dsII/v22.2b14/testsuite/inherit/
dsII/v22.2b14/testsuite/inherit/master/
dsII/v22.2b14/testsuite/log/
dsII/v22.2b14/testsuite/single/
dsII/v22.2b14/testsuite/single/tests/compiler/
dsII/v22.2b14/testsuite/single/tests/efuns/
dsII/v22.2b14/testsuite/single/tests/operators/
dsII/v22.2b14/testsuite/u/
dsII/v22.2b14/tmp/
dsII/win32/
/*  /lib/donate.c
 *  a donation box inheritable
 *  created by BillGates@Dead Souls 961023
 */

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

private int TotalAssets;
private string LocalCurrency, Owner;

static void create() {
    this_object()->AddSave( ({ "TotalAssets" }) );
    TotalAssets = 0;
}

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

string GetLong(string str) {
    string ret = "\nIt currently contains "+TotalAssets+" " +
    "coins and bills.";
    if(TotalAssets) return ret;
    else return "";
}

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(string amt, string type) {
    int amount;
    object tp = this_player();   

    if(sscanf(amt,"%d", amount) < 1) {
	write("That isn't a proper amount.");
	return 1;
    }

    if(!valid_currency(type)){
	write("That isn't a valid currency.");
	return 1;
    }

    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(GetOwner() + " is grateful "
      "for your donation.");
    if(living(this_object())) this_object()->eventForce("say Thank you!");
    return 1;
}