- added Jeepney script and Tribe Blacksmith script


git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@17383 54d463be-8e91-2dee-dedb-b68131a5f0ec
This commit is contained in:
deadlysilence 2013-06-23 19:15:31 +00:00
parent 9d78d319d6
commit 8cdb71e6da
2 changed files with 483 additions and 2 deletions

View File

@ -3,7 +3,7 @@
//===== By: ==================================================
//= Euphy
//===== Current Version: =====================================
//= 1.0
//= 1.1
//===== Compatible With: =====================================
//= rAthena SVN
//===== Description: =========================================
@ -13,6 +13,7 @@
//= 0.1 Alberta sailors only. [Euphy]
//= 0.2 Adapted from Masao's conversion.
//= 1.0 Added remaining NPCs.
//= 1.1 Added Jeepney script. [DeadlySilence]
//============================================================
// Port Malaya Transportation
@ -683,3 +684,251 @@ malaya,63,185,4 script Woman#ma08 583,{
mes "There is rumor that the monster came from the soul of a baby that never been born. So sad.";
close;
}
// Jeepneys
//============================================================
function script F_Malaya_Jeepney {
.@mapName$ = getarg(0);
.@passengers = getarg(1);
// set the other messages of varying amount)
for (.@i = 5; .@i < getargcount(); .@i++) {
setd(".@msgJeepneyInfo$[" + (.@i - 5) + "]", getarg(.@i));
}
if (malaya_hi < 10) {
mes "[Jeepney Driver]";
mes getarg(2);
close;
} else if ((malaya_hi >= 10) && (malaya_hi < 20)) {
mes "[Jeepney Driver]";
mes getarg(3);
close;
} else {
mes "[Jeepney Driver]";
mes getarg(4);
next;
}
switch(select("Board [Passenger " + getmapusers(.@mapName$) + "/" + .@passengers +"]:Jeepney?:Are there any other Jeepneys?:Ah... Yes...")) {
case 1:
if (getmapusers(.@mapName$) >= .@passengers) {
mes "[Jeepney Driver]";
mes "I'm afraid the Jeepney is full.";
mes "I'm sorry but how about some other Jeepney?";
close;
} else {
mes "[Jeepney Driver]";
mes "Have a nice day.";
close2;
warp .@mapName$,29,24;
end;
}
case 2:
// iterate through all the jeepney information for this specific NPC
for (.@i = 0; .@i < getarraysize(.@msgJeepneyInfo$); .@i++) {
mes "[Jeepney Driver]";
mes getd(".@msgJeepneyInfo$[" + .@i + "]");
if (.@i < (getarraysize(.@msgJeepneyInfo$) - 1)) {
next;
}
}
close;
case 3:
mes "[Jeepney Driver]";
mes "Oh! Other Jeepneys are in operation, of course.";
next;
mes "[Jeepney Driver]";
mes "In Port Malaya there are 12, 30 and 60 passenger Jeepneys with 3 each operating.";
next;
mes "[Jeepney Driver]";
mes "Would you like to know the location of other cars?";
next;
switch (select("I'd like to know where the 12 passenger car is.:I'd like to know where the 30 passenger car is.:I'd like to know where the 60 passenger car is.")) {
case 1:
viewpoint 1, 237, 240, 1, 0xF7E009;
viewpoint 1, 67 , 44 , 2, 0xF7E009;
viewpoint 1, 282, 129, 3, 0xF7E009;
set .@zif_in, 12;
break;
case 2:
viewpoint 1, 134, 250, 4, 0xF7E009;
viewpoint 1, 341, 153, 5, 0xF7E009;
viewpoint 1, 293, 290, 6, 0xF7E009;
set .@zif_in, 30;
break;
case 3:
viewpoint 1, 242, 221, 7, 0xF7E009;
viewpoint 1, 62 , 245, 8, 0xF7E009;
viewpoint 1, 257, 58 , 9, 0xF7E009;
set .@zif_in, 60;
break;
}
mes "[Jeepney Driver]";
mes .@zif_in+" passenger Jeepney's location has been marked on your map.";
next;
break;
}
mes "[Jeepney Driver]";
mes "Have a nice trip.";
close;
}
malaya,237,240,4 script Jeepney Driver#01 582,{
callfunc(
"F_Malaya_Jeepney",
"ma_zif01",
12,
// Messages for malaya_hi checks.
"UUrgghhhh.... I'm scared... so scared... what happened to this place?",
"The place is still a mess... I wonder if I can operate a jeepney here...",
"Ha ha ha Welcome. I am ^1561EAVol^000000, operating the 12 man Jeepney here.",
// Monologues of variable lengths.
"Is this your first time in Port Malaya?",
"Jeepney drivers here also promote Jeepneys, so let me explain them to you.",
"Jeepneys were first developed to transport goods quickly, but are now used as public transport.",
"Since everybody has different tastes, you can see those with cool and elaborate decorations.",
"Of course you don't need to drive them yourselves, but you can ride them so please feel free to do so."
);
}
malaya,67,44,4 script Jeepney Driver#02 582,{
callfunc(
"F_Malaya_Jeepney",
"ma_zif02",
12,
"Wha... What's... Going on in that hospital...",
"I think the moaning coming from the hospital has lessened...",
"I'm ^1561EAChui^000000, operating a 12 man Jeepney. Hi there~",
"Is this your first time in Port Malaya?",
"Jeepney drivers here also promote Jeepneys, so let me explain them to you.",
"Jeepneys were first developed to transport goods quickly, but are now used as public transport.",
"I modified my Jeepney myself...",
"For safety reasons there's a limit to the number of passengers, and it's safe so no worries..."
);
}
malaya,282,129,4 script Jeepney Driver#03 582,{
callfunc(
"F_Malaya_Jeepney",
"ma_zif03",
12,
"It's not good for outsiders to have a chat... Perhaps the Mumbaki Leader may have the solution for this.",
"Are you the adventurer who recently met Mumbaki? No wait... Then you shouldn't be here... Yes it's a ghost... Arghhhh...",
"The name's ^1561EATop^000000, operating one of the 3 12 man Jeepneys in town.",
"First time in town?",
"Jeepney drivers here also promote Jeepneys, so let me explain them to you.",
"Jeepneys were first developed to transport goods quickly, but are now used as public transport.",
"They all look different depending on their drivers...",
"Now it is the fame of Port Malaya."
);
}
malaya,134,250,6 script Jeepney Driver#04 582,{
callfunc(
"F_Malaya_Jeepney",
"ma_zif04",
30,
"G...Go... Go away...",
"Arghh... Scared the devil out of me... Go away... Shoo...",
"^1561EABrav^000000, 30 man Jeepney driver at your service, driving as safely as I can since I get scared easily.",
"Is this your first time in Port Malaya?",
"Jeepneys were first developed to transport goods quickly, but are now used as public transport.",
"The modified cars are decorated by their operators.",
"You come to Port Malaya, you must ride a Jeepney.",
"Ha ha ha, of course you can't drive it yourself."
);
}
malaya,341,153,4 script Jeepney Driver#05 582,{
callfunc(
"F_Malaya_Jeepney",
"ma_zif05",
30,
"G... Ghosts in town... Hey... Do you have one on you?",
"I think there are fewer ghosts now... The town is slightly quieter...",
"Hi I'm ^1561EALivil^000000 operator for the 30 man Jeepney. Safety is my priority.",
"First time in town?",
"I'll give you a quick guide as a service.",
"Jeepneys were first developed to transport goods quickly, but are now used as public transport.",
"For safety reasons, Jeepneys have a limit on the number of passengers.",
"Some carried 180 people, but there aren't any of those in Port Malaya today."
);
}
malaya,293,290,6 script Jeepney Driver#06 582,{
callfunc(
"F_Malaya_Jeepney",
"ma_zif06",
30,
"Gu... Guards... What are the guards doing...",
"Did the guards finally do something? Phew... What a rush...",
"I'm ^1561EAGad^000000, the trustworthy 30 man Jeepney driver.",
"I see you're new to this town.",
"To guide travelers is also my task!! Let me explain.",
"Jeepneys were goods transport vehicles, now decorated and modified with Port Malaya's new technology!!",
"This Jeepney is my very own handiwork. Ha ha ha... It's cool right? Ha ha ha",
"Even though the customer is king, I can't let you drive it... Ha ha ha"
);
}
malaya,242,221,4 script Jeepney Driver#07 582,{
callfunc(
"F_Malaya_Jeepney",
"ma_zif07",
60,
"Oh no... I think the whole village is bewitched by ghosts... Maybe... I should give the Mumbaki Leader a visit...",
"Ghost... I'm sure the Mumbaki Leader knows how to get rid of these ghosts...",
"^1561EAHott^000000, at your service, the safest 60 man Jeepney Operator.",
"Jeepney is the public transportation of Port Malaya.",
"Therefore they are everywhere. And it's free! I know they all have different passenger limits, but that's no problem because they're everywhere."
);
}
malaya,62,245,6 script Jeepney Driver#08 582,{
callfunc(
"F_Malaya_Jeepney",
"ma_zif08",
60,
"Shoo~ Be gone if you're a ghost, and go away even if you're human~ Shoo~",
"Hey... You... Are human right? Right? Huh? Say you are... Please...",
"Hullo, I'm ^1561EAMuyan^000000, operator of this 60 man Jeepney. Nice to meet you.",
"Jeepneys are public transport, so safety is our priority.",
"My Jeepney received the best class of Port Malaya, a '60 man Jeepney' certificate.",
"Meaning!! That it is perfectly safe!! Don't you worry about the ride."
);
}
malaya,257,58,6 script Jeepney Driver#09 582,{
callfunc(
"F_Malaya_Jeepney",
"ma_zif09",
60,
"...You're an outsider... Don't go touching anything and be careful in town...",
"The town is still quite dangerous. Best not touch anything until it is safe.",
"Hi there. I'm ^1561EAGramma^000000, Operator of the 60 man Jeepney of Port Malaya.",
"Is this your first time in Port Malaya?",
"We Jeepney drivers here also promote Jeepneys, so let me explain them to you.",
"Jeepneys were first developed to transport goods quickly, but are now used as public transport.",
"Since everybody have different tastes, you can see those with cool and elaborate decorations.",
"Of course you don't need to drive them yourselves, but you can ride them so please feel free to do so."
);
}

View File

@ -3,7 +3,7 @@
//===== By: ==================================================
//= Euphy
//===== Current Version: =====================================
//= 0.1
//= 0.2
//===== Compatible With: =====================================
//= rAthena SVN
//===== Description: =========================================
@ -11,6 +11,7 @@
//= Quest NPCs related to Port Malaya.
//===== Additional Comments: =================================
//= 0.1 Traders only. Adapted from Masao's conversion. [Euphy]
//= 0.2 Added Tribe Blacksmith [DeadlySilence]
//============================================================
// Traders
@ -273,3 +274,234 @@ ma_fild01,238,198,4 script Tikbalang Expert#malaya 582,{
}
}
}
// MVP Armors :: mvpitem
// ============================================================
ma_fild01,158,243,6 script Tribe Blacksmith#malaya 582,{
mes "[Bayani]";
mes "I will upgrade your armor if you bring one that holds enormous power.";
next;
switch (select("What kind of equipment do upgrade?:What are the required materials?:What will it become after an upgrade?:Please upgrade this.")) {
case 1:
mes "[Bayani]";
mes "Your questions are too simple, but!";
next;
mes "[Bayani]";
mes "Are also important.";
next;
mes "[Bayani]";
mes "^7B4772Bakonawa Scale Armor^000000 made from the scales of the Bakonawa monster known to swallow the moon.";
next;
mes "[Bayani]";
mes "Light but sturdy ^7B4772Kalasag^000000 made from rattan that grows wild around Port Malaya.";
next;
mes "[Bayani]";
mes "^7B4772Buwaya Sack Cloth^000000 made from the sack of the man-eating alligator Buwaya.";
next;
mes "[Bayani]";
mes "^7B4772Bangungot Boots of Nightmare^000000 imbued with the hatred and vengeance of the monster Bangungot.";
next;
mes "[Bayani]";
mes "As just mentioned.";
next;
mes "[Bayani]";
mes "I will make powerful armor out of ONLY the strongest armor dropped from fearful monsters.";
close;
case 2:
mes "[Bayani]";
mes "Learned well.";
mes "Seems you learned that there is no such thing as free in life.";
next;
mes "[Bayani]";
mes "First thing to remember is that the object to upgrade must be strong itself. At least strong enough to endure ^FF0000+9 Refinement^000000.";
next;
mes "[Bayani]";
mes "Next is true strength that only comes out of power obtained naturally. I need ^FF000020 Ancient Grudges^000000 for protection from evil while Im refining.";
next;
mes "[Bayani]";
mes "When a ^FF0000+9 Refined Strong armor^000000 is combined with ^FF000020 Ancient Grudges^000000 for protection!!";
next;
mes "[Bayani]";
mes "You get a completely new and improved armor from old scraps.";
next;
mes "[Bayani]";
mes "Always look forward to this.";
close;
case 3:
mes "[Bayani]";
mes "Listen, because this is a very important question.";
next;
mes "[Bayani]";
mes "It won't matter if I say it more than a 100 times that upgraded armor is powerful.";
next;
mes "[Bayani]";
mes "Unless the one that holds it doesn't believe it is! Ask about what has changed and decide for yourself!";
next;
while (1) {
switch (select("There is no more.:Bakonawa Scale Armor:Kalasag:Buwaya Sack Cloth:Bangungot Boots of Nightmare")) {
case 1:
mes "[Bayani]";
mes "Looks like you ran out of questions.";
mes "Don't forget. You'll have to give up something to gain something.";
close;
case 2:
mes "[Bayani]";
mes "The Bakonawa Scale Armor adds +1 to all stats for all jobs which is overall great armor for everyone.";
next;
mes "[Bayani]";
mes "But I'm sure the inner you thinks this isn't enough.";
next;
mes "[Bayani]";
mes "That is why +2 can be added to all stats and an extra slot for a card to your socket if upgraded.";
next;
break;
case 3:
mes "[Bayani]";
mes "Kalasag is a good shield to reduce damage from boss monsters by 1% per 3 refinements.";
next;
mes "[Bayani]";
mes "But not enough. Can't believe that a shield doesnt have a place to equip a card.";
next;
mes "[Bayani]";
mes "That is why I can add an extra slot for a card to your socket if upgraded.";
next;
break;
case 4:
mes "[Bayani]";
mes "The Buwaya Sack Cloth offers healing capacity and healing item effect increase by 1% per 3 refinements. Not to mention it reduces 10% damage from Water, Earth, Fire, and Wind elemental monsters.";
next;
mes "[Bayani]";
mes "But not enough. Can't believe that these clothes don't come with a place to equip a card. Everyone knows that clothes should have Raydric on them!";
next;
mes "[Bayani]";
mes "Don't worry! I can add an extra slot for a card to your socket if upgraded.";
next;
break;
case 5:
mes "[Bayani]";
mes "The Bangungot Boots of Nightmare increases +1 MDEF per 1 refinement and speed increases starting at 14 refinement and above.";
next;
mes "[Bayani]";
mes "The speed increase effect from shoes like Moonlight Flower Shoes and Sleipnir items are out of reach for ordinary people.";
next;
mes "[Bayani]";
mes "But of course, +14 refinement isn't easy but there is an easy way to get it.";
next;
mes "[Bayani]";
mes "By upgrading your shoes, you can get speed increase starting from +12 refinement!";
next;
mes "[Bayani]";
mes "And it doesn't end there!!";
mes "I will also put in an extra slot in your socket to add a card.";
next;
break;
}
mes "[Bayani]";
mes "However, you'll have to give up something to gain something.";
next;
mes "[Bayani]";
mes "^0000FFEquipping the Kalasag, Buwaya Sack Cloth, Bakonawa Scale Armor, and Bangungot Boots of Nightmare all at once will lose the ^FF0000Set Effects^0000FF.^000000";
next;
mes "[Bayani]";
mes "Think it through. Next question?";
next;
}
}
mes "[Bayani]";
mes "Ha ha ha ha ha ha ha! Good!";
mes "You've brought the materials, right?";
next;
if (select("Oh... sorry...:Preparations are complete!!") == 1) {
mes "[Bayani]";
mes "Oh no!!";
mes "I will need an light but sturdy armor with an refinement of +9 or greater and 20 Ancient Grudges!!";
close;
}
if (countitem(6499) < 20) {
mes "[Bayani]";
mes "You said all preparations are done and you give me this?! I need at least 20 Ancient Grudges to refine your item.";
close;
}
mes "[Bayani]";
mes "So what armor will it be?";
next;
switch (select("Bakonawa Scale Armor:Kalasag:Buwaya Sack Cloth:Bangungot Boots of Nightmare")) {
case 1:
.@part = EQI_ARMOR;
.@item = 15051;
.@newItem = 15052;
break;
case 2:
.@part = EQI_HAND_L;
.@item = 2169;
.@newItem = 2170;
break;
case 3:
.@part = EQI_GARMENT;
.@item = 2590;
.@newItem = 2591;
break;
case 4:
.@part = EQI_SHOES;
.@item = 2491;
.@newItem = 2492;
break;
}
if (!(.@item)) {
mes "[Bayani]";
mes "You should wear the equipment to upgrade and not come without it on you.";
close;
} else if (getequipid(.@part) != .@item) {
mes "[Bayani]";
mes "What is this! You said you wanted to upgrade " + getitemname(.@item) + " but why are you giving me this? You should be wearing " + getitemname(.@item) + ".";
close;
} else if (getequiprefinerycnt(.@part) < 9) {
mes "[Bayani]";
mes "No, the sturdiness of this item has not been tested yet. It'll have to be at least +9 refined for me to say, 'Oh this is pretty sturdy armor.";
close;
}
mes "[Bayani]";
mes "Looks like you did your homework! Don't see a flaw! Then I have one question to ask before I start refinement.";
next;
mes "[Bayani]";
mes "^0000FFOnce your item is refined, the refinement level will be ^FF00000^0000FF and the item will be upgraded.^000000 You get this part?";
next;
if (select("No.:Yes.") == 1) {
mes "[Bayani]";
mes "What? You didn't know this? Then, read through my instructions and come back again.";
close;
}
mes "[Bayani]";
mes "Good. Next question. Once refinement is done,";
mes "^0000FFEquipping the Kalasag, Buwaya Sack Cloth, Bakonawa Scale Armor, and Bangungot Boots of Nightmare all at once will lose the ^FF0000Set Effects^0000FF.^000000";
mes "Do you understand this point?";
next;
if (select("No.:Yes.") == 1) {
mes "[Bayani]";
mes "What? You didn't know this? Then, read through my instructions and come back again.";
close;
}
mes "[Bayani]";
mes "Awesome! Then let's start refining " + getitemname(.@item) + ".";
next;
specialeffect EF_SONICBLOW;
mes "[Bayani]";
mes "Pow!! Wow!! Flip... flop!";
next;
specialeffect2 EF_TRIPLEATTACK;
mes "[Bayani]";
mes "BAM!!";
next;
delitem 6499,20; //Ancient_Grudge
delequip .@part;
getitem .@newItem, 1;
mes "[Bayani]";
mes "Ha ha. Perfect.";
mes "Congratulations. Your armor is better than ever.";
close;
}