diff options
Diffstat (limited to 'npc/merchants/custom')
| -rw-r--r-- | npc/merchants/custom/breeder.txt | 67 | ||||
| -rw-r--r-- | npc/merchants/custom/dye.txt | 176 |
2 files changed, 243 insertions, 0 deletions
diff --git a/npc/merchants/custom/breeder.txt b/npc/merchants/custom/breeder.txt new file mode 100644 index 000000000..76fe3a700 --- /dev/null +++ b/npc/merchants/custom/breeder.txt @@ -0,0 +1,67 @@ +//Peco Peco breeder for Knight by Darkchild v1.1
+//FIXED checkriding/cart/falcon funcs [Lupus]
+
+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 own 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 Knight and Crusader 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;
+}
\ No newline at end of file diff --git a/npc/merchants/custom/dye.txt b/npc/merchants/custom/dye.txt new file mode 100644 index 000000000..0c5d19741 --- /dev/null +++ b/npc/merchants/custom/dye.txt @@ -0,0 +1,176 @@ +//===== eAthena Script =======================================
+//= Stylist & Tailor Script (former Dye Script)
+//===== By: ==================================================
+//= eAthena Dev team
+//= Revised by Nekosume [pyRO v3.0]
+//===== Current Version: =====================================
+//= 4.0
+//===== Compatible With: =====================================
+//= Any eAthena Version
+//===== Description: =========================================
+//= Revised dye NPC, split into two NPCs, one for hair color
+//= and style, the other for clothes color.
+//===== Additional Comments: =================================
+//= v4.0 - Refined and Combined [Darkchild]
+//= v3.0 - Added the 'Browse' options
+//= v2.5 - Added more hair colors
+//= v2.0 - Changed palette and hair style select
+//= v1.5 - Revised script / different dialog
+//= v1.0 - Split into two NPCs
+//============================================================
+
+
+//Stylist------------------------------------------------------------------------------------------------------------
+prontera.gat,149,189,1 script Stylist 122,{
+ mes "[^FF8000Stylist^000000]";
+ mes "I'm the greatest stylist in all of Rune-Midgard~~!";
+ mes "I can change your hair style or color!";
+ mes "What do you wish to change?";
+ next;
+ menu "Hair style",Lstyle,"Hair color",Lcolor,"Cloth Color",Lcloth,"Nothing",LCancel;
+
+ Lstyle:
+ mes "[^FF8000Stylist^000000]";
+ mes "Do you want to browse through the choices, or do you know what you want?";
+ next;
+ menu "Browse",Lbrowsesty,"I know what I want",Lwantsty;
+
+ Lwantsty:
+ mes "[^FF8000Stylist^000000]";
+ mes "Great! Now just pick a style and I'll get started!";
+ next;
+ mes "[^FF8000Stylist^000000]";
+ mes "Please pick a style number ^0000FFbetween 0 and 18^000000.";
+ mes "Number 0, by the way, is the default style for your character.";
+ next;
+ input @sty;
+ if (@sty>18) close;
+ if (@sty<0) close;
+ setlook 1,@sty;
+ next;
+ mes "[^FF8000Stylist^000000]";
+ mes "Is this good, or do you want a different style?";
+ next;
+ menu "This is good",-,"Different style, please",Lwantsty;
+ next;
+ mes "[^FF8000Stylist^000000]";
+ mes "You look great~! Come back again, okay?";
+ close;
+
+ Lbrowsesty:
+ set @look, -1;
+ mes "[^FF8000Stylist^000000]";
+ mes "Okay, here we go~! Just stop me when you see something you like, okay?";
+ next;
+
+ Lbrowserep:
+ set @look,@look+1;
+ setlook 1,@look;
+ mes "This is Pallete Number^FF9009 "+@look+" ^000000!";
+ if(@look == 18) menu "Back To The Begin",Lbrowsesty,"I like this one",Lstop;
+ if(@look != 18) menu "Keep going",Lbrowserep,"I like this one",Lstop;
+
+ Lcolor:
+ mes "[^FF8000Stylist^000000]";
+ mes "Do you want to browse through the choices, or do you know what you want?";
+ next;
+ menu "Browse",Lbrowsecolor,"I know what I want",Lwantcolor;
+
+ Lwantcolor:
+ mes "[^FF8000Stylist^000000]";
+ mes "Just pick a color and we can get started.";
+ next;
+ mes "[^FF8000Stylist^000000]";
+ mes "Please pick a style number ^0000FFbetween 0 and 20^000000.";
+ mes "Number 0, by the way, is the default color for your character.";
+ next;
+ mes "[^FF8000Stylist^000000]";
+ mes "0 is default...";
+ mes "1 is blonde...";
+ mes "2 is lavender...";
+ mes "3 is brown...";
+ mes "4 is green...";
+ mes "5 is blue...";
+ mes "6 is white...";
+ mes "7 is black...";
+ mes "8 is red...";
+ mes "and 9-20 are new colors.";
+ input @color;
+ if (@color>20) close;
+ if (@color<0) close;
+ setlook 6,@color;
+ next;
+ mes "[^FF8000Stylist^000000]";
+ mes "Is this good, or do you want a different color?";
+ next;
+ menu "This is good",-,"Different color, please",Lwantcolor;
+ next;
+ mes "[^FF8000Stylist^000000]";
+ mes "You look great~! Come back again, okay?";
+ close;
+
+ Lbrowsecolor:
+ set @look, -1;
+ mes "[^FF8000Stylist^000000]";
+ mes "Okay, here we go~! Just stop me when you see something you like, okay?";
+ next;
+
+ Lbrowsecolorrep:
+ set @look,@look+1;
+ setlook 6,@look;
+ mes "This is Pallete Number^FF9009 "+@look+" ^000000!";
+ if(@look == 20) menu "Back To The Begin",Lbrowsecolor,"I like this one",Lstop;
+ if(@look != 20) menu "Keep going",Lbrowsecolorrep,"I like this one",Lstop;
+
+ Lstop:
+ mes "[^FF8000Stylist^000000]";
+ mes "You look great~! I love it~! ^_^";
+ close;
+
+ LCancel:
+ mes "[^FF8000Stylist^000000]";
+ mes "Well come again.";
+ close;
+
+ Lcloth:
+ mes "[^FF8000Stylist^000000]";
+ mes "Do you want to browse through the choices, or do you know what you want?";
+ next;
+ menu "Browse",Lbrowsecloth,"I know what I want",Lwantcloth;
+
+ Lwantcloth:
+ mes "[^FF8000Stylist^000000]";
+ mes "Great! Now just pick a pallete and I'll get started!";
+ next;
+ mes "[^FF8000Stylist^000000]";
+ mes "Please pick a style number ^0000FFbetween 0 and 77^000000.";
+ mes "Number 0, by the way, is the default style for your character.";
+ next;
+ input @pal;
+ if (@pal>77) close;
+ if (@pal<0) close;
+ setlook 7,@pal;
+ next;
+ mes "[^FF8000Stylist^000000]";
+ mes "Is this good, or do you want a different pallet";
+ next;
+ menu "This is good",-,"Different pallet, please",Lwantcloth;
+ next;
+ mes "[^FF8000Stylist^000000]";
+ mes "You look great~! Come back again, okay?";
+ close;
+
+ Lbrowsecloth:
+ set @look, -1;
+ mes "[^FF8000Stylist^000000]";
+ mes "Okay, here we go~! Just stop me when you see something you like, okay?";
+ next;
+
+ Lbrowseclothrep:
+ set @look,@look+1;
+ setlook 7,@look;
+ mes "This is Pallete Number^FF9009 "+@look+" ^000000!";
+ if(@look == 77) menu "Back To The Begin",Lbrowsecloth,"I like this one",Lstop;
+ if(@look != 77) menu "Keep going",Lbrowseclothrep,"I like this one",Lstop;
+}
+
|