root/npc/custom/breeder.txt @ 25

Revision 1, 2.8 kB (checked in by jinshiro, 17 years ago)
Line 
1//===== eAthena Script =======================================
2//= Custom Free Breeder aka Universal Renter (not reccomended)
3//===== By: ==================================================
4//= eAthena Team
5//===== Current Version: =====================================
6//= 1.3a
7//===== Compatible With: =====================================
8//= eAthena 1.0 Final +
9//===== Description: =========================================
10//= A Free PecoPeco and Falcon Breeder
11//===== Additional Comments: =================================
12//= 1.1 FIXED checkriding/cart/falcon funcs [Lupus]
13//= 1.2 Added Rebirth/Advanced Class support [Mass Zero]
14//= 1.3 Simplified the checks of job [Silentdragon]
15//= 1.3a Fixed a Typo Error. [Samuray22]
16//      -Thanks to ~AnnieRuru~.
17//============================================================
18
19
20prontera,122,200,1      script  Universal Rental Npc    726,{
21        mes "[Universal Rental Npc]";
22        mes "Hi, here you can rent Carts, Falcons or Pecopecos.";
23        next;
24
25L_Menu:
26        menu "Rent a Cart",L_Cart,"Rent a Falcon",L_Falcon,"Rent a Pecopeco",L_Peco,"Quit",L_Quit;
27        close;
28
29L_Cart:
30        if((BaseClass == Job_Merchant || BaseJob == Job_SuperNovice) && checkcart() == 0) goto L_Cart_Ok;
31        mes "[Universal Rental Npc]";
32        mes "Sorry " + strcharinfo(0) + ", but I only rent carts to people with the Merchant job root, who have enough skills to handle a cart.";
33        close;
34
35L_Cart_Ok:
36        if(getskilllv("MC_PUSHCART")<1) goto L_Need_Skill;
37        setcart;
38        goto L_Quit2;
39
40L_Need_Skill:
41        mes "[Universal Rental Npc]";
42        mes "Sorry you don't have the required skill to rent a cart.";
43        close;
44
45L_Falcon:
46        if(BaseJob != Job_Archer && BaseClass == Job_Archer && checkfalcon() == 0) goto L_Falc;
47        if(getskilllv("HT_FALCON")<1) goto L_Need_Skill2;
48
49        mes "[Universal Rental Npc]";
50        mes "Sorry " + strcharinfo(0) + ", but I only rent falcons to Hunters and Snipers who the ability to handle 'em.";
51        close;
52
53L_Falc:
54        setfalcon;
55        goto L_Quit2;
56
57L_Need_Skill2:
58        mes "[Universal Rental Npc]";
59        mes "Sorry you don't have the required skill to own a Falcon.";
60        close;
61
62L_Peco:
63        if (BaseJob != Job_Swordman && BaseClass == Job_Swordman && checkriding() == 0) goto L_Peco_Ok;
64        if(getskilllv("KN_RIDING")<1) goto L_Need_Skill3;
65
66        mes "[Universal Rental Npc]";
67        mes "Sorry " + strcharinfo(0) + ", but I only rent Pecopecos to Knights and Crusaders who have the ability to handle 'em.";
68        close;
69
70L_Peco_Ok:
71        setriding;
72        goto L_Quit2;
73
74L_Need_Skill3:
75        mes "[Universal Rental Npc]";
76        mes "Sorry you don't have the required skill to ride a Peco Peco.";
77        close;
78
79L_Quit:
80        mes "[Universal Rental Npc]";
81        mes strcharinfo(0) + ", please come back when you are ready to rent something.";
82        close;
83
84L_Quit2:
85        mes "[Universal Rental Npc]";
86        mes strcharinfo(0) + ", please come again when you want another...";
87        close;
88}
Note: See TracBrowser for help on using the browser.