//****************************************************************************
//SPHERE by : Menasoft ©1997-2000
//www.sphereserver.com
// All SPHERE script files and formats are copyright Menasoft & Partners.
// This file may be freely edited for personal use, but may not be distributed
// in whole or in part, in any format without express written permission from
// Menasoft & Partners.  All donations and contributions
// become the property of Menasoft & Partners.
//****************************************************************************
// FILE LAST UPDATED: Friday, April 28, 2000
[SPEECH jobBANKER]
ON=*job*
ON=*work*
ON=*what*do*do*
ON=*profession*
ON=*occupation*
SAY @946,,2 1014441

ON=*Balance*
SAY @,,2 1042759,<SRC.BANKBALANCE>

ON=hi
ON=hello*
ON=greetings*
ON=good*see*thee*
ON=Hail*
ON=Greet
	SAY @946,,2 1014497


ON=Bye
ON=Goodbye
ON=Farewell
	SAY @946,,2 1043028
	BYE
	return 1
ON=*Bank*
ON=DEPOSIT
ON=GOLD
ON=MONEY
ON=SILVER
ON=TRANSACTION
	src.BANKSELF

ON=check*
IF (!(<ISEMPTY <STREAT <ARGS>>>))
	IF (!(<ISNUM <STREAT <ARGS>>>))
	SAY @946,3,1 You must say a value for your check.
	ELSE
	LOCAL.VALUE=<STREAT <ARGS>>
		IF (<LOCAL.VALUE> > 1000000)
		SAY @,,2 1010007
		ELIF (<LOCAL.VALUE> < 5000)
		SAY @,,2 500383
		ELIF (<SRC.GOLD> < <LOCAL.VALUE>)
		SAY @,,2 500380
		ELSE
		SRC.SYSMESSAGELOC -1,1042765,<dLOCAL.VALUE>
		SERV.NEWITEM=i_check_exodus
		NEW.TAG0.GOLDVALUE=<LOCAL.VALUE>
		NEW.BOUNCE
		SRC.GOLD -= <LOCAL.VALUE>
		ENDIF
	ENDIF
ENDIF

[EOF]