viewing paste Unknown #12843 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45
-   shop    dynamicshop -1,501:222
new_1-1,45,77,4 script  Donation Shop   685,{
    callshop "dynamicshop",1;
    npcshopattach "dynamicshop";
    end;
    
    mes "Do you want to to Donate?";
    next;
    switch(select("Why Donate:Buy Donate")) {
        case 1:
        mes "Why Donate on our Server?";
        mes "We dont force you to donate,it's your free will to donate";
        close;
        }
 
        case 2:
    OnBuyItem:
        for ( set .@j, 0; .@j < getarraysize(.items); set .@j, .@j + 2 ) {
            for ( set .@k, 0; .@k < getarraysize(@bought_nameid); set .@k, .@k + 1 ) {
                if ( @bought_nameid[.@k] == .items[.@j] ) {
                    if ( checkweight( @bought_nameid[.@k], @bought_quantity[.@k] ) ) {
                        if ( countitem(.currency) < .items[.@j+1] )
                            dispbottom "You don't have enough " +getitemname(.currency)+ " to purchase this item.";
                        else {
                            delitem .currency, .items[.@j+1] * @bought_quantity[.@k];
                            getitem @bought_nameid[.@k], @bought_quantity[.@k];
                        }
                    } else dispbottom "You cannot carry out more items with you";
                }
            }
        }
        deletearray @bought_quantity, getarraysize(@bought_quantity);
        deletearray @bought_nameid, getarraysize(@bought_nameid);
        end;
 
    OnInit:
        set .currency, 7179; // pods 
        setarray .items, 1750,1500,1766,500; // Usage : <item id>,<price>
        npcshopitem "dynamicshop",0,0;
        for ( set .@i, 0; .@i < getarraysize(.items); set .@i, .@i + 2 )
            npcshopadditem "dynamicshop",.items[.@i], .items[.@i+1];
 
    waitingroom "Donation Shop",0;
        end;
}
Viewed 991 times, submitted by Guest.