1 files changed, 87 insertions, 0 deletions
diff --git a/npc/custom/breeder.txt b/npc/custom/breeder.txt
new file mode 100644
index 000000000..03ed47d9d
--- /dev/null
+++ b/npc/custom/breeder.txt
@@ -0,0 +1,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) == 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) == 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) == 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;
+}