#include <lib.h>
#include <message_class.h>

inherit LIB_DAEMON;

#define MONEY_DIR "/accounts/"

mapping account;

mixed cmd(string args) {
    string file;
    float net_worth, max_worth;

    file = MONEY_DIR + (string)previous_object()->GetKeyName();
    account = ([]);
    if( !file_exists(file + __SAVE_EXTENSION__) )
	return "You have no bank account on the old Dead Souls.";
    restore_object(file);
    foreach(string bank, mapping data in account) {
	foreach(string curr, int val in data) {
	    float tmp;

	    if( curr == "time" || curr == "transaction" ) continue;
	    if( (tmp = currency_rate(curr)) < 1 ) continue;
	    net_worth += val / tmp;
	}
    }
    max_worth = (int)previous_object()->GetLevel() * 2000;
    if( net_worth  > max_worth ) net_worth = max_worth;
    if( previous_object()->AddBank("Mariner's Bank of Praxis", "electrum",
	to_int(currency_value(net_worth, "electrum")))
      < 0 ) return "An error occurred in conversion.";
    unguarded((: rm, file + __SAVE_EXTENSION__ :));
    previous_object()->eventPrint("You should now save, since a game crash "
      "between now and your next save will "
      "lose all money frm your newly created "
      "Praxis account without allowing you to "
      "convert again.", MSG_SYSTEM);
    return 1;
}

string GetHelp(string str) {
    return ("Syntax: <mc>\n\n"
      "For people with old Dead Souls bank accounts, this allows "
      "you to convert that bank account over into "
      "the Mariner's Bank of Praxis.");
}