Add guard devoir dayli quest

1 files changed, 91 insertions, 0 deletions

diff --git a/npc/003-10/guarddevoir.txt b/npc/003-10/guarddevoir.txt
new file mode 100644
index 000000000..52d8a16ee
--- /dev/null
+++ b/npc/003-10/guarddevoir.txt
@@ -0,0 +1,91 @@
+// TMW2 Script
+// Author:
+//  Jesusalva
+//  Saulc
+// Description:
+//      Guard ask you to clean the cave of red scorpion. bring him some red scorpion stingers to prove you do it well.
+// Variable:
+//      TulimsharQuest_Devoir
+
+003-10,25,60,0	script	Guard Devoir	NPC_ELF_F,{
+
+    mesn;
+    mesq l("that's incredible! Monsters are now close to city gate! We need to stop them progression.");
+    if (BaseLevel >= 25) goto L_Menu;
+    close;
+
+L_Menu:
+    mes "[Guard Devoir]";
+    mesq l("Would you like to help us a protection the town of red scorpion invasion ??");
+    mes "";
+    menu
+        l("Yeah sure ! I'm brave as Simon"),L_Quest,
+        l("Where can i found them?"),L_Where,
+        l("No, thanks."),L_Close;
+
+L_Quest:
+    mes "";
+    .@q=getq(TulimsharQuest_Devoir);
+    mesq l("Nice ! I want you to kill some red scorpion! Mostly male!");
+    next;
+    if (.@q == 0) goto L_Continue;
+    if (.@q == 1 && gettimetick(2) >= DEVOIR_TIMER + 60 * 60 * 40) setq TulimsharQuest_Devoir, 2;
+    if (.@q == 2) goto L_Repeat;
+    close;
+
+L_Continue:
+    mesq l("Red Scorpion breed fast as Ratto! With small amount of guard, it's impossible to take over.");
+    next;
+    mesq l("To prove you help us in this purge i ask you to bring me 14 @@? I will reward you for your bravor.", getitemlink(RedScorpionStinger));
+    mes "";
+    menu
+        rif(countitem(MaggotSlime) >= 7, l("Here they are miss!")), L_Finish,
+        l("I'll get to it."), L_Close;
+    close; // double sure
+
+L_Repeat:
+    mesq l("How your purge was ? i hope you success it!.");
+    next;
+    mesq l("Bring me 7 @@?", getitemlink(RedScorpionStinger));
+    mes "";
+    menu
+        rif(countitem(RedScorpionStinger) >= 7, l("Here they are miss!")), L_Finish2,
+        l("I'll get to it."), L_Close;
+    close;
+
+L_Finish2:
+    delitem RedScorpionStinger, 7;
+    getexp 999, 0;
+    Zeny = (Zeny + 680); // 70*7 = 490 base
+    setq TulimsharQuest_Devoir, 1;
+    set DEVOIR_TIMER, gettimetick(2);
+    mes "";
+    mesn;
+    mesq l("Many thanks! Come back later to bring me extra @@!", getitemlink(RedScorpionStinger));
+    close;
+
+L_Finish:
+    delitem RedScorpionStinger, 14;
+    getexp 1555, 10;
+    Zeny = (Zeny + 1410); // 70*14 = 980 base
+    setq TulimsharQuest_Devoir, 1;
+    set DEVOIR_TIMER, gettimetick(2);
+    mes "";
+    mesn;
+    mesq l("Many thanks! Come back later to bring me extra @@!", getitemlink(RedScorpionStinger));
+    close;
+
+L_Where:
+    mes "";
+    mesq l("Ah, their is lot of in miner cave?");
+    next;
+    mes l("Be aware to don't attack them when they are in group!.");
+    next;
+    mes l("Good luck.");
+    goto L_Close;
+
+L_Close:
+    closedialog;
+    goodbye;
+    close;
+}