summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorsamuray22 <samuray22@54d463be-8e91-2dee-dedb-b68131a5f0ec>2007-11-29 15:54:55 +0000
committersamuray22 <samuray22@54d463be-8e91-2dee-dedb-b68131a5f0ec>2007-11-29 15:54:55 +0000
commit5740884867c926482c52ce81fa1490500a365bfd (patch)
treede32814d1699fb6ab4e2bec845fce3ef35780e8f
parentc78e2df7e04a41e3a69cc49a14022ccf0402f406 (diff)
downloadhercules-5740884867c926482c52ce81fa1490500a365bfd.tar.gz
hercules-5740884867c926482c52ce81fa1490500a365bfd.tar.bz2
hercules-5740884867c926482c52ce81fa1490500a365bfd.tar.xz
hercules-5740884867c926482c52ce81fa1490500a365bfd.zip
* Rescripted Hair Dresser to the Aegis 10.3 Standards.
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@11843 54d463be-8e91-2dee-dedb-b68131a5f0ec
-rw-r--r--npc/Changelog.txt2
-rw-r--r--npc/merchants/hair_style.txt2542
2 files changed, 506 insertions, 2038 deletions
diff --git a/npc/Changelog.txt b/npc/Changelog.txt
index ea158965a..f87ad0320 100644
--- a/npc/Changelog.txt
+++ b/npc/Changelog.txt
@@ -1,5 +1,7 @@
Date Added
======
+2007/11/29
+ * Rescripted Hair Dresser to the Aegis 10.3 Standards. [Samuray22]
2007/11/28
* Fixed problem in the Hair Dyer NPC. (bugreport:509) [Samuray22]
2007/11/27
diff --git a/npc/merchants/hair_style.txt b/npc/merchants/hair_style.txt
index 158015ab4..334f423c5 100644
--- a/npc/merchants/hair_style.txt
+++ b/npc/merchants/hair_style.txt
@@ -1,2050 +1,516 @@
//===== eAthena Script =======================================
//= Hair Dresser
//===== By: ==================================================
-//= [Muad_Dib] 1.0 (The Prometheus Project)
+//= [Muad_Dib] 1.0 (The Prometheus Project) & Samuray22
//===== Current Version: =====================================
-//= 1.1
+//= 1.2
//===== Compatible With: =====================================
-//= Any Athena Version; RO Episode 6+
+//= eAthena SVN
//===== Description: =========================================
+//= [Aegis Conversion]
//= Allows you to change your hairstyle.
//===== Additional Comments: =================================
-//= 07/06/05 : Added 1st Version. [Muad_Dib]
-//= Converted to eAthena format by Dr.Evil Fixed typos [Nexon]
-//= 1.1 Removed Duplicates [Silent]
+//= 1.2 Rescripted to the Aegis 10.3 Standards. [Samuray22]
//============================================================
-alberta,137,37,6 script Stylist#01 91,{
- mes "[Veronica]";
- mes "Welcome~~Welcome~~";
- mes "Welcome to the one of the best Hair shop, Veronicas Beauty Saloon!!";
- mes "HoHoHo";
- mes "Come here for new hair, right?";
- mes "How may I help you?";
- next;
- menu "Look through the Hair Styles.",Look,"Change Hair Style",Change,"Stop talking.",Cancel;
-Look:
- set @hair,0;
- mes "[Veronica]";
- mes "There are 19 Hair Styles, 1~19!!!";
- mes "Which number do you want to look at first?";
- mes "If you want to stop looking, please choose 0.";
- next;
- if(sex==0) goto LookF;
- input @hair_in;
- if (@hair_in > 19) goto hairtohigh;
- set @hair,@hair_in;
- goto ShowPicM;
- close;
-LookF:
- set @hairf,0;
- input @hairf_in;
- if (@hairf_in > 19) goto hairtohigh;
- set @hairf,@hairf_in;
- goto ShowPicF;
- close;
-ShowPicM:
- if (@hair == 0) goto hairnothing;
- if (@hair == 1) goto mhair1show;
- if (@hair == 2) goto mhair2show;
- if (@hair == 3) goto mhair3show;
- if (@hair == 4) goto mhair4show;
- if (@hair == 5) goto mhair5show;
- if (@hair == 6) goto mhair6show;
- if (@hair == 7) goto mhair7show;
- if (@hair == 8) goto mhair8show;
- if (@hair == 9) goto mhair9show;
- if (@hair == 10) goto mhair10show;
- if (@hair == 11) goto mhair11show;
- if (@hair == 12) goto mhair12show;
- if (@hair == 13) goto mhair13show;
- if (@hair == 14) goto mhair14show;
- if (@hair == 15) goto mhair15show;
- if (@hair == 16) goto mhair16show;
- if (@hair == 17) goto mhair17show;
- if (@hair == 18) goto mhair18show;
- if (@hair == 19) goto mhair19show;
-
-mhair1show:
- cutin "hair_m_01",4;
- mes "[Veronica]";
- mes "Oh~ 'Trickdead' style!";
- mes "It is very neat feature and comfortable.";
- mes "How do you think? Do you like it?";
- close;
-mhair2show:
- cutin "hair_m_02",4;
- mes "[Veronica]";
- mes "Oh~'Two-Handed Sword Mastery' style!";
- mes "It's style is very similar to one of the famous Swordsman.";
- mes "How do you think? Do you like it?";
- close;
-mhair3show:
- cutin "hair_m_03",4;
- mes "[Veronica]";
- mes "Oh~'Napalm Beat' style!";
- mes "It makes feeling there is unknown power...";
- mes "How do you think? Do you like it?";
- close;
-mhair4show:
- cutin "hair_m_04",4;
- mes "[Veronica]";
- mes "Oh~'Double Strafe' style!";
- mes "It will make your mind is very clear.";
- mes "How do you think? Do you like it?";
- close;
-mhair5show:
- cutin "hair_m_05",4;
- mes "[Veronica]";
- mes "Oh~'Angelus' style!";
- mes "It feels calm your reference.";
- mes "How do you think? Do you like it?";
- close;
-mhair6show:
- cutin "hair_m_06",4;
- mes "[Veronica]";
- mes "Oh~'Pushcart' style!";
- mes "This is the style based on motive of string cart..";
- mes "How do you think? Do you like it?";
- close;
-mhair7show:
- cutin "hair_m_07",4;
- mes "[Veronica]";
- mes "Oh~'Envenom' style!";
- mes "It makes feel addicting into something..";
- mes "How do you think? Do you like it?";
- close;
-mhair8show:
- cutin "hair_m_08",4;
- mes "[Veronica]";
- mes "Oh~'Bowling Bash' style!";
- mes "Once people sees it, they will fall for it.";
- mes "How do you think? Do you like it?";
- close;
-mhair9show:
- cutin "hair_m_09",4;
- mes "[Veronica]";
- mes "Oh~'Venom Dust' style!";
- mes "It is the style gives feeling deadly charm.";
- mes "How do you think? Do you like it?";
- close;
-mhair10show:
- cutin "hair_m_10",4;
- mes "[Veronica]";
- mes "Oh~'Turn Undead' style!";
- mes "It gives feeling one attack can make Devils disappear!";
- mes "How do you think? Do you like it?";
- close;
-mhair11show:
- cutin "hair_m_11",4;
- mes "[Veronica]";
- mes "Oh~'Dragnology' style!";
- mes "This is the style bases on motive of mysterious Dragon...";
- mes "How do you think? Do you like it?";
- close;
-mhair12show:
- cutin "hair_m_12",4;
- mes "[Veronica]";
- mes "Oh~'Mace Mastery' style!";
- mes "It looks very hard and attractive.";
- mes "How do you think? Do you like it?";
- close;
-mhair13show:
- cutin "hair_m_13",4;
- mes "[Veronica]";
- mes "Oh~'Thunderstorm' style!";
- mes "It feels hit by Thunderstorm!!";
- mes "How do you think? Do you like it?";
- close;
-mhair14show:
- cutin "hair_m_14",4;
- mes "[Veronica]";
- mes "Oh~'Encore' style!";
- mes "It is the style make people feels like asking you to sing~";
- mes "How do you think? Do you like it?";
- close;
-mhair15show:
- cutin "hair_m_15",4;
- mes "[Veronica]";
- mes "Oh~'Grommtooht' style!";
- mes "It feels like you will be picked by hair!";
- mes "How do you think? Do you like it?";
- close;
-mhair16show:
- cutin "hair_m_16",4;
- mes "[Veronica]";
- mes "Oh~'Blitz Beat' style!";
- mes "It feels it will attack 5 times...?";
- mes "How do you think? Do you like it?";
- close;
-mhair17show:
- cutin "hair_m_17",4;
- mes "[Veronica]";
- mes "Oh~'Ore Discovery' style!";
- mes "It feels like picking up things while walking.";
- mes "How do you think? Do you like it?";
- close;
-mhair18show:
- cutin "hair_m_18",4;
- mes "[Veronica]";
- mes "Oh~'Fire Pillar' style!";
- mes "It has been a great style over the one generation...!";
- mes "How do you think? Do you like it?";
- close;
-mhair19show:
- cutin "hair_m_19",4;
- mes "[Veronica]";
- mes "Oh~'Guillotine Fist' style!";
- mes "It feels like betting all at once!!";
- mes "How do you think? Do you like it?";
- close;
-ShowPicF:
- if (@hairf == 0) goto hairnothing;
- if (@hairf == 1) goto fhair1show;
- if (@hairf == 2) goto fhair2show;
- if (@hairf == 3) goto fhair3show;
- if (@hairf == 4) goto fhair4show;
- if (@hairf == 5) goto fhair5show;
- if (@hairf == 6) goto fhair6show;
- if (@hairf == 7) goto fhair7show;
- if (@hairf == 8) goto fhair8show;
- if (@hairf == 9) goto fhair9show;
- if (@hairf == 10) goto fhair10show;
- if (@hairf == 11) goto fhair11show;
- if (@hairf == 12) goto fhair12show;
- if (@hairf == 13) goto fhair13show;
- if (@hairf == 14) goto fhair14show;
- if (@hairf == 15) goto fhair15show;
- if (@hairf == 16) goto fhair16show;
- if (@hairf == 17) goto fhair17show;
- if (@hairf == 18) goto fhair18show;
- if (@hairf == 19) goto fhair19show;
-fhair1show:
- cutin "hair_f_01",4;
- mes "[Veronica]";
- mes "Oh~ 'Trickdead' style!";
- mes "It is the style people wants to stroke your hair.";
- mes "How do you think? Do you like it?";
- close;
-fhair2show:
- cutin "hair_f_02",4;
- mes "[Veronica]";
- mes "Oh~'Bash' style!";
- mes "It feels unrevealed strong power is hidden inside of....";
- mes "How do you think? Do you like it?";
- close;
-fhair3show:
- cutin "hair_f_03",4;
- mes "[Veronica]";
- mes "Oh~'Frost Diver' style!";
- mes "It feels cold, but also warm....";
- mes "How do you think? Do you like it?";
- close;
-fhair4show:
- cutin "hair_f_04",4;
- mes "[Veronica]";
- mes "Oh~'Arrow Shower' style!";
- mes "It feels very refreshed~";
- mes "How do you think? Do you like it?";
- close;
-fhair5show:
- cutin "hair_f_05",4;
- mes "[Veronica]";
- mes "Oh~'Heal' style!";
- mes "It feels mind in cured.";
- mes "How do you think? Do you like it?";
- close;
-fhair6show:
- cutin "hair_f_06",4;
- mes "[Veronica]";
- mes "Oh~'Vending' style!";
- mes "It seems like making lots of money.";
- mes "How do you think? Do you like it?";
- close;
-fhair7show:
- cutin "hair_f_07",4;
- mes "[Veronica]";
- mes "Oh~'Double Strafe' style!";
- mes "It makes whomever dash twice.";
- mes "How do you think? Do you like it?";
- close;
-fhair8show:
- cutin "hair_f_08",4;
- mes "[Veronica]";
- mes "Oh~'Gloria' style!";
- mes "Its nobleness and holiness moods are great.";
- mes "How do you think? Do you like it?";
- close;
-fhair9show:
- cutin "hair_f_09",4;
- mes "[Veronica]";
- mes "Oh~'Increase Sp Recovery' style!";
- mes "It makes fell like recovering spirit fully.";
- mes "How do you think? Do you like it?";
- close;
-fhair10show:
- cutin "hair_f_10",4;
- mes "[Veronica]";
- mes "Oh~'Prepare Potion' style!";
- mes "It feels a wound is healed already.";
- mes "How do you think? Do you like it?";
- close;
-fhair11show:
- cutin "hair_f_11",4;
- mes "[Veronica]";
- mes "Oh~'Grand Cross' style!";
- mes "It feels like a firm faith.";
- mes "How do you think? Do you like it?";
- close;
-fhair12show:
- cutin "hair_f_12",4;
- mes "[Veronica]";
- mes "Oh~'Intimidate' style!";
- mes "It seems you saw this style somewhere...?";
- mes "How do you think? Do you like it?";
- close;
-fhair13show:
- cutin "hair_f_13",4;
- mes "[Veronica]";
- mes "Oh~'Spiritual Sphere Absorption' style!";
- mes "Its catch people's spirits.";
- mes "How do you think? Do you like it?";
- close;
-fhair14show:
- cutin "hair_f_14",4;
- mes "[Veronica]";
- mes "Oh~'Gypsy's Kiss' style!";
- mes "It makes people think you are very kind to all...";
- mes "How do you think? Do you like it?";
- close;
-fhair15show:
- cutin "hair_f_15",4;
- mes "[Veronica]";
- mes "Oh~'Counter Attack' style!";
- mes "It feels it will kick when someone is near.";
- mes "How do you think? Do you like it?";
- close;
-fhair16show:
- cutin "hair_f_16",4;
- mes "[Veronica]";
- mes "Oh~'Ankle Snare' style!";
- mes "This is the style hardly moved";
- mes "How do you think? Do you like it?";
- close;
-fhair17show:
- cutin "hair_f_17",4;
- mes "[Veronica]";
- mes "Oh~'Hammer Fall' style!";
- mes "It will make feeling dizzy.";
- mes "How do you think? Do you like it?";
- close;
-fhair18show:
- cutin "hair_f_18",4;
- mes "[Veronica]";
- mes "Oh~'Jupiter Thunder' style!";
- mes "It feels very neat.";
- mes "How do you think? Do you like it?";
- close;
-fhair19show:
- cutin "hair_f_19",4;
- mes "[Veronica]";
- mes "Oh~'Whirlwind' style!";
- mes "It feels very refreshed like wind.";
- mes "How do you think? Do you like it?";
- close;
-hairnothing:
- mes "[Veronica]";
- mes "Did you find a style you like?";
- mes "If you want to change your hair style at anytime, I will do my best!!";
- close;
-hairtohigh:
- mes "[Veronica]";
- mes "Sorry, there aren't any Hairstyles with that number.";
- mes "Please choose a number from 1 to 19.";
- close;
-Change:
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
-
- set @hairch,0;
- mes "[Veronica]";
- mes "Well, then... Please choose Hair Style you like most.";
- mes "I will do my best";
- mes "There are 19 different Hair Styles.";
- mes "Numbers from 1 to 19~";
- next;
- if(sex==0) goto iffemale;
- input @hairchange_in;
- if (@hairchange_in > 19) goto tohighchange;
- set @hairch,@hairchange_in;
- if (@hairch == 1) goto mhair1;
- if (@hairch == 2) goto mhair2;
- if (@hairch == 3) goto mhair3;
- if (@hairch == 4) goto mhair4;
- if (@hairch == 5) goto mhair5;
- if (@hairch == 6) goto mhair6;
- if (@hairch == 7) goto mhair7;
- if (@hairch == 8) goto mhair8;
- if (@hairch == 9) goto mhair9;
- if (@hairch == 10) goto mhair10;
- if (@hairch == 11) goto mhair11;
- if (@hairch == 12) goto mhair12;
- if (@hairch == 13) goto mhair13;
- if (@hairch == 14) goto mhair14;
- if (@hairch == 15) goto mhair15;
- if (@hairch == 16) goto mhair16;
- if (@hairch == 17) goto mhair17;
- if (@hairch == 18) goto mhair18;
- if (@hairch == 19) goto mhair19;
-mhair1:
- cutin "hair_m_01",4;
- mes "[Veronica]";
- mes "This is the (1) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO1;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,1;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (1) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO1:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair2:
- cutin "hair_m_02",4;
- mes "[Veronica]";
- mes "This is the (2) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yaeh~ I'd love to.",-,"No..I don't like it..",M_NO2;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,2;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (2) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vitis me anytime~ HoHoHo";
- close;
-M_NO2:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair3:
- cutin "hair_m_03",4;
- mes "[Veronica]";
- mes "This is the (3) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO3;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,3;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (3) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO3:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair4:
- cutin "hair_m_04",4;
- mes "[Veronica]";
- mes "This is the (4) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO4;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,4;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (4) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO4:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair5:
- cutin "hair_m_05",4;
- mes "[Veronica]";
- mes "This is the (5) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO5;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,5;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (5) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO5:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair6:
- cutin "hair_m_06",4;
- mes "[Veronica]";
- mes "This is the (6) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO6;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,6;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (6) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO6:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair7:
- cutin "hair_m_07",4;
- mes "[Veronica]";
- mes "This is the (7) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO7;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,7;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (7) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO7:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair8:
- cutin "hair_m_08",4;
- mes "[Veronica]";
- mes "This is the (8) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO8;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,8;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (8) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO8:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair9:
- cutin "hair_m_09",4;
- mes "[Veronica]";
- mes "This is the (9) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO9;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,9;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (9) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO9:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair10:
- cutin "hair_m_10",4;
- mes "[Veronica]";
- mes "This is the (10) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO10;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,10;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (10) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO10:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair11:
- cutin "hair_m_11",4;
- mes "[Veronica]";
- mes "This is the (11) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO11;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,11;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (11) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO11:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair12:
- cutin "hair_m_12",4;
- mes "[Veronica]";
- mes "This is the (12) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO12;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,12;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (12) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO12:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair13:
- cutin "hair_m_13",4;
- mes "[Veronica]";
- mes "This is the (13) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO13;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,13;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (13) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO13:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair14:
- cutin "hair_m_14",4;
- mes "[Veronica]";
- mes "This is the (14) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO14;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,14;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (14) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO14:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair15:
- cutin "hair_m_15",4;
- mes "[Veronica]";
- mes "This is the (15) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO15;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,15;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (15) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO15:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair16:
- cutin "hair_m_16",4;
- mes "[Veronica]";
- mes "This is the (16) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO16;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,16;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (16) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO16:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair17:
- cutin "hair_m_17",4;
- mes "[Veronica]";
- mes "This is the (17) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO12;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,17;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (17) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO17:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair18:
- cutin "hair_m_18",4;
- mes "[Veronica]";
- mes "This is the (18) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO12;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,18;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (18) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO18:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-mhair19:
- cutin "hair_m_19",4;
- mes "[Veronica]";
- mes "This is the (19) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",M_NO19;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,19;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (19) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-M_NO19:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-iffemale:
- input @hairchange_in;
- if (@hairchange_in > 19) goto tohighchange;
- set @hairch,@hairchange_in;
- if (@hairch == 1) goto fhair1;
- if (@hairch == 2) goto fhair2;
- if (@hairch == 3) goto fhair3;
- if (@hairch == 4) goto fhair4;
- if (@hairch == 5) goto fhair5;
- if (@hairch == 6) goto fhair6;
- if (@hairch == 7) goto fhair7;
- if (@hairch == 8) goto fhair8;
- if (@hairch == 9) goto fhair9;
- if (@hairch == 10) goto fhair10;
- if (@hairch == 11) goto fhair11;
- if (@hairch == 12) goto fhair12;
- if (@hairch == 13) goto fhair13;
- if (@hairch == 14) goto fhair14;
- if (@hairch == 15) goto fhair15;
- if (@hairch == 16) goto fhair16;
- if (@hairch == 17) goto fhair17;
- if (@hairch == 18) goto fhair18;
- if (@hairch == 19) goto fhair19;
+// Stylist - alberta_in 55 142
+alberta_in,55,142,1 script Stylist 91,{
+ mes "[Veronica]";
+ mes "Welcome~~ Welcome~~";
+ mes "Welcome to the one of the best Hair shop, Veronika Beauty Saloon!! HoHoHo";
+ mes "Come here for new hair, right? ^^ How may I help you?";
+ next;
+ switch(select("Look through Hair Styles.","Change Hair Styles.","Stop talking.")) {
+ case 1:
+ mes "[Veronica]";
+ mes "There are 19 Hair Styles, 1 ~ 19!!!";
+ mes "Which number do you want to look at first?";
+ mes "If you want to stop looking, please choose 0.";
+ next;
+ input .@style;
+ if(.@style > 19) {
+ mes "[Veronica]";
+ mes "Sorry, there aren't any hair styles with that number.";
+ mes "Please choose number from 1 to 19.";
+ next;
+ } else if(.@style == 0) {
+ mes "[Veronica]";
+ mes "How was it?";
+ mes "Did you find any styles you like?";
+ mes "If you want to chage your hair style at anytime, I will do my best!!";
+ close;
+ }
+ callsub L_cutin,.@style;
+ mes "[Veronica]";
+ switch(.@style) {
+ case 1:
+ if(Sex == 1) {
+ mes "Oh~ 'Trickdead' style'!";
+ mes "It is very neat feature and comfortable.";
+ mes "How do you think? Do you like it?";
+ close2;
+ cutin "",255;
+ end;
+ }
+ mes "Oh~ 'First Aid' style'!";
+ mes "It is the style people wants to stroke your hair^^.";
+ mes "How do you think? Do you like it?";
+ close2;
+ cutin "",255;
+ end;
+ case 2:
+ if(Sex == 1) {
+ mes "Oh~ 'Two-Handed Sword Mastery' style!";
+ mes "Its style is very similar to one of the famous Swordman.";
+ mes "How do you think? Do you like it?";
+ close2;
+ cutin "",255;
+ end;
+ }
+ mes "Oh~ 'Bash' style!";
+ mes "It feels unrevealed strong power is hidden inside of....";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 3:
+ if(Sex == 1) {
+ mes "Oh~ 'Napalm Beat' style!";
+ mes "It makes feeling there is unknown power...";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Frost Diver' style!";
+ mes "It feels cold but also warm...";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 4:
+ if(Sex == 1) {
+ mes "Oh~ 'Double Strafe' style!";
+ mes "It will make you feel your mind is very clear.";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Arrow Shower' style!";
+ mes "It feels very refreshed~";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 5:
+ if(Sex == 1) {
+ mes "Oh~ 'Angelus' style!";
+ mes "It feels calm and reverence.";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Heal' style!";
+ mes "It feels mind is cured.";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 6:
+ if(Sex == 1) {
+ mes "Oh~ 'Pushcart' style!";
+ mes "This is the style based on motive of string cart..";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Vending' style!";
+ mes "It seems like making lots of money.";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 7:
+ if(Sex == 1) {
+ mes "Oh~ 'Envenom' style!";
+ mes "It makes feel addicting into something..";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Double Strafe' style!";
+ mes "It makes whomever dash twice.";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 8:
+ if(Sex == 1) {
+ mes "Oh~ 'Bowling Bash' style!";
+ mes "Once people sees it, they will fall for it!";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Gloria' style!";
+ mes "Its nobleness and holiness moods are great.";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 9:
+ if(Sex == 1) {
+ mes "Oh~ 'Venom Dust' style!";
+ mes "It is the style gives feeling deadly charm.";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Increase SP Recovery' style!";
+ mes "It makes feel like recovering spirit fully.";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 10:
+ if(Sex == 1) {
+ mes "Oh~ 'Turn Undead' style!";
+ mes "It gives feeling one attack can make Devils disappear!";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Prepare Potion' style!";
+ mes "It feels a wound is healed already!";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 11:
+ if(Sex == 1) {
+ mes "Oh~ 'Dragonology' style!";
+ mes "This is the style based on motive of mysterious Dragon...";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Grand Cross' style!";
+ mes "It feels a firm faith...";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 12:
+ if(Sex == 1) {
+ mes "Oh~ 'Mace Mastery' style!";
+ mes "It looks very hard and attractive!";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Intimidate' style!";
+ mes "It seems you saw this style somewhere...?";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 13:
+ if(Sex == 1) {
+ mes "Oh~ 'Thunderstorm' style!";
+ mes "It feels hit by thunder storm!!";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Spiritual Sphere Absorption' style!";
+ mes "It catches people's spirits^^";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 14:
+ if(Sex == 1) {
+ mes "Oh~ 'Encore' style!";
+ mes "It is the style makes people feels like asking you to sing~^^";
+ mes "How do you think? Do you like it??";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Gypsy's Kiss' style!";
+ mes "It makes people think you are very kind to all...";
+ mes "How do you think? Do you like it?";
+ close2; cutin "",255; end;
+ case 15:
+ if(Sex == 1) {
+ mes "Oh~ 'Grimtooth' style!";
+ mes "It feels like you will be pricked by hair!";
+ mes "How was it? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Counter Attack' style!";
+ mes "It feels it will kick when someone is near!";
+ mes "How was it? Do you like it?";
+ close2; cutin "",255; end;
+ case 16:
+ if(Sex == 1) {
+ mes "Oh~ 'Blitz Beat' style!";
+ mes "It feels it will attack 5 times...?";
+ mes "How was it? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Ankle Snare' style!";
+ mes "This is the style hardly move.";
+ mes "How was it? Do you like it?";
+ close2; cutin "",255; end;
+ case 17:
+ if(Sex == 1) {
+ mes "Oh~ 'Ore Discovery' style!";
+ mes "It feels like picking up things while walking.";
+ mes "How was it? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Hammer Fall' style!";
+ mes "It will make feeling dizzy!";
+ mes "How was it? Do you like it?";
+ close2; cutin "",255; end;
+ case 18:
+ if(Sex == 1) {
+ mes "Oh~ 'Fire Pillar' style!";
+ mes "It has been a great style over the one generation...!";
+ mes "How was it? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Jupitel Thunder' style!";
+ mes "It feels very neat.";
+ mes "How was it? Do you like it?";
+ close2; cutin "",255; end;
+ case 19:
+ if(Sex == 1) {
+ mes "Oh~ 'Guillotine Fist' style!";
+ mes "It feels like betting all at once!!";
+ mes "How was it? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ mes "Oh~ 'Whirlwind' style!";
+ mes "It feels very refresh like wind.";
+ mes "How was it? Do you like it?";
+ close2; cutin "",255; end;
+ }
+ case 2:
+ if(BaseLevel < 60) {
+ mes "[Veronica]";
+ mes "Wow~, Dear, this style looks good on you~";
+ mes "Don't change strangely.";
+ mes "Why don't you decorate hair with accessories~";
+ close;
+ } else if((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) || (Zeny < 99800)) {
+ mes "[Veronica]";
+ mes "If you want to change your hair style, you need several items";
+ mes "Since you need many items....";
+ mes "I think you should write those down.";
+ next;
+ mes "[Veronica]";
+ mes "3 Counteragent,";
+ mes "3 Mixture,";
+ mes "100 Daenggies,";
+ mes "100 Short Daenggies,";
+ mes "100 Black Hairs,";
+ mes "100 Golden Hairs,";
+ mes "100 Glossy Hair.";
+ next;
+ mes "[Veronica]";
+ mes "And also you need 99,800 zeny.";
+ mes "If you gather them all...";
+ mes "I will show you what I can do~!! ^^ HoHoHo.";
+ close;
+ }
+ mes "[Veronica]";
+ mes "Well, then... Please choose Hair Style you like the most.";
+ mes "I will do my best ^^";
+ mes "There are 19 different Hair Styles.";
+ mes "Numbers from 1 to 19~";
+ next;
+ input .@style;
+ if(.@style > 19) {
+ mes "[Veronica]";
+ mes "There are no such numbers like that!";
+ mes "Please check your number~";
+ close;
+ } else if(.@style == 0) {
+ mes "[Veronica]";
+ mes "It's been canceled.";
+ close;
+ } else if(getlook(1) == .@style) {
+ mes "[Veronica]";
+ mes "You already have this style!!";
+ mes "I think you should look through Hair Styles again";
+ close;
+ }
+ callsub L_cutin,.@style;
+ mes "[Veronica]";
+ mes "This is (" + .@style + ") style.";
+ mes "I will change your hair with this again.";
+ mes "Is that OK with you??";
+ next;
+ if(select("Yeah~ I'd love to.","No..I don't like it...") == 1) {
+ if(getlook(6) == 0) {
+ mes "[Veronica]";
+ mes "You haven't dyeing your hair~ Not even once!!";
+ mes "I think dyeing your hair makes you much better...";
+ mes "I can do it for you as a service... for FREE ^^";
+ mes "Which color do you want?";
+ next;
+ switch(select("Red","Yellow","Purple","Orange","Green","Blue","White","Black","Cancel")) {
+ case 1:
+ set .@pallete,8;
+ goto L_style;
+ case 2:
+ set .@pallete,1;
+ goto L_style;
+ case 3:
+ set .@pallete,2;
+ goto L_style;
+ case 4:
+ set .@pallete,3;
+ goto L_style;
+ case 5:
+ set .@pallete,4;
+ goto L_style;
+ case 6:
+ set .@pallete,5;
+ goto L_style;
+ case 7:
+ set .@pallete,6;
+ goto L_style;
+ case 8:
+ set .@pallete,7;
+ goto L_style;
+ case 9:
+ mes "[Veronica]";
+ mes "Well.. then think it over..";
+ mes "and come visit me again.";
+ mes "Not only type of hair style but also color of it is very important.";
+ close;
+ }
+ }
+ L_style:
+ mes "[Veronica]";
+ mes "Now, It begins~. Hold still~";
+ mes "If you move, you will have very bad style^^";
+ mes "Just trust me on this!!";
+ next;
+ mes "[Veronica]";
+ mes "- Clip clip Clip clip -";
+ mes "- Klit klit Klit klit -";
+ mes "- Snip snip Snip snip -";
+ next;
+ delitem 973,3;
+ delitem 974,3;
+ delitem 901,100;
+ delitem 1094,100;
+ delitem 1020,100;
+ delitem 1060,100;
+ delitem 7152,100;
+ setlook 1,.@style;
+ setlook 6,.@pallete;
+ cutin "",255;
+ mes "[Veronica]";
+ mes "Wow~ it came out very well~~~ ";
+ mes "I hope you like this (" + .@style + ") style. ^^";
+ mes "If you'd like to have other hair style,";
+ mes "you are welcome to visit me anytime~ HoHoHo";
+ setlook 1,.@style;
+ setlook 6,.@pallete;
+ close;
+ }
+ mes "[Veronica]";
+ mes "Well~ choose again please~";
+ mes "There shold be a style you like.";
+ mes "Just remember the number you like the most abd tell me.";
+ close;
+ case 3:
+ mes "[Veronica]";
+ mes "Everyone has rights to become beautiful...";
+ mes "I wish you can find your hair style which fits on you well~";
+ mes "I really do~ ^^";
+ close;
+ }
+L_cutin:
+ if(Sex == 1) {
+ if(getarg(0) < 10)
+ cutin "hair_m_0"+getarg(0),4;
+ else
+ cutin "hair_m_"+getarg(0),4;
+ } else {
+ if(getarg(0) < 10)
+ cutin "hair_f_0"+getarg(0),4;
+ else
+ cutin "hair_f_"+getarg(0),4;
+ }
+ return;
+}
-fhair1:
- cutin "hair_f_01",4;
- mes "[Veronica]";
- mes "This is the (1) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yaeh~ I'd love to.",-,"No..I don't like it..",F_NO1;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,1;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (1) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO1:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair2:
- cutin "hair_f_02",4;
- mes "[Veronica]";
- mes "This is the (2) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO2;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,2;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (2) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO2:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair3:
- cutin "hair_f_03",4;
- mes "[Veronica]";
- mes "This is the (3) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO3;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,3;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (3) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO3:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair4:
- cutin "hair_f_04",4;
- mes "[Veronica]";
- mes "This is the (4) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO4;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,4;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (4) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO4:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair5:
- cutin "hair_f_05",4;
- mes "[Veronica]";
- mes "This is the (5) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO5;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,5;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (5) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO5:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair6:
- cutin "hair_f_06",4;
- mes "[Veronica]";
- mes "This is the (6) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO6;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,6;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (6) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO6:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair7:
- cutin "hair_f_07",4;
- mes "[Veronica]";
- mes "This is the (7) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO7;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,7;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (7) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO7:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair8:
- cutin "hair_f_08",4;
- mes "[Veronica]";
- mes "This is the (8) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO8;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,8;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (8) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO8:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair9:
- cutin "hair_f_09",4;
- mes "[Veronica]";
- mes "This is the (9) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO9;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,9;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (9) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO9:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair10:
- cutin "hair_f_10",4;
- mes "[Veronica]";
- mes "This is the (10) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO10;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,10;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (10) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO10:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair11:
- cutin "hair_f_11",4;
- mes "[Veronica]";
- mes "This is the (11) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO11;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,11;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (11) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO11:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair12:
- cutin "hair_f_12",4;
- mes "[Veronica]";
- mes "This is the (12) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO12;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,12;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (12) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO12:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair13:
- cutin "hair_f_13",4;
- mes "[Veronica]";
- mes "This is the (13) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO13;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,13;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (13) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO13:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair14:
- cutin "hair_f_14",4;
- mes "[Veronica]";
- mes "This is the (14) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO14;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,14;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (14) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO14:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair15:
- cutin "hair_f_15",4;
- mes "[Veronica]";
- mes "This is the (15) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO15;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,15;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (15) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO15:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair16:
- cutin "hair_f_16",4;
- mes "[Veronica]";
- mes "This is the (16) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO16;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,16;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (16) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO16:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair17:
- cutin "hair_f_17",4;
- mes "[Veronica]";
- mes "This is the (17) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO17;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,17;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (17) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO17:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair18:
- cutin "hair_f_18",4;
- mes "[Veronica]";
- mes "This is the (18) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO18;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,18;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (18) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO18:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-fhair19:
- cutin "hair_f_19",4;
- mes "[Veronica]";
- mes "This is the (19) style.";
- mes "I will change your Hair with this Again.";
- mes "Is that OK for you??";
- next;
- menu "Yeah~ I'd love to.",-,"No..I don't like it..",F_NO19;
- cutin "",255;
- mes "[Veronica]";
- mes "Now it begins~. Hold still~";
- mes "If you move, you will have very bad style.";
- mes "Just trust me on this!!";
- next;
- mes "[Veronica]";
- mes "- Clip clip Clip clip -";
- mes "- Klit klit Klit klit -";
- mes "- Snap snap Snap snap -";
- next;
- if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) <100) || (countitem(1094) <100) || (countitem(1020) <100) || (countitem(1060) <100) || (countitem(7152) <100) ||(Zeny < 99800)) goto NOItem;
- set Zeny,Zeny-99800;
- delitem 973,3;
- delitem 974,3;
- delitem 901,100;
- delitem 1094,100;
- delitem 1020,100;
- delitem 1060,100;
- delitem 7152,100;
- setlook 1,19;
- mes "[Veronica]";
- mes "Wow~ it came out very well~~";
- mes "I hope you like this (19) style.";
- mes "If you'd like to have another hair style,";
- mes "you are welcome welcome to vi tis me anytime~ HoHoHo";
- close;
-F_NO19:
- cutin "",255;
- mes "[Veronica]";
- mes "Well~ choose again please~";
- mes "There should be a style you like.";
- mes "Just remember the number you like the most and tell me.";
- close;
-tohighchange:
- mes "[Veronica]";
- mes "There are no such numbers like that!";
- mes "Please check your number~";
- close;
-NOItem:
- mes "[Veronica]";
- mes "If you want to change your hairstyle, you need several items.";
- mes "Since, you need many items....";
- mes "I think you should write those down.";
- next;
- mes "[Veronica]";
- mes "3 Counteragents,";
- mes "3 Mixtures,";
- mes "100 Daenggies,";
- mes "100 Short Daenggies,";
- mes "100 Black Hairs,";
- mes "100 Golden Hairs,";
- mes "100 Glossy Hair.";
- next;
- mes "[Veronica]";
- mes "And also you need 99,800zeny.";
- mes "If you gather them all...";
- mes "I will show you what I can do~!!";
- mes "HoHoHo.";
- close;
-Cancel:
- mes "[Veronica]";
- mes "Everyone has rights to become beautiful...";
- mes "I wish you can find your hair style which fits on you well~";
- mes "I really do~";
- close;
+// Gypsy Hairdresser - alberta 33 141
+alberta,33,141,1 script Gypsy Hairdresser 87,{
+ mes "[Bisharm]";
+ mes "Omg! Kidding me she is a desinger!!";
+ mes "One of the best?? Yeah..whatever...";
+ mes "I'm the only one who knows what's the true dudism and value of hair!";
+ mes "I am a CREATOR of BEAUTY!";
+ next;
+ switch(select("What do you do?","Please bless me also!!",".....")) {
+ case 1:
+ mes "[Bisharm]";
+ mes "ME? I am a hairdresser.";
+ mes "I am drifting from place to place...and";
+ mes "giving people beauty of hair.";
+ mes "I heard there is....";
+ mes "there is a novice who is calling oneself a hair designer in this town...";
+ next;
+ mes "[Bisharm]";
+ mes "That's why I came to this town.";
+ mes "I was watching and I find out everyone asks what they want from the menu...";
+ mes "That is not the way!!";
+ mes "There are some cases..";
+ mes "hairs don't look good on people when listening to them!";
+ next;
+ mes "[Bisharm]";
+ mes "Also very amateur skill...";
+ mes "Very very...amateur...";
+ mes "You can't call it a beauty designer!";
+ mes "Waisting too mush hairs!";
+ mes "In short I don't like it very well!!";
+ next;
+ mes "[Bisharm]";
+ mes "If you want me to touch your hair,";
+ mes "please ask me anytime.";
+ mes "I'll specially do my best for you.";
+ mes "Got it?";
+ mes "Don't ever let novice touch your hair!";
+ close;
+ case 2:
+ if(BaseLevel < 60) {
+ mes "[Bisharm]";
+ mes "Hmm, From my artistic perspective,";
+ mes "the hair style you have looks very good on you!";
+ mes "You should stay with it!";
+ mes "Trust me!";
+ close;
+ } else if(Zeny < 199800) {
+ mes "[Bisharm]";
+ mes "Yeah? You don't need anything else. You only need ZENY!";
+ mes "You just need 199,800 zeny.";
+ mes "Just let you know.... ";
+ mes "that you should feel an honor about me touching your hair with only this price...";
+ close;
+ }
+ mes "[Bisharm]";
+ mes "Good, I will take 199,800 zeny for my fee.";
+ mes "OK?";
+ mes "You still have chance to go to that novice and do your hair....";
+ mes "It's up to you...";
+ next;
+ if(select("I will ask you a favor","Well..I will pass..") ==1 ) {
+ mes "[Bisharm]";
+ mes "Alright!----- Here goes!!!";
+ mes "Watch yourself!!";
+ next;
+ mes "[Bisharm]";
+ mes "Wooohhhhhhhhh!!!!";
+ next;
+ mes "[Bisharm]";
+ mes "Yipe!! Yeah!! Yeah~~~~~!!";
+ next;
+ mes "[Bisharm]";
+ mes "Finished...!! great...GREAT!!";
+ mes "The style no one can't creat!!!!";
+ mes "Phu..Hahahahahaha!!";
+ setlook 1,rand(1,19);
+ setlook 6,rand(1,6);
+ set Zeny,Zeny-199800;
+ close;
+ }
+ mes "[Bisharm]";
+ mes "Hmm! Whatever...!! You'll regret this!!";
+ mes "You'll relize only great artisan can...";
+ mes "can creat real beauty.....";
+ mes "You will relize it...someday...";
+ close;
+ case 3:
+ mes "[Bisharm]";
+ mes "I feel so sorry for people";
+ mes "who let their hairs to be touched by a NOVICE";
+ mes "who doesn't know anything about beauty!!";
+ mes "I feel really really sorry for them!!";
+ close;
+ }
}
+
+//===== Old Changelog: =================================
+//= 07/06/05 : Added 1st Version. [Muad_Dib]
+//= Converted to eAthena format by Dr.Evil Fixed typos [Nexon]
+//= 1.1 Removed Duplicates [Silent]
+//============================================================ \ No newline at end of file