move the bank script into its own function

1 files changed, 1 insertions, 73 deletions

diff --git a/npc/001-2-19/lloyd.txt b/npc/001-2-19/lloyd.txt
index 46002411..96106e80 100644
--- a/npc/001-2-19/lloyd.txt
+++ b/npc/001-2-19/lloyd.txt
@@ -158,78 +158,6 @@
         } while (.@q == 2);
     }
 
-    function bank_account {
-        speech 5,
-            l("Fine, what do you want to do with your money?");
-
-        do
-        {
-            .@q = select (l("Deposit."),
-                         l("Withdraw."),
-                         l("Check my balance."),
-                         l("I'm done."));
-            switch (.@q)
-            {
-                case 1:
-                    speech 1,
-                        l("Enter the amount that you want to deposit.");
-                    mes "";
-
-                    input .@amount;
-                    if (.@amount < 1)
-                    {
-                        speech 5,
-                            l("Please enter a valid amount.");
-                        continue;
-                    }
-                    if (.@amount > Zeny)
-                    {
-                        speech 5,
-                            l("You do not have enough Esperin on yourself.");
-                        continue;
-                    }
-                    set Zeny, Zeny - .@amount;
-                    set #MerchantBank, #MerchantBank + .@amount;
-
-                    speech 5,
-                        l("You made a cash deposit of @@ E.", .@amount);
-
-                    break;
-                case 2:
-                    speech 1,
-                        l("Enter the amount that you want to withdraw.");
-                    mes "";
-
-                    input .@amount;
-                    if (.@amount < 1)
-                    {
-                        speech 5,
-                            l("Please enter a valid amount.");
-                        continue;
-                    }
-                    if (.@amount > #MerchantBank)
-                    {
-                        speech 5,
-                            l("You do not have enough Esperin on your bank account.");
-                        continue;
-                    }
-                    set #MerchantBank, #MerchantBank - .@amount;
-                    set Zeny, Zeny + .@amount;
-
-                    speech 5,
-                        l("You withdrawn a total of @@ E.", .@amount);
-
-                    break;
-                case 3:
-                    speech 5,
-                        l("You currently have @@ on your bank account.", #MerchantBank);
-                    break;
-                case 4:
-                    break;
-            }
-        } while (.@q != 4);
-    }
-
     if (getq (ArtisQuests_Lloyd) == 0)
     {
         first_visit;
@@ -266,7 +194,7 @@
                 close;
                 break;
             case 3:
-                bank_account;
+                MerchantGuild_Bank;
                 break;
             case 4:
                 mes "";