[Talkactions] Check players online in certain areas

[elnelson]

Hello, im using tfs 0.3.6 and i need this script

when a player uses !online appears next message:
Players Online:
Arena 1 : 4 players
Arena 2 : 6 players
Arena 3 : 15 players
etc...

 

[HeberPcL]

Try

function countPlayers(fromPosition, toPosition)
    local count = 0
    for _, pid in ipairs(getPlayersOnline()) do
        if isInRange(getCreaturePosition(pid), fromPosition, toPosition) then
            count = (count + 1)
        end
    end
    return count
end

function onSay(cid, words, param, channel)
    local area1 = countPlayers({x = 1, y = 1, z = 7}, {x = 3, y = 3, z = 7})
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Players in area 1: "..area1..".")
    return true
end

Updated, now use getPlayersOnline() and isInRange().

Thanks @cbrm

 

[cbrm]

Try

function countPlayers(fromPos, toPos)
    local count = 0
    for x=fromPos.x,toPos.x do
        for y=fromPos.y,toPos.y do
            for z=fromPos.z,toPos.z do
                local v = getTopCreature({x=x, y=y, z=z}).uid
                if isPlayer(v) then
                    count = (count + 1)
                end
            end
        end
    end
    return count
end

function onSay(cid, words, param, channel)
    local area1 = countPlayers({x = 1, y = 1, z = 7}, {x = 3, y = 3, z = 7})
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Players in area 1: "..area1..".")
    return true
end

what if players are stacked?? iterate thru getPlayersOnline() and check with isInRange(position, fromPosition, toPosition)

 

[WibbenZ]

Use getSpectators insted.

 

[HeberPcL]

Updated!

 

[elnelson]

thanks working good