Estou com esse erro no meu autoloot alguem poderia me ajudar?? OTX Server Version: (2.1.70 - 1591)

 

Está surgindo algum erro? Se sim coloque-o aqui. 

Citar

[Error - LuaInterface::loadFile] data/talkactions/scripts/autoloot.lua:107: 'end' expected (to close 'function' at line 60) near 'elseif'
[Error - Event::checkScript] Cannot load script (data/talkactions/scripts/autoloot.lua)
data/talkactions/scripts/autoloot.lua:107: 'end' expected (to close 'function' at line 60) near 'elseif'

 

Você tem o código disponível? Se tiver publique-o aqui: 

function ExistItemByName(name) -- by vodka

    local items = io.open("data/items/items.xml", "r"?read("*all")

    local get = items:match('name="' .. name ..'"')

    if get == nil or get == "" then

        return false

    end

    return true

end

 

local function getPlayerList(cid)

    local tab = {}

    if getPlayerStorageValue(cid, 04420021) ~= -1 then

        table.insert(tab, getPlayerStorageValue(cid, 04420021))

    end

    if getPlayerStorageValue(cid, 04420031) ~= -1 then

        table.insert(tab, getPlayerStorageValue(cid, 04420031))

    end

    if getPlayerStorageValue(cid, 04420041) ~= -1 then

        table.insert(tab, getPlayerStorageValue(cid, 04420041))

    end

    if getPlayerStorageValue(cid, 04420051) ~= -1 then

        table.insert(tab, getPlayerStorageValue(cid, 04420051))

    end

    if #tab > 0 then

        return tab

    end

    return false

end

 

local function addToList(cid, name)

    local itemid = getItemIdByName(name)

    if getPlayerList(cid) and isInArray(getPlayerList(cid), itemid) then

        return false

    end

    if getPlayerStorageValue(cid, 04420021) == -1 then

        return doPlayerSetStorageValue(cid, 04420021, itemid)

    elseif getPlayerStorageValue(cid, 04420031) == -1 then

        return doPlayerSetStorageValue(cid, 04420031, itemid)

    elseif getPlayerStorageValue(cid, 04420041) == -1 then  

        return doPlayerSetStorageValue(cid, 04420041, itemid)

    elseif getPlayerStorageValue(cid, 04420051) == -1 then

        return doPlayerSetStorageValue(cid, 04420051, itemid)

    end

end

 

local function removeFromList(cid, name)

    local itemid = getItemIdByName(name)

    if getPlayerStorageValue(cid, 04420021) == itemid then

        return doPlayerSetStorageValue(cid, 04420021, -1)

    elseif getPlayerStorageValue(cid, 04420031) == itemid then

        return doPlayerSetStorageValue(cid, 04420031, -1)

    elseif getPlayerStorageValue(cid, 04420041) == itemid then

        return doPlayerSetStorageValue(cid, 04420041, -1)

    elseif getPlayerStorageValue(cid, 04420051) == itemid then

        return doPlayerSetStorageValue(cid, 04420051, -1)

    end

    return false

end

 

function onSay(cid, words, param)

    if param == "" then

        local fi = getPlayerStorageValue(cid, 04420021) ~= -1 and getItemNameById(getPlayerStorageValue(cid, 04420021)) or ""

        local se = getPlayerStorageValue(cid, 04420031) ~= -1 and getItemNameById(getPlayerStorageValue(cid, 04420031)) or ""

        local th = getPlayerStorageValue(cid, 04420041) ~= -1 and getItemNameById(getPlayerStorageValue(cid, 04420041)) or ""

        local fo = getPlayerStorageValue(cid, 04420051) ~= -1 and getItemNameById(getPlayerStorageValue(cid, 04420051)) or ""

        local stt = getPlayerStorageValue(cid, 04421011) == 1 and "sim" or "Nao"

        local str = getPlayerStorageValue(cid, 04421001) == 1 and "sim" or "Nao"

        doPlayerPopupFYI(cid, "                                                          <--- Informações Do Auto Loot --->\n{Auto-Loot} ---Coletar dinheiro,  Ligado? ("..stt.."). Para ligar ou desligar, digite: !autoloot gold \n{Auto-Loot} ---Coletar itens, Ligado? ("..str.."). Para ligar ou desligar, digite: !autoloot power\n\n{Auto-Loot} --Configuraçao Dos Slots:\n{Auto-Loot} ---Slot 1: "..fi.."\n{Auto-Loot} ---Slot 2: "..se.."\n{Auto-Loot} ---Slot 3: "..th.."\n{Auto-Loot} ---Slot 4: "..fo.."\n\n{Auto-Loot} ---Para adicionar um novo item no autoloot, digite: !autoloot add, <nome do item>\n{Auto-Loot} ---Para retirar um item do autoloot, digite: !autoloot remove, <nome do item>\n{Auto-Loot} ---Para limpar todos os slots, digite: !autoloot clear\n{Auto-Loot} ---Para informações de quanto voce ja fez utilizando a coleta de dinheiro, use: !autoloot goldinfo\n\nSe seu autoloot bugar use !autoloot desbug.")

        return true

    end

   

    local t = string.explode(param, ",")

   

    if t[1] == "power" then

        local check = getPlayerStorageValue(cid, 04421001) == -1 and "ligou" or "desligou"

        doPlayerSetStorageValue(cid, 04421001, getPlayerStorageValue(cid, 04421001) == -1 and 1 or -1)

        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Voce "..check.." o auto loot.")

    elseif t[1] == "gold" then

        local check = getPlayerStorageValue(cid, 04421011) == -1 and "ligou" or "desligou"

        doPlayerSetStorageValue(cid, 04421011, getPlayerStorageValue(cid, 04421011) == -1 and 1 or -1)

        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Voce "..check.." a coleta de dinheiro.")

        doPlayerSetStorageValue(cid, 04421021, 0)

    elseif t[1] == "goldinfo" then

        local str = getPlayerStorageValue(cid, 04421011) == -1 and "O sistema de coleta de dinheiro esta desligado" or "O sistema ja coletou "..getPlayerStorageZero(cid, 04421021).." gold coins"

        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, str)

    elseif t[1] == "add" then

        if ExistItemByName(t[2]) then

            local item = getItemIdByName(t[2])

            if isInArray({2160, 2148, 2152, 2157, 9971}, item) then

                return doPlayerSendCancel(cid, "Voce nao pode adicionar moedas no autoloot. Para coletar dinheiro use !autoloot gold")

            end

            else

                if getPlayerStorageValue(cid, 04420011) < 1 then

                    if addToList(cid, t[2]) then

                        doPlayerSetStorageValue(cid, 04420011, getPlayerStorageValue(cid, 04420011) + 1)

                        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, t[2].." adicionado à sua lista do auto loot! Para ver sua lista diga !autoloot")

                    else

                        doPlayerSendCancel(cid, t[2].." ja esta em sua lista!")

                    end

                else

                    doPlayerSendCancel(cid, "Sua lista ja tem 2 itens! Voce deve remover algum antes de adicionar outro.")

                end

            end

        else

            doPlayerSendCancel(cid, "Este item nao existe!")

        end

    elseif t[1] == "remove" then

        if ExistItemByName(t[2]) then

            if removeFromList(cid, t[2]) then

                doPlayerSetStorageValue(cid, 04420011, getPlayerStorageValue(cid, 04420011) - 1)

                doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, t[2].." removido da sua lista do auto loot!")

            else

                doPlayerSendCancel(cid, "Este item nao esta na sua lista!")

            end

        else

            doPlayerSendCancel(cid, "Este item nao existe!")

        end

    elseif t[1] == "clear" then

        if getPlayerStorageValue(cid, 04420011) > -1 then

            doPlayerSetStorageValue(cid, 04420011, -1)

            doPlayerSetStorageValue(cid, 04420021, -1)

            doPlayerSetStorageValue(cid, 04420031, -1)

            doPlayerSetStorageValue(cid, 04420041, -1)

            doPlayerSetStorageValue(cid, 04420051, -1)

            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Lista limpa!")

        else

            doPlayerSendCancel(cid, "Sua lista ja esta limpa!")

        end

    elseif t[1] == "desbug" or t[1] == "desbugar" then

        doPlayerSetStorageValue(cid, 04420011, -1)

        doPlayerSetStorageValue(cid, 04420021, -1)

        doPlayerSetStorageValue(cid, 04420031, -1)

        doPlayerSetStorageValue(cid, 04420041, -1)

        doPlayerSetStorageValue(cid, 04420051, -1)

        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Desbugado!")

    elseif t[1] == "list" then

        local fi = getPlayerStorageValue(cid, 04420021) ~= -1 and ""..getItemNameById(getPlayerStorageValue(cid, 04420021)).."\n" or ""

        local se = getPlayerStorageValue(cid, 04420031) ~= -1 and ""..getItemNameById(getPlayerStorageValue(cid, 04420031)).."\n" or ""

        local th = getPlayerStorageValue(cid, 04420041) ~= -1 and ""..getItemNameById(getPlayerStorageValue(cid, 04420041)).."\n" or ""

        local fo = getPlayerStorageValue(cid, 04420051) ~= -1 and ""..getItemNameById(getPlayerStorageValue(cid, 04420051)).."\n" or ""

        doPlayerPopupFYI(cid, "O sistema auto loot esta coletando:\n "..fi..""..se..""..th..""..fo)

    end

    if(not checkExhausted(cid, 6667, 5)) then

        return true

    end        

    return true

end

 

 

Opa, pelo que estou vendo aqui alguém editou este script porém tem uma função que nunca vi no caso a função "AND" geralmente é usado "END".

Tente trocar todos os "AND" por "END".

Não tem nada a ver com "AND", mas sim, uma função que está aberta e que deveria ser fechada na linha 60 (expected (to close 'function' at line 60) near 'elseif'). Provavelmente algum erro de digitação, porém n tem como ver aqui, pq n ta em spoiler.

 

6 minutos atrás, Toruk disse:

Não tem nada a ver com "AND", mas sim, uma função que está aberta e que deveria ser fechada na linha 60 (expected (to close 'function' at line 60) near 'elseif'). Provavelmente algum erro de digitação, porém n tem como ver aqui, pq n ta em spoiler.

 

Sim consegui arruma aqui, era so fechar com end haha vlw