Custom Buffer Request

Snaehild · June 25, 2014

Hi,I would just like to make a follow up request on this one: http://rathena.org/board/topic/81623-buff-requests/

Can anyone help me about these scripts?

lv 50 or lower to buff heal ab kyrie gloria magnificat.

lv 51-99 to buff heal ab.

Level 90 or higher to pay 1500z.

You can pay a one-hour 20000z

A delay in the buff for 3 seconds.

Tried the script provided but doesn't look like it's still working. Doesn't buff at all and makes character stuck at some point.

/*
lv 50 or lower to buff  heal ab kyrie gloria magnificat.


lv 51-99 to buff heal ab.

Level 90 or higher to pay 1500z.

You can pay a one-hour 20000z

 

A delay in the buff for 3 seconds.
*/

prontera,150,150,4	script	load	112,{

	if ( @timer >= gettimetick(2) )
		{
			dispbottom "You have to wait for : " + ( @timer - gettimetick(2) ) + " Seconds before another use.";
			end;
		}
		
	if ( BaseLevel <= 50 )
	{
		///====================================================================
		///ADD BUFFS AND EFFECTS HERE FOR 50 AND UNDER <-------------------
		specialeffect2 313;	percentheal 100,100; //HEAL
	}
	else
	{
		if ( BaseLevel >= 90 )
		{
			if ( @allowhealtimer < gettimetick(2) )
			{
				mes "[Buffer]";
				mes "The fee is 1,500z to use buffs at your level.";
				mes "";
				mes "You can also pay a fee for one hour of use at 20,000z";
				close2;
				switch(select("Pay the one time fee:Pay the Hour fee:Don't Pay!"))
				{
					case 1:
						if (Zeny < 1500)
						{	
							dispbottom "You do not have enough zeny!";
							close;	
						}
						else
						{
							set Zeny, Zeny - 1500;
							break;
						}
						
					case 2:
						if (Zeny < 20000 )
						{	
							dispbottom "You do not have enough zeny!";
							close;	
						}
						else
						{
							set Zeny, Zeny - 20000;
							set @allowhealtimer, gettimetick(2) + 3600;
							break;
						}
					case 3:
						close;
						
				}
			}
			if ( @allowhealtimer )
			{
				dispbottom "You have : " + ( ( @allowhealtimer - gettimetick(2) ) / 60 ) + " Minutes of Buffs Remaining.";
			}
		}
		
		///====================================================================
		///ADD BUFFS AND EFFECTS HERE FOR 50 AND OVER <-------------------
		specialeffect2 313;	percentheal 100,100; //HEAL
	}
	
	if ( @timer >= gettimetick(2) )	
	{
		end;
	}
	else 
	{
		dispbottom "You have been blessed!!";
		set @timer, gettimetick(2) + .healtimer;
		close;
	}
	
OnInit:
	set .healtimer, 3; // 3 SECOND DELAY.
}

Edited June 27, 2014 by Snaehild

Snaehild · June 29, 2014

No error in console logs. The client just stuck up after getting the buff.

Edit: Fixed.

end;

to

close;

prontera,100,100,4	script	Buffer	99,{

if (gettimetick(1) < @timer) {
dispbottom "Please try again after 3 seconds";
end;
}

if (BaseLevel <= 50) {
	specialeffect2 313;
	percentheal 100,100;
	sc_start 30,240000,10; specialeffect2 42; //Blessing
	sc_start 32,240000,10; specialeffect2 37; //Agi Up
	sc_start 39,240000,10; specialeffect2 112; // Kyrie
	sc_start 41,240000,3; specialeffect2 75; // Gloria
	sc_start 40,240000,5; specialeffect2 76; // Magnificat  
	}
if (BaseLevel >= 51 && BaseLevel <= 90) {
	specialeffect2 313;
	percentheal 100,100;
	sc_start 30,240000,10; specialeffect2 42; //Blessing
	sc_start 32,240000,10; specialeffect2 37; //Agi Up
	}
if (BaseLevel >= 91) {
	mes "[Healer]";
	mes "Please select an option.";
	mes " ";
	mes "Cost:";
	mes "Normal Buff: 1,500z";
	mes "1 Hour Buff: 200,000z";
	next;
	menu "Normal Buff",-,"1 Hour Buff",One_Hour;

	if (Zeny < 1500) goto Zeny_Lack;
	specialeffect2 EF_HEAL2;
	percentheal 100,100;
	sc_start 30,240000,10; specialeffect2 42; //Blessing
	sc_start 32,240000,10; specialeffect2 37; //Agi Up
	set Zeny, Zeny-1500;

	}
	set @timer, gettimetick(1)+3;
	close;
	
One_Hour:
	if (Zeny < 200000) goto Zeny_Lack;
	specialeffect2 313;
	percentheal 100,100;
	sc_start 30,3600000,10; specialeffect2 42; //Blessing
	sc_start 32,3600000,10; specialeffect2 37; //Agi Up
	set Zeny, Zeny - 200000;
	set @timer, gettimetick(1)+3;
	close;

Zeny_Lack:
	mes "[Healer]";
	mes "You don't have enough Zeny";
	close;
}

Thanks Jyabil for the patience. Much appreciated.

Edited June 29, 2014 by Snaehild

Snaehild · June 27, 2014

May I bump? Added some details on the request.

Capuche · June 27, 2014

prontera,150,150,4 script load 112,5,5,{

if ( @delay_reused > gettimetick(2) ) end;

if ( BaseLevel >= 90 ) {

if ( free_one_hour <= gettimetick(2) ) {

if ( free_one_hour ) free_one_hour = 0;

if ( Zeny < 1500 ) {

dispbottom "you need 1500 zeny";

end;

}

Zeny = Zeny - 1500;

}

else

dispbottom "The healer is free for "+ callfunc( "timeleft__", ( free_one_hour - gettimetick(2) ) );

}

specialeffect2 313; percentheal 100,100;

sc_start SC_BLESSING,360000,5;

sc_start SC_INCREASEAGI,360000,5;

if ( BaseLevel <= 50 ) {

sc_start SC_KYRIE,360000,5; skilleffect "PR_KYRIE",0;

sc_start SC_GLORIA,360000,5; skilleffect "PR_GLORIA",0;

sc_start SC_MAGNIFICAT,360000,5; skilleffect "PR_MAGNIFICAT",0;

}

@delay_reused = gettimetick(2) + 3;

end;

OnTouch:

if ( BaseLevel < 90 ) end;

if ( free_one_hour && free_one_hour <= gettimetick(2) )

free_one_hour = 0;

if ( free_one_hour ) {

mes "The healer is free for "+ callfunc( "timeleft__", ( free_one_hour - gettimetick(2) ) );

mes "you can only pay for 1 hour.";

mes "update?";

}

else

mes "You can pay a fee for one hour of use at 20,000z";

next;

if ( select( "Leave", "Pay" ) == 1 ) close;

if ( Zeny < 20000 ) {

mes "You need 20000 zeny";

close;

}

Zeny = Zeny - 20000;

free_one_hour = gettimetick(2) + 3600;

mes "The healer is free for 1 hour";

close;

}

function script timeleft__ {

function s { return ( getarg(0) > 1 ? "s " : " " ); }

if ( ( [email protected] = getarg(0) ) <= 0 ) return getarg(0);

[email protected] = [email protected] / ( 86400 * 7 );

[email protected] = [email protected] / 86400;

[email protected] = [email protected] % 86400 / 3600;

[email protected] = [email protected] % 3600 / 60;

[email protected] = [email protected] % 60;

if( [email protected] )

return ( [email protected] +" week"+ s( [email protected] ) + [email protected] +" day"+ s( [email protected] ) + [email protected] +" hour"+ s( [email protected] ) );

else if ( [email protected] )

return ( [email protected] +" day"+ s( [email protected] ) + [email protected] +" hour"+ s( [email protected] ) );

else if ( [email protected] )

return ( [email protected] +" hour"+ s([email protected]) + [email protected] +" min" +s( [email protected] ) );

else if ( [email protected] )

return ( [email protected] +" min"+ s( [email protected] ) + [email protected] +" sec"+ s( [email protected] ) );

else

return ( [email protected] +" sec"+ s( [email protected] ) );

}

Jyabil · June 27, 2014

May I bump? Added some details on the request.

Try this:

prontera,100,100,4	script	Healer	99,{

if (gettimetick(1) < @timer) {
dispbottom "Pls try again after 3 seconds";
end;
}

if (BaseLevel <= 50) {
	specialeffect2 313;
	percentheal 100,100;
	sc_start SC_INCREASEAGI,240000,10;
	sc_start SC_BLESSING,240000,10;
	sc_start SC_KYRIE,240000,10;
	sc_start SC_GLORIA,240000,3;
	sc_start SC_MAGNIFICAT,240000,5;
	}
if (BaseLevel >= 51 && BaseLevel <= 90) {
	specialeffect2 313;
	percentheal 100,100;
	sc_start SC_INCREASEAGI,240000,10;
	sc_start SC_BLESSING,240000,10;
	}
if (BaseLevel >= 91) {
	mes "[Healer]";
	mes "Please select an option.";
	mes " ";
	mes "Cost:";
	mes "Normal Buff: 1,500z";
	mes "1 Hour Buff: 200,000z";
	next;
	menu "Normal Buff",-,"1 Hour Buff",One_Hour;

	if (Zeny < 1500) goto Zeny_Lack;
	specialeffect2 313;
	percentheal 100,100;
	sc_start SC_INCREASEAGI,240000,10;
	sc_start SC_BLESSING,240000,10;

	set Zeny, Zeny - 1500;
}
set @timer, gettimetick(1)+3;
end;
	
One_Hour:
	if (Zeny < 200000) goto Zeny_Lack;
	specialeffect2 313;
	percentheal 100,100;
	sc_start SC_INCREASEAGI,3600000,10;
	sc_start SC_BLESSING,3600000,10;
	set Zeny, Zeny - 200000;
	set @timer, gettimetick(1)+3;
	close;

Zeny_Lack:
	mes "[Healer]";
	mes "You don't have enough Zeny";
	close;
}

Edit:

Didn't know that there is already a reply.

Also, I think I misunderstood the request. I taught that if you choose to pay 200,000z, the buff will stay for 1 hour.

Sharing it anyways.

Edited June 27, 2014 by Jyabil

Snaehild · June 28, 2014

Thanks for the replies but for some odd reason, after getting the buff - character can't move anymore. I'm using Hercules btw, if that makes any sense.

Jyabil · June 28, 2014

Thanks for the replies but for some odd reason, after getting the buff - character can't move anymore. I'm using Hercules btw, if that makes any sense.

Because Hercules uses different const identifier.

Change:

SC_INCREASEAGI

To:

SC_INC_AGI

Or you could change them all to value instead of identifier. Also added the specialeffect.

sc_start 30,240000,10; specialeffect2 42; //Blessing
sc_start 32,240000,10; specialeffect2 37; //Agi Up
sc_start 39,240000,10; specialeffect2 112; // Kyrie
sc_start 41,240000,3; specialeffect2 75; // Gloria
sc_start 40,240000,5; specialeffect2 76; // Magnificat

Also change the timing for the 1 Hour Buff

sc_start 30,3600000,10; specialeffect2 42; //Blessing
sc_start 32,3600000,10; specialeffect2 37; //Agi Up

Edited June 28, 2014 by Jyabil

Snaehild · June 28, 2014

prontera,100,100,4	script	Buffer	99,{

if (gettimetick(1) < @timer) {
dispbottom "Pls try again after 3 seconds";
end;
}

if (BaseLevel <= 50) {
	specialeffect2 313;
	percentheal 100,100;
	sc_start 30,240000,10; specialeffect2 42; //Blessing
	sc_start 32,240000,10; specialeffect2 37; //Agi Up
	sc_start 39,240000,10; specialeffect2 112; // Kyrie
	sc_start 41,240000,3; specialeffect2 75; // Gloria
	sc_start 40,240000,5; specialeffect2 76; // Magnificat
	}
if (BaseLevel >= 51 && BaseLevel <= 90) {
	specialeffect2 313;
	percentheal 100,100;
	sc_start 32,240000,10; specialeffect2 37; //Agi Up
	sc_start 30,240000,10; specialeffect2 42; //Blessing
	}
if (BaseLevel >= 91) {
	mes "[Healer]";
	mes "Please select an option.";
	mes " ";
	mes "Cost:";
	mes "Normal Buff: 1,500z";
	mes "1 Hour Buff: 200,000z";
	next;
	menu "Normal Buff",-,"1 Hour Buff",One_Hour;

	if (Zeny < 1500) goto Zeny_Lack;
	specialeffect2 313;
	percentheal 100,100;
	sc_start 32,240000,10; specialeffect2 37; //Agi Up
	sc_start 30,240000,10; specialeffect2 42; //Blessing

	set Zeny, Zeny - 1500;
}
set @timer, gettimetick(1)+3;
end;
	
One_Hour:
	if (Zeny < 200000) goto Zeny_Lack;
	specialeffect2 313;
	percentheal 100,100;
	sc_start 32,3600000,10; specialeffect2 37; //Agi Up
	sc_start 30,3600000,10; specialeffect2 42; //Blessing
	set Zeny, Zeny - 200000;
	set @timer, gettimetick(1)+3;
	close;

Zeny_Lack:
	mes "[Healer]";
	mes "You don't have enough Zeny";
	close;
}

Am I still missing something? Client still crashes after receiving the buff.

Edited June 28, 2014 by Snaehild

Jyabil · June 28, 2014

Is there any error on the console?

Could you post it?

Edited June 28, 2014 by Jyabil

Sign In

Custom Buffer Request

Question

Link to comment

Share on other sites

8 answers to this question

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Join the conversation

Recently Browsing 0 members

Important Information