summaryrefslogtreecommitdiff
path: root/npc/merchants/clothes_dyer.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/merchants/clothes_dyer.txt')
-rw-r--r--npc/merchants/clothes_dyer.txt650
1 files changed, 325 insertions, 325 deletions
diff --git a/npc/merchants/clothes_dyer.txt b/npc/merchants/clothes_dyer.txt
index 374435892..f0cc8bff8 100644
--- a/npc/merchants/clothes_dyer.txt
+++ b/npc/merchants/clothes_dyer.txt
@@ -1,325 +1,325 @@
-//===== eAthena Script =======================================
-//= Clothes Dyer
-//===== By: ==================================================
-//= Usnul
-//===== Current Version: =====================================
-//= 2.0
-//===== Compatible With: =====================================
-//= eAthena 1.0+
-//===== Description: =========================================
-//= Clothes dyer with standard palletes
-//===== Additional Comments: =================================
-//= Fully working
-//============================================================
-
-
-// Dyer Ginedin Rephere ---------------------------------------------------
-prt_in.gat,284,168,2 script Dyer Ginedin Rephere 55,{
- mes "[Dyer Ginedin Rephere]";
- mes "11... 12... Mmm... good. I think I'll be able ot finish before tonights party. Oh! I didn't notice that you were here. Anyway how may I assist you?";
-M_Menu:
- next;
- menu "-Talk",L_Talk, "-Dye Clothing",L_Dye, "-Price list",L_PriceList, "-Cancel",L_End;
-
- L_Talk:
- mes "[Dyer Ginedin Rephere]";
- mes "Life may have gotten a little better.... but when I look at all of the orders I've recieved... Whew!";
- mes "It seems that the young women of Rune Midgard must be very well off these days.";
- next;
- mes "[Dyer Ginedin Rephere]";
- mes "Not that I think that they are indulging in anything luxurious mind you.";
- mes "I don't think there is anything wrong with the pursuit of beauty and being fashionable.";
- next;
- mes "[Dyer Ginedin Rephere]";
- mes "For us humans, who have no colorful fur or decorative scales, clothes are one of the few ways we have to display our personality, style, and beauty.";
- next;
- mes "[Dyer Ginedin Rephere]";
- mes "Haha... When I think about it, I really feel that my job is worthwhile. I believe that I provide a service that the people desire.";
- next;
- mes "[Dyer Ginedin Rephere]";
- mes "Can you feel it too? The energy that is released when rough fabric and leather are brought to life with color?.....";
- next;
- mes "[Dyer Ginedin Rephere]";
- mes "Although the process is very tedious and time consuming, the joy and happiness I feel when a dress is finished.....";
- mes "more than makes up for all of the hard work!!";
- goto M_Menu;
-
- L_Dye:
- mes "[Dyer Ginedin Rephere]";
- if(Class==0) goto sL_Novice;
- mes "Oh... you need my work? Well... okay sounds good.";
- next;
- mes "[Dyer Ginedin Rephere]";
- mes "Please choose a color that suits you.";
- next;
- if(Sex==0) goto Female_dye;
-//=================================
-// Clothing Dyeing for Males
-//=================================
-
-Male_dye:
- //1 Class
- if(Class==5 || Class==1) goto L_Wiz_Hunt_Bard_SN_M;
- if(Class==2) goto L_Mage_M;
- if(Class==3) goto L_Archer_M;
- if(Class==4) goto L_Aco_M;
- if(Class==6) goto L_Thief_M;
-
- //2 Class
- if(Class==7 || Class==14) goto L_Knight_Crus_M;
- if(Class==8 || Class==15) goto L_Priest_Monk_M;
- if(Class==9 || Class==11 || Class==19 || Class==23) goto L_Wiz_Hunt_Bard_SN_M;
- if(Class==10 || Class==18) goto L_BlackSmith_Alchemist_M;
- if(Class==12) goto L_Assassin_M;
- if(Class==17) goto L_Rogue_M;
-
- //1 Class
- L_Mage_M:
- set @red, 1;
- set @violet, 2;
- set @orange, 3;
- set @white, 4;
- menu "- Red",L_Dye_Red,"- Violet",L_Dye_Violet,"- Orange",L_Dye_Orange,"- White",L_Dye_White,"- Cancel",L_End;
- L_Archer_M:
- set @red, 1;
- set @violet, 2;
- set @green, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Violet",L_Dye_Violet,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_Aco_M:
- set @blue, 1;
- set @red, 2;
- set @white, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_Thief_M:
- set @blue, 1;
- set @red, 2;
- set @green, 3;
- set @white, 4;
- menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Cancel",L_End;
-
- //2 Class
- L_Knight_Crus_M:
- set @orange, 1;
- set @violet, 2;
- set @red, 3;
- set @black, 4;
- menu "- Orange",L_Dye_Orange,"- Violet",L_Dye_Violet,"- Red",L_Dye_Red,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_Priest_Monk_M:
- set @blue, 1;
- set @green, 2;
- set @red, 3;
- set @white, 4;
- menu "- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Red",L_Dye_Red,"- White",L_Dye_White,"- Cancel",L_End;
- L_Wiz_Hunt_Bard_SN_M:
- set @red, 1;
- set @blue, 2;
- set @green, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_BlackSmith_Alchemist_M:
- set @red, 1;
- set @green, 2;
- set @white, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_Assassin_M:
- set @blue, 1;
- set @red, 2;
- set @green, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_Rogue_M:
- set @red, 2;
- set @green, 3;
- menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- Cancel",L_End;
-
-//=================================
-// Clothing Dyeing for Females
-//=================================
-Female_dye:
- //1 Class
- if(Class==1 || Class==4) goto L_Sword_Aco_F;
- if(Class==2) goto L_Knight_Crus_F;
- if(Class==3) goto L_Priest_F;
- if(Class==5) goto L_Merch_F;
- //2 Class
- if(Class==7 || Class==14) goto L_Knight_Crus_F;
- if(Class==8) goto L_Priest_F;
- if(Class==9 || Class==16) goto L_Wiz_Sage_F;
- if(Class==10 || Class==18) goto L_BlackSmith_Alchemist_F;
- if(Class==11 || Class==20) goto L_Hunt_Dancer_F;
- if(Class==12 || Class==17) goto L_Assassin_Rogue_F;
- if(Class==23) goto L_SN_F;
-
- //1 Class
- L_Sword_Aco_F:
- set @blue, 1;
- set @red, 2;
- set @green, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_Merch_F:
- set @violet, 1;
- set @blue, 2;
- set @green, 3;
- set @black, 4;
- menu "- Violet",L_Dye_Violet,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_Thief_F:
- set @blue, 1;
- set @red, 2;
- set @white, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
-
- //2 Class
- L_Knight_Crus_F:
- set @red, 1;
- set @blue, 2;
- set @white, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_Priest_F:
- set @red, 1;
- set @green, 2;
- set @white, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_Wiz_Sage_F:
- set @red, 1;
- set @blue, 2;
- set @white, 3;
- set @green, 4;
- menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Green",L_Dye_Green,"- Cancel",L_End;
- L_Hunt_Dancer_F:
- set @red, 1;
- set @blue, 2;
- set @green, 3;
- set @violet, 4;
- menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Violet",L_Dye_Violet,"- Cancel",L_End;
- L_BlackSmith_Alchemist_F:
- set @red, 1;
- set @green, 2;
- set @violet, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- Violet",L_Dye_Violet,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_Assassin_Rogue_F:
- set @red, 1;
- set @yellow, 2;
- set @white, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Yellow",L_Dye_Yellow,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
- L_SN_F:
- set @blue, 1;
- set @red, 2;
- set @white, 3;
- set @black, 4;
- menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
-
-L_Dye_Orange:
- mes "[Dyer Ginedin Rephere]";
- if(countitem(980) < 1) goto sL_NoDye;
- if(Zeny < 10000) goto sL_Zeny;
- mes "Ok. I will dye you clothes Orange.";
- setlook 7,@orange;
- delitem 980,1;
- set Zeny, Zeny - 10000;
- close;
-L_Dye_Violet:
- mes "[Dyer Ginedin Rephere]";
- if(countitem(981) < 1) goto sL_NoDye;
- if(Zeny < 10000) goto sL_Zeny;
- mes "Ok. I will dye you clothes Violet.";
- setlook 7,@violet;
- delitem 981,1;
- set Zeny, Zeny - 10000;
- close;
-L_Dye_Red:
- mes "[Dyer Ginedin Rephere]";
- if(countitem(975) < 1) goto sL_NoDye;
- if(Zeny < 10000) goto sL_Zeny;
- mes "Ok. I will dye you clothes red.";
- setlook 7,@red;
- delitem 975,1;
- set Zeny, Zeny - 10000;
- close;
-L_Dye_Black:
- mes "[Dyer Ginedin Rephere]";
- if(countitem(983) < 1) goto sL_NoDye;
- if(Zeny < 10000) goto sL_Zeny;
- mes "Ok. I will dye you clothes black.";
- setlook 7,@black;
- delitem 983,1;
- set Zeny, Zeny - 10000;
- close;
-L_Dye_Green:
- mes "[Dyer Ginedin Rephere]";
- if(countitem(979) < 1) goto sL_NoDye;
- if(Zeny < 10000) goto sL_Zeny;
- mes "Ok. I will dye you clothes green.";
- setlook 7,@green;
- delitem 979,1;
- set Zeny, Zeny - 10000;
- close;
-L_Dye_Blue:
- mes "[Dyer Ginedin Rephere]";
- if(countitem(978) < 1) goto sL_NoDye;
- if(Zeny < 10000) goto sL_Zeny;
- mes "Ok. I will dye you clothes blue.";
- setlook 7,@blue;
- delitem 978,1;
- set Zeny, Zeny - 10000;
- close;
-L_Dye_White:
- mes "[Dyer Ginedin Rephere]";
- if(countitem(982) < 1) goto sL_NoDye;
- if(Zeny < 10000) goto sL_Zeny;
- mes "Ok. I will dye you clothes white.";
- setlook 7,@white;
- delitem 982,1;
- set Zeny, Zeny - 10000;
- close;
-L_Dye_Yellow:
- mes "[Dyer Ginedin Rephere]";
- if(countitem(976) < 1) goto sL_NoDye;
- if(Zeny < 10000) goto sL_Zeny;
- mes "Ok. I will dye you clothes yellow.";
- setlook 7,@yellow;
- delitem 976,1;
- set Zeny, Zeny - 10000;
- close;
-
- sL_Sorry:
- mes "Wow, your clothes is very strange, I haven't seen anything like it before . Hmmm... I'm sorry, but there is no way I can paint it.";
- close;
- sL_NoDye:
- mes "For me to dye your clothes, I'll need the appropriate Dyestuff. Please check my price list for the information.";
- next;
- goto L_PriceList;
-
- sL_Zeny:
- mes "I'm sorry but you don't have enough money.";
- close;
-
- sL_Novice:
- mes "I'm sorry, but first you need to get a job.";
- close;
-
-
- L_PriceList:
- mes "[Dyer Ginedin Rephere]";
- mes "Here is the list of colors you can choose from and their prices:";
- mes " - Red: 10000 zeny, 1 Scarlet Dyestuff";
- mes " - Yellow: 10000 zeny, 1 Lemon Dyestuff";
- mes " - Violet: 10000 zeny, 1 Violet Dyestuff";
- mes " - Orange: 10000 zeny, 1 Orange Dyestuff";
- mes " - Blue: 10000 zeny, 1 CobaltBlue Dyestuff";
- mes " - Green: 10000 zeny, 1 DarkGreen Dyestuff";
- goto M_Menu;
-
- L_End:
- mes "[Dyer Ginedin Rephere]";
- mes "Make yourself at home. Even though I don't have time for you.";
- close;
-}
+//===== eAthena Script =======================================
+//= Clothes Dyer
+//===== By: ==================================================
+//= Usnul
+//===== Current Version: =====================================
+//= 2.0
+//===== Compatible With: =====================================
+//= eAthena 1.0+
+//===== Description: =========================================
+//= Clothes dyer with standard palletes
+//===== Additional Comments: =================================
+//= Fully working
+//============================================================
+
+
+// Dyer Ginedin Rephere ---------------------------------------------------
+prt_in.gat,284,168,2 script Dyer Ginedin Rephere 55,{
+ mes "[Dyer Ginedin Rephere]";
+ mes "11... 12... Mmm... good. I think I'll be able ot finish before tonights party. Oh! I didn't notice that you were here. Anyway how may I assist you?";
+M_Menu:
+ next;
+ menu "-Talk",L_Talk, "-Dye Clothing",L_Dye, "-Price list",L_PriceList, "-Cancel",L_End;
+
+ L_Talk:
+ mes "[Dyer Ginedin Rephere]";
+ mes "Life may have gotten a little better.... but when I look at all of the orders I've recieved... Whew!";
+ mes "It seems that the young women of Rune Midgard must be very well off these days.";
+ next;
+ mes "[Dyer Ginedin Rephere]";
+ mes "Not that I think that they are indulging in anything luxurious mind you.";
+ mes "I don't think there is anything wrong with the pursuit of beauty and being fashionable.";
+ next;
+ mes "[Dyer Ginedin Rephere]";
+ mes "For us humans, who have no colorful fur or decorative scales, clothes are one of the few ways we have to display our personality, style, and beauty.";
+ next;
+ mes "[Dyer Ginedin Rephere]";
+ mes "Haha... When I think about it, I really feel that my job is worthwhile. I believe that I provide a service that the people desire.";
+ next;
+ mes "[Dyer Ginedin Rephere]";
+ mes "Can you feel it too? The energy that is released when rough fabric and leather are brought to life with color?.....";
+ next;
+ mes "[Dyer Ginedin Rephere]";
+ mes "Although the process is very tedious and time consuming, the joy and happiness I feel when a dress is finished.....";
+ mes "more than makes up for all of the hard work!!";
+ goto M_Menu;
+
+ L_Dye:
+ mes "[Dyer Ginedin Rephere]";
+ if(Class==0) goto sL_Novice;
+ mes "Oh... you need my work? Well... okay sounds good.";
+ next;
+ mes "[Dyer Ginedin Rephere]";
+ mes "Please choose a color that suits you.";
+ next;
+ if(Sex==0) goto Female_dye;
+//=================================
+// Clothing Dyeing for Males
+//=================================
+
+Male_dye:
+ //1 Class
+ if(Class==5 || Class==1) goto L_Wiz_Hunt_Bard_SN_M;
+ if(Class==2) goto L_Mage_M;
+ if(Class==3) goto L_Archer_M;
+ if(Class==4) goto L_Aco_M;
+ if(Class==6) goto L_Thief_M;
+
+ //2 Class
+ if(Class==7 || Class==14) goto L_Knight_Crus_M;
+ if(Class==8 || Class==15) goto L_Priest_Monk_M;
+ if(Class==9 || Class==11 || Class==19 || Class==23) goto L_Wiz_Hunt_Bard_SN_M;
+ if(Class==10 || Class==18) goto L_BlackSmith_Alchemist_M;
+ if(Class==12) goto L_Assassin_M;
+ if(Class==17) goto L_Rogue_M;
+
+ //1 Class
+ L_Mage_M:
+ set @red, 1;
+ set @violet, 2;
+ set @orange, 3;
+ set @white, 4;
+ menu "- Red",L_Dye_Red,"- Violet",L_Dye_Violet,"- Orange",L_Dye_Orange,"- White",L_Dye_White,"- Cancel",L_End;
+ L_Archer_M:
+ set @red, 1;
+ set @violet, 2;
+ set @green, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Violet",L_Dye_Violet,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_Aco_M:
+ set @blue, 1;
+ set @red, 2;
+ set @white, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_Thief_M:
+ set @blue, 1;
+ set @red, 2;
+ set @green, 3;
+ set @white, 4;
+ menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Cancel",L_End;
+
+ //2 Class
+ L_Knight_Crus_M:
+ set @orange, 1;
+ set @violet, 2;
+ set @red, 3;
+ set @black, 4;
+ menu "- Orange",L_Dye_Orange,"- Violet",L_Dye_Violet,"- Red",L_Dye_Red,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_Priest_Monk_M:
+ set @blue, 1;
+ set @green, 2;
+ set @red, 3;
+ set @white, 4;
+ menu "- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Red",L_Dye_Red,"- White",L_Dye_White,"- Cancel",L_End;
+ L_Wiz_Hunt_Bard_SN_M:
+ set @red, 1;
+ set @blue, 2;
+ set @green, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_BlackSmith_Alchemist_M:
+ set @red, 1;
+ set @green, 2;
+ set @white, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_Assassin_M:
+ set @blue, 1;
+ set @red, 2;
+ set @green, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_Rogue_M:
+ set @red, 2;
+ set @green, 3;
+ menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- Cancel",L_End;
+
+//=================================
+// Clothing Dyeing for Females
+//=================================
+Female_dye:
+ //1 Class
+ if(Class==1 || Class==4) goto L_Sword_Aco_F;
+ if(Class==2) goto L_Knight_Crus_F;
+ if(Class==3) goto L_Priest_F;
+ if(Class==5) goto L_Merch_F;
+ //2 Class
+ if(Class==7 || Class==14) goto L_Knight_Crus_F;
+ if(Class==8) goto L_Priest_F;
+ if(Class==9 || Class==16) goto L_Wiz_Sage_F;
+ if(Class==10 || Class==18) goto L_BlackSmith_Alchemist_F;
+ if(Class==11 || Class==20) goto L_Hunt_Dancer_F;
+ if(Class==12 || Class==17) goto L_Assassin_Rogue_F;
+ if(Class==23) goto L_SN_F;
+
+ //1 Class
+ L_Sword_Aco_F:
+ set @blue, 1;
+ set @red, 2;
+ set @green, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_Merch_F:
+ set @violet, 1;
+ set @blue, 2;
+ set @green, 3;
+ set @black, 4;
+ menu "- Violet",L_Dye_Violet,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_Thief_F:
+ set @blue, 1;
+ set @red, 2;
+ set @white, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
+
+ //2 Class
+ L_Knight_Crus_F:
+ set @red, 1;
+ set @blue, 2;
+ set @white, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_Priest_F:
+ set @red, 1;
+ set @green, 2;
+ set @white, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_Wiz_Sage_F:
+ set @red, 1;
+ set @blue, 2;
+ set @white, 3;
+ set @green, 4;
+ menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Green",L_Dye_Green,"- Cancel",L_End;
+ L_Hunt_Dancer_F:
+ set @red, 1;
+ set @blue, 2;
+ set @green, 3;
+ set @violet, 4;
+ menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- Green",L_Dye_Green,"- Violet",L_Dye_Violet,"- Cancel",L_End;
+ L_BlackSmith_Alchemist_F:
+ set @red, 1;
+ set @green, 2;
+ set @violet, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Green",L_Dye_Green,"- Violet",L_Dye_Violet,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_Assassin_Rogue_F:
+ set @red, 1;
+ set @yellow, 2;
+ set @white, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Yellow",L_Dye_Yellow,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
+ L_SN_F:
+ set @blue, 1;
+ set @red, 2;
+ set @white, 3;
+ set @black, 4;
+ menu "- Red",L_Dye_Red,"- Blue",L_Dye_Blue,"- White",L_Dye_White,"- Black",L_Dye_Black,"- Cancel",L_End;
+
+L_Dye_Orange:
+ mes "[Dyer Ginedin Rephere]";
+ if(countitem(980) < 1) goto sL_NoDye;
+ if(Zeny < 10000) goto sL_Zeny;
+ mes "Ok. I will dye you clothes Orange.";
+ setlook 7,@orange;
+ delitem 980,1;
+ set Zeny, Zeny - 10000;
+ close;
+L_Dye_Violet:
+ mes "[Dyer Ginedin Rephere]";
+ if(countitem(981) < 1) goto sL_NoDye;
+ if(Zeny < 10000) goto sL_Zeny;
+ mes "Ok. I will dye you clothes Violet.";
+ setlook 7,@violet;
+ delitem 981,1;
+ set Zeny, Zeny - 10000;
+ close;
+L_Dye_Red:
+ mes "[Dyer Ginedin Rephere]";
+ if(countitem(975) < 1) goto sL_NoDye;
+ if(Zeny < 10000) goto sL_Zeny;
+ mes "Ok. I will dye you clothes red.";
+ setlook 7,@red;
+ delitem 975,1;
+ set Zeny, Zeny - 10000;
+ close;
+L_Dye_Black:
+ mes "[Dyer Ginedin Rephere]";
+ if(countitem(983) < 1) goto sL_NoDye;
+ if(Zeny < 10000) goto sL_Zeny;
+ mes "Ok. I will dye you clothes black.";
+ setlook 7,@black;
+ delitem 983,1;
+ set Zeny, Zeny - 10000;
+ close;
+L_Dye_Green:
+ mes "[Dyer Ginedin Rephere]";
+ if(countitem(979) < 1) goto sL_NoDye;
+ if(Zeny < 10000) goto sL_Zeny;
+ mes "Ok. I will dye you clothes green.";
+ setlook 7,@green;
+ delitem 979,1;
+ set Zeny, Zeny - 10000;
+ close;
+L_Dye_Blue:
+ mes "[Dyer Ginedin Rephere]";
+ if(countitem(978) < 1) goto sL_NoDye;
+ if(Zeny < 10000) goto sL_Zeny;
+ mes "Ok. I will dye you clothes blue.";
+ setlook 7,@blue;
+ delitem 978,1;
+ set Zeny, Zeny - 10000;
+ close;
+L_Dye_White:
+ mes "[Dyer Ginedin Rephere]";
+ if(countitem(982) < 1) goto sL_NoDye;
+ if(Zeny < 10000) goto sL_Zeny;
+ mes "Ok. I will dye you clothes white.";
+ setlook 7,@white;
+ delitem 982,1;
+ set Zeny, Zeny - 10000;
+ close;
+L_Dye_Yellow:
+ mes "[Dyer Ginedin Rephere]";
+ if(countitem(976) < 1) goto sL_NoDye;
+ if(Zeny < 10000) goto sL_Zeny;
+ mes "Ok. I will dye you clothes yellow.";
+ setlook 7,@yellow;
+ delitem 976,1;
+ set Zeny, Zeny - 10000;
+ close;
+
+ sL_Sorry:
+ mes "Wow, your clothes is very strange, I haven't seen anything like it before . Hmmm... I'm sorry, but there is no way I can paint it.";
+ close;
+ sL_NoDye:
+ mes "For me to dye your clothes, I'll need the appropriate Dyestuff. Please check my price list for the information.";
+ next;
+ goto L_PriceList;
+
+ sL_Zeny:
+ mes "I'm sorry but you don't have enough money.";
+ close;
+
+ sL_Novice:
+ mes "I'm sorry, but first you need to get a job.";
+ close;
+
+
+ L_PriceList:
+ mes "[Dyer Ginedin Rephere]";
+ mes "Here is the list of colors you can choose from and their prices:";
+ mes " - Red: 10000 zeny, 1 Scarlet Dyestuff";
+ mes " - Yellow: 10000 zeny, 1 Lemon Dyestuff";
+ mes " - Violet: 10000 zeny, 1 Violet Dyestuff";
+ mes " - Orange: 10000 zeny, 1 Orange Dyestuff";
+ mes " - Blue: 10000 zeny, 1 CobaltBlue Dyestuff";
+ mes " - Green: 10000 zeny, 1 DarkGreen Dyestuff";
+ goto M_Menu;
+
+ L_End:
+ mes "[Dyer Ginedin Rephere]";
+ mes "Make yourself at home. Even though I don't have time for you.";
+ close;
+}