[R] Make this script compatible to Hercules

keough

keough

New member
Messages
173
Points
0
Emulator
This is the official cash dye clothes and i want to make it official to hercules. 

I got it on ABS SAKRAY AEGIS script.

npc "prt_in" "Dinorah Lacostt" 4_F_LGTGIRL 285 167 3 0 0OnClick: dialog "[Stylist Dinorah Lacostt]" dialog "Heeeeeello~wooooooooo. I am" dialog "a stylist who can change your" dialog "clothes to match your" dialog "unique style~ uh-huh!" wait dialog "[Stylist Dinorah Lacostt]" dialog "If you give me a" dialog "^FF0000New Clothing Dye Coupon^000000," dialog "I'll change the color" dialog "of your clothes~" wait dialog "[Stylist Dinorah Lacostt]" dialog "And if you give me an" dialog "^FF0000Original Clothing Dye Coupon^000000," dialog "I'll change the color" dialog "of your clothes..." dialog "back to the original!" wait dialog "[Stylist Dinorah Lacostt]" dialog "Ah, you should be advised that" dialog "^FF0000if you change your job^000000" dialog "^FF0000after you've dyed your clothes,^000000" dialog "^FF0000the original color will be shown^000000" dialog "^FF0000on the screen. But if you relog,^000000" dialog "^FF0000you can see the dyed color again.^000000" wait dialog "[Stylist Dinorah Lacostt]" dialog "^FF0000And one more thing!!^000000" dialog "^FF0000We have only one color for^000000" dialog "^FF0000each job class. So, if you^000000" dialog "^FF0000dye twice, the color will be^000000" dialog "^FF0000the same. It would be useless.^000000" wait dialog "[Stylist Dinorah Lacostt]" dialog "Uh-huh~ Now, I told" dialog "you everything." dialog "Tell me what you want~" wait choose menu "Dye clothes." "Restore original color." "Stop talking." case 1 if v[Clothing_Dye_Coupon] > 0 dialog "[Stylist Dinorah Lacostt]" dialog "Good choice~ I'll do it~" dialog "Very, very~ quickly~" dialog "Yeaaap!" wait dialog "[Stylist Dinorah Lacostt]" dialog "Huh~ It's done very" dialog "quickly~. Isn't it pretty?" dialog "From now on~ swagger on" dialog "the streets with these" dialog "beautiful clothes!!!" dropitem Clothing_Dye_Coupon 1 changepallete 1 2 close return else dialog "[Stylist Dinorah Lacostt]" dialog "No-ou~ You don't have" dialog "a ^FF0000New Clothing Dye Coupon^000000~" dialog "Please visit me again" dialog "after you get one~" close return endif break case 2 if v[Clothing_Dye_Coupon2] > 0 if ((v[VAR_JOB] == NOVICE_H) | (v[VAR_JOB] == SWORDMAN_H) | (v[VAR_JOB] == THIEF_H) | (v[VAR_JOB] == MAGICIAN_H) | (v[VAR_JOB] == MERCHANT_H) | (v[VAR_JOB] == ARCHER_H) | (v[VAR_JOB] == ACOLYTE_H)) dialog "[Stylist Dinorah Lacostt]" dialog "Good choice~ I'll do it~" dialog "Very, very~ quickly~" dialog "Yeaaap!" wait dialog "[Stylist Dinorah Lacostt]" dialog "Huh~ It's done very" dialog "quickly~. Isn't it pretty?" dialog "From now on~ swagger on" dialog "the streets with these" dialog "beautiful clothes!!!" dropitem Clothing_Dye_Coupon2 1 changepallete 1 0 close return elseif ((v[VAR_JOB] == KNIGHT_H) | (v[VAR_JOB] == CRUSADER_H) | (v[VAR_JOB] == ASSASSIN_H) | (v[VAR_JOB] == ROGUE_H) | (v[VAR_JOB] == PRIEST_H) | (v[VAR_JOB] == MONK_H) | (v[VAR_JOB] == HUNTER_H) | (v[VAR_JOB] == BARD_H) | (v[VAR_JOB] == DANCER_H) | (v[VAR_JOB] == WIZARD_H) | (v[VAR_JOB] == SAGE_H) | (v[VAR_JOB] == BLACKSMITH_H) | (v[VAR_JOB] == ALCHEMIST_H)) dialog "[Stylist Dinorah Lacostt]" dialog "Good choice~ I'll do it~" dialog "Very, very~ quickly~" dialog "Yeaaap!" wait dialog "[Stylist Dinorah Lacostt]" dialog "Huh~ It's done very" dialog "quickly~. Isn't it pretty?" dialog "From now on~ swagger on" dialog "the streets with these" dialog "beautiful clothes!!!" dropitem Clothing_Dye_Coupon2 1 changepallete 1 0 close return else dialog "[Stylist Dinorah Lacostt]" dialog "Good choice~ I'll do it~" dialog "Very, very~ quickly~" dialog "Yeaaap!" wait dialog "[Stylist Dinorah Lacostt]" dialog "Huh~ It's done very" dialog "quickly~. Isn't it pretty?" dialog "From now on~ swagger on" dialog "the streets with these" dialog "beautiful clothes!!!" dropitem Clothing_Dye_Coupon2 1 changepallete 1 0 close return endif else dialog "[Stylist Dinorah Lacostt]" dialog "No-ou~ You don't have an" dialog "^FF0000Original Clothing Dye Coupon^000000~" dialog "Please visit me again" dialog "after you get one~" close return endif break case 3 dialog "[Stylist Dinorah Lacostt]" dialog "Visit me again if" dialog "you change your mind~~" close return break endchoosereturn

thanks!

 
@@keough

This should be a representation of your script in Hercules. Please be aware that i didn't test it though, so you should thoroughly test it. If you find any issues you can report them of course.

Code: 
prt_in,285,167,3	script	"Dinorah Lacostt"	4_F_LGTGIRL,{	mes "[Stylist Dinorah Lacostt]";	mes "Heeeeeello~wooooooooo. I am";	mes "a stylist who can change your";	mes "clothes to match your";	mes "unique style~ uh-huh!";	next;	mes "[Stylist Dinorah Lacostt]";	mes "If you give me a";	mes "^FF0000New Clothing Dye Coupon^000000,";	mes "I'll change the color";	mes "of your clothes~";	next;	mes "[Stylist Dinorah Lacostt]";	mes "And if you give me an";	mes "^FF0000Original Clothing Dye Coupon^000000,";	mes "I'll change the color";	mes "of your clothes...";	mes "back to the original!";	next;	mes "[Stylist Dinorah Lacostt]";	mes "Ah, you should be advised that";	mes "^FF0000if you change your job^000000";	mes "^FF0000after you've dyed your clothes,^000000";	mes "^FF0000the original color will be shown^000000";	mes "^FF0000on the screen. But if you relog,^000000";	mes "^FF0000you can see the dyed color again.^000000";	next;	mes "[Stylist Dinorah Lacostt]";	mes "^FF0000And one more thing!!^000000";	mes "^FF0000We have only one color for^000000";	mes "^FF0000each job class. So, if you^000000";	mes "^FF0000dye twice, the color will be^000000";	mes "^FF0000the same. It would be useless.^000000";	next;	mes "[Stylist Dinorah Lacostt]";	mes "Uh-huh~ Now, I told";	mes "you everything.";	mes "Tell me what you want~";	next;	switch( select( "Dye clothes.:Restore original color.:Stop talking." ) ) {		case 1:			if( countitem( Clothing_Dye_Coupon ) > 0 ) {				mes "[Stylist Dinorah Lacostt]";				mes "Good choice~ I'll do it~";				mes "Very, very~ quickly~";				mes "Yeaaap!";				next;				mes "[Stylist Dinorah Lacostt]";				mes "Huh~ It's done very";				mes "quickly~. Isn't it pretty?";				mes "From now on~ swagger on";				mes "the streets with these";				mes "beautiful clothes!!!";				delitem Clothing_Dye_Coupon, 1;				setlook LOOK_CLOTHES_COLOR, 2;				close;			} else {				mes "[Stylist Dinorah Lacostt]";				mes "No-ou~ You don't have";				mes "a ^FF0000New Clothing Dye Coupon^000000~";				mes "Please visit me again";				mes "after you get one~";				close;			}		break;		case 2:			if( countitem( Clothing_Dye_Coupon2 ) > 0 ) {				if( ( Class == EAJ_NOVICE ) || ( Class == EAJ_SWORDMAN ) || ( Class == EAJ_THIEF ) || ( Class == EAJ_MAGE ) || ( Class == EAJ_MERCHANT ) || ( Class == EAJ_ARCHER ) || ( Class == EAJ_ACOLYTE ) ) {					mes "[Stylist Dinorah Lacostt]";					mes "Good choice~ I'll do it~";					mes "Very, very~ quickly~";					mes "Yeaaap!";					next;					mes "[Stylist Dinorah Lacostt]";					mes "Huh~ It's done very";					mes "quickly~. Isn't it pretty?";					mes "From now on~ swagger on";					mes "the streets with these";					mes "beautiful clothes!!!";					delitem Clothing_Dye_Coupon2, 1;					setlook LOOK_CLOTHES_COLOR, 0;					close;				} else if( ( Class == EAJ_KNIGHT ) || ( Class == EAJ_CRUSADER ) || ( Class == EAJ_ASSASSIN ) || ( Class == EAJ_ROGUE ) || ( Class == EAJ_PRIEST ) || ( Class == EAJ_MONK ) || ( Class == EAJ_HUNTER ) || ( Class == EAJ_BARD ) || ( Class == EAJ_DANCER ) || ( Class == EAJ_WIZARD ) || ( Class == EAJ_SAGE ) || ( Class == EAJ_BLACKSMITH ) || ( Class == EAJ_ALCHEMIST ) ) {					mes "[Stylist Dinorah Lacostt]";					mes "Good choice~ I'll do it~";					mes "Very, very~ quickly~";					mes "Yeaaap!";					next;					mes "[Stylist Dinorah Lacostt]";					mes "Huh~ It's done very";					mes "quickly~. Isn't it pretty?";					mes "From now on~ swagger on";					mes "the streets with these";					mes "beautiful clothes!!!";					delitem Clothing_Dye_Coupon2, 1;					setlook LOOK_CLOTHES_COLOR, 0;					close;				} else {					mes "[Stylist Dinorah Lacostt]";					mes "Good choice~ I'll do it~";					mes "Very, very~ quickly~";					mes "Yeaaap!";					next;					mes "[Stylist Dinorah Lacostt]";					mes "Huh~ It's done very";					mes "quickly~. Isn't it pretty?";					mes "From now on~ swagger on";					mes "the streets with these";					mes "beautiful clothes!!!";					delitem Clothing_Dye_Coupon2, 1;					setlook LOOK_CLOTHES_COLOR, 0;					close;				}			} else {				mes "[Stylist Dinorah Lacostt]";				mes "No-ou~ You don't have an";				mes "^FF0000Original Clothing Dye Coupon^000000~";				mes "Please visit me again";				mes "after you get one~";				close;			}		break;		case 3:			mes "[Stylist Dinorah Lacostt]";			mes "Visit me again if";			mes "you change your mind~~";			close;		break;	}}
 
You must log in or register to reply here.
Back
Top