https://wiki.soldat.pl/index.php?action=history&feed=atom&title=Firstblood 2026-05-26T02:31:45Z Revision history for this page on the wiki MediaWiki 1.30.0 https://wiki.soldat.pl/index.php?title=Firstblood&diff=34&oldid=prev 2012-08-14T16:47:04Z

<p>Created page with &quot;===Script by Spkka=== &lt;source lang=&quot;pascal&quot;&gt;var firstBlood: integer; GOOD, BAD: longint; procedure ActivateServer(); begin //color of writeconsole messages GOOD := $EE00F...&quot;</p> <p><b>New page</b></p><div>===Script by Spkka===<br /> &lt;source lang=&quot;pascal&quot;&gt;var<br /> firstBlood: integer;<br /> GOOD, BAD: longint;<br /> <br /> procedure ActivateServer();<br /> begin<br /> //color of writeconsole messages<br /> GOOD := $EE00FF00;<br /> BAD := $FFFF4444;<br /> //reset firstblood<br /> firstBlood := 1;<br /> end;<br /> <br /> procedure OnMapChange(NewMap: string);<br /> begin<br /> //reset firstblood<br /> firstBlood := 1;<br /> end;<br /> <br /> procedure OnPlayerKill(Killer, Victim: byte; Weapon: string);<br /> begin<br /> //check for firstblood and award 10 points<br /> if (firstBlood &gt; 0) and (Killer &lt;&gt; Victim) then <br /> begin<br /> firstBlood := 0;<br /> WriteConsole(0, 'FIRST BLOOD: '+IDToName(Killer) + ' killed '+IDToName(Victim),GOOD);<br /> WriteConsole(0, '10 Points Awarded!',GOOD);<br /> SetScore(Killer,GetPlayerStat(1, 'Kills' ) + 10 );<br /> end<br /> <br /> //if killer suicide then there is no firstblood<br /> if (firstblood &gt; 0) and (Killer = Victim) then <br /> begin<br /> firstBlood := 1;<br /> end<br /> end;&lt;/source&gt;<br /> <br /> [[Category:Script Templates]]</div>

Freeman