* Updated Knight Peco, Crusader Peco, and Falcon breeders to Aegis 10.3 standards.

git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@10666 54d463be-8e91-2dee-dedb-b68131a5f0ec
This commit is contained in:
L0ne_W0lf 2007-06-02 00:53:39 +00:00
parent d591264bda
commit 51e85c5a80
2 changed files with 159 additions and 147 deletions

View File

@ -1,6 +1,7 @@
Date Added Date Added
====== ======
2007/06/01 2007/06/01
* Rev. 10666 Updated Knight Peco, Crusader Peco, and Falcon breeders to Aegis 10.3 standards. [L0ne_W0lf]
* Rev. 10664 Removed Ktullanux spawn, since the quest is implemented now. [L0ne_W0lf] * Rev. 10664 Removed Ktullanux spawn, since the quest is implemented now. [L0ne_W0lf]
* Rev. 10663 Rachel update. Official (to iRO) quests and town NPCs. [L0ne_W0lf] * Rev. 10663 Rachel update. Official (to iRO) quests and town NPCs. [L0ne_W0lf]
- Added a few missing warps as well to both town and dungeon warps for Rachel. - Added a few missing warps as well to both town and dungeon warps for Rachel.

View File

@ -3,11 +3,11 @@
//===== By: ================================================== //===== By: ==================================================
//= kobra_k88, mod by Lupus //= kobra_k88, mod by Lupus
//===== Current Version: ===================================== //===== Current Version: =====================================
//= 1.6a //= 1.7
//===== Compatible With: ===================================== //===== Compatible With: =====================================
//= eAthena 7.15 + //= eAthena SVN
//===== Description: ========================================= //===== Description: =========================================
//= PecoPeco Breeder, Grand PecoPeco Breeder, Falcon tamer scripts //= Knight and Crusader Peco Peco Breeders, Falcon Breeder scripts
//===== Additional Comments: ================================= //===== Additional Comments: =================================
//= Fully working //= Fully working
//= Added another Falcon Master into the Hunters Guild [Lupus] //= Added another Falcon Master into the Hunters Guild [Lupus]
@ -18,165 +18,176 @@
//= 1.5: Fixed spelling mistakes [Nexon] //= 1.5: Fixed spelling mistakes [Nexon]
//= 1.5a: Small fix (Falcon Taming -> Falcon Mastery) [Komurka] //= 1.5a: Small fix (Falcon Taming -> Falcon Mastery) [Komurka]
//= 1.6: Moved the Falcon Master to Hugel [Poki#3] //= 1.6: Moved the Falcon Master to Hugel [Poki#3]
//= 1.7 Updated to Aegis 10.3 standards. [L0ne_W0lf]
//============================================================ //============================================================
// PecoPeco Breeder (for Knights)------------------------------------------- // PecoPeco Breeder (for Knights)-------------------------------------------
prontera,61,338,3 script PecoPeco Breeder 86,{ prontera,55,350,5 script Peco Peco Breeder 105,{
if(Upper==0) set @price,2500; //Normal Peco - default price if(Upper==0) set .@price,2500; //Normal Peco - default price
if(Upper==1) set @price,4000; //Armored Peco if(Upper==1) set .@price,2500; //Armored Peco
if(Upper==2) set @price,2000; //Baby Peco if(Upper==2) set .@price,2500; //Baby Peco
mes "[Peco Peco Breeder]"; mes "[Peco Peco Breeder]";
if(BaseJob == Job_Knight || BaseJob == Job_Knight2 ) goto L_Start; if (BaseJob == Job_Knight) {
if(Upper==0)mes "I'm a PecoPeco breeder and I rent out PecoPecos for ^4444FF Knights ^000000 to ride on."; mes "Welcome.";
if(Upper==1)mes "I'm a PecoPeco breeder and I rent out Armored PecoPecos for ^4444FF Lord Knights ^000000 to ride on."; mes "Honorable Knight,";
if(Upper==2)mes "I'm a PecoPeco breeder and I rent out Baby PecoPecos for ^4444FF Baby Knights ^000000 to ride on."; mes "would you like to rent";
mes "a Peco Peco? The rental";
mes "fee is "+.@price+" zeny.";
next;
if (select("Rent Peco Peco:Cancel") == 1) {
if (zeny < .@price) {
mes "[Peco Peco Breeder]";
mes "You do not";
mes "have enough zeny.";
mes "Are you...";
mes "bankrupt?";
close; close;
}
L_Start: else if(getskilllv(63) == 0) {
if(Upper==0)mes "Good day. Would you like to ride a PecoPeco?";
if(Upper==1)mes "Good day. Would you like to ride an Armored PecoPeco?";
if(Upper==2)mes "Good day. Would you like to ride a Baby PecoPeco?";
next;
mes "[Peco Peco Breeder]"; mes "[Peco Peco Breeder]";
mes "You can rent one PecoPeco for "+@price+" Zeny, provided that you have the PecoPeco Riding skill."; mes "I'm sorry, but you're";
next; mes "not eligible for this";
menu "Lend me a trusty steed!... err... bird!",M_0,"Hmm...It's a bit too expensive.",M_1; mes "service. Please go learn";
mes "the Peco Peco Ride skill first.";
M_0: close;
if(getskilllv(63) == 0) goto sL_NeedSkill; }
if(Zeny < @price) goto sL_Zeny; else if(checkriding()) {
if(checkriding() != 0) goto sL_GotPeco; mes "[Peco Peco Breeder]";
set Zeny, Zeny - @price; mes "You're already";
mes "mounted on a";
mes "Peco Peco.";
close;
}
set zeny,zeny-.@price;
setriding; setriding;
mes "Thank you and good day."; }
emotion 15;
close;
sL_NeedSkill:
mes "[Peco Peco Breeder]"; mes "[Peco Peco Breeder]";
mes "As I mentioned earlier, you need the ^3333FFRiding^000000 skill in order to rent a PecoPeco."; mes "I see.";
mes "Well then,";
mes "have a good day.";
close; close;
sL_Zeny: }
mes "[PecoPeco Breeder]"; mes "I'm sorry, but these";
mes "As I said before it will be "+@price+"z. Come back when you have enough zeny."; mes "Peco Pecos are only";
mes "available for Knights";
mes "and Lord Knights.";
close; close;
sL_GotPeco:
mes "[PecoPeco Breeder]";
mes "Umm... aren't you already riding a PecoPeco??....";
emotion 20;
close;
M_1:
mes "[PecoPeco Breeder]";
mes "Alright. Good day to you.";
close;
} }
// Grand PecoPeco Breeder (for Crusaders)------------------------------------------- // Grand PecoPeco Breeder (for Crusaders)-------------------------------------------
prontera,238,312,5 script Grand PecoPeco Breeder 86,{ prontera,232,318,3 script Peco Peco Breeder 105,{
if(Upper==0) set @price,3000; //Normal Peco - default price if(Upper==0) set @price,3500; //Normal Peco - default price
if(Upper==1) set @price,5000; //Armored Peco if(Upper==1) set @price,3500; //Armored Peco
if(Upper==2) set @price,2500; //Baby Peco if(Upper==2) set @price,3500; //Baby Peco
mes "[Grand PecoPeco Breeder]"; mes "[PecoPeco Breeder]";
if(BaseJob == Job_Crusader || BaseJob == Job_Crusader2 ) goto L_Start; if (BaseClass == Job_Crusader) {
if(Upper==0)mes "I'm a Grand PecoPeco breeder and I rent out Grand PecoPecos for ^4444FF Crusaders^000000 to ride on."; if (Class == Job_Crusader && Upper == 0 || Upper == 1) mes "Welcome, Crusader.";
if(Upper==1)mes "I'm a Grand PecoPeco breeder and I rent out Armored Grand PecoPecos for ^4444FF Paladins^000000 to ride on."; else
if(Upper==2)mes "I'm a Grand PecoPeco breeder and I rent out Baby Grand PecoPecos for ^4444FF Baby Crusaders^000000 to ride on."; mes "Welcome, Paladin.";
mes "We have a special";
mes "Peco Peco prepared";
mes "for you. To rent one";
mes "will cost "+.@price+" zeny.";
next;
if (select("Rent a PecoPeco:Quit") ==1) {
if (zeny < .@Price) {
mes "[Peco Peco Breeder]";
mes "You do not";
mes "have enough zeny.";
mes "If you would like";
mes "a Peco Peco please";
mes "bring "+.@price+" zeny...";
close; close;
}
L_Start: else if(getskilllv(63) == 0) {
if(Upper==0)mes "Good day. Would you like to ride a Grand PecoPeco?"; mes "[Peco Peco Breeder]";
if(Upper==1)mes "Good day. Would you like to ride an Armored Grand PecoPeco?"; mes "You must first learn";
if(Upper==2)mes "Good day. Would you like to ride a Baby Grand PecoPeco?"; mes "to ride a PecoPeco before";
next; mes "I can rent one to you.";
mes "[Grand PecoPeco Breeder]"; close;
mes "You can rent one Grand PecoPeco for "+@price+" Zeny, provided that you have the PecoPeco Riding skill."; }
next; else if(checkriding()) {
menu "Lend me a trusty steed!... err... bird!",M_0,"Hmm...It's a bit too expensive.",M_1; mes "[Peco Peco Breeder]";
mes "You are already";
M_0: mes "mounted on a Peco Peco.";
if(getskilllv(63) == 0) goto sL_NeedSkill; close;
if(Zeny < @price) goto sL_Zeny; }
if(checkriding() != 0) goto sL_GotPeco; set zeny,zeny-.@price;
set Zeny, Zeny - @price;
setriding; setriding;
mes "Thank you and good day."; }
emotion 15; mes "[PecoPeco Breeder]";
mes "See you around.";
close; close;
}
sL_NeedSkill: mes "What can I do for you?";
mes "[Grand PecoPeco Breeder]"; mes "Please be aware that";
mes "As I mentioned earlier, you need the ^3333FFRiding^000000 skill in order to rent a Grand PecoPeco."; mes "this Peco Peco rental";
mes "service is strictly for";
mes "Crusaders and Paladins.";
close; close;
sL_Zeny:
mes "[Grand PecoPeco Breeder]";
mes "As I said before it will be "+@price+"z. Come back when you have enough zeny.";
close;
sL_GotPeco:
mes "[Grand PecoPeco Breeder]";
mes "Umm... aren't you already riding a Grand PecoPeco??....";
emotion 20;
close;
M_1:
mes "[Grand PecoPeco Breeder]";
mes "Alright. Good day to you.";
close;
} }
// Falcon Master-------------------------------------------------------------- // Falcon Master--------------------------------------------------------------
hu_in01,375,318,5 script Falcon Master 59,{ hu_in01,381,304,5 script Falcon Breeder 105,{
if(Upper==0) set @price,800; //Normal Falcon - default price if(Upper==0) set @price,2500; //Normal Falcon - default price
if(Upper==1) set @price,1000; //Scarf Falcon if(Upper==1) set @price,2500; //Scarf Falcon
if(Upper==2) set @price,600; //Baby Falcon if(Upper==2) set @price,2500; //Baby Falcon
mes "[Falcon Master]"; mes "[Falcon Breeder]";
mes "Hellooooo, I am the Falcon Master."; if (BaseJob == Job_Hunter) {
mes "Do you need a Falcon?";
mes "You can rent your own";
mes "trusty bird of prey for a";
mes "fee of just "+.@price+" zeny~";
next; next;
menu "Speak with him",M_0, "Politely back away",M_End; if (select("Rent Falcon:Cancel") == 1) {
if (zeny < .@price) {
M_0: mes "[Falcon Breeder]";
mes "[Falcon Master]"; mes "What is this?";
if(Upper==0)mes "I can train a Falcon for you, but you need "+@price+"z and be a Hunter with mastered ^5555FF'Falcon Mastery'^000000 skill."; mes "You don't have";
if(Upper==1)mes "I can train a Scarf Falcon for you, but you need "+@price+"z and be a Sniper with mastered ^5555FF'Falcon Mastery'^000000 skill."; mes "enough zeny?!";
if(Upper==2)mes "I can train a Baby Falcon for you, but you need "+@price+"z and be a Baby Hunter with mastered ^5555FF'Falcon Mastery'^000000 skill."; mes "You better start";
next; mes "hunting money";
menu "Ok",sM_0, "No thanks",M_End; mes "instead of monsters~";
close;
sM_0: }
if(BaseJob != Job_Hunter) goto sL_NotHunter; else if(getskilllv(127) == 0) {
if(checkfalcon() != 0) goto sL_GotFalc; mes "[Falcon Breeder]";
if(Zeny < @price) goto sL_Zeny; mes "Gosh~";
if(getskilllv(127)==0) goto sL_NoSkill; mes "Go learn how to";
set Zeny, Zeny - @price; mes "manage a Falcon";
mes "[Falcon Master]"; mes "first! I can't rent one";
mes "It looks like you meet all the requirements to handle a Falcon. Here you are"; mes "to you if you can't";
setfalcon; mes "handle it, you know.";
next; close;
mes "[Falcon Master]"; }
mes "Please take very good care of it. It will prove to be a valuable companion."; else if(checkfalcon()) {
close; mes "[Falcon Breeder]";
mes "Um...";
sL_NotHunter: mes "You already have";
mes "[Falcon Master]"; mes "a Falcon. It's right";
mes "As I said, Falcons can only be given to Hunters. Falcons are very picky about who they travel with you know."; mes "there, can't you see it?";
close; close;
sL_GotFalc: }
mes "[Falcon Master]"; set zeny,zeny-.@Price;
mes "You can only have 1 Falcon at a time."; setfalcon;
close; close;
sL_NoSkill: }
mes "[Falcon Master]"; mes "[Falcon Breeder]";
mes "I'm sorry but you do not have the Falcon Mastery skill. Please come back when you have learned it."; mes "W-wait, where're";
close; mes "you goin'? These";
sL_Zeny: mes "Falcons are top notch,";
mes "[Falcon Master]"; mes "I guarantee it! C'mon, yo~";
mes "As I said before it will be "+@price+"z. Come back when you aquire enough zeny."; close;
close; }
M_End: mes "Young fool!";
mes "[Falcon Master]"; mes "Falcons can only";
mes "Have a nice day."; mes "be used by Hunters";
mes "and Snipers, capish?";
mes "...Heh heh, jealous?";
close; close;
} }