Jump to content
  • 0
wasaru

breaking items and refined items back to 0

Question

can anyone edit me this script. i wanna remove the " breaking item when fail " 

and remove the " going back to +0 refined items when success "

and i wanna add " clear enchants too " plz

thank you

madropvp,93,89,3    script    XileRO Gear Enchanter    4_F_VALKYRIE2,{
    disable_items;
    mes "[XileRO Gear Enchanter]";
    if (Zeny >= 100000000) {
        mes "I've been studying ways to enhance a gear to maximize its capability.";
        next;
        mes "[XileRO Gear Enchanter";
        mes "Enchanting is an awesome skill that infuses a mysterious status powers into the armor's hidden socket. it will enchant to ^5555ff+1 to +3 all stats^000000.randomly";
        next;
        mes "[XileRO Gear Enchanter]";
        mes "If by any chance, you would want to enchant your gear, bring me ^5555ff100,000,000^000000 zeny and the gear you want to enchant and you are all set to go.";
        mes "Are you ready??.";
        next;
        mes "[XileRO Gear Enchanter]";
        mes "In that case, the Enchantment may be applied to an item which you didn't mean to Enchant. So just bring ^5555ffONE Gear^000000 you want enchanted to be safe...";
        mes "And just to warn you that the item can be ^5555ffBREAK^000000 let's see how lucky you are..";
        next;
        mes "[XileRO Gear Enchanter]";
        mes "I'm not responsible for what would happen if you have more than one of the same kind in your inventory.";
        mes "So before we start, your gear must be ^5555ff+0^000000 and ^5555ffno card^000000. or else it will remove when the enchants is a success.";
        mes "are you ready?...";
        next;
        switch(select("Non Slotted Armor.", "Slotted Armor.", "High Grade Armor.", "Temporal Shoes Slotted.", "Garment.", "Maybe next time.")) {
        case 1:
            setarray .@items[0],2307,2309,2314,2316,2321,2325,2327,2328,2330,2332,2334,2335,2341,2344,2346,2348,2350,2337,2386,2394,2395,2396;
            .@j = 50;
            break;
        case 2:
            setarray .@items[0],2311,2318,2319,2320,2308,2310,2315,2317,2322,2324,2326,2331,2333,2336,2342,2345,2347,2349,2351;
            .@j = 55;
            .@k = 1;
            break;
        case 3:
            setarray .@items[0],2364,2365,2391,2374,2375,2376,2377,2378,2379,2380,2381,2382,2387,2388,2389,2357,15147,15146,2390;
            .@j = 60;
            break;
        case 4:
            setarray .@items[0],22006,22010,22008,22009,22011,22007;
            .@j = 60;
            break;
        case 5:
            setarray .@items[0],2589,2576;
            .@j = 60;
            break;
        case 6:
            mes "[XileRO Gear Enchanter]";
            mes "Please come back when you have any interest in enchanting your gear.";
            close;
        }
        .@menu$ = "";
        for(.@i = 0; .@i<getarraysize(.@items); ++.@i)
            .@menu$ += getitemname(.@items[.@i])+((.@k)?" [1]":"")+":";
        callsub S_EnchantArmor, .@items[select(.@menu$)-1], .@j;
        end;
    }
    mes "I am in charge of Enchanting gears. Simply put, I've been studying ways to power-up gear.";
    next;
    mes "[XileRO Gear Enchanter]";
    mes "If by any chance, you would want to enchant your gear, bring me ^5555ff100,000,000^000000 zeny and the gear you want to enchant and you are all set to go.";
    mes "Are you ready??.";
    close;

S_EnchantArmor:
    .@itemid = getarg(0);
    .@failrate = getarg(1);
    mes "[XileRO Gear Enchanter]";
    if (countitem(.@itemid) == 1) {
        mes "Socket enchant will cost you ^5555ff100,000,000^000000 zeny. And there will be a random option enchanted. Of course, there is a chance of breaking your gear.";
        next;
        mes "[XileRO Gear Enchanter]";
        mes "First and most importantly.";
        mes "^ff5555Existing Refine Level of the Gear";
        mes "and Cards will be GONE.^000000";
        mes "Do you still want to try an Enchant?";
        next;
        if(select("Hmm... Let me think it over.", "Go ahead.") == 1) {
            mes "[XileRO Gear Enchanter]";
            mes "Well, I can't blame you. Safety first, eh?";
            mes "Now you have a nice day.";
            close;
        }
        mes "[XileRO Gear Enchanter]";
        mes "Quite of an adventurer huh? Well, shall we?";
        close2;
        specialeffect(EF_MAPPILLAR, AREA, playerattached());
        if (Zeny < 100000000) {
            mes "[XileRO Gear Enchanter]";
            mes "Sorry, but you don't have enough zeny.";
            close;
        }
        progressbar "ffff00",7;
        Zeny -= 100000000;
        delitem .@itemid,1;
        switch (rand(1,.@failrate)) {
            case 1: .@addpart = 30559;break;
            case 2: .@addpart = 30557;break;
            case 3: .@addpart = 30558;break;
            case 4: .@addpart = 30557;break;
            case 5: .@addpart = 30559;break;
            case 6: .@addpart = 30557;break;
            case 7:
            case 8: .@addpart = 30558;break;
            case 9:
            case 10: .@addpart = 30558;break;
            case 11:
            case 12: .@addpart = 30559;break;
            case 13:
            case 14: .@addpart = 30559;break;
            case 15:
            case 16: .@addpart = 30557;break;
            case 17:
            case 18: .@addpart = 30557;break;
            case 19:
            case 20:
            case 21: .@addpart = 30559;break;
            case 22:
            case 23:
            case 24: .@addpart = 30558;break;
            case 25:
            case 26:
            case 27: .@addpart = 30558;break;
            case 28:
            case 29:
            case 30: .@addpart = 30557;break;
            case 31:
            case 32:
            case 33: .@addpart = 30557;break;
            case 34:
            case 35:
            case 36: .@addpart = 30559;break;
            default:
                specialeffect(EF_PHARMACY_FAIL, AREA, playerattached());
                mes "[XileRO Gear Enchanter]";
                mes "Well that's too bad.";
                mes "The requested equipment has failed to enchant.";
                close;
        }
        getitem2 .@itemid, 1, 1, 0, 0, 0, 0, 0, .@addpart;
    }
    else {
        mes "Hmm? There's nothing to be enchanted!";
        mes "Please come back with just ONE equipment to be enchanted.";
        close;
    }
}

 

Edited by Dastgir
codebox

Share this post


Link to post
Share on other sites

1 answer to this question

Recommended Posts

  • 0

breaking item when fail

    delitem .@itemid,1;

 

going back to +0 refined items when success

 getitem2 .@itemid, 1, 1, 0, 0, 0, 0, 0, .@addpart;

search for  getitem2 and getequiprefinerycnt

getitem2("<item name>", <amount>, <identify>, <refine>, <attribute>, <card1>, <card2>, <card3>, <card4>{, <account ID>})

 

for clear enchants you need to add new npc.

 

untested

Share this post


Link to post
Share on other sites

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

×
×
  • Create New...

Important Information

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