Help me with these Scripts.

[chibikyle]

My BTS Script
What I Want ?
- If BTS Quest Done, 75% Chance of Getting 6 Items ( 1 pc. each item ) and 25% chance of getting random item ( esg,ripple,billow,etc ) 6pcs.

 

Spoiler

turbo_room,92,117,6    script    Break The Seal    965,{
if ( bts >= 1) goto L_Done;
mes "[ Seal Breaker ]";
mes "You're here for Break The Seal Quest, Aren't you ?";
menu "Yes",-,"No, I'm Sorry.",L_No;
next;
mes "[ Seal Breaker ]";
mes "I am the Guardian of the Seal, Break it and Receive my Blessings.";
next;
mes "[ Seal Breaker ]";
mes "These are what I need";
mes "30 x Peridot";
mes "30 x Biotite";
mes "30 x Matchstick";
mes "100 x Hand Of God";
mes "100 x Cursed Seal";
mes "100 x PvP Skull";
mes "1000 x AdFinemRO Coin";
next;
mes "So, are you up mate ?";
menu "Yes!",L_Yes,"No, I'm Sorry.",L_No;
next;
L_Yes:
mes "[ Seal Breaker ]";
mes "Are the Items Ready ? Let me check ...";
next;
if ( countitem(7289) < 30 || countitem(7297) < 30 || countitem(7035) < 30 || countitem(1009) < 100 || countitem(7442) < 100 || countitem(7420) < 100 || countitem(6480) < 1000 ) goto L_NotReady;
delitem 7289,30;
delitem 7297,30;
delitem 7035,30;
delitem 1009,100;
delitem 7442,100;
delitem 7420,100;
delitem 6480,1000;
mes "[ Seal Breaker ]";
mes "Another brave one succeded.";
set bts,1;
next;
getitem 7086,1;
getitem 7090,1;
getitem 7089,1;
getitem 7091,1;
getitem 7088,1;
getitem 7085,1;
mes "[ Seal Breaker ]";
mes "Thank you for your aid.";
mes "Now start your journey to Angelic Valkyrie Quest !";
announce "Wow! The Seal has been annihilated by "+strcharinfo(0)+" He has just broken the seal and will start the quest of Angelic Valkyrie Set!",0;
close2;
end;

L_NotReady:
mes "[ Seal Breaker ]";
mes "Check the requirements.";
next;
mes "Noob !";
close;

L_No:
mes "[ Seal Breaker ]";
mes "Cyka Blyat !";
close;

L_Done:
mes "[ Seal Breaker ]";
mes "WTF ?!";
close;
}

 

My TBox Summoner Script
What I Want ?
- 1% chance of getting an item ( ripple,billow,etc ) 1pc only and 1 item only per tbox

Spoiler

turbo_room,135,97,3    script    Treasure Box Summoner    856,{
    mes "[ Treasure Box Event ]";
    mes "Hello, I'm a new mage here in Midgard. Every hour, I tried to cast my summoning spells and there a chance that I can summon a Treasure Box that will give you items once you destroy it. I only cast my spell on main city and I immediately announce to everyone once I perfectly cast my spells. Anyways, I will give you a little hint...";
    mes " ";
            if( $@tboxevent == 0 ){
            mes "Treasure Box Event is not active";
    }else {
            mes "I successfully summoned the Treasure Box.";
            mes "Map : Ayothaya";
    }
    close;

OnClock1251:
        set $@tboxevent, 1;
        announce "Treasure Box Summoner : I perfectly cast my summoning skills.", 0;
        sleep2 5000;
        announce "10 Rare Treasure Box will be summoned in 30 seconds at Ayothaya.", 0;
        sleep2 5000;
        announce "Every Treasure box has 1% Chance of Dropping [ Emblem of the Sun God ] Item ! What are you waiting for ?!",0;
        sleep2 10000;
        announce "15 Seconds Left !",0;
        sleep2 15000;
        announce "10 Rare Treasure Box has been summoned in Ayothaya !", 0;
        set .@mobcount,    10;
        monster "ayothaya.gat",0,0,"Treasure Box",1845,10,"Treasure Box Summoner::OnTBoxKilled";
        end;

OnTBoxKilled:
    if ( rand(100) < 1 ){
    announce "Treasure Box Summoner : "+strcharinfo(0)+" Destroyed a Treasure box and so lucky to gain 1 Emblem of the Sun God !! ", 0;
    getitem 7086,1;
    set .@mobcount, .@mobcount-1;
    goto Count;
    }
    
Count:
    if ( .@mobcount < 1 ){
    announce "All Treasure Box has been destroyed !", 0;
    } else {
    announce "There are still "+@mobcount+" Treasure box left.", 0;
    }
    end;
}

 

Thanks in advance !

[Noctis]

In your script you have L_NotReady but you dont have the option "Not Ready", how that works? ( im a noob scripter yet sorry) and sorry for ask this here and didnt answer your question

Edited January 16, 2017 by Exmas

[chibikyle]

10 hours ago, Exmas said:

In your script you have L_NotReady but you dont have the option "Not Ready", how that works? ( im a noob scripter yet sorry)

if ( countitem(7289) < 30 || countitem(7297) < 30 || countitem(7035) < 30 || countitem(1009) < 100 || countitem(7442) < 100 || countitem(7420) < 100 || countitem(6480) < 1000 ) goto "L_NotReady";



"L_NotReady":
mes "[ Seal Breaker ]";
mes "Check the requirements.";
next;
mes "Noob !";
close;

lol

Edited January 17, 2017 by Emistry
Please use CODEBOX.

[Noctis]

23 minutes ago, chibikyle said:

if ( countitem(7289) < 30 || countitem(7297) < 30 || countitem(7035) < 30 || countitem(1009) < 100 || countitem(7442) < 100 || countitem(7420) < 100 || countitem(6480) < 1000 ) goto "L_NotReady";

 

"L_NotReady":
mes "[ Seal Breaker ]";
mes "Check the requirements.";
next;
mes "Noob !";
close;

lol

Ah didnt see it thx

[chibikyle]

Solved.