function getServerCash()
local cash = 0 
for _, pid in ipairs(getPlayersOnline()) do
cash = cash + getPlayerMoney(pid) + getPlayerBalance(pid)
end
return cash
end

retorna a grana do sv

exemplo

function onSay(cid, words, param)
return doPlayerSendTextMessage(cid, 27, "O servidor " .. getConfigValue(serverName) .. " tem " .. getServerCash() .. " gp's.")
end

Bem interessante.

Poderia criar um que verifica o cara com maior money.usando table.insert e verificando o maior valor.

Fica ai a dica para voce tentar.