diff options
Diffstat (limited to 'npc/merchants/custom')
-rw-r--r-- | npc/merchants/custom/breeder.txt | 132 | ||||
-rw-r--r-- | npc/merchants/custom/dye.txt | 352 |
2 files changed, 242 insertions, 242 deletions
diff --git a/npc/merchants/custom/breeder.txt b/npc/merchants/custom/breeder.txt index 76fe3a700..b5fc6f793 100644 --- a/npc/merchants/custom/breeder.txt +++ b/npc/merchants/custom/breeder.txt @@ -1,67 +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;
+//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 index 0c5d19741..0b2738e9f 100644 --- a/npc/merchants/custom/dye.txt +++ b/npc/merchants/custom/dye.txt @@ -1,176 +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;
-}
-
+//===== 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; +} + |