Script mod

[daim]

Hi there,

 

Could someone help me mod this script?

 

1. I would like to add function where there command like @reward, and it will display time remaining to get points or reward.

//= The default points is Kafrapoints change it anyway if you like.
//= 1.1 = Check Chatting too
//= 1.2 = 5 Minute Idle Check & @at/@autotrade check.
//= 1.3 = Corrected the current balance line on 12 Hours Consecutive
//====================================================================
-	script	hourlypoints	-1,{
//--Start of the Script
OnPCLoginEvent:
    addtimer .timer,"hourlypoints::OnPointGet";
    end;
    
OnPointGet:
    while(checkvending() >= 1 || checkchatting() == 1) {
        sleep2 .delay;
        if(.@mes$=="")
            dispbottom set(.@mes$,"The hourly points event haulted because you were vending, chatting, or idle.");
    }
    set #CASHPOINTS, #CASHPOINTS + .point_amt;
    dispbottom "You received "+.point_amt+" Kafrapoints by staying ingame for 1 hour";
    dispbottom "Current Balance = "+#CASHPOINTS+" Kafrapoints";
    set @consecutive_hour, @consecutive_hour + 1;

    //Check for 3 hours consecutive
    if(@consecutive_hour == 3) {
        set @consecutive_hour,0;
        set #CASHPOINTS, #CASHPOINTS + .cpoint_amt;
        dispbottom "You receive "+.cpoint_amt+" Kafrapoints in playing for 12 consecutive hours";
        dispbottom "Current Balance = "+#CASHPOINTS+" Kafrapoints";
    }
    addtimer .timer,"hourlypoints::OnPointGet";
    end;

OnInit:
    set .timer, 1000*15*15; //Timer in milliseconds.
    set .cpoint_amt, 15; //Points gained for consecutive time online.
    set .point_amt, 5; //Normal points gained.
    set .delay, 1000; //Delay for idle re-check check.
    set .dlimit, 60*30; //Stop points if afk greater then in seconds (30mins).
}

Thank you in advance.

[Skorm]

Thanks will test it once I back

 

Hi,

 

Its not working. I just show

 

Time Remaining:

 

no value after that.

 

 

Change:

Time2Str( @hourly_points_timer - gettimetick(2) )

To:

Time2Str( @hourly_points_timer )

Didn't realize that was already part of the function.

[Skorm]

Hi there,

 

Could someone help me mod this script?

 

1. I would like to add function where there command like @reward, and it will display time remaining to get points or reward.

 

Thank you in advance.

//= The default points is Kafrapoints change it anyway if you like.
//= 1.1 = Check Chatting too
//= 1.2 = 5 Minute Idle Check & @at/@autotrade check.
//= 1.3 = Corrected the current balance line on 12 Hours Consecutive
//====================================================================
-	script	hourlypoints	-1,{
    
OnPointGet:
    while(checkvending() >= 1 || checkchatting() == 1) {
        sleep2 .delay;
        if(.@mes$=="")
            dispbottom set(.@mes$,"The hourly points event haulted because you were vending, chatting, or idle.");
    }
    set #CASHPOINTS, #CASHPOINTS + .point_amt;
    dispbottom "You received "+.point_amt+" Kafrapoints by staying ingame for 1 hour";
    dispbottom "Current Balance = "+#CASHPOINTS+" Kafrapoints";
    set @consecutive_hour, @consecutive_hour + 1;

    //Check for 3 hours consecutive
    if(@consecutive_hour == 3) {
        set @consecutive_hour,0;
        set #CASHPOINTS, #CASHPOINTS + .cpoint_amt;
        dispbottom "You receive "+.cpoint_amt+" Kafrapoints in playing for 12 consecutive hours";
        dispbottom "Current Balance = "+#CASHPOINTS+" Kafrapoints";
    }
	
OnPCLoginEvent:
    addtimer .timer,"hourlypoints::OnPointGet";
	set @hourly_points_timer, gettimetick(2) + ( .timer / 1000 );
    end;
	
OnCmdHour:
	message strcharinfo(0),@hourly_points_timer ? Time2Str( @hourly_points_timer )+" Remaining.":"Something went wrong relog!";
	end;

OnInit:
	bindatcmd "hour","hourlypoints::OnCmdHour";
    set .timer, 1000*15*15; //Timer in milliseconds.
    set .cpoint_amt, 15; //Points gained for consecutive time online.
    set .point_amt, 5; //Normal points gained.
    set .delay, 1000; //Delay for idle re-check check.
    set .dlimit, 60*30; //Stop points if afk greater then in seconds (30mins).
}

Untested so let me know if you run into any problems @hour is the command.

Edited May 10, 2016 by Skorm
I've modifed the above script to include the changes below.

[daim]

Thanks will test it once I back

 

Untested so let me know if you run into any problems @hour is the command.

 

Hi,

 

Its not working. I just show

 

Time Remaining:

 

no value after that.

[daim]

Thanks mate.