Jump to content
  • 0

Vip Status login


Geralt

Question


  • Group:  Members
  • Topic Count:  61
  • Topics Per Day:  0.01
  • Content Count:  108
  • Reputation:   0
  • Joined:  12/26/12
  • Last Seen:  

hello guys how do i put the vip + cash days in a window when the player logs in .. ie information of the vip and cash days

example in picture

 

Script vip

//Adicionar 1 Hora Vip:
function    script    Vip1Hour    {
// Settings: -----------------------------
set .@Time, 1 * 1 * 1 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
if( isPremium() == 0 )  {
set #Premium_Tick, gettimetick(2) + .@Time; // New Premium Account
dispbottom "Parabéns! Acesso VIP liberado.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";
end;
}
// Settings: -----------------------------
if (isPremium() == 1) {
set .@Time, 1 * 1 * 1 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
set #Premium_Tick, #Premium_Tick + .@Time; // Time Extension
dispbottom "Parabéns!! Acesso VIP extendido por mais 1 hora.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";

end;
}

//Adicionar 1 dia Vip:
function    script    Vip1Day    {
// Settings: -----------------------------
set .@Time, 1 * 1 * 24 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
if( isPremium() == 0 )  {
set #Premium_Tick, gettimetick(2) + .@Time; // New Premium Account
dispbottom "Parabéns! Acesso VIP liberado.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";
end;
}
// Settings: -----------------------------
if (isPremium() == 1) {
set .@Time, 1 * 1 * 24 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
set #Premium_Tick, #Premium_Tick + .@Time; // Time Extension
dispbottom "Parabéns!! Acesso VIP extendido por mais 1 dia.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";

end;
}

//Adicionar 30 dias Vip:
function    script    Vip30Day    {
// Settings: -----------------------------
set .@Time, 1 * 1 * 24 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
if( isPremium() == 0 )  {
set #Premium_Tick, gettimetick(2) + .@Time; // New Premium Account
dispbottom "Parabéns! Acesso VIP liberado.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";
end;
}
// Settings: -----------------------------
if (isPremium() == 1) {
set .@Time, 5 * 6 * 24 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
set #Premium_Tick, #Premium_Tick + .@Time; // Time Extension
dispbottom "Parabéns!! Acesso VIP extendido por mais 30 dias.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";

end;
}

}

Sem título336.jpg

Link to comment
Share on other sites

5 answers to this question

Recommended Posts

  • 0

  • Group:  Members
  • Topic Count:  12
  • Topics Per Day:  0.00
  • Content Count:  109
  • Reputation:   5
  • Joined:  03/17/16
  • Last Seen:  

18 minutes ago, Scofield said:

hello guys how do i put the vip + cash days in a window when the player logs in .. ie information of the vip and cash days

example in picture

 

Script vip

 

  Reveal hidden contents

 

//Adicionar 1 Hora Vip:
function    script    Vip1Hour    {
// Settings: -----------------------------
set .@Time, 1 * 1 * 1 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
if( isPremium() == 0 )  {
set #Premium_Tick, gettimetick(2) + .@Time; // New Premium Account
dispbottom "Parabéns! Acesso VIP liberado.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";
end;
}
// Settings: -----------------------------
if (isPremium() == 1) {
set .@Time, 1 * 1 * 1 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
set #Premium_Tick, #Premium_Tick + .@Time; // Time Extension
dispbottom "Parabéns!! Acesso VIP extendido por mais 1 hora.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";

end;
}

//Adicionar 1 dia Vip:
function    script    Vip1Day    {
// Settings: -----------------------------
set .@Time, 1 * 1 * 24 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
if( isPremium() == 0 )  {
set #Premium_Tick, gettimetick(2) + .@Time; // New Premium Account
dispbottom "Parabéns! Acesso VIP liberado.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";
end;
}
// Settings: -----------------------------
if (isPremium() == 1) {
set .@Time, 1 * 1 * 24 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
set #Premium_Tick, #Premium_Tick + .@Time; // Time Extension
dispbottom "Parabéns!! Acesso VIP extendido por mais 1 dia.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";

end;
}

//Adicionar 30 dias Vip:
function    script    Vip30Day    {
// Settings: -----------------------------
set .@Time, 1 * 1 * 24 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
if( isPremium() == 0 )  {
set #Premium_Tick, gettimetick(2) + .@Time; // New Premium Account
dispbottom "Parabéns! Acesso VIP liberado.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";
end;
}
// Settings: -----------------------------
if (isPremium() == 1) {
set .@Time, 5 * 6 * 24 * 60 * 60; // Time in Seconds = 5 weeks, 6 days per week, 24 hours per day, 60 minutes per day, 60 seconds per minute. = 1 month in this sample.
set #Premium_Tick, #Premium_Tick + .@Time; // Time Extension
dispbottom "Parabéns!! Acesso VIP extendido por mais 30 dias.";
dispbottom "Seu acesso VIP expira em " + callfunc("Time2Str",#Premium_Tick) + ".";

end;
}

}

 

Sem título336.jpg

-	script	VIP_STATUSs	-1,{
OnPCLoginEvent:
	if ( vip_status(1) ) {
		//sc_start SC_EXPBOOST,1000*60*60*24,0;
			set .@Timer, vip_status(2);
			dispbottom "You're VIP.";
			dispbottom "=============================================";
			dispbottom "Account Status : VIP Account";
			dispbottom "Account Status : Enable to warp in VIP Central!";
			dispbottom "Account Status : Exp & Job Increase 30%";
			dispbottom "Account Status : Drop Increase 20%";
			dispbottom "Time left : "+ callfunc("Time2Str",.@Timer);
			dispbottom "============================================";
		end;
	}
}

 

123123.png

Link to comment
Share on other sites

  • 0

  • Group:  Members
  • Topic Count:  61
  • Topics Per Day:  0.01
  • Content Count:  108
  • Reputation:   0
  • Joined:  12/26/12
  • Last Seen:  

4 hours ago, noobzter003 said:

-	script	VIP_STATUSs	-1,{
OnPCLoginEvent:
	if ( vip_status(1) ) {
		//sc_start SC_EXPBOOST,1000*60*60*24,0;
			set .@Timer, vip_status(2);
			dispbottom "You're VIP.";
			dispbottom "=============================================";
			dispbottom "Account Status : VIP Account";
			dispbottom "Account Status : Enable to warp in VIP Central!";
			dispbottom "Account Status : Exp & Job Increase 30%";
			dispbottom "Account Status : Drop Increase 20%";
			dispbottom "Time left : "+ callfunc("Time2Str",.@Timer);
			dispbottom "============================================";
		end;
	}
}

 

123123.png

did not work

Link to comment
Share on other sites

  • 0

  • Group:  Members
  • Topic Count:  12
  • Topics Per Day:  0.00
  • Content Count:  109
  • Reputation:   5
  • Joined:  03/17/16
  • Last Seen:  

17 hours ago, Scofield said:

did not work

can you provide the errors?
in my test server its working fine

Link to comment
Share on other sites

  • 0

  • Group:  Members
  • Topic Count:  61
  • Topics Per Day:  0.01
  • Content Count:  108
  • Reputation:   0
  • Joined:  12/26/12
  • Last Seen:  

On 9/8/2019 at 1:10 PM, noobzter003 said:

can you provide the errors?
in my test server its working fine

I changed vip system for this

// ************************************************************
// Sistema Vip eAmod
// ************************************************************

// Players podem usar esse sistema para comprar VIP. .
// Você pode configurar os bônus de experiência,descontos em lojas, e comandos disponiveis apenas para VIP.

// Conta Premium conf/battle configurações ( no eAmod.conf )

//Bônus Extra experiência quando matar mobs. Os valores vão de 0 a 100, em porcentagem. Exemplo 5 = 5%
// premium_bonusexp: 0

// Descontos ao usar os npcs de loja. Os valores vão de 0 a 100, em porcentagem. Exemplo 5 = 5%
// premium_discount: 0

// Drop boost for Premium account users. Value is %, where 5 become 5%.
// The bonus drop increases the normal drop rate just like Bubble Gum does.
// If normal drop is 30% and premium_dropboost is 10. The final drop rate will be 33%, not 40%.
// premium_dropboost: 0

// To give access to @commands to Premium Account users, go to the file /conf/atcommand_athena.conf and add an Extra ,1 to each command setting you want to enable for Premium Users.
// Example
// go: 40,80
// That means, 40 GM level using @go, 80 Gm level using #go
// To enable @go to Premium Account just do this:
// go: 40,80,1

prontera,150,193,4    script    Senhor VIP    952,{
    // Settings: -----------------------------
    set .@Cost, 12000; // Valor de 1 mês VIP
    set .@Time, 5 * 6 * 24 * 60 * 60; // Tempo em segundos = 5 semanas, 6 dias por semana, 24 horas por dia, 60 minutos por dia, 60 segundos por minuto. = 1 mês de conta vip.
    set .@Time$, "1 Mês";
    set @mapa$,"force_1-1"; //Mapa da sala vip
    set @cordx,25;
    set @cordy,24;
    set @site$,"[^0000FF www.HeroBRO.net ^000000]"; //Seu site
    // ---------------------------------------

    mes "^FF1493[ Central Premium ]^000000";
    mes (gettime(3)>= 6&&gettime(3)<= 12?"Bom-dia":(gettime(3)>=13&&gettime(3)<=18?"Boa-tarde":"Boa-noite"))+", ^008aff"+strcharinfo(0)+"^000000 !";
    mes "Eu sou o vendedor de Conta VIP.";
    if( isPremium() == 1 )
    mes "Sua Conta VIP expira em ^FF0000" + callfunc("Time2Str",#Premium_Tick) + "^000000.";
    mes "O que posso fazer por você?";
    next;

    switch( select("^0084ff[ • ]^000000 Entrar na Sala VIP:^0084ff[ • ]^000000 Pagar Conta VIP:^0084ff[ • ]^000000 Sobre a Conta VIP") )
    {
    case 1:
    if( isPremium() == 0 ) {
    mes "^FF1493[ Central Premium ]^000000";
    mes "Para entrar na sala você precisa ser VIP.";
    mes "Visite ^CD0000"+@site$+"^000000 para obter Cash e comprar seu VIP!";
    close;
}
    if( isPremium() == 1 ) {
        warp @mapa$,@cordx,@cordy;
        end;
}
    case 2:
        mes "^FF1493[ Central Premium ]^000000";
        if( isPremium() == 1 )
            mes "Você realmente deseja estender sua conta VIP?";
        else
            mes "Você realmente deseja ter sua conta VIP?";

        mes "O Tempo VIP é de ^FF0000" + .@Time$ + "^000000";
        mes "O Valor é ^FF0000" + .@Cost + "^000000 Cash Points.";
        next;
        if( select("^0084ff[ • ]^000000 Sim:^ff0000[ • ]^000000 Não") == 2 )
        {
            mes "^FF1493[ Central Premium ]^000000";
            mes "Volte quando você mudar de ideia.";
            close;
        }

        if( #CASHPOINTS < .@Cost )
        {
            mes "^FF1493[ Central Premium ]^000000";
            mes "Você não tem Cash Points suficientes.";
            close;
        }

        if( isPremium() == 1 )
            set #Premium_Tick, #Premium_Tick + .@Time; // Extender tempo
        else
            set #Premium_Tick, gettimetick(2) + .@Time; // Nova conta premium
        set #CASHPOINTS, #CASHPOINTS - .@Cost;

        mes "^FF1493[ Central Premium ]^000000";
        mes "Parabéns!!..";
        mes "Lembre-se de que sua Conta VIP expira em ^FF0000" + callfunc("Time2Str",#Premium_Tick) + "^000000.";
        close;

    case 3:    
    
        // Modifique esta mensagem para explicar  a seus usuários sobre a Conta Premium em seu servidor
        // ----------------------------------------------------------------------------------

        mes "^FF1493[ Central Premium ]^000000";
        mes "São 30 dias de pura diversão e facilidades.";
        mes "Os benefícios de ser um VIP são os seguintes:";
        mes "Bônus de 5% a mais na experiência.";
        mes "Sala Premium com vários npcs que facilitam e muito sua vida.";
        mes "Mais de 30 comandos para facilitar ainda mais, para mais informações visite o nosso site, ^0000FF www.HeroBRO.net ^000000";
        close;
    }
}[/soiiler],

the days and hours vip does not appear .. so it is in the image

 

 

 

Sem título.jpg

Link to comment
Share on other sites

  • 0

  • Group:  Members
  • Topic Count:  12
  • Topics Per Day:  0.00
  • Content Count:  109
  • Reputation:   5
  • Joined:  03/17/16
  • Last Seen:  

45 minutes ago, Scofield said:

I changed vip system for this

 

  Hide contents

 

// ************************************************************
// Sistema Vip eAmod
// ************************************************************

// Players podem usar esse sistema para comprar VIP. .
// Você pode configurar os bônus de experiência,descontos em lojas, e comandos disponiveis apenas para VIP.

// Conta Premium conf/battle configurações ( no eAmod.conf )

//Bônus Extra experiência quando matar mobs. Os valores vão de 0 a 100, em porcentagem. Exemplo 5 = 5%
// premium_bonusexp: 0

// Descontos ao usar os npcs de loja. Os valores vão de 0 a 100, em porcentagem. Exemplo 5 = 5%
// premium_discount: 0

// Drop boost for Premium account users. Value is %, where 5 become 5%.
// The bonus drop increases the normal drop rate just like Bubble Gum does.
// If normal drop is 30% and premium_dropboost is 10. The final drop rate will be 33%, not 40%.
// premium_dropboost: 0

// To give access to @commands to Premium Account users, go to the file /conf/atcommand_athena.conf and add an Extra ,1 to each command setting you want to enable for Premium Users.
// Example
// go: 40,80
// That means, 40 GM level using @go, 80 Gm level using #go
// To enable @go to Premium Account just do this:
// go: 40,80,1

prontera,150,193,4    script    Senhor VIP    952,{
    // Settings: -----------------------------
    set .@Cost, 12000; // Valor de 1 mês VIP
    set .@Time, 5 * 6 * 24 * 60 * 60; // Tempo em segundos = 5 semanas, 6 dias por semana, 24 horas por dia, 60 minutos por dia, 60 segundos por minuto. = 1 mês de conta vip.
    set .@Time$, "1 Mês";
    set @mapa$,"force_1-1"; //Mapa da sala vip
    set @cordx,25;
    set @cordy,24;
    set @site$,"[^0000FF www.HeroBRO.net ^000000]"; //Seu site
    // ---------------------------------------

    mes "^FF1493[ Central Premium ]^000000";
    mes (gettime(3)>= 6&&gettime(3)<= 12?"Bom-dia":(gettime(3)>=13&&gettime(3)<=18?"Boa-tarde":"Boa-noite"))+", ^008aff"+strcharinfo(0)+"^000000 !";
    mes "Eu sou o vendedor de Conta VIP.";
    if( isPremium() == 1 )
    mes "Sua Conta VIP expira em ^FF0000" + callfunc("Time2Str",#Premium_Tick) + "^000000.";
    mes "O que posso fazer por você?";
    next;

    switch( select("^0084ff[ • ]^000000 Entrar na Sala VIP:^0084ff[ • ]^000000 Pagar Conta VIP:^0084ff[ • ]^000000 Sobre a Conta VIP") )
    {
    case 1:
    if( isPremium() == 0 ) {
    mes "^FF1493[ Central Premium ]^000000";
    mes "Para entrar na sala você precisa ser VIP.";
    mes "Visite ^CD0000"+@site$+"^000000 para obter Cash e comprar seu VIP!";
    close;
}
    if( isPremium() == 1 ) {
        warp @mapa$,@cordx,@cordy;
        end;
}
    case 2:
        mes "^FF1493[ Central Premium ]^000000";
        if( isPremium() == 1 )
            mes "Você realmente deseja estender sua conta VIP?";
        else
            mes "Você realmente deseja ter sua conta VIP?";

        mes "O Tempo VIP é de ^FF0000" + .@Time$ + "^000000";
        mes "O Valor é ^FF0000" + .@Cost + "^000000 Cash Points.";
        next;
        if( select("^0084ff[ • ]^000000 Sim:^ff0000[ • ]^000000 Não") == 2 )
        {
            mes "^FF1493[ Central Premium ]^000000";
            mes "Volte quando você mudar de ideia.";
            close;
        }

        if( #CASHPOINTS < .@Cost )
        {
            mes "^FF1493[ Central Premium ]^000000";
            mes "Você não tem Cash Points suficientes.";
            close;
        }

        if( isPremium() == 1 )
            set #Premium_Tick, #Premium_Tick + .@Time; // Extender tempo
        else
            set #Premium_Tick, gettimetick(2) + .@Time; // Nova conta premium
        set #CASHPOINTS, #CASHPOINTS - .@Cost;

        mes "^FF1493[ Central Premium ]^000000";
        mes "Parabéns!!..";
        mes "Lembre-se de que sua Conta VIP expira em ^FF0000" + callfunc("Time2Str",#Premium_Tick) + "^000000.";
        close;

    case 3:    
    
        // Modifique esta mensagem para explicar  a seus usuários sobre a Conta Premium em seu servidor
        // ----------------------------------------------------------------------------------

        mes "^FF1493[ Central Premium ]^000000";
        mes "São 30 dias de pura diversão e facilidades.";
        mes "Os benefícios de ser um VIP são os seguintes:";
        mes "Bônus de 5% a mais na experiência.";
        mes "Sala Premium com vários npcs que facilitam e muito sua vida.";
        mes "Mais de 30 comandos para facilitar ainda mais, para mais informações visite o nosso site, ^0000FF www.HeroBRO.net ^000000";
        close;
    }
}[/soiiler],

the days and hours vip does not appear .. so it is in the image

 

 

 

Sem título.jpg

i see your not using the official VIP system,
i think better you use the official vip system.

to enable the official vip system edit rathena\src\config\core.hpp

/// Uncomment to enable VIP system.
#define VIP_ENABLE

then use this script to buy vip using cash points
 

prontera,155,180,4	script	VIP Central	4_F_KAFRA1,{
OnTalk:
	mes .npc$;
	mes (gettime(3)>= 6&&gettime(3)<= 12?"Good Morning":(gettime(3)>=13&&gettime(3)<=18?"Good Afternoon":"Good Evening"))+", ^008aff"+strcharinfo(0)+"^000000 !";
	mes "Welcome to VIP Central.";
	if (vip_status(1)) {
		mes "^008affYour VIP access will expire on " + callfunc("Time2Str",vip_status(2)) + ".^000000";
		mes " ";		
	}
	mes "How can I help?";
	next;
	switch (select(.bcor$+"I want to go to Central VIP.",""+((vip_status(1))?""+.bcor$+"I want to extend my time ^008affVIP^000000.":""+.bcor$+"I wish to become a ^008affVIP^000000 player."),""+.rcor$+"I do not want anything.")){
		case 1:
			if (!vip_status(1) ) {
				mes .npc$;
				mes "Excuse me! Access to VIP Central is only allowed to ^008affVIP^000000 players.";
				mes "-----------------------------------";
				mes "Visit our website and learn how to become a ^008affVIP^000000 player.";
				mes "-----------------------------------";
				close;
			}
			warp .map$,.cord[0],.cord[1];
			end;
		case 2:
			mes .npc$;
			mes "How many days of access ^008affVIP^000000 do you want to acquire?";
			next;
			.@i = select(
				.bcor$+""+.vip_day[0] + " Days."
				,.bcor$+""+.vip_day[1] + " Days."
				,.bcor$+""+.vip_day[2] + " Days."
				) - 1;
				
			mes .npc$;
			mes "You chose the plan of:";
			mes "^4527A0VIP:^000000 "+.vip_day[.@i]+" VIP days.";
			mes "^4527A0Price:^000000 "+F_InsertComma(.vip_cashpoint[.@i])+" #CASHPOINTS.";
			sleep2 1000;
			mes " ";
			mes " ";
			mes "What do you want to do?";
			next;
			switch(select(.bcor$+"Purchase:"+.rcor$+"Cancel")){
				case 1:
					if ( #CASHPOINTS < .vip_cashpoint[.@i] ) {
					mes .npc$;
					mes "You do not have the quantity of ^008aff"+F_InsertComma(.vip_cashpoint[.@i])+" #CASHPOINTS^000000.";
					close;
				}
				else {
					#CASHPOINTS -= .vip_cashpoint[.@i];
					vip_time (.vip_day[.@i] * 1440);
					mes .npc$;
					mes "Congratulations you just got "+.vip_day[.@i]+" days VIP.";
					close;
				}
				end;
				case 2:
					mes .npc$;
					mes "All right, come back whenever you want.";
					close;
			}

		case 3:
			close;
	}

OnInit:
	.npc$ = "^FF7F00[ VIP Central ]^000000";						// Name of NPC;
	.bcor$ = "^008aff[»]^000000 ";									// Option Button Symbol;
	.rcor$ = "^ff0000[»]^000000 ";									// Cancel button symbol;
	setarray .vip_day,7,14,30;										// Number of days that can be purchased;
	setarray .vip_cashpoint,4000,7000,10000;						// Price in #CASHPOINTS;
	.map$ = "sec_in02";												// VIP Room Map;
	setarray .cord,130,161;											// X and Y Coordinate;
	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.

×
×
  • Create New...