0 Members and 3 Guests are viewing this topic.
procedure OnPlayerKill(Killer, Victim: byte; Weapon: string);varexperience: integer;beginif GetPlayerStat(1,'Team') = 2 then begininc(experience,1000);WriteConsole(0,inttostr(experience),$EE81FAA1);end;end;
var experience: array[1..32] of integer;procedure OnPlayerKill(Killer, Victim: byte; Weapon: string);begin if GetPlayerStat(1,'Team') = 2 then begin inc(experience[Killer],1000); WriteConsole(0,inttostr(experiencie[Killer]),$EE81FAA1); end;end;
var experience: array[1..32] of integer;procedure OnPlayerKill(Killer, Victim: byte; Weapon: string);begin if (GetPlayerStat(Killer,'Team') = 2) and (GetPlayerStat(Victim,'Human') = false) then begin inc(experience[Killer],1000); WriteConsole(Killer,'Your EXP is now '+inttostr(experience[Killer]),$EE81FAA1); end;end;