Rewrite Eistein to my tastes. :> Sorry @Saulc !

1 files changed, 39 insertions, 51 deletions

diff --git a/npc/003-2/eistein.txt b/npc/003-2/eistein.txt
index 28add6bf2..dfb8b5527 100644
--- a/npc/003-2/eistein.txt
+++ b/npc/003-2/eistein.txt
@@ -3,73 +3,61 @@
 //    Saulc
 // Variables:
 //    0    CandorQuest_Eistein
-// Values:
-//    Eistein reward for free player over level 50 by a graduation cap, 
+// Description:
+//    Eistein rewards players for getting level landmarks.
 
+003-2,35,34,0	script	Eistein	NPC_UKAR,{
 
-
-
-003-2,35,34,0	script	Eistein	NPC_PLAYER,{
-
-    .reward = GraduationCap;
-    
-    function quest_completed{
-        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
-            l("I hope you are proud of your @@ ",getitemlink(.reward));
-            close;
-    }
-
-    function quest_open {
-        if(BaseLevel >= 50)
-        {
+    // Level, Reward
+    function is_level {
+        if (BaseLevel >= getarg(0)) {
             speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
-                l("Congrats you passed the cap of the level 50! Here is your @@, you deserve it.",getitemlink(.reward));
-            getitem .reward,1;
-            setq TulimsharQuest_Eistein, 1;
+                l("Congrats you passed the level cap of @@! Here is a(n) @@, you deserve it.",getarg(0), getitemlink(getarg(1)));
+            getitem getarg(1),1;
+            setq TulimsharQuest_Eistein, getq(TulimsharQuest_Eistein)+1;
             close;
-        }
-        else 
-        {
+        } else {
             speech S_FIRST_BLANK_LINE,
-                l("i can't reward a weak adventurer like you, Come back later.");
+                l("You are level @@/@@. Keep building levels, you need them!", BaseLevel, getarg(0));
             close;
         }
     }
 
-    function quest_started {
-        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
-            l("Oh, Welcome then.");
-        speech S_LAST_NEXT,
-            l("I'm Eistein, I reward brave adventurers who kill monsters who plague our lands.");
-        do
-        {
-        select
-            l("Interessing can I be rewarded for my help?"),
-            menuaction(l("Quit"));
 
-        switch (@menu)
-        {
+    function quest_open {
+        .@q = getq(TulimsharQuest_Eistein);
+        switch (.@q) {
+            case 0:
+                is_level(25, BronzeGift); break;
             case 1:
-                quest_open;
+                is_level(50, GraduationCap); break;
+            case 2:
+                is_level(75, SilverGift); break;
+            case 3:
+                is_level(100, GoldenGift); break;
+            case 4:
+                is_level(125, PrismGift); break;
+            case 5:
+                is_level(150, SupremeGift); break;
+            default:
+                mesn;
+                mesq l("Waw, you are level @@! Many congratulations. If there were people like you, ukarania wouldn't have been destroyed...", BaseLevel);
                 break;
-        }
-    } while (@menu != 2);
     }
-   
-    do
-    {
-        .@chest = getq(TulimsharQuest_Eistein);
-        if (.@chest == 1)
-            goto quest_completed;
-        select
-            rif(.@chest == 0,
-            l("Hello, can I be rewarded for my help?")),
-            menuaction(l("Quit"));
 
-        switch (@menu)
+    speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+        l("Ah, welcome. Please, don't be afraid of my look, Saulc GM assigned me to here."),
+        l("I'm Eistein, survivor from Ukarania. I reward brave adventurers who kill monsters, which plague our lands."),
+        l("I'll give you a reward, in the name of Saulc, once you reach the following levels: 25, 50, 75, 100, 125 and 150.");
+        do
         {
+        select
+            l("Interesting! can I be rewarded for my help?"),
+            l("Quit");
+
+        switch (@menu) {
             case 1:
-                quest_started;
+                quest_open;
                 break;
         }
     } while (@menu != 2);