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
|
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(Class == 5 && checkcart(0) == 0) goto L_Cart_Ok;
if(Class == 10 && checkcart(0) == 0) goto L_Cart_Ok;
if(Class == 18 && checkcart(0) == 0) goto L_Cart_Ok;
if(Class == 4006 && checkcart(0) == 0) goto L_Cart_Ok;
if(Class == 4011 && checkcart(0) == 0) goto L_Cart_Ok;
if(Class == 4019 && checkcart(0) == 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 Merchants, Blacksmiths and Alchimists 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(Class == 11 && checkfalcon(0) == 0) goto L_falc;
if(Class == 4012 && checkfalcon(0) == 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 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 tame a Falcon.";
close;
L_Peco:
if (Class == 7 && checkriding(0) == 0) goto L_Peco_Ok;
if (Class == 14 && checkriding(0) == 0) goto L_Peco_Ok;
if (Class == 4008 && checkriding(0) == 0) goto L_Peco_Ok;
if (Class == 4015 && checkriding(0) == 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 can harness them.";
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;
}
|
