[R] Make this script compatible to Hercules

[keough 36]

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!

[Winterfox 83]

@@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.

 

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

[keough 36]

@@Winterfox

 

It works thank you!