SCENE 207 bank, SCENE, "Everspace Intergalactic Bank"
ACTOR 1, "Bank Guard", act3, 3, 50, 70
IF GS, @continue
@nogss
1: You are not a Golden Soul, and therefore cannot use the Everspace Intergalactic Bank.
END
@continue
1: Welcome to the bank, %1.
COMPARE #<a>, "1"
IF= @normal
1: Here, you can deposit any amount of money.
SET money, "0"
SET a, "0"
1: When you enter the bank after this, you will have a few choices.
1: The first is to deposit.  You mearly click "Deposit" To give money to the bank.
1: The second option is to "Withdraw".  This allows you to take money *out* of the bank.
SET a, "1"
@normal
1: Your current balance is #<money> Gold.
1: Right click me to bring this menu back up at any time.
@eventActorClick1
IF -GS, @nogss
MENU "Deposit=@deposit","Withdraw=@withdraw","Exit=@exit"
END
@deposit
1: How much money would you like to deposit? (Enter the amount)
SET deposit, "0"
ASK 9999999
SET deposit, "#<lastAsk>"
IF G#<deposit>, @continued
1: You do not have that much money.
GOTO @deposit
END
@continued
1: You would like to deposit #<deposit>? (YES/NO)
IF NO, @no
IF -G#<deposit>, @nogo
1: Okay, please wait a moment..
TAKE G#<deposit>
ADD money, "#<deposit>"
1: Thank you for your deposit.
GOTO @normal
END
@withdraw
1: How much money would you like to withdraw? (Enter the amount)
SET withdraw, "0"
ASK 99999
SET withdraw, "#<lastAsk>"
COMPARE #<money>, #<withdraw>
IF> @continuew
IF= @continuew
1: You do not have that much money deposited.  Your current balance is #<money>.
GOTO @withdraw
END
@continuew
1: You would like to withdraw #<withdraw> Gold? (YES/NO)
IF No, @no
1: Okay, one moment please.
GIVE G#<withdraw>
SUB money, #<withdraw>
1: Thank you for using our bank!
GOTO @normal
END 
@no
1: No? Okay.
GOTO @normal
END
@nogo
1: You no longer have enough money.
GOTO @normal
END
@exit
1: Thank you for using the bank.
END