1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
|
//===== eAthena Script =======================================
//= Renters
//===== By: ==================================================
//= kobra_k88, mod by Lupus
//===== Current Version: =====================================
//= 1.3
//===== Compatible With: =====================================
//= eAthena 7.15 +
//===== Description: =========================================
//= PecoPeco Breeder, Grand PecoPeco Breeder, Falcon tamer scripts
//===== Additional Comments: =================================
//= Fully working
//= Added another Falcon Master into the Hunters Guild [Lupus]
//= 1.2: replaced checkoption(x) with checkriding,checkfalcon [Lupus]
//= 1.3: Added support for Lord_Knight(2),Paladin(2) and Sniper.
//============================================================
// PecoPeco Breeder (for Knights)-------------------------------------------
prontera.gat,61,338,3 script PecoPeco Breeder 86,{
mes "[PecoPeco Breeder]";
if(Class == Job_Knight || Class == Job_Knight2 || Class == 4008 || Class == Job_Lord_Knight || Class == Job_Lord_Knight2) goto L_Start;
mes "I'm a PecoPeco breeder and I rent out PecoPeco's for^4444FF Knights ^000000to ride on.";
close;
L_Start:
mes "Good day. Would you like to ride a PecoPeco?";
next;
mes "[PecoPeco Breeder]";
mes "You can rent one PecoPeco for 2500 Zeny, provided that you have the PecoPeco Riding skill.";
next;
menu "Lend me a trusty steed!... err... bird!",M_0,"Hmm...It's a bit too expensive.",M_1;
M_0:
if(getskilllv(63) == 0) goto sL_NeedSkill;
if(Zeny < 2500) goto sL_Zeny;
if(checkriding(0) != 0) goto sL_GotPeco;
set Zeny, Zeny - 2500;
setriding;
mes "Thank you and good day.";
emotion 15;
close;
sL_NeedSkill:
mes "[PecoPeco Breeder]";
mes "As I mentioned earlier, you need the^3333FF Riding ^000000skill in order to rent a PecoPeco.";
close;
sL_Zeny:
mes "[PecoPeco Breeder]";
mes "As I said before it will be 2500z. Come back when you aquire enough zeny.";
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)-------------------------------------------
prontera.gat,238,312,5 script Grand PecoPeco Breeder 86,{
mes "[Grand PecoPeco Breeder]";
if(Class == Job_Crusader || Class == Job_Crusader2 || Class == 4015 || Class == Job_Paladin || Class == Job_Paladin2 ) goto L_Start;
mes "I'm a Grand PecoPeco breeder and I rent out Grand PecoPeco's for^4444FF Crusaders ^000000to ride on.";
close;
L_Start:
mes "Good day. Would you like to ride a Grand PecoPeco?";
next;
mes "[Grand PecoPeco Breeder]";
mes "You can rent one Grand PecoPeco for 2500 Zeny, provided that you have the PecoPeco Riding skill.";
next;
menu "Lend me a trusty steed!... err... bird!",M_0,"Hmm...It's a bit too expensive.",M_1;
M_0:
if(getskilllv(63) == 0) goto sL_NeedSkill;
if(Zeny < 2500) goto sL_Zeny;
if(checkriding(0) != 0) goto sL_GotPeco;
set Zeny, Zeny - 2500;
setriding;
mes "Thank you and good day.";
emotion 15;
close;
sL_NeedSkill:
mes "[Grand PecoPeco Breeder]";
mes "As I mentioned earlier, you need the^3333FF Riding ^000000skill in order to rent a Grand PecoPeco.";
close;
sL_Zeny:
mes "[Grand PecoPeco Breeder]";
mes "As I said before it will be 2500z. Come back when you aquire 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--------------------------------------------------------------
in_hunter.gat,146,100,2 script Falcon Master 59,{
mes "[Falcon Master]";
mes "Hellooooo, I am the Falcon Master.";
next;
menu "Speak with him",M_0, "Politely back away",M_End;
M_0:
mes "[Falcon Master]";
mes "I can train a Falcon for you, but you need to be a Hunter and have mastered the ^5555FF'Falcon Taming' skill^000000.";
next;
menu "Ok",sM_0, "No thanks",M_End;
sM_0:
if(Class != Job_Hunter && Class != 4012 && Class != Job_Sniper) goto sL_NotHunter;
if(checkfalcon(0) != 0) goto sL_GotFalc;
if(getskilllv(127)==0) goto sL_NoSkill;
mes "[Falcon Master]";
mes "It looks like you meet all the requirements to handle a Falcon. Here you are";
setfalcon;
next;
mes "[Falcon Master]";
mes "Please take very good care of it. It will prove to be a valuble companion.";
close;
sL_NotHunter:
mes "[Falcon Master]";
mes "As I said, Falcons can only be given to Hunters. Falcons are very picky about who they travel with you know.";
close;
sL_GotFalc:
mes "[Falcon Master]";
mes "You can only have 1 Falcon at a time.";
close;
sL_NoSkill:
mes "[Falcon Master]";
mes "I'm sorry but you do not have the Falcon Taming skill. Please come back when you have learned it.";
close;
M_End:
mes "[Falcon Master]";
mes "Have a nice day.";
close;
}
//Not Supposed To Be One In Payon!
//Coordinate IS Correct For New Payon Map Though IF You Enable It
//payon_in01.gat,206,175,4 duplicate(Falcon Master) Falcon Master 59
|
