All pastes #177625 Raw Edit

Miscellany

public lua v1 · immutable
#177625 ·published 2006-09-20 15:44 UTC
rendered paste body
function LuaRank.CheckHead(Player)	local Steam = _PlayerInfo(Player, "networkid")	local SteamString = tostring(Steam)	if Check[SteamString].Timer[1] ~= nil then		HaltTimer(Check[SteamString].Timer[1])	end	_GModText_Start("ChatFont")	_GModText_SetEntityOffset(vector3(0,0,50));	_GModText_SetEntity(Player)	_GModText_SetTime(99999, 0, 0)	_GModText_SetText("".._PlayerInfo(Player, "name")..".")	if (_PlayerInfo(Player, "team") == TEAM_YELLOW) then		_GModText_SetColor( 255, 215, 0, 255 )	elseif (_PlayerInfo(Player, "team") == TEAM_BLUE) then		_GModText_SetColor( 100, 180, 255, 255 )	elseif (_PlayerInfo(Player, "team") == TEAM_GREEN) then		_GModText_SetColor( 135, 245, 125, 255 )	end	_GModText_Send(0, 5670 + Player)	local PlayerPos = _EntitiesFindInSphere(_EntGetPos(Player), 512)	for I = 1, _MaxPlayers() do		for K, V in PlayerPos do			if I == V then				_GModText_Start("ChatFont")				_GModText_SetEntityOffset(vector3(0,0,40));				_GModText_SetEntity(Player)				_GModText_SetTime(99999, 0, 0)				_GModText_SetText("Gold: "..PlayerRank[SteamString].Gold.."\nReputation: "..PlayerRank[SteamString].Reputation.."\n")				if (_PlayerInfo(Player, "team") == TEAM_YELLOW) then					_GModText_SetColor( 255, 215, 0, 255 )				elseif (_PlayerInfo(Player, "team") == TEAM_BLUE) then					_GModText_SetColor( 100, 180, 255, 255 )				elseif (_PlayerInfo(Player, "team") == TEAM_GREEN) then					_GModText_SetColor( 135, 245, 125, 255 )				end				_GModText_Send(I, 5671 + Player)			end		end	end	Check[SteamString].Timer[1] = AddTimer(1, -1, LuaRank.CheckHead, Player)end