From 73901179e78b0ac98ae910eece38f00b6cf0f64e Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Wed, 10 Mar 2021 19:05:01 -0300
Subject: Alliance Hero special exchange for event server

---
 npc/029-0/event.txt | 129 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 129 insertions(+)
 create mode 100644 npc/029-0/event.txt

(limited to 'npc/029-0/event.txt')

diff --git a/npc/029-0/event.txt b/npc/029-0/event.txt
new file mode 100644
index 000000000..d7a1b5088
--- /dev/null
+++ b/npc/029-0/event.txt
@@ -0,0 +1,129 @@
+// TMW2 scripts.
+// Authors:
+//    Jesusalva
+// Description:
+//    Exclusive for Fires of Steam 2021 - When our OVH server datacenter got fire.
+
+029-0,111,37,0	script	Alliance Hero#FoS	NPC_HALBERDBARBARIAN,{
+    if (gettime(7) != 2021 || !$FIRESOFSTEAM) {
+        disablenpc .name$;
+        die(); end;
+    }
+
+    mesn;
+    mesq l("Sooo, the police station of Moubootaur Legends went ablaze. Constable Perry is too busy to monitor illegal operation on this continent.");
+    next;
+    mesn;
+    mesq l("Therefore... Are you perhaps interested in some... illicit goods? %%p");
+    next;
+    select
+        l("Show me what you got, noob."),
+        l("Actually - Do you exchange goods even more illegal goods than this?"),
+        l("Actually - Do you exchange illegal... research results?");
+    mes "";
+    if (@menu == 1) {
+        closeclientdialog;
+        openshop .name$;
+        close;
+    }
+    else if (@menu == 2) {
+        mesn;
+        mesq l("Yes I do... I sell %s %s for the small amount of %s GP. Interested? %%%%p", fnum(.mobp), l("Monster Points"), fnum(.mobg));
+        if (Zeny < .mobg) close;
+        next;
+        if (askyesno() == ASK_NO) close;
+        if (Zeny < .mobg) { die(); close; }
+        Zeny-=.mobg;
+        Mobpt+=.mobp;
+        mes "";
+        mesn;
+        mesq l("Hehehe... A pleasure doing business with you!");
+    } else if (@menu == 3) {
+        mesn;
+        mesq l("Yes I do... I sell %s %s for the small amount of %s GP. Interested? %%%%p", fnum(.robp), l("Research Points"), fnum(.robg));
+        if (Zeny < .robg) close;
+        next;
+        if (askyesno() == ASK_NO) close;
+        if (Zeny < .robg) { die(); close; }
+        Zeny-=.robg;
+        Mobpt+=.robp;
+        mes "";
+        mesn;
+        mesq l("Hehehe... A pleasure doing business with you!");
+    }
+    close;
+
+OnInit:
+	tradertype(NST_MARKET);
+    .mobp=rand2(1000, 2500);
+    .mobg=.mobp*rand2(100, 150)/10;
+    .robp=rand2(900, 1200);
+    .robg=.robp*rand2(80, 110);
+    .distance=5;
+    .sex=G_MALE;
+
+    sellitem Coal, -1, 40;
+    sellitem IronOre, -1, 30;
+    sellitem CopperOre, -1, 20;
+    sellitem LeadOre, -1, 15;
+    sellitem TinOre, -1, 15;
+    sellitem SilverOre, -1, 14;
+    sellitem GoldOre, -1, 14;
+    sellitem TitaniumOre, -1, 9;
+    sellitem IridiumOre, -1, 6;
+    sellitem PlatinumOre, -1, 3;
+
+    sellitem AncientBlueprint, -1, 5;
+
+    sellitem AlchemyBlueprintA, -1, 5;
+    sellitem AlchemyBlueprintB, -1, 4;
+    sellitem AlchemyBlueprintC, -1, 3;
+    sellitem AlchemyBlueprintD, -1, 2;
+    sellitem AlchemyBlueprintE, -1, 1;
+
+    sellitem EquipmentBlueprintA, -1, 5;
+    sellitem EquipmentBlueprintB, -1, 4;
+    sellitem EquipmentBlueprintC, -1, 3;
+    sellitem EquipmentBlueprintD, -1, 2;
+    sellitem EquipmentBlueprintE, -1, 1;
+
+    sellitem ArcmageBoxset, 10000, 4;
+
+    if (gettime(7) != 2021)
+        disablenpc .name$;
+    end;
+
+OnClock0001:
+OnClock1201:
+    .mobp=rand2(1000, 2500);
+    .mobg=.mobp*rand2(100, 150)/10;
+
+    restoreshopitem Coal, 40;
+    restoreshopitem IronOre, 30;
+    restoreshopitem CopperOre, 20;
+    restoreshopitem LeadOre, 15;
+    restoreshopitem TinOre, 15;
+    restoreshopitem SilverOre, 14;
+    restoreshopitem GoldOre, 14;
+    restoreshopitem TitaniumOre, 9;
+    restoreshopitem IridiumOre, 6;
+    restoreshopitem PlatinumOre, 3;
+
+    restoreshopitem AncientBlueprint, 5;
+
+    restoreshopitem AlchemyBlueprintA, 5;
+    restoreshopitem AlchemyBlueprintB, 4;
+    restoreshopitem AlchemyBlueprintC, 3;
+    restoreshopitem AlchemyBlueprintD, 2;
+    restoreshopitem AlchemyBlueprintE, 1;
+
+    restoreshopitem EquipmentBlueprintA, 5;
+    restoreshopitem EquipmentBlueprintB, 4;
+    restoreshopitem EquipmentBlueprintC, 3;
+    restoreshopitem EquipmentBlueprintD, 2;
+    restoreshopitem EquipmentBlueprintE, 1;
+
+    restoreshopitem ArcmageBoxset, 10000, 4;
+    end;
+}
+
-- 
cgit v1.2.3-60-g2f50