Sketch 019-4-1 structure. I need to add some functions.

A commit helps to revert bad functions %%O

1 files changed, 40 insertions, 5 deletions

diff --git a/npc/019-4-1/chief.txt b/npc/019-4-1/chief.txt
index 43fc53fbe..10c2849a1 100644
--- a/npc/019-4-1/chief.txt
+++ b/npc/019-4-1/chief.txt
@@ -97,17 +97,52 @@ L_Reward:
 
 L_Main:
     .@q=getq2(SQuest_Christmas);
-    mesn;
-    mesq l("The stolen empty boxes!! Christmas is RUINED!!!");
     // How did you even reach here in first place?
     if (BaseLevel < 20) {
+    mesn;
+    mesq l("The stolen christmas boxes!! Christmas is RUINED!!!");
         close;
     }
-    next;
     mesn;
-    mesq l("We only managed to recover @@ thus far...", $XMAS_GIFTS);
-    // Same formula from 2007 event
+    mesq l("We only managed to recover @@ stolen @@ thus far...", $XMAS_GIFTS, getitemlink(ClosedChristmasBox));
+    // Same formula from 2007 event. (max: 3.276.800 boxes delivered, an ABSURD amount)
+    // You need to give at least this many boxes yourself to be eligible for rewards, though.
     .@gifts=max(15, log2(gifts/100));
+    mesq l("If things keep like this, we will only manage to give @@ gifts to every player...", .@gifts);
+    if (.@q < .@gifts)
+        mesc l("WARNING: You must give at least @@ boxes more before event ends to be eligible for a reward!", .@q-.@gifts), 1;
+    next;
+    if (.@q) {
+        mesn;
+        switch (.@gifts) {
+            case  0: mesq l("There isn't enough, not even for NPCs. We need at least 100."); break;
+            case  1: mesq l("Santa can give one present for all players. Maybe if we got 200..."); break;
+            case  2: mesq l("Hey, two gifts is very nice. But if we delivered 400. Think on it."); break;
+            case  3: mesq l("Wow, three gifts! Good job! With 800, an extra gift for everyone!"); break;
+            case  4: mesq l("Hahah, four gifts, neat! Can we get to 1600 boxes?"); break;
+            case  5: mesq l("Amazing. Five gifts for all. With 3200, we could supply nomad tribes..."); break;
+            case  6: mesq l("Atonishing. Six gifts is the real deal. Easy to guess: 6400 is the next milestone."); break;
+            case  7: mesq l("Impressive. Seven gifts! Now, 12800 is not easy. I understand if everyone gives up."); break;
+            case  8: mesq l("Eight gifts. Let's double the goal. 25600 gifts. Did you guys hire some chinese gold farmers, anyway?"); break;
+            case  9: mesq l("How did you got that much? Nine gifts, and 512000 if you want even more."); break;
+            case 10: mesq l("Want to break the hundredthousand item limit?? Ten gifts, for more, bring 102,400 boxes here."); break;
+            case 11: mesq l("Elevel gifts? You guys really have no live! For 204,800 I'll give an extra one."); break;
+            case 12: mesq l("Twelve... There is no way people collected this many gifts. Anyway. 404,800 is the next milestone."); break;
+            case 13: mesq l("What the f...? Four Hundred Thousand??? Must be a bug. Next milestone is 819,200. Cheaters."); break;
+            case 14: mesq l("I must report this to Jesusalva. The inventory system can't handle that much. Want more? Try 1,638,400."); break;
+            default: mesq l("ENOUGH! LAME CHEATERS, GET OFF THIS GAME %%a That's 15 gifts, and it is final."); break;
+        }
+        next;
+    }
+    mesn;
+    mesq l("Well, if you want to donate @@, you'll be ranked. There's gift for everyone, and rewards for top 5 donors.", getitemlink(ClosedChristmasBox));
+    mes "";
+    select
+        rif(countitem(ClosedChristmasBox), l("Return @@ boxes", countitem(ClosedChristmasBox))),
+        l("Scoreboards"),
+        l("Leave");
+    mes "";
+
     close;
 
 OnInit: