viewing paste Unknown #8391 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
prontera,150,180,5  script  restricted_manner   -1,{
OnInit:
    setarray .@bad_word$, "noob", "coward"; // add as your content lol
    .@size_b = getarraysize( .@bad_word$ );
    for( ; .@i < .@size_b; .@i++ )
        defpattern 1, "([^:]+):.*\\s"+ .@bad_word$[.@i] +".$", "warning";
    activatepset 1;
    end;
warning:
    @warning++;
    if ( @warning == 3 ) {
        @warning = 0;
        deltimer strnpcinfo(0) +"::OnDelay";
        atcommand "@mute 5 "+ strcharinfo(0);
    }
    else {
        deltimer strnpcinfo(0) +"::OnDelay";
        addtimer 300000, strnpcinfo(0) +"::OnDelay";
        message strcharinfo(0), "Be careful with your language... Warning "+ @warning +"/3";
    }
    end;
OnDelay:
    @warning = 0;
    end;
}
Viewed 801 times, submitted by Guest.