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
|
//===== eAthena Script =======================================
//= Custom Free Breeder aka Universal Renter (not reccomended)
//===== By: ==================================================
//= eAthena Team
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= eAthena 1.0 Final +
//===== Description: =========================================
//= A Free PecoPeco and Falcon Breeder
//===== Additional Comments: =================================
//FIXED checkriding/cart/falcon funcs [Lupus]
//Added Rebirth/Advanced Class support [Mass Zero]
//Simplified the checks of job [Silentdragon]
//============================================================
prontera.gat,122,200,1 script Universal Rental Npc 726,{
mes "[Universal Rental Npc]";
mes "Hi, here you can rent Carts, Falcons or Pecopecos.";
next;
L_Menu:
menu "Rent a Cart",L_Cart,"Rent a Falcon",L_Falcon,"Rent a Pecopeco",L_Peco,"Quit",L_Quit;
close;
L_Cart:
if((BaseClass == Job_Merchant || BaseJob == Job_SuperNovice) && checkcart() == 0) goto L_Cart_Ok;
if(getskilllv(39)<1) goto L_Need_Skill;
mes "[Universal Rental Npc]";
mes "Sorry " + strcharinfo(0) + ", but I only rent carts to people with the Merchant job root, who have enough skills to handle a cart.";
close;
L_Cart_Ok:
setcart;
goto L_Quit2;
L_Need_Skill:
mes "[Universal Rental Npc]";
mes "Sorry you don't have the required skill to rent a cart.";
close;
L_Falcon:
if(BaseJob != Job_Archer && BaseClass == Job_Archer && checkfalcon() == 0) goto L_Falc;
if(getskilllv(127)<1) goto L_Need_Skill2;
mes "[Universal Rental Npc]";
mes "Sorry " + strcharinfo(0) + ", but I only rent falcons to Hunters and Snipers who the ability to handle 'em.";
close;
L_Falc:
setfalcon;
goto L_Quit2;
L_Need_Skill2:
mes "[Universal Rental Npc]";
mes "Sorry you don't have the required skill to own a Falcon.";
close;
L_Peco:
if (BaseJob != Job_Swordman && BaseClass == Job_Swordman && checkriding() == 0) goto L_Peco_Ok;
if(getskilllv(63)<1) goto L_Need_Skill3;
mes "[Universal Rental Npc]";
mes "Sorry " + strcharinfo(0) + ", but I only rent Pecopecos to Knights and Crusaders who have the ability to handle 'em.";
close;
L_Peco_Ok:
setriding;
goto L_Quit2;
L_Need_Skill3:
mes "[Universal Rental Npc]";
mes "Sorry you don't have the required skill to ride a Peco Peco.";
close;
L_Quit:
mes "[Universal Rental Npc]";
mes strcharinfo(0) + ", please come back when you are ready to rent something.";
close;
L_Quit2:
mes "[Universal Rental Npc]";
mes strcharinfo(0) + ", please come again when you want another...";
close;
}
|
