Fix Estard, and allow Guild Creation

1 files changed, 44 insertions, 9 deletions

diff --git a/npc/003-2/estard.txt b/npc/003-2/estard.txt
index 28d1c3042..023a6163d 100644
--- a/npc/003-2/estard.txt
+++ b/npc/003-2/estard.txt
@@ -3,6 +3,9 @@
 //    Jesusalva
 // Description:
 //    Manages party and guild.
+// General_Janus
+//  0 - Allows Party Creation
+//  1 - Allows Guild Creation, Party is already allowed
 
 // Evol scripts.
 // Author:
@@ -11,7 +14,7 @@
 003-2,32,34,0	script	Estard	NPC_PLAYER,{
 
     function create_party {
-        .@party_price = 10000;
+        .@party_price = 7500;
 
         speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
             l("Creating a party has some advantages, it's a pretty good choice!"),
@@ -29,7 +32,7 @@
             else
             {
                 Zeny = Zeny - .@party_price;
-                setq General_Janus, 2;
+                setq General_Janus, 1;
                 skill NV_BASIC, 7, 0;
 
                 speech S_FIRST_BLANK_LINE | S_LAST_NEXT, l("Awesome, come back if you ever want to create a larger group!");
@@ -37,7 +40,35 @@
         }
     }
 
-   
+
+    function create_guild {
+        .@guild_price = 100000;
+
+        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+            l("Creating a guild is not for the faint of heart. You cannot share experience or drops."),
+            l("But it is a massive organization, recognized by everyone. Guilds train with other guilds, for huge profits."),
+            l("It is often easier to get invited by someone, but if you want to create it, you're free to. Remember guilds also have a player limit."),
+            l("Just like parties, you can create from Social menu, but there is a catch: I will give you a document, which allows you to create ONE GUILD."),
+            l("Shall you disband your guild for whatever reason, you'll need to pay again. No refunds. No complaining."),
+            l("The cost to create a guild is @@ GP.", .@guild_price);
+
+        if (askyesno() == 1)
+        {
+            if (Zeny < .@guild_price)
+            {
+                speech S_FIRST_BLANK_LINE | S_LAST_NEXT, l("You don't have enough money, bring me @@ GP or join an already existing one.", .@guild_price);
+            }
+            else
+            {
+                inventoryplace Emperium, 1;
+                Zeny = Zeny - .@guild_price;
+                getitem Emperium, 1;
+
+                speech(S_FIRST_BLANK_LINE | S_LAST_NEXT, l("Awesome, here is the certificate! Choose guild name wisely, because there are no refunds, even if you lose it!"));
+            }
+        }
+    }
+
     function explain_service {
         speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
             l("Welcome to the Town Hall. I am @@, officer in charge of public associations.", .name$),
@@ -56,26 +87,30 @@
     do
     {
         // Beta users by-pass check.
-        if (getskilllv(NV_BASIC) > 6 && getq(General_Janus) == 1)
+        if (getskilllv(NV_BASIC) > 6 && !getq(General_Janus))
         {
-            setq General_Janus, 2;
+            setq General_Janus, 1;
         }
 
         select
-            rif(getq(General_Janus) == 1, l("I would like to create a party.")),
             l("What service do you offer?"),
+            rif(!getq(General_Janus), l("I would like to create a party.")),
+            rif(getq(General_Janus) && getcharid(2) <= 0 && countitem(Emperium) == 0, l("I would like to create a guild.")),
             menuaction(l("Quit"));
 
         switch (@menu)
         {
             case 1:
-                create_party;
+                explain_service;
                 break;
             case 2:
-                explain_service;
+                create_party;
+                break;
+            case 3:
+                create_guild;
                 break;
         }
-    } while (@menu != 3);
+    } while (@menu != 4);
 
     closedialog;
     goodbye;