Jump to content
  • 0

vip to give everyone


Question

Posted (edited)

Hello, I use this script to give five days vip only 1 time for beginning players, today I want to give 30 days vip for all registered accounts most do not know how to do this, a friend said I would have to run a command on the bench data do not know how to do more.

 

this script to 5 days for vip players beginners.

 

new_1-1,53,111,4    script    Bem Vindo    -1,10,10,{

OnTouch:
    if(#ganho == 1) end;
    set .@timer, 432000;
    mes "Bem-Vindo(a) ao ^339966seuRO^000000 Sr(a).  ^0000FF"+strcharinfo(0)+"^000000";
    mes "Você acaba de ganhar ^7777775 dias vip gratis^000000,^0^000000 e ^0000FF^Poring saltitante^000000.";
    getitem 5335,1;
    if( isPremium() == 1 )
        set #Premium_Tick, #Premium_Tick +.@timer;
    else
        set #Premium_Tick, gettimetick(2)+.@timer;    
    set #ganho,1;
    close;
}
Edited by cumbe11

4 answers to this question

Recommended Posts

Posted

how do I dicionar 1 month VIPs to all registered accounts on my server by phpAdmin?



my system is this vip

 

 

prontera,158,201,4    script    Porteiro VIP#h2-2::vip    402,{

//Configurações suas:
//
// Level da conta VIP:
//set $levelvip, 1;
//
// Sala VIP:
set @mapa$,"sec_in01";
set @cordx,85;
set @cordy,167;
//
//Nome do npc:
set .namenpc$, "^CD0000[Porteiro VIP]^000000";
//
//Seu site aqui:
set @site$,"www.imperialro.com.br";
//
//Dias VIP:
set $numdia, 86400;
set $numdias, 432000;
set $numdias2, 2592000;    
//
//Preços do VIP:
set $iten, 1;
set $item, 1;
set $item2, 1;        
//============================================================

if( isPremium() == 1 ) {

mes .namenpc$;
mes "Olá "+strcharinfo(0)+"!";
mes "O que deseja?";

        switch(select(    "- Sala VIP",
                        "- Dias restantes de VIP.",
                        "- Nada não...")){
                
next;
            
    case 1:
            mes .namenpc$;
            mes "Quer entrar na sala vip?";
            menu "Sim",yes10,"Não",not10;
            
            yes10:
                next;
                mes .namenpc$;
                warp "sec_in01",85,167;
            close;

            not10:
                next;
                mes .namenpc$;
                mes "OK, até logo.";
            close;
    case 2:
            mes .namenpc$;
            mes "Você ainda tem " + callfunc("Time2Str_VIP",#Premium_Tick) + " como VIP.";
            mes "Após o termino de seu VIP, recarregue! E ajude o servidor a se manter!";
            close;

    case 3:
            mes .namenpc$;
            mes "OK, até logo.";
            close;

}
}
    mes .namenpc$;
    mes "Para obter VIP você tem que ter Ticket VIP.";
    mes "Visite ^CD0000"+@site$+"^000000 para obter Ticket VIP!";
    mes "Você não é VIP, deseja obter VIP?";

            if(select("Sim!:Não.") == 1){
                next;
                mes .namenpc$;
                mes "Temos três formas de pagamentos,";
                mes "^FF0000"+$iten+" Ticket = 1 dia.^000000";
                mes "^FF0000"+$item+" Ticket = 5 dias.^000000";
                mes "^FF0000"+$item2+" Ticket = 30 dias.^000000";
                next;

switch(select(    ""+$iten+" Ticket = 1 dia.",""+$item+" Ticket = 5 dias.",""+$item2+" Ticket = 30 dias." )){


    case 1:
            if(countitem(32011) < 1) goto SemItem;
            mes .namenpc$;
            if( isPremium() == 1 )
                mes "Você realmente deseja expandir durabilidade de sua conta VIP?";
            else
                mes "Você realmente deseja converter sua conta em VIP?";
            next;
            menu "Sim",-,"Não",not3;
            delitem 32011,1;
            if( isPremium() == 1 )
                set #Premium_Tick, #Premium_Tick +$numdia;
            else
                set #Premium_Tick, gettimetick(2)+$numdia;
            next;
            mes .namenpc$;
            mes "Dias VIP adicionados!";
            close;
                not3:
                next;
                mes .namenpc$;
                mes "OK, até logo.";
                close;

    case 2:
            if(countitem(32038) < 1) goto SemItem;
            mes .namenpc$;
            if( isPremium() == 1 )
                mes "Você realmente deseja expandir durabilidade de sua conta VIP?";
            else
                mes "Você realmente deseja converter sua conta em VIP?";
            next;
            menu "Sim",-,"Não",not4;
            delitem 32038,1;
            next;
            mes .namenpc$;
            mes "Dias VIP adicionados!";
            if( isPremium() == 1 )
                set #Premium_Tick, #Premium_Tick +$numdias;
            else
                set #Premium_Tick, gettimetick(2)+$numdias;
            close;
            not4:
                next;
                mes .namenpc$;
                mes "OK, até logo.";
                close;

    case 3:
                if(countitem(32002) < 1) goto SemItem;
                mes .namenpc$;
                if( isPremium() == 1 )
                    mes "Você realmente deseja expandir durabilidade de sua conta VIP?";
                else
                    mes "Você realmente deseja converter sua conta em VIP?";
                next;
                menu "Sim",-,"Não",not5;
                delitem 32002,1;                
                if( isPremium() == 1 )
                    set #Premium_Tick, #Premium_Tick +$numdias2;
                else
                    set #Premium_Tick, gettimetick(2)+$numdias2;
                next;
                mes .namenpc$;
                mes "Dias VIP adicionados!";
                close;
            not5:
                next;
                mes .namenpc$;
                mes "OK, até logo.";
                close;


        }
    }else{

next;
    mes .namenpc$;
    mes "OK, até logo.";
    close;

SemItem:
next;
mes "^CD0000[Porteiro VIP]^000000";
mes "Desculpe, mas você não tem Ticket VIP.";
mes "Visite ^CD0000"+@site$+"^000000 para obter Ticket VIP!";
close;

                    }
                    
}


-    script    CASH#L-1    -1,{
OnPCLoginEvent:
    if(#CASHPOINTS > 0)
    dispbottom "Você tem "+#CASHPOINTS+" Cash.";

}

// *********************************************************************
function    script    Time2Str_VIP    {

    set .@Time_Left, getarg(0) - gettimetick(2);
    
    set .@Days, .@Time_Left / 86400;
    set .@Time_Left, .@Time_Left - (.@Days * 86400);
    set .@Hours, .@Time_Left / 3600;
    set .@Time_Left, .@Time_Left - (.@Hours * 3600);
    set .@Minutes, .@Time_Left / 60;
    set .@Time_Left, .@Time_Left - (.@Minutes * 60);
    
    set .@Time$, "";
    if( .@Days >= 0 )
        set .@Time$, .@Time$ + .@Days + " dias, ";
    //else if( .@Days > 0 || .@Days == 0 )
    //    set .@Time$, .@Time$ + .@Days + " dia, ";


    if( .@Hours > 1 )
        set .@Time$, .@Time$ + .@Hours + ":";
    else if( .@Hours > 0 )
        set .@Time$, .@Time$ + .@Hours + ":";

    if( .@Minutes > 1 )
        set .@Time$, .@Time$ + .@Minutes + ":";
    else if( .@Minutes > 0 )
        set .@Time$, .@Time$ + .@Minutes + ":";

    if( .@Time_Left > 1 || .@Time_Left == 0 )
        set .@Time$, .@Time$ + .@Time_Left + "";
    else if( .@Time_Left == 1 )
        set .@Time$, .@Time$ + .@Time_Left + "";
    
    return .@Time$;
}
-    script    VIP#L-1    -1,{
OnPCLoginEvent:
    if (isPremium() == 0) end;
    dispbottom "Você ainda tem " + callfunc("Time2Str_VIP",#Premium_Tick) + " como VIP.";
    dispbottom "Após o termino de seu VIP, recarregue! E ajude o servidor a se manter!";
    end;
}

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.   Paste as plain text instead

  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.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...