Initial commit

7 files changed, 251 insertions, 0 deletions

diff --git a/npc/001-2-27/_import.txt b/npc/001-2-27/_import.txt
new file mode 100644
index 000000000..977f41322
--- /dev/null
+++ b/npc/001-2-27/_import.txt
@@ -0,0 +1,8 @@
+// Map 001-2-27: Blacksmith Shop
+// This file is generated automatically. All manually added changes will be removed when running the Converter.
+"npc/001-2-27/_warps.txt",
+"npc/001-2-27/don.txt",
+"npc/001-2-27/kaylo.txt",
+"npc/001-2-27/lydon.txt",
+"npc/001-2-27/mapflags.txt",
+"npc/001-2-27/shop.txt",
diff --git a/npc/001-2-27/_warps.txt b/npc/001-2-27/_warps.txt
new file mode 100644
index 000000000..60537f046
--- /dev/null
+++ b/npc/001-2-27/_warps.txt
@@ -0,0 +1,3 @@
+// This file is generated automatically. All manually added changes will be removed when running the Converter.
+// Map 001-2-27: Blacksmith Shop warps
+001-2-27,35,39,0	warp	#001-2-27_35_35	0,0,001-1,101,108
diff --git a/npc/001-2-27/don.txt b/npc/001-2-27/don.txt
new file mode 100644
index 000000000..cc62f4c11
--- /dev/null
+++ b/npc/001-2-27/don.txt
@@ -0,0 +1,98 @@
+// Evol scripts.
+// Author:
+//    Reid
+// Description:
+//    Don the blacksmith of Artis
+
+001-2-27,35,29,0	script	Don#001-2-27	NPC_HUMAN_MALE_OLD,{
+
+    function improve_equipment {
+        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+            l("Different ways, each part of your equipment can be generally upgraded."),
+            l("You have a level for each of your gear, by default when you buy or craft a piece, the level is set to 1."),
+            l("You can also improve your equipment in a totally different way with the use of cards.");
+        return;
+    }
+
+    function card_explanation {
+        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+            l("There are two different kinds of cards, the first changes the style of your clothes, the second changes their stats."),
+            l("I am not an expert of the first kind, but I know what I am talking about when it comes to improving equipment."),
+            l("A stat card works on different pieces of equipment."),
+            l("Each piece of equipment has a predefined slot number."),
+            l("Each card improves your gear by a ratio or a fixed number on a predefined stat."),
+            l("Like, a defensive mythril card can be used on any mythril equipment, and it will improve the defense by 5% of the latter."),
+            l("You just have to select the card, then you choose which piece of equipment you want to use it on, and you are done.");
+        return;
+    }
+
+    function take_apprentice {
+        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+            l("I do not.");
+        emotion E_UPSET;
+
+        select(l("What about Chelios?"));
+
+        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+            l("Chelios was stubborn in his youth, he never stopped annoying me with his questions while I was working at the forge."),
+            l("He did not change while growing up, I repeatedly asked him to leave the forge but in the end he installed himself in front of it..."),
+            l("He is mature and he rarely ask questions so I am fine. I can not stand the sight of a whiner anyway.");
+        return;
+    }
+
+    function good_blacksmith {
+        speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+            l("I do not like to brag about it but you won't find a better blacksmith on the whole island."),
+            l("If you need somebody to craft a weapon or a plate from diagrams I am the one that you need.");
+
+        switch (select(l("Can I craft them myself?"),
+                        l("Ok.")))
+        {
+            case 1:
+                speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+                    l("You can try, but your chance of success is lesser than a well trained smith and master craftsman.");
+                break;
+            case 2:
+                break;
+        }
+
+        return;
+    }
+
+    speech S_LAST_NEXT,
+        lg("Hi, what do you want kiddo?");
+
+    do
+    {
+        switch (.@q = select(l("How can I improve my equipment?"),
+                              l("What is a card?"),
+                              l("Are you a good blacksmith?"),
+                              l("Do you take apprentices?"),
+                              l("Nothing.")))
+        {
+            case 1:
+                improve_equipment;
+                break;
+            case 2:
+                card_explanation;
+                break;
+            case 3:
+                good_blacksmith;
+                break;
+            case 4:
+                take_apprentice;
+                break;
+            case 5:
+                break;
+        }
+    } while (.@q != 5);
+
+    goodbye;
+    close;
+
+OnInit:
+    .sex = G_MALE;
+    .distance = 2;
+    end;
+}
+
diff --git a/npc/001-2-27/kaylo.txt b/npc/001-2-27/kaylo.txt
new file mode 100644
index 000000000..5134aa07e
--- /dev/null
+++ b/npc/001-2-27/kaylo.txt
@@ -0,0 +1,44 @@
+// Evol scripts.
+// Author:
+//    Reid
+// Description:
+//    Kaylo is the Shield seller in Don's Blacksmith house on Artis.
+
+001-2-27,27,28,0	script	Kaylo#001-2-27	NPC_KAYLO,{
+    speech S_LAST_NEXT,
+        lg("Hi customer! What do you want today?");
+
+    switch (select(
+        l("Let's make a trade."),
+        l("What's wrong with your clothes?"),
+        l("What is this place?"),
+        l("See you.")))
+    {
+        case 1:
+            closedialog;
+            shop "Store#Shield001-2-27";
+            close;
+        case 2:
+            speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+                l("I used a card to improve my clothes."),
+                l("There are two different kinds of cards, the first changes the style of your clothes, the second changes their stats."),
+                l("You should discuss with Don and Calypsan if you want to learn more about it, they are masters on this area!");
+            break;
+        case 3:
+            speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+                l("You are in the Blacksmith's house, by Jove!"),
+                l("Don is a renowned blacksmith throughout Andorra, it's crazy that you never heard of him.");
+            break;
+        case 4:
+            break;
+    }
+
+    goodbye;
+    close;
+
+OnInit:
+    .sex = G_MALE;
+    .distance = 4;
+    end;
+}
+
diff --git a/npc/001-2-27/lydon.txt b/npc/001-2-27/lydon.txt
new file mode 100644
index 000000000..3dcd8005c
--- /dev/null
+++ b/npc/001-2-27/lydon.txt
@@ -0,0 +1,37 @@
+// Evol scripts.
+// Author:
+//    Reid
+// Description:
+//    Lydon is the Weapon seller in Don's Blacksmith house on Artis.
+
+001-2-27,43,28,0	script	Lydon#001-2-27	NPC_LYDON,{
+    speech S_LAST_NEXT,
+        lg("Hi customer! What do you want today?");
+
+    switch (select(
+        l("Let's make a trade."),
+        l("Who is the blacksmith outside?"),
+        l("Bye.")))
+    {
+        case 1:
+            closedialog;
+            shop "Store#Weapon001-2-27";
+            close;
+        case 2:
+            speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+                l("Chef? He is Don's apprentice, he works on his hammering skill day and night."),
+                l("He is very lucky that Don took him under his wing, but being the student of such a teacher is not easy every day!");
+            break;
+        case 3:
+            break;
+    }
+
+    goodbye;
+    close;
+
+OnInit:
+    .sex = G_MALE;
+    .distance = 4;
+    end;
+}
+
diff --git a/npc/001-2-27/mapflags.txt b/npc/001-2-27/mapflags.txt
new file mode 100644
index 000000000..42bba3662
--- /dev/null
+++ b/npc/001-2-27/mapflags.txt
@@ -0,0 +1 @@
+001-2-27	mapflag	town
diff --git a/npc/001-2-27/shop.txt b/npc/001-2-27/shop.txt
new file mode 100644
index 000000000..597fd06b8
--- /dev/null
+++ b/npc/001-2-27/shop.txt
@@ -0,0 +1,60 @@
+// Evol scripts.
+// Authors:
+//    4144
+//    Reid
+// Description:
+//    Blacksmith shops
+
+001-2-27,27,29,0	trader	Store#Shield001-2-27	NPC_NO_SPRITE,{
+
+OnInit:
+    tradertype(NST_MARKET);
+
+    sellitem LeatherShield, -1, 30;
+    sellitem CopperArmbands, -1, 28;
+    sellitem IronArmbands, -1, 20;
+
+    .sex = G_OTHER;
+    .distance = 2;
+    end;
+
+OnClock0000:
+    restoreshopitem LeatherShield, 10;
+    restoreshopitem CopperArmbands, 9;
+    restoreshopitem IronArmbands, 7;
+OnClock0800:
+    restoreshopitem LeatherShield, 10;
+    restoreshopitem CopperArmbands, 6;
+    restoreshopitem IronArmbands, 3;
+OnClock01600:
+    restoreshopitem LeatherShield, 10;
+    restoreshopitem CopperArmbands, 8;
+    restoreshopitem IronArmbands, 6;
+}
+
+001-2-27,43,29,0	trader	Store#Weapon001-2-27	NPC_NO_SPRITE,{
+
+OnInit:
+    tradertype(NST_MARKET);
+
+    sellitem PiouSlayer, -1, 50;
+    sellitem TrainingGladius, -1, 25;
+    sellitem WoodenSword, -1, 50;
+
+    .sex = G_OTHER;
+    .distance = 2;
+    end;
+
+OnClock0000:
+    restoreshopitem PiouSlayer, 25;
+    restoreshopitem TrainingGladius, 8;
+    restoreshopitem WoodenSword, 25;
+OnClock0800:
+    restoreshopitem PiouSlayer, 25;
+    restoreshopitem TrainingGladius, 8;
+    restoreshopitem WoodenSword, 25;
+OnClock01600:
+    restoreshopitem PiouSlayer, 25;
+    restoreshopitem TrainingGladius, 8;
+    restoreshopitem WoodenSword, 25;
+}