1 files changed, 100 insertions, 0 deletions
diff --git a/npc/005-1/zegas.txt b/npc/005-1/zegas.txt
new file mode 100644
index 000000000..f2acc6a13
--- /dev/null
+++ b/npc/005-1/zegas.txt
@@ -0,0 +1,100 @@
+005-1,35,77,0	script	Zegas	NPC_MONA,{
+    .@q = getq(CandorQuest_Barrel);
+    if (.@q == 1)
+        goto L_Find;
+    if (.@q == 2)
+        goto L_Looking;
+    if (.@q == 3)
+        goto L_QuestEnd;
+    if (.@q == 4)
+        goto L_Thanks;
+    goto L_Meet;
+
+L_Meet:
+    mesn;
+    mesq l("Hey do you have a second?");
+    next;
+    mesq l("The storehouse here is over run with house maggots.");
+    next;
+    mesq l("Wouldn't you know it, the bug bomb Eomie gave us is in one of the store room barrels.");
+    next;
+    mesq l("Can you search the barrels for the bug bomb and set it off when you find it?");
+    setq CandorQuest_Barrel, 1;
+    menu
+        l("Sure."),L_Start,
+        l("Maybe some other time."),L_Close;
+
+L_Find:
+    mesn;
+    mesq l("The storehouse is still over run with house maggots.");
+    next;
+    mesq l("Please help me find the bug bomb Eomie gave us is in one of the store room barrels?");
+    menu
+        l("Sure."),L_Start,
+        l("Maybe some other time."),L_Close;
+
+L_Start:
+    mesn;
+    mesq l("Thanks, come back and see me once you found the bug bomb and set it off.");
+    setq CandorQuest_Barrel, 2;
+    goto L_Close;
+
+L_Looking:
+    mesn;
+    mesq l("Still haven't found it? Well keep looking I know it's in there, somewhere.");
+    goto L_Close;
+
+L_QuestEnd:
+    mesn;
+    mesq l("From the smell I can see you found the bug bomb!");
+    mesq l("Thanks once again, I know it's not much but here is 50 GP for your troubles.");
+    getexp 50, 0;
+    Zeny = (Zeny + 50);
+    setq CandorQuest_Barrel, 4;
+    goto L_Close;
+
+L_Thanks:
+    mesn;
+    mesq l("Thanks for Helping with clear out the store room!");
+    goto L_Close;
+
+L_Close:
+    close;
+
+OnInit:
+    .sex = G_FEMALE;
+    .distance = 2;
+    end;
+}
+
+005-1,32,73,0	script	ZegasDebug	NPC_MONA,{
+    showavatar NPC_MONA;  // this is handled by avatars.xml
+    mesn;
+    mesq l("Reset?");
+    next;
+    menu
+        l("Yes."),  L_Reset,
+        l("No."),   L_Close;
+
+L_Reset:
+    setq CandorQuest_Barrel, 0;
+    STARTAREA = STARTAREA &~ (1 << 2);
+    STARTAREA = STARTAREA &~ (1 << 3);
+    STARTAREA = STARTAREA &~ (1 << 4);
+    STARTAREA = STARTAREA &~ (1 << 5);
+    STARTAREA = STARTAREA &~ (1 << 6);
+    STARTAREA = STARTAREA &~ (1 << 7);
+    STARTAREA = STARTAREA &~ (1 << 8);
+    STARTAREA = STARTAREA &~ (1 << 9);
+    mes l("Reset!");
+    goto L_Close;
+
+L_Close:
+    //showavatar;  // Use this to hide the showavatar
+    close;
+
+//OnInit:
+    //if (!debug)
+    //    disablenpc "ZegasDebug";
+    //end;
+}