// ======================================================================

trigger OnAttach()
{
	debugSpeakMsg(self, "money test script attached.");
	return SCRIPT_CONTINUE;
}

// ----------------------------------------------------------------------

trigger OnHearSpeech(obj_id speaker, string text)
{
	dictionary d = new dictionary();

	if ( text == "from_named" )
	{
		boolean boolReturn = transferBankCreditsFromNamedAccount("slush_fund", self, 1000, null, null, null);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	if ( text == "to_named" )
	{
		boolean boolReturn = transferBankCreditsToNamedAccount(self, "slush_fund", 1000, null, null, null);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	if ( text == "cash_to_object" )
	{
		boolean boolReturn = transferCashTo(self, obj_id.getObjId(200025), 1000, null, null, null);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	if ( text == "bank_to_object" )
	{
		boolean boolReturn = transferBankCreditsTo(self, obj_id.getObjId(200025), 1000, null, null, null);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	if ( text == "withdraw" )
	{
		boolean boolReturn = withdrawCashFromBank(self, 1000, null, null, null);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	if ( text == "deposit" )
	{
		boolean boolReturn = depositCashToBank(self, 1000, null, null, null);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	// Callback versions

   if ( text == "from_named_callback" )
	{
		boolean boolReturn = transferBankCreditsFromNamedAccount("slush_fund", self, 1000, "success", "fail", d);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	if ( text == "to_named_callback" )
	{
		boolean boolReturn = transferBankCreditsToNamedAccount(self, "slush_fund", 1000, "success", "fail", d);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	if ( text == "cash_to_object_callback" )
	{
		boolean boolReturn = transferCashTo(self, obj_id.getObjId(200025), 1000, "success", "fail", d);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	if ( text == "bank_to_object_callback" )
	{
		boolean boolReturn = transferBankCreditsTo(self, obj_id.getObjId(200025), 1000, "success", "fail", d);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	if ( text == "withdraw_callback" )
	{
		boolean boolReturn = withdrawCashFromBank(self, 1000, "success", "fail", d);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	if ( text == "deposit_callback" )
	{
		boolean boolReturn = depositCashToBank(self, 1000, "success", "fail", d);
		if ( boolReturn )
		{
			   debugSpeakMsg(self, "returned true.");
		}
		else
		{
			debugSpeakMsg(self, "returned false.");
		}
	}

	return SCRIPT_CONTINUE;
}

// ----------------------------------------------------------------------

messageHandler success()
{
   debugSpeakMsg(self, "Got success message.");

	return SCRIPT_CONTINUE;
}

// ----------------------------------------------------------------------

messageHandler fail()
{
   debugSpeakMsg(self, "Got fail message.");

	return SCRIPT_CONTINUE;
}

// ======================================================================