summaryrefslogtreecommitdiff
path: root/npc/006-2-1
diff options
context:
space:
mode:
Diffstat (limited to 'npc/006-2-1')
-rw-r--r--npc/006-2-1/camilot.txt54
-rw-r--r--npc/006-2-1/chirp.txt15
-rw-r--r--npc/006-2-1/jenny.txt41
-rw-r--r--npc/006-2-1/lune.txt90
-rw-r--r--npc/006-2-1/plum.txt24
5 files changed, 224 insertions, 0 deletions
diff --git a/npc/006-2-1/camilot.txt b/npc/006-2-1/camilot.txt
new file mode 100644
index 000000000..8cd6b3c07
--- /dev/null
+++ b/npc/006-2-1/camilot.txt
@@ -0,0 +1,54 @@
+// TMW2 scripts.
+// Authors:
+// Saulc
+// Jesusalva
+// Reid
+// Travolta
+// +Seeds
+// Description:
+// Camilot is the barber.
+
+006-2-1,85,67,0 script Camilot NPC_PIOU_BARBER,{
+ mesn;
+ mesq l("Hi! I'm Camilot, a piou specialist in humanoid hairstyles. Do you want a hair cut?");
+
+ do
+ {
+ select
+ l("What is my current hairstyle and hair color?"),
+ l("I'd like to get a different style."),
+ l("Can you do something with my color?"),
+ l("I'm allergic to piou, goodbye.");
+
+ switch (@menu)
+ {
+ case 1:
+ BarberSayStyle 2;
+ break;
+ case 2:
+ BarberChangeStyle;
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+ l("Enjoy your new style.");
+ l("Anything else?");
+ break;
+ case 3:
+ BarberChangeColor;
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+ l("I hope you like this color.");
+ l("Anything else?");
+ break;
+ case 4:
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+ l("Come and visit again!");
+
+ goodbye;
+ }
+ } while (1);
+ close;
+
+
+OnInit:
+ .sex = G_OTHER;
+ .distance = 5;
+ end;
+}
diff --git a/npc/006-2-1/chirp.txt b/npc/006-2-1/chirp.txt
new file mode 100644
index 000000000..3b0f146da
--- /dev/null
+++ b/npc/006-2-1/chirp.txt
@@ -0,0 +1,15 @@
+// TMW-2 Script.
+// Author:
+// +Seeds
+// Jesusalva
+
+006-2-1,41,66,0 script Chirp NPC_PIOU_BANKER,{
+ Banker(.name$, "Piou Isles", 8000);
+ close;
+
+OnInit:
+ .sex = OTHER;
+ .distance = 4;
+ end;
+}
+
diff --git a/npc/006-2-1/jenny.txt b/npc/006-2-1/jenny.txt
new file mode 100644
index 000000000..72525f8a3
--- /dev/null
+++ b/npc/006-2-1/jenny.txt
@@ -0,0 +1,41 @@
+// TMW2 Script.
+// Author:
+// Jesusalva
+// Modified by:
+// +seeds
+
+006-2-1,41,74,0 script Jenny NPC_PIOU_SERVER,{
+
+ mesn;
+ mesq l("Hello! Would you like to try some piou delicacies?");
+ next;
+ closedialog;
+ npcshopattach(.name$);
+ shop .name$;
+ close;
+
+OnInit:
+
+ .sex = G_OTHER;
+ .distance = 5;
+
+ tradertype(NST_MARKET);
+ sellitem Piberries, 20, 20;
+ sellitem Aquada, 120, 5;
+ sellitem LettuceLeaf, 30, 15;
+ sellitem Bread, 46, 10;
+ sellitem Cheese, 55, 15;
+
+ end;
+
+OnClock0556:
+OnClock1201:
+OnClock1759:
+OnClock0003:
+ restoreshopitem Piberries, 20, 20;
+ restoreshopitem Aquada, 120, 5;
+ restoreshopitem LettuceLeaf, 30, 15;
+ restoreshopitem Bread, 46, 10;
+ restoreshopitem Cheese, 55, 15;
+ end;
+}
diff --git a/npc/006-2-1/lune.txt b/npc/006-2-1/lune.txt
new file mode 100644
index 000000000..77d25d3c8
--- /dev/null
+++ b/npc/006-2-1/lune.txt
@@ -0,0 +1,90 @@
+// TMW2 Script
+// Author:
+// Saulc
+// Vasily_Makarov (original from Evol)
+// Jesusalva
+// seeds
+// Description:
+// Status Reset
+
+006-2-1,34,66,0 script Lune NPC_PIOU_ALCHEMIST,{
+
+ speech S_LAST_NEXT,
+ l("I am @@, a piou alchemist specialized in reset potions.", .name$);
+
+L_Menu:
+ .@plush_count = BaseLevel*210-(9*210);
+ // Lv 10: 210 GP
+ // Lv 90: 1.890 GP
+ if (BaseLevel > 10)
+ .@plush_count = .@plush_count/(BaseLevel/10);
+
+ select
+ l("Can you reset my stats please?"),
+ "",
+ lg("I'm allergic to piou potions, goodbye.");
+
+ switch (@menu)
+ {
+ case 1:
+ goto L_ResetStats;
+ case 2:
+ goto L_Powder;
+ case 3:
+ goto L_Quit;
+ }
+
+L_ResetStats:
+ mesn;
+ mesq l("Status point reset can't be undone. Do you really want this?");
+
+L_ConfirmReset:
+ ConfirmStatusReset();
+ goto L_Quit;
+
+L_Powder:
+ .@price=POL_AdjustPrice(800);
+ mes "";
+ mesn;
+ mesq "";
+ next;
+ select
+ l("Yeah, I need one."),
+ l("Thanks for the help, but no."),
+ l("I'm allergic to piou, goodbye!");
+ if (@menu == 2)
+ goto L_Menu;
+
+ if (@menu == 3)
+ goto L_Quit;
+
+ if (false) {
+ mesn;
+ mesq l("Thanks! Here you go. Perhaps you need another one?");
+ next;
+ goto L_Powder;
+ } else {
+ mesn;
+ mesq "";
+ next;
+ }
+ goto L_Menu;
+
+L_Quit:
+ closeclientdialog;
+ goodbye;
+ close;
+
+OnInit:
+ .@npcId = getnpcid(.name$);
+ setunitdata(.@npcId, UDT_HEADTOP, FancyHat);
+ setunitdata(.@npcId, UDT_HEADMIDDLE, SailorShirt);
+ setunitdata(.@npcId, UDT_HEADBOTTOM, BromenalPants);
+ setunitdata(.@npcId, UDT_WEAPON, LousyMoccasins); // Boots
+ setunitdata(.@npcId, UDT_HAIRSTYLE, 7);
+ setunitdata(.@npcId, UDT_HAIRCOLOR, 17);
+
+ .sex = G_OTHER;
+ .distance = 4;
+ end;
+}
diff --git a/npc/006-2-1/plum.txt b/npc/006-2-1/plum.txt
new file mode 100644
index 000000000..12c6c9043
--- /dev/null
+++ b/npc/006-2-1/plum.txt
@@ -0,0 +1,24 @@
+// TMW2 scripts.
+// Authors:
+// Jesusalva
+// +seeds
+// Description:
+// Nurse.
+
+006-2-1,85,71,0 script Plum NPC_PIOU_NURSE,{
+ Nurse(.name$, 10, 5);
+ close;
+
+OnInit:
+ .@npcId = getnpcid(.name$);
+ setunitdata(.@npcId, UDT_HEADBOTTOM, CottonSkirt);
+ setunitdata(.@npcId, UDT_HEADMIDDLE, TneckSweater);
+ setunitdata(.@npcId, UDT_HEADTOP, NPCEyes);
+ setunitdata(.@npcId, UDT_HAIRSTYLE, 12);
+ setunitdata(.@npcId, UDT_HAIRCOLOR, 14);
+
+ .sex = G_OTHER;
+ .distance = 5;
+ end;
+}
+