This is an anti TK script i came across once. I have never tried to use it, it isnt any of my work
Hope this helps you out
********************************************************
another killshooter variation is to give the shooter the damage the player received, so if I hit a buddy with a stray bullet, he's okay, and I take the bullet (and nobody dies). That's done this way:
teamkill = player addeventhandler [{Hit}, {_this exec {killshooter.sqs}}]
;Killshooter.sqs
;dinger@raf303.org
_killer = _this select 1
_damage = _this select 2
?_killer == player:exit
?side _killer != side player: exit
player setdammage ((getdammage player) - _damage)
_killer setdammage ((getdammage player) + _damage)
exit