[TalkAction] Online System

Versão: 1.0 By Comedinha

Versão suportada: 9.4+ (funciona em anteriores)

Descrição: O script é o mesmo /online da tfs, porém com uma modificação em GM+, assim ajudando a identificar os membros da staff.

Features:

- Ao dizer /online os membros (GM+) irão ficar ao invés do level aparecendo Staff Member.

TAG:

<talkaction words="!online;/online" event="script" value="online.lua"/>

[/code]




[i][b]Script:[/b][/i]

[i]data/talkactions/scripts/online.lua[/i]

[code]

function onSay(cid, words, param, channel)

    local strings, i, position, added, showGamemasters = {""}, 1, 1, false, getBooleanFromString(getConfigValue('displayGamemastersWithOnlineCommand'))

    for _, pid in ipairs(getPlayersOnline()) do

        if(added) then

            if(i > (position * 7)) then

                strings[position] = strings[position] .. ","

                position = position + 1

                strings[position] = ""

            else

                strings[position] = i == 1 and "" or strings[position] .. ", "

            end

        end


        added = false

        if((not getPlayerCustomFlagValue(pid, PLAYERCUSTOMFLAG_GAMEMASTERPRIVILEGES))) then

            strings[position] = strings[position] .. getCreatureName(pid) .. " [" .. getPlayerLevel(pid) .. "]"

            i = i + 1

            added = true

        else

        if((showGamemasters or getPlayerCustomFlagValue(cid, PLAYERCUSTOMFLAG_GAMEMASTERPRIVILEGES) and (not isPlayerGhost(pid) or getPlayerGhostAccess(cid) >= getPlayerGhostAccess(pid)))) then

            strings[position] = strings[position] .. getCreatureName(pid) .. " [Staff Member]"

            i = i + 1

            added = true

        end

    end

    end


    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, (i - 1) .. " player" .. (i > 1 and "s" or "") .. " online:")

    for i, str in ipairs(strings) do

        if(str:sub(str:len()) ~= ",") then

            str = str .. "."

        end


        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, str)

    end


    return true

end

Aviso:

É só substituir o script original por este, ele não causará bugs.

Créditos:

Comedinha

TFS