- Massive EOL normalization & 'svn:eol-style native' flag setting for all txt/conf/h/c files.

git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@9410 54d463be-8e91-2dee-dedb-b68131a5f0ec

1 files changed, 2053 insertions, 2053 deletions

diff --git a/npc/merchants/hair_style.txt b/npc/merchants/hair_style.txt
index 4a4daff36..f79966894 100644
--- a/npc/merchants/hair_style.txt
+++ b/npc/merchants/hair_style.txt
@@ -1,2054 +1,2054 @@
-//===== Athena Script ========================================

-//= Hair Dresser

-//===== By: ==================================================

-//= [Muad_Dib] 1.0 (The Prometheus Project)

-//===== Current Version: =====================================

-//= 1.1

-//===== Compatible With: =====================================

-//= Any Athena Version; RO Episode 6+

-//===== Description: =========================================

-//= Allows you to change your hairstyle.

-//===== Additional Comments: =================================

-//= 07/06/05 : Added 1st Version. [Muad_Dib]

-//= Converted to eAthena format by Dr.Evil

-//= Change NPC coords according to 

-//= http://www.nattsumi.com/roquest/miscellaneousquest.html

-//= Fixed typos [Nexon]

-//= TODO: Fix exploits V_V [Lupus]

-//= 1.1 Removed Duplicates [Silent]

-//============================================================

-

-alberta.gat,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;

-

-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;

+//===== Athena Script ========================================
+//= Hair Dresser
+//===== By: ==================================================
+//= [Muad_Dib] 1.0 (The Prometheus Project)
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= Any Athena Version; RO Episode 6+
+//===== Description: =========================================
+//= Allows you to change your hairstyle.
+//===== Additional Comments: =================================
+//= 07/06/05 : Added 1st Version. [Muad_Dib]
+//= Converted to eAthena format by Dr.Evil
+//= Change NPC coords according to 
+//= http://www.nattsumi.com/roquest/miscellaneousquest.html
+//= Fixed typos [Nexon]
+//= TODO: Fix exploits V_V [Lupus]
+//= 1.1 Removed Duplicates [Silent]
+//============================================================
+
+alberta.gat,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;
+
+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;
 }
\ No newline at end of file