Change the banker to use integer input instead of a menu

1 files changed, 6 insertions, 121 deletions

diff --git a/npc/functions/banker.txt b/npc/functions/banker.txt
index 4967263a..62408cd6 100644
--- a/npc/functions/banker.txt
+++ b/npc/functions/banker.txt
@@ -15,134 +15,19 @@ L_Dep:
 	mes "[" + @npcName$ + "]";
 	mes "\"How much would you like to deposit?\"";
 	next;
-	menu
-		"1,000 GP", D_1,
-		"5,000 GP", D_5,
-		"10,000 GP", D_10,
-		"25,000 GP", D_25,
-		"50,000 GP", D_50,
-		"100,000 GP", D_100, 
-		"250,000 GP", D_250,
-		"500,000 GP", D_500,
-		"1,000,000 GP", D_1000,
-		"All of my money", D_All,
-		"I've changed my mind", L_Nev;
-
-D_1:
-	if (zeny<1000) goto L_NoMoney;
-	set @Amount, 1000;
-	goto L_Deposit;
-D_5:
-	if (zeny<5000) goto L_NoMoney;
-	set @Amount, 5000;
-	goto L_Deposit;
-D_10:
-	if (zeny<10000) goto L_NoMoney;
-	set @Amount, 10000;
-	goto L_Deposit;
-D_25:
-	if (zeny<25000) goto L_NoMoney;
-	set @Amount, 25000;
-	goto L_Deposit;
-D_50:
-	if (zeny<50000) goto L_NoMoney;
-	set @Amount, 50000;
-	goto L_Deposit;
-D_100:
-	if (zeny<100000) goto L_NoMoney;
-	set @Amount, 100000;
-	goto L_Deposit;
-D_250:
-	if (zeny<250000) goto L_NoMoney;
-	set @Amount, 250000;
-	goto L_Deposit;
-D_500:
-	if (zeny<500000) goto L_NoMoney;
-	set @Amount, 500000;
-	goto L_Deposit;
-D_1000:
-	if (zeny<1000000) goto L_NoMoney;
-	set @Amount, 1000000;
-	goto L_Deposit;
-D_All:
-	if (zeny<1) goto L_NoMoney;
-	set @Amount, zeny;
-	goto L_Deposit;
-
-L_Deposit:
+	input @Amount;
+	
 	if (zeny < @Amount) goto L_NoMoney;
 	set zeny, zeny - @Amount;
 	set #BankAccount, #BankAccount + @Amount;
-		goto L_Balance;
+	goto L_Balance;
 	
 L_With:
 	mes "[" + @npcName$ + "]";
 	mes "\"How much would you like to withdraw?\"";
 	next;
-	menu
-		"1,000 GP", W_1,
-		"5,000 GP", W_5,
-		"10,000 GP", W_10,
-		"25,000 GP", W_25,
-		"50,000 GP", W_50,
-		"100,000 GP", W_100,
-		"250,000 GP", W_250,
-		"500,000 GP", W_500,
-		"1,000,000 GP", W_1000,
-		"All of my money", W_All,
-		"I've changed my mind", L_Nev;
-
-W_1:
-	if (#BankAccount < 1000) goto L_NoMoney;
-	set @Amount, 1000;
-	goto L_Withdraw;
-
-W_5:
-	if (#BankAccount < 5000) goto L_NoMoney;
-	set @Amount, 5000;
-	goto L_Withdraw;
-
-W_10:
-	if (#BankAccount < 10000) goto L_NoMoney;
-	set @Amount, 10000;
-	goto L_Withdraw;
-
-W_25:
-	if (#BankAccount < 25000) goto L_NoMoney;
-	set @Amount, 25000;
-	goto L_Withdraw;
-
-W_50:
-	if (#BankAccount < 50000) goto L_NoMoney;
-	set @Amount, 50000;
-	goto L_Withdraw;
-
-W_100:
-	if (#BankAccount < 100000) goto L_NoMoney;
-	set @Amount, 100000;
-	goto L_Withdraw;
-
-W_250:
-	if (#BankAccount < 250000) goto L_NoMoney;
-	set @Amount, 250000;
-	goto L_Withdraw;
-
-W_500:
-	if (#BankAccount < 500000) goto L_NoMoney;
-	set @Amount, 500000;
-	goto L_Withdraw;
-
-W_1000:
-	if (#BankAccount < 1000000) goto L_NoMoney;
-	set @Amount, 1000000;
-	goto L_Withdraw;
-
-W_All:
-	if (#BankAccount < 1) goto L_NoMoney;
-	set @Amount, #BankAccount;
-	goto L_Withdraw;
-
-L_Withdraw:
+	input @Amount;
+	
 	set zeny, zeny + @Amount;
 	set #BankAccount, #BankAccount - @Amount;
 	goto L_Balance;
@@ -162,7 +47,7 @@ L_NoMoney:
 	mes "[" + @npcName$ + "]";
 	mes "\"Oh dear, it seems that you don't have enough money.\"";
 	return;
-
+	
 S_MoveAccount:
 	set #BankAccount, #BankAccount + BankAccount;
 	set BankAccount, 0;