0 Members and 1 Guest are viewing this topic.
procedure OnPlayerRespawn(ID: byte);beginif (GetPlayerStat(ID, 'Human') = False) and (GetPlayerStat(ID, 'Name') = 'Dummy') then DoDamage(ID, 1000);END;
Quote from: miketh2005 on July 10, 2009, 07:31:20 pmDonate to enesceHAHAHAHAHAHAHA
Donate to enesce
procedure AppOnIdle(Ticks: integer);var i: integer;beginfor i:=1 to 31 do if getplayerstat(i,'active') then if not getplayerstat(i,'human') then if (idtoname(i) = 'Dummy') and (getplayerstat(i,'alive')) and (getplayerstat(i,'health') > 10) then beginDoDamage(i,-1000);DoDamage(i,148);end;end;
procedure AppOnIdle(Ticks: integer);var i: Byte; beginfor i := 1 to 32 do begin if (GetPlayerStat(i, 'Human') = False) and (GetPlayerStat(i, 'Name') = 'Dummy') and (GetPlayerStat(i, 'Health') > 1) then DoDamage(i, (GetPlayerStat(i, 'Health') - 1)); end;END;