Event weapons and cards to allow everyone a playable set on Valentine Day Event.

Can also be used by ML players. Damage scales.

3 files changed, 99 insertions, 0 deletions

diff --git a/db/re/item_db.conf b/db/re/item_db.conf
index 2202f379d..e32a44a77 100644
--- a/db/re/item_db.conf
+++ b/db/re/item_db.conf
@@ -14236,6 +14236,22 @@ item_db: (
 		bonus bDef,-32767;
 	">
 },
+// Cards I've missed
+{
+	Id: 7419
+	AegisName: "VersatileCard"
+	Name: "Versatile Card"
+	Type: "IT_CARD"
+	Buy: 50
+	Sell: 25
+	Weight: 4
+	Loc: 2097151
+	Script: <"
+		skill AC_CHARGEARROW, 1;
+		skill MC_MAMMONITE, 1;
+		skill AL_HEAL, 1;
+	">
+},
 
 {
 	Id: 7420
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);