Weapons Stats

[KoloS]

Script Name: Weapons Stats
Script Description:
Commands: !wepstats or !wepstats <ID>
Config: open script and edit:

Code: [Select]

const
savetype    = 2;    //1 = HWID, 2 = Name
PublicDis   = 2;    //1 = Public Display Stats 2 = Private Display Stats
Original Author(s): KoloS
Core Version: 2.7.7
Code:

Code: [Select]

function OnPlayerDamageEx(Victim,Killer: Byte; Damage: Integer; Weapon: Byte): Integer;
begin
if (GetPlayerStat(killer, 'Active') = true) and not (killer = Victim) and not (GetPlayerStat(killer,'team') = GetPlayerStat(Victim,'team')) then begin
case (Weapon) of
0: PlayerStats[killer].pistolH := inttostr(strtoint(PlayerStats[killer].pistolH) + 1);
1: PlayerStats[killer].deagleHit := inttostr(strtoint(PlayerStats[killer].deagleHit) + 1);
2: PlayerStats[killer].hkH := inttostr(strtoint(PlayerStats[killer].hkH) + 1);
3: PlayerStats[killer].akH := inttostr(strtoint(PlayerStats[killer].akH) + 1);
4: PlayerStats[killer].augH := inttostr(strtoint(PlayerStats[killer].augH) + 1);
5: PlayerStats[killer].spasH := inttostr(strtoint(PlayerStats[killer].spasH) + 1);
6: PlayerStats[killer].rugerH := inttostr(strtoint(PlayerStats[killer].rugerH) + 1);
8: PlayerStats[killer].barrettH := inttostr(strtoint(PlayerStats[killer].barrettH) + 1);
9: PlayerStats[killer].minimiH := inttostr(strtoint(PlayerStats[killer].minimiH) + 1);
10: PlayerStats[killer].minigunH := inttostr(strtoint(PlayerStats[killer].minigunH) + 1);
14: PlayerStats[killer].knifeH := inttostr(strtoint(PlayerStats[killer].knifeH) + 1);
15: PlayerStats[killer].sawH := inttostr(strtoint(PlayerStats[killer].sawH) + 1);
end;
if (Weapon = 16) and (Damage >= 25) then PlayerStats[killer].lawH := inttostr(strtoint(PlayerStats[killer].lawH) + 1);
if (Weapon = 7) and (Damage >= 40) then PlayerStats[killer].m79H := inttostr(strtoint(PlayerStats[killer].m79H) + 1);
end;
Result:=damage;
end;Changes in  1.0.1:
- Change: OnPlayerDamageEx vice OnPlayerDamage
- Change: Use case () of
- Improved: Accuracy for m79 and law
Download:

Code: [Select]

   ||
   ||
  \||/
   \/

[kicikici]

very very very "useful" script, nice dominik!

EDIT:
did you ever hear about case-of statement?

[KoloS]

Small update(1.0.1) at suggestion kicikici.

[DarkCrusade]

Or you create an array for the weapons (0 to 16) and get rid of that wall of code........

[kicikici]

Ye, he did this in his second script, I dont know why he changed his mind here.

[DarkCrusade]

My first guess is that it depends on where he copies the code from.

[darDar]

Accuracy stats are quite pointless since 30% of all shots are either spray shots or blind shots or for other purposes ( boosting, boosting the flag or kits)