summaryrefslogtreecommitdiff
path: root/npc
diff options
context:
space:
mode:
authorJesusaves <cpntb1@ymail.com>2018-07-19 19:56:14 -0300
committerJesusaves <cpntb1@ymail.com>2018-07-19 19:56:14 -0300
commit4ea19270fef8a576f1ec58538cfb52d5c96aa809 (patch)
tree400aa8d929ab7c8bae39bbc758f2904867d6f7d3 /npc
parentc39c8ab4d22e8e8c04960d7183929a38a78abed1 (diff)
downloadserverdata-4ea19270fef8a576f1ec58538cfb52d5c96aa809.tar.gz
serverdata-4ea19270fef8a576f1ec58538cfb52d5c96aa809.tar.bz2
serverdata-4ea19270fef8a576f1ec58538cfb52d5c96aa809.tar.xz
serverdata-4ea19270fef8a576f1ec58538cfb52d5c96aa809.zip
Paxel prototype, I only reuse name and a string from LoF Paxel.
The original quest was done by Darlord and was on LoF forum. Warning: Seasonal quest for rare item, can only be done on spring!
Diffstat (limited to 'npc')
-rw-r--r--npc/00000SAVE/016-1_NewPaxel.forum.txt149
-rw-r--r--npc/017-1/_import.txt1
-rw-r--r--npc/017-1/paxel.txt185
3 files changed, 186 insertions, 149 deletions
diff --git a/npc/00000SAVE/016-1_NewPaxel.forum.txt b/npc/00000SAVE/016-1_NewPaxel.forum.txt
deleted file mode 100644
index b0408fcd9..000000000
--- a/npc/00000SAVE/016-1_NewPaxel.forum.txt
+++ /dev/null
@@ -1,149 +0,0 @@
-// This is from LoF, to replace LoF Paxel
-//----------------------------------------------------
-// PRSM Helmet quest
-// Create Quest: Darlord (Depredador)
-//----------------------------------------------------
-
-// Old Paxel turned Raw Coal in Coal... But we don't have Raw Coal.
-// He probably used the nice furnace NPC too... We will need another NPC to use that...
-
-//012-1.gat,122,115,0 script Paxel 126,{
-016-1,40,39,0 script Paxel NPC141,{
- if(QUEST_Warrior1 == 2) goto L_Done1;
- if(QUEST_Warrior1 == 1) goto L_Ask2;
-
- if (BaseLevel >= 60 && countitem(IronIngot) > 0) goto L_Ask1;
-
- mesn;
- mes "\"Hello! Calm wind today!\"";
- menu
- "Yes, but I like windy days.", L_Wind,
- "Hmm... sorry but gotta go...", L_Go;
- close;
-
-L_Go:
- mesn;
- mes "\"Ok, good trip then.\"";
- close;
-
-L_Wind:
- mesn;
- mes "\"I don't like them, i can't fly straight.\"";
- close;
-
-// ----------------------------------------------------
-// Desert Helmet quest start
-// ----------------------------------------------------
-L_Ask1:
- mesn;
- mes "\"Hello "+ strcharinfo(0) + "! I see you have some [Iron Ore] with you!\"";
-
- menu
- "Yes... right... what about [Iron Ore]?", L_Quest1,
- "Yes, but i have grown attached to [Iron Ore]...", L_No,
- "Right, but now i have business in other places.", L_Rude;
- close;
-
-L_Quest1:
- mesn;
- mes "\"Iron Ore is a really special item. People without helmets can't understand [Iron Ore] real power, anyway if you could give me some of them you would understand why they are so special.\"";
-
- menu
- "Certainly, you can have all my [Iron Ore]", L_Check1,
- "Sorry but i am not interested in that.", L_No;
- close;
-
-L_No:
- mesn;
- mes "\"Ok, come back me when you want to know [Iron Ore] real power\"";
- close;
-
-L_Rude:
- mesn;
- mes "\"Well, good luck with your business.\"";
- close;
-
-L_Check1:
- if (countitem(IronIngot) > 11)
- goto L_Progress1;
- goto L_More_Needed1;
-
-L_More_Needed1:
- mesn;
- mes "\"Your [Iron Ore] are not enough, please look for more.\"";
- close;
-
-// ----------------------------------------------------
-// Got Iron Ores
-// ----------------------------------------------------
-L_Progress1:
- delitem IronIngot, 12;
- getexp 10000, 0;
- set QUEST_Warrior1, 1;
- mes "[Angel]";
- mes "\"Perfect! you have enough Iron Ore, i will take them for now but i need other items in order to bring them to life.\"";
-
-L_Ask2:
- mesn;
- mes "\"I need a two Infantry Helmet to enchant them, one Warlord Helmet to make them full of vitality and a lot of Terranite Ore to make it more magical. And 10000 GP.\"";
-
- menu
- "Please have a look, i have what you asked", L_Check2,
- "On my way to get what you need.", -;
- close;
-
-
-L_Check2:
- if (countitem(InfantryHelmet) < 2 || countitem(WarlordHelmet) < 1 || countitem(TerraniteOre) < 6)
- goto L_More_Needed2;
- if (Zeny < 10000) {
- mesn;
- mes "\"You can't afford that much work! Do some odd jobs and come back.\"";
- close;
- }
- goto L_Progress2;
-
-
-L_More_Needed2:
- mesn;
- mes "\"I am sorry but i can see that you don't have all that i asked you.\"";
- next;
- mesn;
- mes "\"Please bring me that or i won't be able to make something really special for you.\"";
- close;
-
-// ----------------------------------------------------
-// Got Desert
-// ----------------------------------------------------
-L_Progress2:
- inventoryplace PrsmHelmet, 1;
- delitem InfantryHelmet, 2;
- delitem WarlordHelmet, 1;
- delitem TerraniteOre, 20;
- getexp 60000, 0;
- getitem PrsmHelmet, 1;
- set QUEST_Warrior1, 2;
- mesn;
- mes "\"There you go a special Desert Helmet!.\"";
- close;
-
-L_Done1:
- mesn;
- mes "\"Hello winged friend! How is the wind today?\"";
-
- menu
- "Calm, perfect for a fly!", L_Fly,
- "Gale, not good to fly.", L_Wind2;
- close;
-
-L_Fly:
- mesn;
- mes "\"Haha yes, you are right!\"";
- close;
-
-L_Wind2:
- mesn;
- mes "\"Yep, i never fly in these days.\"";
- close;
-
-}
diff --git a/npc/017-1/_import.txt b/npc/017-1/_import.txt
index f7a9cb93b..ede6731a6 100644
--- a/npc/017-1/_import.txt
+++ b/npc/017-1/_import.txt
@@ -6,6 +6,7 @@
"npc/017-1/mapflags.txt",
"npc/017-1/misc.txt",
"npc/017-1/nowhere_man.txt",
+"npc/017-1/paxel.txt",
"npc/017-1/roger.txt",
"npc/017-1/signs.txt",
"npc/017-1/soul-menhir.txt",
diff --git a/npc/017-1/paxel.txt b/npc/017-1/paxel.txt
new file mode 100644
index 000000000..9094d1ef0
--- /dev/null
+++ b/npc/017-1/paxel.txt
@@ -0,0 +1,185 @@
+// TMW2/LoF Script
+// This is from LoF Forums, to replace LoF Paxel
+//----------------------------------------------------
+// PRSM Helmet quest (seasonal quest)
+// Create Quest: Darlord (Depredador)
+//----------------------------------------------------
+
+// Old Paxel turned Raw Coal in Coal... But we don't have Raw Coal.
+// He probably used the nice furnace NPC too... We will need another NPC to use that...
+
+017-1,131,22,0 script Paxel NPC_PLAYER,{
+ .@q=getq(SQuest_Paxel);
+ if(.@q == 2) goto L_Done;
+ if (season() != SEASON_SPRING && !$@GM_OVERRIDE) goto L_OutOfSeason;
+ if(.@q == 1) goto L_Ask2;
+
+ if (BaseLevel >= 60) goto L_Ask1;
+
+L_OutOfSeason:
+ mesn;
+ mesq l("Hello! Calm wind today!");
+ menu
+ l("Yes, but I like windy days."), L_Wind,
+ l("Hmm... sorry but gotta go..."), L_Go;
+ close;
+
+L_Go:
+ mesn;
+ mesq l("Ok, good trip then.");
+ close;
+
+L_Wind:
+ mesn;
+ mesq l("I don't like them, I can't fly straight.");
+ next;
+ mesn;
+ if (BaseLevel < 60)
+ mesq l("Well, not like you could understand that with your level! %%a");
+ else
+ mesq l("This is why I love spring!");
+ close;
+
+// ----------------------------------------------------
+// Desert Helmet quest start
+// ----------------------------------------------------
+L_Ask1:
+ mesn;
+ mesq l("Hello @@! Do you have some @@ with you?", strcharinfo(0), getitemlink(TerraniteOre));
+
+ menu
+ rif(countitem(TerraniteOre),l("Yes... right... what about Terranite Ore?")), L_Quest1,
+ rif(countitem(TerraniteOre),l("Yes, but I have grown attached to Terranite Ore...")), L_No,
+ l("Right, but now I have business in other places."), L_Rude;
+ close;
+
+L_Quest1:
+ mesn;
+ mesq l("Terranite Ore is a really special item. People without helmets can't understand @@'s real power, anyway if you could give me some of them you would understand why they are so special.", getitemlink(TerraniteOre));
+
+ menu
+ l("Certainly, you can have all my Terranite Ore."), L_Check1,
+ l("Sorry but I am not interested in that."), L_No;
+ close;
+
+L_No:
+ mesn;
+ mesq l("Ok, come back me when you want to know the @@ real power!", getitemlink(TerraniteOre));
+ close;
+
+L_Rude:
+ mesn;
+ mesq l("Well, good luck with your business.");
+ close;
+
+
+// ----------------------------------------------------
+// Arc 1: Terranite Ores
+// ----------------------------------------------------
+L_Check1:
+ if (countitem(TerraniteOre) < 12)
+ goto L_More_Needed1;
+
+ delitem TerraniteOre, 12;
+ getexp 15000, 150;
+ setq SQuest_Paxel, 1;
+ mesn;
+ mesq l("Perfect! you have enough Terranite Ore, I will take them for now but I need other items in order to bring them to life.");
+
+L_Ask2:
+ mesn;
+ mesq l("I need a suitable base helmet, some herbs to use my magical dye, and gold:");
+ mesc l("@@/1 @@", countitem(WarlordHelmet), getitemlink(WarlordHelmet));
+ mesc l("@@/100 @@", countitem(PinkAntenna), getitemlink(PinkAntenna));
+ mesc l("@@/?? @@", countitem(CobaltHerb), getitemlink(CobaltHerb));
+ mesc l("@@/@@ GP", format_number(Zeny), format_number(10000));
+
+ menu
+ l("Please have a look, I have what you asked"), L_Check2,
+ l("On my way to get what you need."), -;
+ close;
+
+
+// ----------------------------------------------------
+// Arc 2: Prsm Helmet
+// ----------------------------------------------------
+L_Check2:
+ if (countitem(PinkAntenna) < 100 || countitem(WarlordHelmet) < 1 || countitem(CobaltHerb) < 60)
+ goto L_More_Needed2;
+ if (Zeny < 10000) {
+ mesn;
+ mesq l("You can't afford my work! Do some odd jobs and come back.");
+ close;
+ }
+
+ inventoryplace PrsmHelmet, 1;
+ delitem PinkAntenna, 100;
+ delitem WarlordHelmet, 1;
+ delitem TerraniteOre, 20;
+ getexp 60000, 0;
+ getitem PrsmHelmet, 1;
+ setq SQuest_Paxel, 2;
+ mesn;
+ mesq l("There you go, a special and rare @@!", getitemlink(PrsmHelmet));
+ close;
+
+// ----------------------------------------------------
+// Failure: Insufficient material
+// ----------------------------------------------------
+L_More_Needed1:
+ mesn;
+ mesq l("Your @@ is not enough, please look for more.", getitemlink(TerraniteOre));
+ close;
+
+L_More_Needed2:
+ mesn;
+ mesq l("I am sorry but i can see that you don't have all that I asked you.");
+ next;
+ mesn;
+ mesq l("Please bring me that or I won't be able to make something really special for you.");
+ close;
+
+
+// ----------------------------------------------------
+// Quest complete
+// ----------------------------------------------------
+L_Done:
+ mesn;
+ mesq l("Hello winged friend! How is the wind today?");
+
+ menu
+ rif(season() == SPRING || $@GM_OVERRIDE, l("It's spring, when the wind is always good.")), L_Spring,
+ l("Calm, perfect for a fly!"), L_Fly,
+ l("Gale, not good to fly."), L_Wind2;
+ close;
+
+L_Fly:
+ mesn;
+ mesq l("Haha yes, you are right!");
+ close;
+
+L_Wind2:
+ mesn;
+ mesq l("Yep, I never fly in these days.");
+ close;
+
+// TODO: Maybe we can add something else here
+L_Spring:
+ mesn;
+ mesq l("Hahah, good to hear! Do you know some items are only dropped on spring? You should go after them!");
+ close;
+
+OnInit:
+ .@npcId = getnpcid(0, .name$);
+ setunitdata(.@npcId, UDT_HEADTOP, PrsmHelmet);
+ setunitdata(.@npcId, UDT_HEADMIDDLE, WarlordPlate);
+ setunitdata(.@npcId, UDT_HEADBOTTOM, NPCEyes);
+ setunitdata(.@npcId, UDT_WEAPON, JeansChaps);
+ setunitdata(.@npcId, UDT_HAIRSTYLE, 24);
+ setunitdata(.@npcId, UDT_HAIRCOLOR, 14);
+
+ .sex=G_MALE;
+ .distance=5;
+ end;
+
+}