战神引擎封盘古插件漏洞攻速外挂脚本

脚本是传奇帮一个兄弟写的，因为有人利用盘古插件的漏洞，开加速外挂，目前还没有直接封的软件，但有个兄弟写了一段RunQuest脚本，经过开区实战测试，确定对开加速外挂有有惩罚作用，下面给你们把代码和文件贴上来。直接加到RunQuest脚本文件里面去，加好了需要从新启动引擎才行。

//物理攻击触发

procedure Attack(VictimName:string;IsPlayer:Boolean);

begin  

sec_curr := StrToIntDef(MirDateTimeToStr('ss' , GetNow) ,-1)

if sec_curr = sec_sum then

begin

sum := sum + 1;

end else

begin

if sum < 4 then 

begin

sum := 1;

sec_sum := sec_curr;

end else 

begin

if warn_time = 1 then//warn one time already

begin

This_Player.PlayerNotice('您已经2次超速攻击，请联系客服', 2);

warn_time := 0;

This_Player.RandomFlyTo('SD000');

end else //warn first time

begin

This_Player.PlayerNotice('您已经1次超速攻击，在超速就会被传送进小黑屋', 2);

This_Player.PlayerNotice('您已经1次超速攻击，在超速就会被传送进小黑屋', 2);

warn_time := 1;

end;

end;

end;

end;