From a33681cc369e7930b26ca30fb4a163fbcaa37cbc Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Wed, 29 Jan 2020 00:55:23 -0300
Subject: Event weapons and cards to allow everyone a playable set on Valentine
 Day Event. Can also be used by ML players. Damage scales.

---
 npc/001-11/event_soulmenhir.txt | 82 +++++++++++++++++++++++++++++++++++++++++
 npc/commands/event.txt          |  1 +
 2 files changed, 83 insertions(+)

(limited to 'npc')

diff --git a/npc/001-11/event_soulmenhir.txt b/npc/001-11/event_soulmenhir.txt
index 901553721..d2fe8bb14 100644
--- a/npc/001-11/event_soulmenhir.txt
+++ b/npc/001-11/event_soulmenhir.txt
@@ -10,6 +10,7 @@
 
     menu
         l("Touch it."), L_Warp,
+        rif(!#VALENTINE_EQUIPMENT2020 && gettime(GETTIME_YEAR) == 2020, l("Obtain event equipment")), L_EVTC2020,
         l("Leave it alone."), -;
     close;
 
@@ -17,6 +18,87 @@ L_Warp:
     warp "Save", 0, 0;
     close;
 
+// Special labels
+L_EVTC2020:
+    showavatar NPC_BARD_TRUMP;
+    mes l("Welcome! Here to pick a weapon? You'll be able to select three skill cards as well.");
+    next;
+    inventoryplace NPCEyes, 4, Iten, 1;
+    mesc l("Are you sure you want to begin now? (Cannot be changed later)"), 1;
+    next;
+    if (askyesno() == ASK_NO)
+        close;
+    mes "";
+    mes l("Select your preferred play-style.");
+    select
+        l("A soldier, with a sword and a shield"),
+        l("A warrior, with a long blade"),
+        l("A ranger, with a powerful bow"),
+        l("A wizard, with a might wand");
+    mes "";
+    #VALENTINE_EQUIPMENT2020=true;
+    switch (@menu) {
+        case 1:
+            getitembound Event1HSword, 1, 1;
+            getitem FalkonCard, 1;
+            break;
+        case 2:
+            getitembound Event2HSword, 1, 1;
+            getitem FalkonCard, 1;
+            break;
+        case 3:
+            getitembound EventBow, 1, 1;
+            getitem ArrowShowerCard, 1;
+            break;
+        case 4:
+            getitembound EventWand, 1, 1;
+            getitem FireballCard, 1;
+            break;
+    }
+    getitem HealCard, 1;
+    mes "";
+    mes l("Select a set of skills:");
+    select
+        l("I need to survive anything!"),
+        l("I need support magic!"),
+        l("I need offensive magic!"),
+        l("I need supreme warrior skills!"),
+        l("I need supreme ranger skills!");
+    mes "";
+    switch (@menu) {
+        case 1: // Survival Magic
+            getitem LastStandCard, 1;
+            getitem CowardCard, 1;
+            break;
+        case 2: // Support Magic
+            getitem HighPriestCard, 1;
+            getitem FullPowerCard, 1;
+            break;
+        case 3: // Offensive Magic
+            getitem NatureWallCard, 1;
+            getitem MagicalMVPCard, 1;
+            break;
+        case 4: // Warrior Magic
+            getitem SupremeWarriorCard, 1;
+            getitem VersatileCard, 1;
+            break;
+        case 5: // Ranger Magic
+            getitem SupremeRangerCard, 1;
+            getitem VersatileCard, 1;
+            break;
+    }
+    mesn;
+    mes l("And, that's all.");
+    mesc l("Protip: You can trade the cards, but only before inserting them."), 9;
+    mesc l("You can make any build you want! But inserted cards cannot be removed!"), 9;
+    next;
+    mesn;
+    mes l("To insert a card, select the card and \"use\" it, or, drag and drop them to the weapon.");
+    next;
+    mesn;
+    mes l("Event weapons and cards will be deleted once event ends.");
+    close;
+
 OnInit:
     .distance = 5;
     end;
diff --git a/npc/commands/event.txt b/npc/commands/event.txt
index 30593870e..d1ad73d59 100644
--- a/npc/commands/event.txt
+++ b/npc/commands/event.txt
@@ -43,6 +43,7 @@ function	script	sClear	{
             DelAccRegFromEveryPlayer("#VALENTINE_RECEIVED");
             DelAccRegFromEveryPlayer("#VALENTINE_OPENED");
             DelAccRegFromEveryPlayer("#VALENTINE_SENT");
+            DelAccRegFromEveryPlayer("#VALENTINE_EQUIPMENT2020");
             // Remove event items
             DelItemFromEveryPlayer(LoveLetter);
             DelItemFromEveryPlayer(BoxOfChocolates);
-- 
cgit v1.2.3-60-g2f50