procedure MagicAttack(VictimName:string;IsPlayer:Boolean;SkillID:Integer);
begin
if This_Player.GetActivePoint > 0 then
begin
//魔法触发的所有代码复制至该处
end;
end;
procedure Attack(VictimName:string;IsPlayer:Boolean);
begin
if This_Player.GetActivePoint > 0 then
begin
//攻击触发的所有代码复制至该处
end;
end;
procedure OnKill(KillerName ,MapDesc:string);
begin
if This_Player.GetActivePoint > 0 then
begin
//击杀触发的所有代码复制至该处
end;
end;
procedure OnDie();
begin
if This_Player.GetActivePoint > 0 then
begin
//死亡触发的所有代码复制至该处
end;
end;