thx will look at this....
ok try this:
Code:
sub doEvent_Frag
{
my ($killerId, $victimId, $weapon) = @_;
my $desc;
my $killer = $g_players{"$s_addr/$killerId"};
my $victim = $g_players{"$s_addr/$victimId"};
my $killerstr = &getPlayerInfoString($killer, $killerId);
my $victimstr = &getPlayerInfoString($victim, $victimId);
my $killerdiff;
my $victimdiff;
my $kskill;
my $vskill;
if ($g_servers{$s_addr}->{numplayers} < $g_minplayers)
{
$desc = "(IGNORED) NOTMINPLAYERS: ";
}
elsif ($killer && $victim)
{
if (!&sameTeam($killer->{team}, $victim->{team}))
{
# Frag
&recordEvent(
"Frags", 0,
$killer->get("playerid"),
$victim->get("playerid"),
$weapon
);
$kskill=$killer->get("skill");
$vskill=$victim->get("skill");
my ($killerskill, $victimskill) = &calcSkill(
$killer->get("skill"),
$victim->get("skill"),
$weapon
);
$killerdiff = $killerskill - $kskill;
$victimdiff = $victimskill - $vskill;
$killer->set("skill", $killerskill);
$victim->set("skill", $victimskill);
$killer->increment("kills");
$victim->increment("deaths");
$killer->updateDB();
$victim->updateDB();
if($g_rcon_say eq "admin_psay") {
&rcon("admin_command admin_psay $killerstr You got $killerskill\(+$killerdiff\) for killing $victimstr");
&rcon("admin_command admin_psay $victimstr You got $victimskill\($victimdiff\) for being killed by $killerstr");
}
elsif ($g_rcon_say eq "amx_psay") {
&rcon("amx_psay $playerName You are on rank $ranknumber of $totalplayers with $skill points!");
&rcon("amx_psay $killerstr You got $killerskill\(+$killerdiff\) for killing $victimstr");
&rcon("amx_psay $victimstr You got $victimskill\($victimdiff\) for being killed by $killerstr");
}
}
else
{
# Teamkill
&recordEvent(
"Teamkills", 0,
$killer->get("playerid"),
$victim->get("playerid"),
$weapon
);
$killer->increment("skill", -60);
$killer->updateDB();
$desc = "TEAMKILL: ";
}
}
else
{
$desc = "(IGNORED) NOPLAYERINFO: ";
}
return $desc . $killerstr . " killed " . $victimstr . " with \"$weapon\"";
}
replace this with your current "sub doEvent_Frag" function in HLtats_EventHandlers.plib
