addhook("minute","a")
function a()
local highest = 0
local id = 0
	for k,v in pairs (player(0,"table")) do
		if player(v,"score")>highest then
			highest = player(id,"score")
			id = v
		end
	end
	msg("Player "..player(id,"name").." has the highest score of "..highest)
end

LUA ERROR: sys/lua/server.lua:11: attempt to concatenate a boolean value

s=0
h=0
addhook("minute","_s")
function _s()
for _,id in pairs (player(0,"table")) do
        if player(id,"score")>s and player(id,"score")>0 then
               s=player(id,"score")
               h=id
          end
   end
if h>0 and player(h,"exists") then
            msg("higest is "..player(h,"name").." with score "..player(h,"score"))
     return 1
         elseif not player(h,"exists") then
             h=0
             s=0
     end
end