Jump to content
  • 0
Sign in to follow this  
DevilSupremeRO

stylist item to exchange

Question

//===== rAthena Script =======================================
//= Stylist
//===== By: ==================================================
//= Euphy
//===== Current Version: =====================================
//= 1.1
//===== Compatible With: =====================================
//= rAthena Project
//===== Description: =========================================
//= Changes your hair style, hair color, and cloth color.
//===== Additional Comments: =================================
//= 1.0 Initial script.
//= 1.1 Switched to 'getbattleflag', credits to Saithis. [Euphy]
//= 1.2 Added Dressroom function for 3rd class only. [Masao]
//============================================================

iz_ac02,132,172,6    script    Stylist#custom_stylist    2_M_DYEINGER,{
OnTalk:
    setarray .@Styles[1],
        getbattleflag("max_cloth_color"),
        getbattleflag("max_hair_style"),
        getbattleflag("max_hair_color");
    setarray .@Look[1],
        LOOK_CLOTHES_COLOR,
        LOOK_HAIR,
        LOOK_HAIR_COLOR;
    mes .npc$;
    mes "Hey ^008aff"+strcharinfo(0)+"^000000. Im a super stylist. Want to try out my services?";
    mes "I can customize your character's appearance in a hand full of ways.";
    next;
    set .@s, select(.bcor$+"Cloth color:"+.bcor$+"Hairstyle:"+.bcor$+"Hair color:"+.bcor$+"Dress Room");
    if(.@s == 4){
        callfunc "F_DRESSROOM";
        close;
    }
    if(.@s == 1){
    if (( getlook(LOOK_BODY2) == 5 ) || ( getlook(LOOK_BODY2) == 2 ) || ( getlook(LOOK_BODY2) == 3 ) || ( getlook(LOOK_BODY2) == 4 )) {
        setlook    LOOK_CLOTHES_COLOR,0;
        mes .npc$;
        mes "Cloathes color not available for Body Custom.";
        close;
        }
    }
    if(Class == Job_Summoner){
    setarray .@Styles[1],
        3,//max_cloth_color
        10,//max_hair_style
        8;//max_hair_color
    }else{
    setarray .@Styles[1],
        getbattleflag("max_cloth_color"),
        getbattleflag("max_hair_style"),
        getbattleflag("max_hair_color");
            }

    set .@Revert, getlook(.@Look[.@s]);
    set .@Style,1;
    while(1) {
        setlook .@Look[.@s], .@Style;
        message strcharinfo(0),"This is style #"+.@Style+".";
        switch(select(.bcor$+"Next (^0055FF"+((.@Style!=.@Styles[.@s])?.@Style+1:0)+"^000000):"+.bcor$+"Previous (^0055FF"+((.@Style!=0)?.@Style-1:.@Styles[.@s])+"^000000):"+.bcor$+"Jump to...:"+.rcor$+"Revert to original (^0055FF"+.@Revert+"^000000)")){

        case 1:
            set .@Style, ((.@Style != .@Styles[.@s]) ? .@Style+1 : 0);
            break;
        case 2:
            set .@Style, ((.@Style != 0) ? .@Style-1 : .@Styles[.@s]);
            break;
        case 3:
            message strcharinfo(0),"Choose a style between 1 - "+.@Styles[.@s]+".";
            input .@Style,0,.@Styles[.@s];
            if (!.@Style)
                set .@Style, rand(1,.@Styles[.@s]);
            break;
        case 4:
            set .@Style, .@Revert;
            setlook .@Look[.@s], .@Revert;
            break;
        }
    }

OnInit:
    .npc$ = "^FF7F00[ Super Stylist ]^000000";        // Name of NPC;
    .bcor$ = "^008aff[>]^000000 ";                // Option Button Symbol;
    .rcor$ = "^ff0000[>]^000000 ";                // Cancel button symbol;
    end;
    }

i want to change this into item not zeny for example instead of 10,000 zeny it will became 1 yggdrasil berry in order to change into 3rd job

Edited by DevilSupremeRO

Share this post


Link to post
Share on other sites

0 answers to this question

Recommended Posts

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
Sign in to follow this  

×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.