1 files changed, 66 insertions, 0 deletions
diff --git a/npc/031-2/tyrca.txt b/npc/031-2/tyrca.txt
new file mode 100644
index 000000000..a9125f2b2
--- /dev/null
+++ b/npc/031-2/tyrca.txt
@@ -0,0 +1,66 @@
+// TMW2 scripts.
+// Authors:
+//    Jesusalva
+// Description:
+//    Questmaker Handbook 14.0 (F = Favorable)
+
+031-2,77,77,0	script	Tyrca	NPC_SAVIOR_F,{
+    .@q = getq(AethyrQuest_Tyrca);
+    mesn;
+    mesq l("Welcome to Aethyr, strange traveler. I am a collector of rare gemstones.");
+    if (REBIRTH || BaseLevel > 90) {
+        if (.@q == 0 && countitem(LightGreenDiamond)) {
+            next;
+            mesn;
+            mesq l("...This %s you have there. I haven't seen one for a while.", getitemlink(LightGreenDiamond));
+            next;
+            mesn;
+            mesq l("I offer you either %s GP, or %s Monster Points for it. What do you say?", fnum(100000), fnum(40000));
+            next;
+            select
+                l("Sorry, I'll keep my gem."),
+                l("Sure, gimme the Gold."),
+                l("Sure, gimme the Monster Points."),
+                rif(REBIRTH, l("Can you give me half the gold and half the monster points?"));
+            mes "";
+            switch (@menu) {
+            case 2:
+                delitem LightGreenDiamond, 1;
+                Zeny+=100000;
+                break;
+            case 3:
+                delitem LightGreenDiamond, 1;
+                Mobpt+=40000;
+                break;
+            case 4:
+                if (!REBIRTH) {
+                    atcommand("@block "+strcharinfo(0)); end;
+                }
+                delitem LightGreenDiamond, 1;
+                Zeny+=50000;
+                Mobpt+=20000;
+                break;
+            default:
+                close;
+            }
+            getexp 0, 5000;
+            setq AethyrQuest_Tyrca, 1;
+            mesn;
+            mesq l("Please doing business with you.");
+        }
+    }
+    close;
+
+OnInit:
+    .@npcId = getnpcid(.name$);
+    setunitdata(.@npcId, UDT_HEADBOTTOM, SilkRobe);
+    setunitdata(.@npcId, UDT_HEADMIDDLE, NPCEyes);
+    setunitdata(.@npcId, UDT_HEADTOP, BunnyEars);
+    setunitdata(.@npcId, UDT_HAIRSTYLE, 9);
+    setunitdata(.@npcId, UDT_HAIRCOLOR, 18);
+
+    .sex = G_FEMALE;
+    .distance = 5;
+    end;
+}
+