Jump to content
  • 0

vip to give everyone

Scofield

Asked by Scofield,

 Share

Question

Scofield Marin

Scofield

Posted
  • Group:  Members
  • Topic Count:  107
  • Topics Per Day:  0.03
  • Content Count:  265
  • Reputation:   11
  • Joined:  01/11/13
  • Last Seen:  
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
Link to comment
Share on other sites

4 answers to this question

Recommended Posts

amonlucu Poring

amonlucu

Posted
  • Group:  Members
  • Topic Count:  1
  • Topics Per Day:  0.00
  • Content Count:  11
  • Reputation:   0
  • Joined:  02/27/13
  • Last Seen:  
Posted

err this is just how to give vip to everyone right?

not include what is the benefit for vip member isnt? cmiiw

Link to comment
Share on other sites
Patskie Santa Poring

Patskie

Posted
  • Group:  Members
  • Topic Count:  50
  • Topics Per Day:  0.01
  • Content Count:  1702
  • Reputation:   238
  • Joined:  09/05/12
  • Last Seen:  
Posted

432000 seconds = 5 days.

 

set .@timer, 432000;

 

Change to : 

 

set .@timer, 2592000;
Link to comment
Share on other sites
jaBote Poring

jaBote

Posted
  • Group:  Members
  • Topic Count:  1
  • Topics Per Day:  0.00
  • Content Count:  182
  • Reputation:   36
  • Joined:  01/26/12
  • Last Seen:  
Posted

And then reload your NPC script (only that one). If not, it won't work.

Link to comment
Share on other sites
Scofield Marin

Scofield

Posted
  • Group:  Members
  • Topic Count:  107
  • Topics Per Day:  0.03
  • Content Count:  265
  • Reputation:   11
  • Joined:  01/11/13
  • Last Seen:  
  • Author
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;
}
Link to comment
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.   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.

×
 Share
Go to question listing
×
×
  • Create New...