// TMW-2 Script.
// Author:
//    Jesusalva
// Description:
//    Applies effects for INC_* (STR doesn't exist)
//    Valid values: INCAGI INCVIT INCINT INCDEX INCLUK INCHIT
///   Untested Values: INCHIT INCFLEE INCMHP INCMSP WALKSPEED INVINCIBLE
//
// Variables:
//    @delay    Second of buffing
//    @min      Min amount of type
//    @max      Max amount of type
//    @type     SC_*

-	script	inc_sc_bonus	-1,{
OnUse:
    if (@delay <= 0) close;

    // Get the bonus value
    .@bonus=rand(@min, @max);

    // Remaining time and effect conversion
    @v=getstatus(@type, 1);
    @t=getstatus(@type, 5);

    // Convert remaining time to seconds, rounded down
    if (@t > 1000)
        @t=@t/1000;
    else
        @t=0;

    // If there was effect previously, get ponderate average
    if (@v > 0)
        @v=(.@bonus*@delay+@v*@t)/(@t+@delay);
    else
        @v=.@bonus;

    // Update time value to ms and to stack
    @t+=@delay;
    @t*=1000;

    // Restart the bonus
    sc_end @type;
	sc_start @type,@t,@v;

    close;
}