Jump to content

mervz02

Members
  • Posts

    15
  • Joined

  • Last visited

Posts posted by mervz02

  1. 1 hour ago, pajodex said:

    rAthena is not same as Herc.


    You can use the pointshop we are using tho..


    Use this format:

    <map name>,<x>,<y>,<facing>%TAB%pointshop%TAB%<NPC Name>%TAB%<sprite id>,<costvariable>{:<discount>},<itemid>:<price>{,<itemid>:<price>...}


    It should be straight forward from hereon. Goodluck!

    Hi Thank you, but can you help me about the script above? i dun know how to make it, very little knowledge in scripting right now. all i want is to view that shop using the activity points

  2. Hi Experts,

    Would like to ask if we can make this script working on rathena, its working on my Hercules but here in rathena it doesn't anyone? here the code

    Thank you in Advance

    moc_para01,23,35,5    script    Activity Shop    4_F_ACOLYTE,{
    
        set @header$,"[^FF8000 Activity Shop ^000000]";
        mes @header$; 
        mes "Hi " + (Sex ? "sir!" : "madam!");
        mes " ";
        mes "How have you been, You should do some activities!";
        switch(select("Activity Shop:I need more time!")) {
        case 1:
                    openshop("Activity_Shop");
                    end;
            case 2:
                mes "[^FF8000 Activity Shop ^000000]";
                mes "Ok come back later.";
                break;
        }
        close;
    }
    
    
    -    trader    Activity_Shop    -1,{
        OnInit:
        tradertype(NST_CUSTOM);
        // Upper
        sellitem Battle_Manual100,3;
        sellitem Battle_Manual_X3,7;
        sellitem Inc_Agi_10_Scroll,1;
        sellitem Blessing_10_Scroll,1;
        sellitem Bubble_Gum,50;
        sellitem Max_Weight_Up_Scroll,50;
        sellitem Str_Dish10,5;
        sellitem Agi_Dish10,5;
        sellitem Vit_Dish10,5;
        sellitem Int_Dish10,5;
        sellitem Dex_Dish10,5;
        sellitem Luk_Dish10,5;
        end;
    
    OnCountFunds:
        setcurrency(#ACTIVITYPOINTS); end;
    
    OnPayFunds:
        if( #ACTIVITYPOINTS < @price ) end;
        #ACTIVITYPOINTS = #ACTIVITYPOINTS - @price;
        purchaseok(); end;
    }


     

  3. 8 hours ago, Balfear said:

    It`s because sprite have large size and use less scale, UI can`t read scale param.

    Hi, so how can i do that? how to resize the image or spr. or is there any configuration that i can off the view of the spr on the window equipment

  4. Hi Rathena, Im having problem with my client, apparently i was able to view and equip some custom sprites in my server but it has too large on ALT-Q view. should i dump this sprites or should i fix it? or how can i fixed it? please see image for your reference 

     

    image.thumb.jpeg.abada04b54df08fd06b2bb9234abebc2.jpeg

  5. Hi, im making this Donation NPC manager work, but apparently some menus are missing, i want to enable and test the Exlusive Donation and the conversion of the Donation Tickets and points. how can i do it. 

     

    //==== DarkRO Scripts ====================================
    //= Donation Shop
    //===== By: ================================================== 
    //= [GM] Brenth
    //===== Current Version: ===================================== 
    //= 1.2
    //===== Description: ========================================= 
    //= Multiple donation shop rewards (based on DarkRO)
    //===== Changelog: =========================================== 
    //= Not yet tested for bugs
    //= 1.0 Implementation
    //= 1.1 Added Gift Packages
    //= 1.2 Added Claim Bonuses (Ticket and Points)
    //============================================================
    
    //auction_01,41,85,5    script    Donation Manager    4_M_IAN,{
    prontera,133,188,5    script    Donation Manager    4_M_LGTGRAND,{
        set @header$,"[^FF8000 Donation Manager ^000000]";
        mes @header$; 
        mes "Good Day " + (Sex ? "Boss!" : "Madam!");
        mes "Welcome to Donation Shop!";
        mes "  ";
        mes "For every 1$ USD you donate, you will receive 1 ^5FD1D1Donation Point^000000 and 1 ^5FD1D1Wager Point^000000.";
        next;
        mes @header$; 
        mes "Just a few information before you visit our shop.";
        mes "  ";
        mes "We have 2 different kind of donation rewards and 2 different kind of shop, you will received";
        mes "both ^5FD1D1Donation Points^000000 and ^5FD1D1Wager Points^000000 everytime you donate!";
        switch(select(
            "Donation Points Shop",
            "Wager Points Shop",
            ($DONATE_EXCLUSIVE ? "[^FF0000Exclusive^000000] "+$DONATE_EX_TITLE$:""))) {
    /*        (#CASHPOINTS > 99 ? "Convert Wager Points to Donation Ticket":""))) {
        case 1:
            mes @header$;
            mes "Each Gift Packs contains different items and amount of ^7BCC70Donation Tickets^000000 and ^7BCC70Bonus Points^000000.";
            mes " ";
            mes "^FF0000NOTE^000000: Please choose wisely.";
            openshop("DShop_Pack");
            end;
        case 2:
            mes @header$;
            mes "We have 2 different kind of donation rewards, you received both ^7BCC70Donation Tickets^000000 and ^7BCC70Bonus Points^000000 everytime you open a Gift Package!";
            next;
            switch(select("Use Donation Tickets:Use Bonus Points")) {
    */
            case 1:
                mes @header$;
                mes "Welcome to Donation Points Shop";
                mes "You have total of "+#DONATIONPOINTS+" ^7BCC70Donation Points^000000.";
                openshop("DShop_Ticket");
                end;
            case 2: 
                mes @header$;
                mes "Welcome to Bonus Points Shop";
                mes "You have total of "+#BONUSPOINTS+" ^7BCC70Bonus Points^000000.";
                mes " ";
                mes "This shop rotates every end of the month.";
                openshop("DShop_Bonus");
                end;
            case 3:
                mes @header$;
                mes "Welcome to the Exclusive Donation Shop.";
                mes " ";
                mes "Select what currency will you use.";
                next;
                switch(select(
                    $DONATE_EXDT ? "Donation Ticket Shop":"",
                    $DONATE_EXBP ? "Bonus Point Shop":"",
                    "Cancel")) {
                    default:    close;    break;
                    case 1:
                        openshop("DShop_Ticket_Ex");
                        end;
                    case 2:
                        openshop("DShop_Bonus_Ex");
                        end;        
                }
                break;
    /*    case 4:
            getinventorylist();
            mes @header$;
            mes "You can convert your ^0000FF100 Wager Points^000000 for ^0099001 Donation Ticket^000000.";
            mes " ";
            mes "How will you exchange your Wager Point?";
            next;
            .@i = select("Decide on how many tickets to get.:Exchange all my Wager Points.:Cancel");
            if (.@i == 3) close();
            else if (.@i == 1) {
                if (@inventorylist_count == MAX_INVENTORY && !countitem(3101)) {
                    mes @header$;
                    mes "Make sure that you have a cleared your inventory before proceeding.";
                    close();
                }
                mes @header$;
                mes "You have total of "+F_InsertComma(#CASHPOINTS)+" ^0000FFWager Points^000000.";
                mes " ";
                mes "How many ^009900Donation Ticket^000000 do you want to get?";
                next;
                input(.@amt,0,30000);
                if (.@amt <= 0) close();
                if (#CASHPOINTS/100 < .@amt) {
                    L_LessPoints:
                    mes @header$;
                    mes "You don't have enough Wager Points.";
                    close();
                }
                else if (countitem(3101) + .@amt > 30000) {
                    mes @header$;
                    mes "You have exceeded the limit.";
                    close();
                } else {
                    L_ConvertDP:
                    mes @header$;
                    mes "You will be converting";
                    mes "your ^0000FF"+F_InsertComma(.@amt * 100)+" Wager Points^000000";
                    mes "to ^009900"+F_InsertComma(.@amt)+" Donation Ticket"+(.@amt != 1 ? "s":"")+"^000000.";
                    mes " ";
                    mes "Proceed?";
                    next;
                    if (select("No:Yes") == 1) close();
                    #CASHPOINTS -= (.@amt * 100);
                    #DONATIONPOINTS += .@amt;
                    getitem 3101, .@amt;
                    mes @header$;
                    mes "Here's your ^009900"+F_InsertComma(.@amt)+" Donation Ticket"+(.@amt != 1 ? "s":"")+"^000000 and ^0000FFBonus Point"+(.@amt != 1 ? "s":"")+"^000000.";
                    close();
                }
            } else {
                if (@inventorylist_count == MAX_INVENTORY && !countitem(3101)) {
                    mes @header$;
                    mes "Make sure that you have a cleared your inventory before proceeding.";
                    close();
                }
                .@amt = #CASHPOINTS / 100;
                if (.@amt == 0) goto L_LessPoints;
                else if (countitem(3101) + .@amt > 30000) {
                    .@amt = 30000 - countitem(3101);
                    if (.@amt == 0) {
                        mes @header$;
                        mes "You have exceeded the limit.";
                        close();
                    }
                    else goto L_ConvertDP;
                }
                else goto L_ConvertDP;
            }
            break;
    */
        }
        close;
    
    OnInit:
        waitingroom "Donation Manager",0;
        end;
    }
    
    -    trader    DShop_Ticket_Ex    -1,{
    OnInit:
        tradertype(NST_CUSTOM);
        sellitem Red_Potion,1;
        end;
    
    OnCountFunds:
        setcurrency(#DONATIONPOINTS); end;
    
    OnPayFunds:
        if( #DONATIONPOINTS < @price ) end;
        #DONATIONPOINTS = #DONATIONPOINTS - @price;
        purchaseok();
        dispbottom "You now have a total of "+#DONATIONPOINTS+" Donation Points.";
        end;
    }
    
    -    trader    DShop_Bonus_Ex    -1,{
        OnInit:
        tradertype(NST_CUSTOM);
        sellitem Red_Potion,200;
        end;
    
    OnCountFunds:
        setcurrency(#BONUSPOINTS); end;
    
    OnPayFunds:
        if( #BONUSPOINTS < @price ) end;
        #BONUSPOINTS = #BONUSPOINTS - @price;
        purchaseok();
        dispbottom "You now have a total of "+#BONUSPOINTS+" Bonus Points.";
        end;
    }
    
    /*
    -    trader    DShop_Pack    -1,{
        OnInit:
        tradertype(NST_CUSTOM);
        sellitem Gift_Pack_1,2500;
        sellitem Gift_Pack_2,3000;
        sellitem Gift_Pack_3,3500;
        sellitem Gift_Pack_4,4500;
        end;
        
    OnCountFunds:
        setcurrency(#CASHPOINTS); end;
    
    OnPayFunds:
        if( #CASHPOINTS < @price ) end;
        #CASHPOINTS = #CASHPOINTS - @price;
        purchaseok(); end;
    }
    */
    
    -    trader    DShop_Ticket    -1,{
        OnInit:
        tradertype(NST_CUSTOM);
        sellitem Banryu,12;
        sellitem Valkyrie_Armor,14;
        sellitem Valkyrja's_Shield,10;
        sellitem Valkyrie_Shoes,10;
        sellitem Valkyrie_Manteau,15;
        sellitem Sleipnir,20;
        sellitem Valkyrie_Helm_,20;
        sellitem Cyclops_Visor,30;
        sellitem Vampire_Wings,40;
        sellitem Nile_Rose,15;
        end;
    
    OnCountFunds:
        setcurrency(#DONATIONPOINTS); end;
    
    OnPayFunds:
        if( #DONATIONPOINTS < @price ) end;
        #DONATIONPOINTS = #DONATIONPOINTS - @price;
        purchaseok();
        dispbottom "You now have a total of "+#DONATIONPOINTS+" Donation Points.";
        end;
    }
    
    -    trader    DShop_Bonus    -1,{
        OnInit:
        tradertype(NST_CUSTOM);
        // Hats rotates
        sellitem Chanel_Captain,80;
        sellitem Gucci_Captain,80;
        sellitem LV_Captain,80;
        sellitem Chanel_Note_Headphone,80;
        sellitem Gucci_Note_Headphone,80;
        sellitem LV_Note_Headphone,80;
        end;
        
    OnCountFunds:
        setcurrency(#BONUSPOINTS); end;
    
    OnPayFunds:
        if( #BONUSPOINTS < @price ) end;
        #BONUSPOINTS = #BONUSPOINTS - @price;
        purchaseok();
        dispbottom "You now have a total of "+#BONUSPOINTS+" Bonus Points.";
        end;
    }


     

    donationshop.txt

  6. 20 hours ago, Skorm said:

    The command Emistry picked out won't work the way you want, according to it's description it reads all cards even the ones that are equipped in your inventory, but isequipped should work fine for identifying equipped cards. ( Unless you're running some old server where it doesn't. )

    (These kinds of changes are probably best done in src but whatever.)

    Run these in your SQL DB... You might want to make a backup first though. I tried running it through a script to make the changes less permanent but that didn't work. So this is what you get.

    
    UPDATE `item_db_re` SET `script` = CONCAT( `script`, ' if( getrefine() > 9 && !@loop && isequipped(4035) ) { @loop = 1; while( @loop ) { specialeffect2 487; sleep2 1500; } }' ) WHERE `refinable` IS TRUE AND (`equip_locations` & 2 OR `equip_locations` & 16);
    UPDATE `item_db_re` SET `unequip_script` = CONCAT( `unequip_script`, ' @loop = 0;' ) WHERE `refinable` IS TRUE AND (`equip_locations` & 2 OR `equip_locations` & 16);

     

    In case you feel like remove it...

    
    UPDATE `item_db_re` SET `script` = REPLACE( `script`, ' if( getrefine() > 9 && !@loop && isequipped(4035) ) { @loop = 1; while( @loop ) { specialeffect2 487; sleep2 1500; } }', '' ) WHERE `refinable` IS TRUE AND (`equip_locations` & 2 OR `equip_locations` & 16);
    UPDATE `item_db_re` SET `unequip_script` = REPLACE( `unequip_script`, ' @loop = 0;', '' ) WHERE `refinable` IS TRUE AND (`equip_locations` & 2 OR `equip_locations` & 16);

     

    Thank you sir. will try it..

  7. Hi Rathena, may i request a script. that trigger Special Effect when the card is compound on  the item. and it loops ever 1.5 Sec.

    i already made script but only on equipped item only works but only works on item. i want it on Cards also when i compound the cards to weapon
    and equiped it will trigger the specialeffect  here is my script :

    while(isequipped(1309)) { specialeffect2 487; sleep2 1500;} 
    

     

     

    Thank you in Advanced 

×
×
  • Create New...