* Added missing Hair Dressers and Hair Dyer to Lighthalzen.

- Hair Dresser will change hair styles ranging between 20 to 27
- Assistant Beautician changes to a random style and colour between 1-23.
* Updated the Cursed Spirit quest, and added some more town NPCs.
* Added more town NPCs to Splendide and Manuk.

git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@14780 54d463be-8e91-2dee-dedb-b68131a5f0ec
This commit is contained in:
L0ne_W0lf 2011-04-08 19:03:24 +00:00
parent d82968afbf
commit a49d7f6afd
8 changed files with 2861 additions and 1667 deletions

View File

@ -48,7 +48,7 @@ min_chat_delay: 0
// valid range of dye's and styles on the client
min_hair_style: 0
max_hair_style: 25
max_hair_style: 27
min_hair_color: 0
max_hair_color: 8
min_cloth_color: 0

View File

@ -1,5 +1,11 @@
Date Added
======
2011/04/08
* Rev. 14780 Added missing Hair Dressers and Hair Dyer to Lighthalzen. [L0ne_W0lf]
- Hair Dresser will change hair styles ranging between 20 to 27
- Assistant Beautician changes to a random style and colour between 1-23.
* Updated the Cursed Spirit quest, and added some more town NPCs.
* Added more town NPCs to Splendide and Manuk.
2011/04/06
* Rev. 14775 Added two new quests, Alberta Boy and Secret Note of Bazett. [L0ne_W0lf]
* Implemented 13.2 update to Report to the New World quest.

View File

@ -3,7 +3,7 @@
//===== By: ==================================================
//= erKURITA, Au{R}oN (Translated by Alan), $ephiroth
//===== Current Version: =====================================
//= 2.1
//= 2.2
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
@ -41,6 +41,7 @@
//= 1.9 Added Cool Corp. Event Staff, who oringialy resided in the DTS_warper script file. [L0ne_W0lf]
//= 2.0 Added missing Lab Staff#amano08 NPC. (bugreport:4319) [Gepard]
//= 2.1 Commented out Duplicate NPCs. (bugreport:4555)
//= 2.2 Added missing NPC found in AEGIS files. [L0ne_W0lf]
//=============================================================
lighthalzen,198,285,5 script Jiwon#zen5 862,{
@ -3159,6 +3160,56 @@ lhz_in02,19,274,2 script Maintenance Guy#lhz 851,{
}
*/
lighthalzen,337,296,3 script Rekenber Employee#li_2 868,{
if (hg_tre > 54) {
mes "[Rekenber Employee]";
mes "Greetings. As part of our";
mes "effort to relieve the poor,";
mes "Rekenber is providing job";
mes "opportunities targeted for";
mes "citizens of the slum areas.";
next;
mes "[Rekenber Employee]";
mes "You can choose to work";
mes "from home, or undergo a";
mes "little bit of training for more";
mes "professional positions. This";
mes "is a great chance to make a";
mes "difference... and some money~";
emotion e_no1,"Rekenber Employee#li";
close;
}
}
lhz_in01,221,131,7 script Scientist#li_01 865,{
if (isequipped(2241) && isequipped(2243)) {
if (hg_tre > 54) {
mes "[A Scientist]";
mes "What happened? All the machines are ruined and the research report are gone! The history of Regenschirm has been hacked!";
close;
}
else {
mes "[Scientist]";
mes "It takes so long for";
mes "this device to process";
mes "all the data and give me";
mes "the results. Still, the wait";
mes "heightens my anticipation...";
close;
}
}
else {
mes "[Scientist]";
mes "What?! Guards!";
mes "Hurry, there's an";
mes "intruder right here!";
emotion e_gasp,"A Scientist#li_01";
close2;
warp "lhz_in01",33,224;
end;
}
}
// Lighthalzen Mushroom.
// Don't really understand why it's there, but it's funny regardless.
lhz_in01,157,54,0,0 monster Red Mushroom 1085,1,120000,100000,0

View File

@ -3,7 +3,7 @@
//===== By: ==================================================
//= L0ne_W0lf
//===== Current Version: =====================================
//= 1.1
//= 1.2
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
@ -12,6 +12,7 @@
//===== Additional Comments: =================================
//= 1.0 First Version.
//= 1.1 Added more town NPCs
//= 1.2 Added more town NPCs
//============================================================
// cat_enhance
@ -490,3 +491,79 @@ manuk,253,173,3 script Manuk Benknee#tre5 449,{
close;
}
}
// ep12_2_dailybs
manuk,251,180,5 script Young Villager#ep13bs 454,{
if (isequipped(2782) == 1) {
mes "[Young Villager]";
mes "It's past the time of our date, why isn't she here yet!!?";
close;
}
else {
mes "[Asd]";
mes "Ywo di pi butfs oui Afbsu ";
close;
}
}
man_in01,360,137,5 script Mechanic#ep13bs 454,{
if (isequipped(2782) == 1) {
mes "[Mechanic]";
mes "Alien races are not allowed to enter.";
mes "It's very dangerous here, please don't come any closer.";
close;
}
else {
mes "[Asoui]";
mes "Fs iua sdjosow ww ";
mes "Adds wwpq iusnd ";
close;
}
}
man_in01,68,187,0 script Worker#ep13bs1 454,{
if (isequipped(2782) == 1) {
mes "[Worker]";
mes "Hmm, it smells delicious.";
mes "It should be time to turn it around now.";
next;
mes "[Worker]";
mes "Hardrock Mammoth steak should be eaten slightly raw!";
close;
}
else {
mes "[Tee]";
mes "As woue dpi sha we";
mes "Two psie bu le";
next;
mes "[Tee]";
mes "Tr sdou powee wwee ";
close;
}
}
man_in01,74,181,3 script Worker#ep13bs2 454,{
if (isequipped(2782) == 1) {
mes "[Worker]";
mes "Chef Cook, how many plates should I put down?";
close;
}
else {
mes "[Tee]";
mes "We pishd bugs ouwwe iro ";
close;
}
}
man_in01,227,280,5 script Scientist#ep13bs 449,{
if (isequipped(2782) == 1) {
mes "[Scientist]";
mes "Is there only one way we can survive..?";
close;
}
else {
mes "[Apti]";
mes "Dso piey pioit ioep ";
close;
}
}

View File

@ -3,7 +3,7 @@
//===== By: ==================================================
//= L0ne_W0lf
//===== Current Version: =====================================
//= 1.1
//= 1.2
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
@ -12,6 +12,7 @@
//===== Additional Comments: =================================
//= 1.0 First Version.
//= 1.1 Added more town NPCs
//= 1.2 Added more town NPCs
//============================================================
// cat_enhance
@ -792,3 +793,39 @@ spl_in01,122,311,1 script Laphine Soldier#ep13_2 447,{
}
}
// ep33_2_dailybs
splendide,121,259,3 script Fairy#ep13bs1 436,{
if (isequipped(2782) == 1) {
mes "[Fairy]";
mes "Have you ever gone to the East side?";
mes "Theres lots of ice~";
mes "How cold...";
close;
}
else {
mes "[nes]";
mes "VaFuloDor An ";
mes "WosNuffremu Ha TurAshTi";
mes "VilTiRini O ";
close;
}
}
splendide,163,264,3 script Fairy#ep13bs2 438,{
if (isequipped(2782) == 1) {
mes "[Fairy]";
mes "What are you looking at!";
next;
mes "[Fairy]";
mes "Oh me! You know beauty when you see it don't you~?!";
close;
}
else {
mes "[nes]";
mes "UorVeLars No Ador";
next;
mes "[nes]";
mes "SeGothShar An AshDur";
close;
}
}

View File

@ -3,7 +3,7 @@
//===== By: ==================================================
//= kobra_k88; L0ne_W0lf
//===== Current Version: =====================================
//= 1.4
//= 1.5
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
@ -14,6 +14,7 @@
//= 1.2 Rescripted to Aegis 10.3 standards. [L0ne_W0lf]
//= 1.3 Fixed problem what "freezes" the NPC. (bugreport:509) [Samuray22]
//= 1.4 Fixed getlook checking the wrong color. (bugreport:2392) [L0ne_W0lf]
//= 1.5 Added Lighthalzen Hair Dying NPC. [L0ne_W0lf]
//============================================================
prt_in,243,168,4 script Jovovich 91,{
@ -78,7 +79,7 @@ prt_in,243,168,4 script Jovovich 91,{
close;
}
if (.@headpalette == getlook(6)) {
if (.@headpalette == getlook(VAR_HEADPALETTE)) {
mes "[Hairdresser Jovovich]";
mes "Eh? But that's the hair color you already have. Please choose a different color.";
next;
@ -111,7 +112,7 @@ prt_in,243,168,4 script Jovovich 91,{
case 8: delitem 975,1; break; //Scarlet_Dyestuffs
}
set Zeny,Zeny-1000;
setlook 6,.@headpalette;
setlook VAR_HEADPALETTE,.@headpalette;
set .@choose_success,1;
break;
}
@ -152,4 +153,257 @@ S_NoDye:
close;
}
return;
}
}
// Lighthalzen
lhz_in02,100,134,3 script Hair Dyer#lich 850,{
mes "[Rossa]";
if (Sex == 1) {
mes "Welcome, come in~";
mes "Oh, I see that you take";
mes "much better care of your";
mes "hair than those other boys.";
mes "Now would you like to dye";
mes "your hair another color?";
}
else {
mes "Oh, wow~ Where did";
mes "you get your hair styled?";
mes "I love it! But... It would";
mes "be even more beautiful if";
mes "you dyed your hair. What";
mes "do you think about that?";
}
while (.@choose_success != 2) {
next;
switch(select("Dye Hair:Coloring Information:Cancel")) {
case 1:
mes "[Rossa]";
mes "Ho ho ho ho~";
mes "So which color would";
mes "you like to try? Something";
mes "vivid or dark? Sexy or cute?";
next;
while (.@choose_success != 2) {
if (.@choose_success == 1) {
mes "[Rossa]";
mes "Ooh, I like this color!";
mes "But would you like to";
mes "try a different one?";
next;
switch(select("Yes:No")) {
case 1:
mes "[Rossa]";
mes "Please select";
mes "another color~";
next;
break;
case 2:
mes "[Rossa]";
mes "An excellent choice~";
mes "Alright then, thank you";
mes "for using my service and";
mes "I hope you come by again!";
close2;
set .@choose_success,2;
break;
}
}
while (.@choose_success != 2) {
switch(select("Red, please.:Yellow, please.:Purple, please.:Orange, please.:Green, please.:Blue, please.:White, please.:Dark Brown, please.:I like my hair color.")) {
case 1:
set .@headpalette,8;
break;
case 2:
set .@headpalette,1;
break;
case 3:
set .@headpalette,2;
break;
case 4:
set .@headpalette,3;
break;
case 5:
set .@headpalette,4;
break;
case 6:
set .@headpalette,5;
break;
case 7:
set .@headpalette,6;
break;
case 8:
set .@headpalette,7;
break;
case 9:
if (.@choose_success != 0) {
mes "[Rossa]";
mes "Are you sure?";
mes "Alright then, you";
mes "know what's best for";
mes "your beauty and to tell";
mes "the truth, I agree with you~";
close2;
set .@choose_success,2;
}
else {
mes "[Rossa]";
mes "Oh, I see. Still, I can't";
mes "help but feel so disappointed.";
mes "You'd look so good if you dyed";
mes "your hair a different color~";
close2;
set .@choose_success,2;
}
break;
}
if (getlook(VAR_HEADPALETTE) == .@headpalette) {
mes "[Rossa]";
mes "Hmm, your hair color";
mes "is still fine, so there's";
mes "no need to dye it the same";
mes "color again, if that's what";
mes "you're worried about.";
next;
}
else {
if ((.@headpalette == 8) && (countitem(975) == 0)) {
mes "[Rossa]";
mes "Oh, I'm sorry dear,";
mes "but I can't dye your";
mes "hair if you didn't bring";
mes "Scarlet Dyestuffs with you...";
close2;
set .@choose_success,2;
break;
}
else if ((.@headpalette == 1) && (countitem(976) == 0)) {
mes "[Rossa]";
mes "Oh, I'm sorry dear,";
mes "but I can't dye your";
mes "hair if you didn't bring";
mes "Lemon Dyestuffs with you...";
close2;
set .@choose_success,2;
break;
}
else if ((.@headpalette == 2) && (countitem(981) == 0)) {
mes "[Rossa]";
mes "Oh, I'm sorry dear,";
mes "but I can't dye your";
mes "hair if you didn't bring";
mes "Violet Dyestuffs with you...";
close2;
set .@choose_success,2;
break;
}
else if ((.@headpalette == 3) && (countitem(980) == 0)) {
mes "[Rossa]";
mes "Oh, I'm sorry dear,";
mes "but I can't dye your";
mes "hair if you didn't bring";
mes "Orange Dyestuffs with you...";
close2;
set .@choose_success,2;
break;
}
else if ((.@headpalette == 4) && (countitem(979) == 0)) {
mes "[Rossa]";
mes "Oh, I'm sorry dear,";
mes "but I can't dye your";
mes "hair if you didn't bring";
mes "Darkgreen Dyestuffs";
mes "with you. Would you come";
mes "back after you get some?";
close2;
set .@choose_success,2;
break;
}
else if ((.@headpalette == 5) && (countitem(978) == 0)) {
mes "[Rossa]";
mes "Oh, I'm sorry dear,";
mes "but I can't dye your";
mes "hair if you didn't bring";
mes "Cobaltblue Dyestuffs";
mes "with you. Would you come";
mes "back after you get some?";
close2;
set .@choose_success,2;
break;
}
else if ((.@headpalette == 6) && (countitem(982) == 0)) {
mes "[Rossa]";
mes "Oh, I'm sorry dear,";
mes "but I can't dye your";
mes "hair if you didn't bring";
mes "White Dyestuffs with you...";
close2;
set .@choose_success,2;
break;
}
else if ((.@headpalette == 7) && (countitem(983) == 0)) {
mes "[Rossa]";
mes "Oh, I'm sorry dear,";
mes "but I can't dye your";
mes "hair if you didn't bring";
mes "Black Dyestuffs with you...";
close2;
set .@choose_success,2;
break;
}
if (Zeny < 1000) {
mes "[Rossa]";
mes "Oh, I'm so sorry dear,";
mes "but my service fee is";
mes "1,000 zeny. Did you forget";
mes "to bring your money with you?";
close2;
set .@choose_success,2;
break;
}
if (.@headpalette == 8) delitem 975,1; //Scarlet_Dyestuffs
else if (.@headpalette == 1) delitem 976,1; //Lemon_Dyestuffs
else if (.@headpalette == 2) delitem 981,1; //Violet_Dyestuffs
else if (.@headpalette == 3) delitem 980,1; //Orange_Dyestuffs
else if (.@headpalette == 4) delitem 979,1; //Darkgreen_Dyestuffs
else if (.@headpalette == 5) delitem 978,1; //Cobaltblue_Dyestuffs
else if (.@headpalette == 6) delitem 982,1; //White_Dyestuffs
else if (.@headpalette == 7) delitem 983,1; //Black_Dyestuffs
set zeny,zeny-1000;
setlook VAR_HEADPALETTE,.@headpalette;
set .@choose_success,1;
break;
}
}
}
break;
case 2:
mes "[Rossa]";
mes "When you're feeling";
mes "down, when you just want";
mes "to look nice for the one you";
mes "love, or when you just want";
mes "a different look, why don't";
mes "you dye your hair?";
next;
mes "[Rossa]";
mes "All you need is one";
mes "Dyestuffs item of the";
mes "color that you want to";
mes "dye your hair, as well as";
mes "a 1,000 zeny service fee.";
mes "I'm here for your beauty needs~";
break;
case 3:
mes "[Rossa]";
mes "You know, when you";
mes "put some effort into";
mes "your appearance, you'll";
mes "not only look better, but";
mes "you'll feel better about";
mes "yourself. Makes sense, right?";
close;
}
}
close;
}

View File

@ -3,7 +3,7 @@
//===== By: ==================================================
//= Muad_Dib, Samuray22, Kisuka
//===== Current Version: =====================================
//= 1.3
//= 1.4
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
@ -12,6 +12,7 @@
//===== Additional Comments: =================================
//= 1.2 Rescripted to the Aegis 10.3 Standards. [Samuray22]
//= 1.3 Updated to match AEGIS script. [Kisuka]
//= 1.4 Added Lighthalzen Hair Dresser. [L0ne_W0lf]
//============================================================
// Hair Dresser Veronica
@ -682,6 +683,619 @@ alberta,33,141,7 script Roving Hair Dresser 87,{
}
}
// Lighthalzen
lhz_in02,100,143,3 script Hair Dresser#li 122,{
mes "[Prince Shammi]";
mes "Welcome to Prince Shammi's";
mes "Beauty Shop, the place to go";
mes "for faaabulous hair. Don't be";
mes "shy, tell me exactly how you";
mes "want me to make you glamorous~";
next;
switch(select("Check all hairstyles:Change hairstyle:Cancel")) {
case 1:
mes "[Prince Shammi]";
mes "Oh, would you like to";
mes "see all of the trendy new";
mes "hairstyles I offer?";
next;
mes "[Prince Shammi]";
mes "Please, oh please, choose from the following styles and I will show you a preview.";
next;
switch(select("Old Hairstyles:New Hairstyles")) {
case 1:
if (Sex == 1) {
switch(select("Petite Style:Executioner Style:Prince Style:Deviace Style:Cancel")) {
case 1:
cutin "hair_m_20",4;
mes "[Prince Shammi]";
mes "This is the ^3131FFPetite Style^000000,";
mes "which softens the gentleman's";
mes "appearance with long braids";
mes "for a fluffier appearance.";
break;
case 2:
cutin "hair_m_21",4;
mes "[Prince Shammi]";
mes "Oh, the ^3131FFExecutioner Style^000000!";
mes "It's a rugged, shaggy style";
mes "for that tough guy look that's";
mes "becoming popular these days.";
mes "And every girl loves a tough";
mes "guy, right? ^333333*Tee hee~*^000000";
break;
case 3:
cutin "hair_m_22",4;
mes "[Prince Shammi]";
mes "You certainly have an";
mes "eye for fashion! Yes, this";
mes "is the ^3131FFPrince Style^000000, the";
mes "pinnacle of sexiness and";
mes "sophistication. Magnifique, no?";
mes "Yes, choose this one, this one!";
break;
case 4:
cutin "hair_m_23",4;
mes "[Prince Shammi]";
mes "A-ha~! The ^3131FFDeviace Style^000000!";
mes "This is much like the Prince";
mes "Style, but with shorter hair";
mes "in the back. Yes, this look";
mes "is very neat and dandy.";
break;
case 5:
cutin "hair_f_01",255;
mes "[Prince Shammi]";
mes "No? You didn't want";
mes "to take a look? Please,";
mes "you're an adventurer, I know";
mes "you can be more daring than";
mes "that! Be fashionably adventurous, you fashionable adventurer~";
emotion e_lv,"Hair Dresser#i";
close;
}
}
else {
switch(select("Spring Rabbit Style:Harpy Style:Medusa Style:Isis Style:Cancel")) {
case 1:
cutin "hair_f_20",4;
mes "[Prince Shammi]";
mes "Oh yes, this is the ";
mes "^3131FFSpring Rabbit Style^000000.";
mes "The bobbing forelock";
mes "adds an aura of chic,";
mes "cutsiness and playfulness.";
mes "Yes? No? Yes? No? Oh yes!";
break;
case 2:
cutin "hair_f_21",4;
mes "[Prince Shammi]";
mes "Ooh, are you interested";
mes "in the ^3131FFHarpy Style^000000? The";
mes "natural curl coupled with";
mes "the pony tail results in";
mes "a sophisticated, yet very";
mes "natural and relaxed look~";
break;
case 3:
cutin "hair_f_22",4;
mes "[Prince Shammi]";
mes "Ahh, the ^3131FFMedusa Style^000000~";
mes "These boldy flowing locks";
mes "scream power and dominance";
mes "and is ideal for the big career";
mes "woman who wishes to be...";
mes "irresistable to men~";
break;
case 4:
cutin "hair_f_23",4;
mes "[Prince Shammi]";
mes "Ooh, the ^3131FFIsis Style^000000~";
mes "Yes, you'll look very cute";
mes "with your hair in buns on";
mes "on both sides of your head.";
mes "It'll be very darling on you!";
break;
case 5:
mes "[Prince Shammi]";
mes "No? You didn't want";
mes "to take a look? Please,";
mes "you're an adventurer, I know";
mes "you can be more daring than";
mes "that! Be fashionably adventurous, you fashionable adventurer~";
emotion e_lv,"Hair Dresser#li";
close;
}
}
break;
case 2:
if (Sex == 1) {
switch(select("Emergency Heal Perm:Aura Blade Cut:Power Swing:Renovatio Cut:Cancel")) {
case 1:
cutin "hair_m_24",4;
mes "[Prince Shammi]";
mes "This is the ^3131FFEmergency Heal Perm^000000";
mes "It is quite popular among the healing class.";
break;
case 2:
cutin "hair_m_25",4;
mes "[Prince Shammi]";
mes "You must be after a lady yes?";
mes "The ^3131FFAura Blade Cut^000000";
mes "is known to make the ladies swoon, you tiger you!";
break;
case 3:
cutin "hair_m_26",4;
mes "[Prince Shammi]";
mes "Oh you brute!";
mes "^3131FFPower Swing Cut^000000";
mes "Flex your style muscles with this hairstyle. This is definitely your look.";
break;
case 4:
cutin "hair_m_27",4;
mes "[Prince Shammi]";
mes "Ah! I see you're only interested in the latest trends.";
mes "Straight from the runway is the ^3131FFRenovatio Cut^000000.";
break;
case 5:
mes "[Prince Shammi]";
mes "No? You didn't want";
mes "to take a look? Please,";
mes "you're an adventurer, I know";
mes "you can be more daring than";
mes "that! Be fashionably adventurous, you fashionable adventurer~";
emotion e_lv,"Hair Dresser#li";
close;
}
}
else {
switch(select("Assumptio Perm:Soul Changer Cut:X Tornado Cut:Oratio Cut:Cancel")) {
case 1:
cutin "hair_f_24",4;
mes "[Prince Shammi]";
mes "This is the ^3131FFAssumptio Perm^000000";
mes "It's a shorter style perm that allows for maximum spellcasting.";
break;
case 2:
cutin "hair_f_25",4;
mes "[Prince Shammi]";
mes "You must be a man killer no?";
mes "The ^3131FFSoul Changer Cut^000000";
mes "will make any man open his wall... er heart to you!";
break;
case 3:
cutin "hair_f_26",4;
mes "[Prince Shammi]";
mes "This is a bit of a trendy style";
mes "^3131FFX Tornado Cut^000000";
mes "It's for adventurous people who like change.";
break;
case 4:
cutin "hair_f_27",4;
mes "[Prince Shammi]";
mes "Ah! I see you're only interested in the latest trends.";
mes "Straight from the runway is the ^3131FFOratio Cut^000000.";
mes "You'll be the envy of all of your friends with this hairstyle.";
break;
case 5:
mes "[Prince Shammi]";
mes "No? You didn't want";
mes "to take a look? Please,";
mes "you're an adventurer, I know";
mes "you can be more daring than";
mes "that! Be fashionably adventurous, you fashionable adventurer~";
emotion e_lv,"Hair Dresser#li";
close;
}
}
}
close2;
cutin "",255;
end;
case 2:
if (BaseLevel < 60) {
mes "[Prince Shammi]";
mes "Oh, I'm so sorry, but";
mes "I can only perform my";
mes "services for clients that have";
mes "matured enough to find their";
mes "true inner beauty. But please";
mes "come back once you do, okay?";
close;
}
else if ((countitem(973) < 3) || (countitem(974) < 3) || (countitem(901) < 100) || (countitem(1094) < 100) || (countitem(1020) < 100) || (countitem(1060) < 100) || (countitem(7152) < 100) || (Zeny < 99800)) {
mes "[Prince Shammi]";
mes "If you've already decided";
mes "what hairstyle you'd like,";
mes "please have my service charge";
mes "ready, as well as the materials";
mes "I will need in performing this";
mes "service, okay? Please bring...";
next;
mes "[Prince Shammi]";
mes "^3355FF3 Counteragent^000000,";
mes "^3355FF3 Mixture^000000,";
mes "^3355FF100 Daenggie^000000,";
mes "^3355FF100 Short Daenggie^000000...";
next;
mes "[Prince Shammi]";
mes "^3355FF100 Black Hair^000000,";
mes "^3355FF100 Golden Hair^000000,";
mes "^3355FF100 Glossy Hair^000000";
mes "and ^3355FF99,800 zeny^000000.";
mes "Once you do that, I'll make";
mes "a miracle out of your hair!";
close;
}
mes "[Prince Shammi]";
mes "Alright, please choose";
mes "which hairstyle you wish";
mes "to have from numbers 20 to 25.";
mes "Here's a list of the style names just in case you need them~";
next;
mes "[Prince Shammi]";
if (Sex == 1) {
mes "No. 20: Petite Style";
mes "No. 21: Executioner Style";
mes "No. 22: Prince Style";
mes "No. 23: Deviace Style";
mes "No. 24: Emergency Heal Perm";
mes "No. 25: Aura Blade Cut";
mes "No. 26: Power Swing and";
mes "No. 27: Renovatio Cut.";
}
else {
mes "No. 20: Spring Rabbit Style";
mes "No. 21: Harpy Style";
mes "No. 22: Medusa Style";
mes "No. 23: Isis Style";
mes "No. 24: Assumptio Perm";
mes "No. 25: Soul Changer Cut";
mes "No. 26: X Tornado Cut and";
mes "No. 27: Oratio Cut.";
}
next;
input .@input;
if (.@input == 0) {
mes "[Prince Shammi]";
mes "Oh...?";
mes "You decided to cancel?";
mes "Well, you know what's";
mes "best for you, I suppose.";
mes "Still, I'm so disappointed~";
close;
}
else if ((.@input < 20) || (.@input > 27)) {
mes "[Prince Shammi]";
mes "Dearie, please enter";
mes "a number from ''20'' to";
mes "''25,'' alright? Then I can";
mes "get right to work at making";
mes "you soooooooo beautiful!";
close;
}
else if (getlook(VAR_HEAD) == .@input) {
mes "[Prince Shammi]";
mes "Oh dear me, you're not";
mes "going to waste money for";
mes "the same hairstyle that you";
mes "have now, are you? You can";
mes "have someone else change";
mes "your hair color, you know.";
close;
}
else {
if (Sex == 1)
cutin "hair_m_"+.@input+".BMP",4;
else
cutin "hair_f_"+.@input+".BMP",4;
mes "[Prince Shammi]";
mes "Oooh! Now, is this the";
mes "hairstyle that you wanted?";
mes "This is No. "+.@input+", by the way.";
next;
switch(select("Yes.:No.")) {
case 1:
if (getlook(VAR_HEADPALETTE) == 0) {
mes "[Prince Shammi]";
mes "Oh, Sweet Christmas,";
mes "I almost forgot! Would";
mes "you like me to dye your";
mes "hair, free of charge? It's";
mes "a part of my service, so";
mes "please choose a color~";
next;
switch(select("Red:Yellow:Purple:Orange:Green:Blue:White:Dark Brown")) {
case 1:
set .@headpalette,8;
break;
case 2:
set .@headpalette,1;
break;
case 3:
set .@headpalette,2;
break;
case 4:
set .@headpalette,3;
break;
case 5:
set .@headpalette,4;
break;
case 6:
set .@headpalette,5;
break;
case 7:
set .@headpalette,6;
break;
case 8:
set .@headpalette,7;
break;
}
}
mes "[Prince Shammi]";
mes "Okay, let's get";
mes "started, shall we?";
mes "Keep your head still,";
mes "now. Yes, that's good...";
next;
mes "^3355FF*Snip snip*";
mes "*Rustle rustle*";
mes "*Clip clip clip clip*";
mes "*Bzzzzzzzzzzzzzzzzzzzz*^000000";
next;
set zeny,zeny-99800;
delitem 973,3; //Counteragent
delitem 974,3; //Mixture
delitem 901,100; //Danggie
delitem 1094,100; //Short_Daenggie
delitem 1020,100; //Long_Hair
delitem 1060,100; //Golden_Hair
delitem 7152,100; //Glossy_Hair
setlook VAR_HEAD,.@input;
setlook VAR_HEADPALETTE,.@headpalette;
mes "[Prince Shammi]";
mes "Well, we're all finished!";
mes "And my, oh my, you look even";
mes "more fabulous that I thought";
mes "you would! Oh, I can't believe";
if (Sex == 1) {
mes "how tough and elegant you are~";
mes "So ruggedly manly and handsome!";
}
else {
mes "how graceful and elegant you";
mes "look! Absolutely gorgeous!";
}
emotion e_kis,"Hair Dresser#li";
next;
mes "[Prince Shammi]";
mes "You love your new";
mes "hair, don't you? Feel";
mes "free to come back anytime.";
mes "I'll make you the best looking";
mes "person in the entire world!";
emotion e_no1,"Hair Dresser#li";
close;
case 2:
mes "[Prince Shammi]";
mes "Oh, did you forget which";
mes "hairstyle goes with which";
mes "number? By all means, please";
mes "check again! Find the one that";
mes "is perfect just for you, okay?";
close;
}
}
break;
case 3:
mes "[Prince Shammi]";
mes "Humm ? ";
mes "Maybe you don't understand";
mes "my futuristic styles.";
mes "Goodbye! ";
close;
}
}
lhz_in02,91,155,5 script Assistant Beautician#li 862,{
mes "[Assistant Beautician]";
mes "Wah?! Sweet Jiminy,";
mes "you freaked me out!";
mes "What are you doing?!";
emotion e_omg,"Assistant Beautician#li";
next;
mes "[Assistant Beautician]";
mes "Oh! Um, a customer!";
mes "H-h-h-h-h-hello! Can";
mes "I help you with anything?";
next;
switch(select("What do you do?:Please change my hairstyle.:Who is Prince Shammi?")) {
case 1:
mes "[Assistant Beautician]";
mes "Oh! Me...? I'm";
mes "just an assistant";
mes "beautician, but I'm";
mes "training hard everyday";
mes "so that I can become";
mes "a real professional!";
next;
mes "[Assistant Beautician]";
mes "Yeah, I do all sorts of";
mes "grunt work for the boss while";
mes "I'm in training. Sometimes, he";
mes "makes me work pretty hard.";
mes "In fact, I better get back to work before he gets angry at me!";
close;
case 2:
if (BaseLevel < 60) {
mes "[Assistant Beautician]";
mes "Me...? Oh no,";
mes "no I can't! I mean,";
mes "I'd love to but, I'm";
mes "still in training and";
mes "I can't take responsibility";
mes "if I mess up on a little kid!";
close;
}
else if ((Zeny < 250000)) {
mes "[Assistant Beautician]";
mes "Well... I'm just an";
mes "assistant, but I have been";
mes "studying hairstyling after";
mes "work. If you want, just bring";
mes "me 250,000 zeny and I'll try";
mes "my best to change your hair~";
next;
mes "[Assistant Beautician]";
mes "I'd appreciate it if you'd";
mes "give me this chance! The";
mes "boss doesn't think I'm ready";
mes "for styling real people yet, so";
mes "I haven't had much practice!";
next;
mes "[Assistant Beautician]";
mes "I just know I could";
mes "do a good job on your";
mes "hair! Just... Just please";
mes "understand if I mess up.";
mes "It won't be too bad, I promise~";
close;
}
else {
mes "[Assistant Beautician]";
mes "You're really going to";
mes "give me a chance to practice?";
mes "Oh, I love you so much! Okay,";
mes "I'll need 250,000 zeny to make";
mes "up for the material expenses.";
mes "Is that okay with you?";
next;
switch(select("Of course~:On second thought...")) {
case 1:
mes "[Assistant Beautician]";
mes "Great! Now, please";
mes "choose a hairstyle";
mes "from ''1'' to ''23.''";
mes "Um, if you need to";
mes "cancel, just enter ''0.''";
next;
input .@input;
if (.@input == 0) {
mes "[Assistant Beautician]";
mes "Awwww...";
mes "I guess you don't";
mes "trust me after all...";
close;
}
else if ((.@input < 1) || (.@input > 23)) {
mes "[Assistant Beautician]";
mes "Huh? I thought I asked";
mes "you to enter a number from";
mes "''1'' to ''23?'' What did I do";
mes "wrong this time? Hmmm...";
close;
}
else {
mes "[Assistant Beautician]";
mes "So this is the";
mes "style you want me";
mes "to try to do for you?";
if (Sex == 1) {
if (.@input < 10)
cutin "hair_m_0"+.@input+".BMP",4;
else
cutin "hair_m_"+.@input+".BMP",4;
}
else {
if (.@input < 10)
cutin "hair_f_0"+.@input+".BMP",4;
else
cutin "hair_f_"+.@input+".BMP",4;
}
next;
switch(select("Yes, let's try it~:Cancel.")) {
case 1:
break;
case 2:
mes "[Assistant Beautician]";
mes "Oooh, there must";
mes "be some style that";
mes "you like, right? Hmmm...";
close;
}
}
mes "[Assistant Beautician]";
mes "Great, you finally";
mes "picked one! What, which";
mes "one did you pick again?";
mes "Ah, I found it, I found it!";
mes "Haha! No problem here!";
mes "Now it's time to style!";
next;
nude;
mes "[Assistant Beautician]";
mes "Bwwwwaaaahhhh!";
next;
mes "[Assistant Beautician]";
mes "Yap! Pwwwaaattt!";
next;
mes "[Assistant Beautician]";
mes "Waaaah!";
mes "Oh crap!";
mes "Wait, I can...";
mes "I can fix this!";
next;
set .@style_r,rand(1,23);
set .@color_r,rand(1,8);
mes "[Assistant Beautician]";
mes "^333333*Pant Pant Pant*^000000";
next;
set zeny,zeny-250000;
setlook VAR_HEAD,.@style_r;
setlook VAR_HEADPALETTE,.@color_r;
mes "[Assistant Beautician]";
mes "Bwahahaha! Success!";
if (.@input == .@style_r) {
mes "So... How do you like";
mes "your new style? I love it!";
}
else {
mes "Wha...? This isn't what";
mes "you wanted? Uh oh... Um...";
mes "Well, next time I know I can";
mes "do a much better job! Right!";
}
next;
mes "[Assistant Beautician]";
mes "Oh, you're such a";
mes "sweetheart for helping";
mes "me! Thank you for using";
mes "my service and come again~";
emotion e_kis,"Assistant Beautician#li";
close;
case 2:
mes "[Assistant Beautician]";
mes "Huh? Oh no, you're";
mes "quitting? Well, I guess";
mes "I couldn't trust me to";
mes "style my hair either...";
mes "You're... You're right.";
close;
}
}
case 3:
mes "[Assistant Beautician]";
mes "Prince Shammi?";
mes "He's only a genius when";
mes "it comes to hairstyling!";
mes "I'm just his apprentice, but";
mes "maybe someday, I can be a";
mes "force in the fashion world too!";
close;
}
}
//===== Old Changelog: =================================
//= 07/06/05 : Added 1st Version. [Muad_Dib]
//= Converted to eAthena format by Dr.Evil Fixed typos [Nexon]

File diff suppressed because it is too large Load Diff