BrunooMaciell

Agosto 22, 2020

Estou com um BUG no autoloot.

BUG

[21/08/2020 23:13:54] [Error - Action Interface] 
[21/08/2020 23:13:54] data/actions/scripts/Autoloot.lua:onUse
[21/08/2020 23:13:54] Description: 
[21/08/2020 23:13:54] data/actions/scripts/Autoloot.lua:11: attempt to perform arithmetic on a boolean value
[21/08/2020 23:13:54] stack traceback:
[21/08/2020 23:13:54] 	data/actions/scripts/Autoloot.lua:11: in function <data/actions/scripts/Autoloot.lua:5>

SCRIPT

local toloot = {11441, 11442, 11443, 11444, 11445, 11446, 11447, 11448, 11449,11450, 11451, 11452, 11453, 11454, 12618, 12232, 12244} -- PREFERENCIAL - SE QUISER APENAS COM ALGUNS ITENS


local useSpecific = false --True para lotear somente os itens que estiverem na tabela toloot, false para todos os itens do corpse
function onUse(cid, item, frompos, item2, topos)
if getItemAttribute(item.uid, "corpseowner") ~= cid then
doPlayerSendCancel(cid, "Você não é o proprietário.")
return true
end
local items = {}
for x = (getContainerSize(item.uid) - 1), 0, -1 do
local k = getContainerItem(item.uid, x)
table.insert(items, {i=k.itemid, q=k.type})
doRemoveItem(k.uid)
end
if #items == nil then
return false
end
for y=1, #items do
doPlayerAddItemStacking(cid, items[y].i, items[y].q)
doPlayerSendTextMessage(cid, 20, "Looted "..items[y].q.."x "..getItemNameById(items[y].i)..".")
end
return true
end
--[[
AUTO LOOT BY GABRIEL SALES
SE QUISER ATIVAR O AUTOLOOT APENAS PARA ALGUNS ITENS, ADICIONE OS IDS NA TABELA toloot E TIRE OS COMENTÁRIOS(--).
--]]

Rep++

Agosto 21, 2020

37 minutos atrás, Yan18 disse:

Então cara, é estranho, porque olhei o revive em bases diferentes e todas usa o mesmo script de revive, que é o mesmo que o seu. Tem que ver se você não mexeu na tabela global pokeballs.

pse ta bem estranho tipo ultra ball com pokemon se da revive nele transforma em normal ball.

E pra min o bug tava na script agora nao sei kkkkkkkkkkk

Agosto 19, 2020

22 minutos atrás, Yan18 disse:

Qual é a base do seu servidor? É PDA ou DXP?

PDA

Agosto 18, 2020

Estou tendo um BUG no Revive.

Tipo ele funciona normal nao gera ERRO no EXE do server.

Porem em game ele da um BUG.

Tipo: vc captura um pokemon com uma ultra ball aii caso vc use revive nele a ultra ball nele vira uma normal ball.

Queria deixa certo.

Tipo: uso revive em um pokemon capturado com ultra ball ele continua ultra ball normal.

SCRIPT

function onUse(cid, item, frompos, item2, topos)

    -- if getPlayerStorageValue(cid, 990) >= 1 then
        -- doPlayerSendCancel(cid, "You can't use revive during gym battles.")
    -- return true
    -- end
    
    -- if getPlayerStorageValue(cid, 52481) >= 1 then
       -- return doPlayerSendCancel(cid, "You can't do that while a duel.") --alterado v1.6
    -- end
	
	    if getPlayerStorageValue(cid, 17000) >= 1 then
       return doPlayerSendCancel(cid, "Nao pode usar revive enquanto esta no Fly") --alterado v1.6
    end
	
		    if getPlayerStorageValue(cid, 17001) >= 1 then
       return doPlayerSendCancel(cid, "Nao pode usar revive enquanto esta no Ride") --alterado v1.6
    end
			    if getPlayerStorageValue(cid, 63215) >= 1 then
       return doPlayerSendCancel(cid, "Nao pode usar revive enquanto esta no Surf") --alterado v1.6
    end
                 --
    if item2.itemid <= 0 or not isPokeball(item2.itemid) then
        doPlayerSendCancel(cid, "Please, use revive only on pokeballs.")
    return true
    end

    for a, b in pairs (pokeballs) do
      if #getCreatureSummons(cid) <= 0 then
	  

           doTransformItem(item2.uid, b.on)
           doSetItemAttribute(item2.uid, "hp", 1)
           for c = 1, 15 do
               local str = "move"..c
               setCD(item2.uid, str, 0)
           end
           setCD(item2.uid, "control", 0)
           setCD(item2.uid, "blink", 0)  --alterado v1.6
           doSendMagicEffect(getThingPos(cid), 13)
           doRemoveItem(item.uid, 1)
           doCureBallStatus(getPlayerSlotItem(cid, 8).uid, "all")
           doCureStatus(cid, "all", true)
           cleanBuffs2(item2.uid)             --alterado v1.5
           return true
        end
    end

return true
end

Rep+++

Agosto 15, 2020

24 minutos atrás, Poccnn disse:


local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end
function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end
function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end
function onThink() npcHandler:onThink() end
local talkState = {}
local _,_,itemName = nil,nil,''

local function getCount(str) --[[( Marcryzius )]]
	return tonumber(str:match('(%d+)')) or 0
end

local function tradeSay(str) --[[( Marcryzius )]]--
local tab,str = {},str:lower()
	tab[1] = str:match('sell') or str:match('buy') or ''  -- Retorna se vai comprar ou vender.
	tab[2] = getCount(str) < 1 and 1 or getCount(str) -- Retorna a quantidade.
	tab[3] = str:match(tab[1]..(str:match('(%d+)') and "%s%d+%s" or " ").."(.+)") -- Retorna o nome do item.
	if not(tab[3])then 
	local name = ''
		for nome in str:gmatch("(%a+)") do
			if(nome)then
				name = name..(name ~= '' and ' ' or '')..nome
			end
		end
		tab[3] = name
	end
	return unpack(tab)
end

local function getTabNames(tab) --[[( Marcryzius )]]--
-- Essa função retornar o valor dos index de uma tabela.
local str = {}
	for t,v in pairs(tab) do
		if v then
			str[#str+1] = t
		end
	end
	return table.concat(str,', ')..'.'
end

------------------- Configuração dos Itens -----------------------
local bonuscoin = 5984548
local tab = {
	--[nome] = {qte=quantidade de bonus coin,ID=ID dos Itens}
	["pokeball"] = {qte=10,ID=12683},
	["greatball"] = {qte=12,ID=12682},
	["superball"] = {qte=15,ID=12684},
	["facebook"] = {qte=20,ID=12681},
	["holding"] = {qte=25,ID=2365},
	["love teddy"] = {qte=30,ID=15600},
	["dogs house"] = {qte=40,ID=23828},
	["music box"] = {qte=50,ID=17069},
}

function creatureSayCallback(cid, type, msg)
if(not npcHandler:isFocused(cid)) then return false end
local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
local _,_,prod = tradeSay(msg)

------------------- MESSAGES INICIAIS ----------------------------------------
	if(tab[prod])then
		itemName = prod
		selfSay('Deseja comprar um {'..getItemNameById(tab[itemName].ID)..'} Por '..(tab[itemName].qte)..' online points?', cid)
		selfSay('Para saber quantos pontos possui digite {!opshop}.', cid)
		talkState[talkUser] = 1
	elseif (msgcontains(msg, 'negociar') or msgcontains(msg, 'trade')) then
		selfSay('No momento tenho disponivel em meu estoque os seguintes itens: '..getTabNames(tab), cid)
		talkState[talkUser] = 0
---------------------- NEGOCIAÇÃO -------------------------------
	elseif talkState[talkUser] == 1 then
		if (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) then
			if getPlayerStorageValue(cid, bonuscoin) >= tab[itemName].qte then
				setPlayerStorageValue(cid, bonuscoin, getPlayerStorageValue(cid, bonuscoin) - tab[itemName].qte)
				doPlayerAddItem(cid, tab[itemName].ID, 1)
				selfSay('Parabéns, voce acabou de adquirir 1x '..getItemNameById(tab[itemName].ID)..'!', cid)
				doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Agora voce tem: " .. getPlayerStorageValue(cid,bonuscoin) .. " Online Bonus.")
			else
				selfSay('Voce precisa de '..(tab[itemName].qte)..' online bonus para adquirir esse item.', cid)
			end
		else
			selfSay('Morra! FDP!', cid)		
		end
		talkState[talkUser] = 0	
	else
		npcHandler:say('Foda-se! nao sei o que tu quer.', cid)
	end
	return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

Foi vlw demais mano vlw mesmo ^^

Agosto 14, 2020

8 minutos atrás, Poccnn disse:

substitua essa linha do código:

por essa:

Deu este BUG

[14/08/2020 12:56:11] [Error - Npc interface]
[14/08/2020 12:56:11] data/npc/scripts/trade/Lucy.lua:onCreatureSay
[14/08/2020 12:56:11] Description:
[14/08/2020 12:56:11] data/npc/scripts/trade/Lucy.lua:71: attempt to index global 'talkState' (a nil value)
[14/08/2020 12:56:11] stack traceback:
[14/08/2020 12:56:11]    data/npc/scripts/trade/Lucy.lua:71: in function 'callback'
[14/08/2020 12:56:11]    data/npc/lib/npcsystem/npchandler.lua:391: in function 'onCreatureSay'
[14/08/2020 12:56:11]    data/npc/scripts/trade/Lucy.lua:6: in function <data/npc/scripts/trade/Lucy.lua:6>

Agosto 14, 2020

15 minutos atrás, Poccnn disse:


function onSay(cid, words, param)
if(getPlayerPremiumDays(cid) <= 0)then return true,doPlayerSendCancel(cid, 'Need premium.')end
	
	if exhaustion.get(cid, 501) then
		doPlayerSendCancel(cid, 'Você precisa espera 10 segundos para usar novamente.')
	elseif getPlayerStorageValue(cid, 32001) == 1 or getPlayerStorageValue(cid, 17000) == 1 or getPlayerStorageValue(cid, 17001) == 1 then
		doPlayerSendCancel(cid, "Você não pode usar bike e correr ao mesmo tempo")
		return false
	elseif isCreature(cid) then
		doCreatureSay(cid, "correr", TALKTYPE_ORANGE_1)
		setPlayerStorageValue(cid, 19000, 1)
		doChangeSpeed(cid, 1 * 5000)
		doSendMagicEffect(getPlayerPosition(cid), 1)
		exhaustion.set(cid, 501, 10)
		addEvent(function()
			setPlayerStorageValue(cid, 19000, 0)
			doRegainSpeed(cid)
		end, 15000) -- Tempo que vai durar a talkaction
	end
	return true
end


local minutes = 15 -- Minutos

function onSay(cid, words, param)
if(getPlayerPremiumDays(cid) <= 0)then return true,doPlayerSendCancel(cid, 'Need premium.')end
	doSetCreatureLight(cid, 50000, 2000, minutes*60*1000)
	doSendAnimatedText(getCreaturePosition(cid), "Luz", math.random(1, 255))
	return true
end

Foi vlw ^^

Agosto 14, 2020

17 minutos atrás, Poccnn disse:


local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end
function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end
function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end
function onThink() npcHandler:onThink() end
local _,_,itemName = nil,nil,''

local function getCount(str) --[[( Marcryzius )]]
	return tonumber(str:match('(%d+)')) or 0
end

local function tradeSay(str) --[[( Marcryzius )]]--
local tab,str = {},str:lower()
	tab[1] = str:match('sell') or str:match('buy') or ''  -- Retorna se vai comprar ou vender.
	tab[2] = getCount(str) < 1 and 1 or getCount(str) -- Retorna a quantidade.
	tab[3] = str:match(tab[1]..(str:match('(%d+)') and "%s%d+%s" or " ").."(.+)") -- Retorna o nome do item.
	if not(tab[3])then 
	local name = ''
		for nome in str:gmatch("(%a+)") do
			if(nome)then
				name = name..(name ~= '' and ' ' or '')..nome
			end
		end
		tab[3] = name
	end
	return unpack(tab)
end

local function getTabNames(tab) --[[( Marcryzius )]]--
-- Essa função retornar o valor dos index de uma tabela.
local str = {}
	for t,v in pairs(tab) do
		if v then
			str[#str+1] = t
		end
	end
	return table.concat(str,', ')..'.'
end

------------------- Configuração dos Itens -----------------------
local bonuscoin = 5984548
local tab = {
	--[nome] = {qte=quantidade de bonus coin,ID=ID dos Itens}
	["pokeball"] = {qte=10,ID=12683},
	["greatball"] = {qte=12,ID=12682},
	["superball"] = {qte=15,ID=12684},
	["facebook"] = {qte=20,ID=12681},
	["holding"] = {qte=25,ID=2365},
	["love teddy"] = {qte=30,ID=15600},
	["dogs house"] = {qte=40,ID=23828},
	["music box"] = {qte=50,ID=17069},
}

function creatureSayCallback(cid, type, msg)
if(not npcHandler:isFocused(cid)) then return false end
local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
local _,_,prod = tradeSay(msg)

------------------- MESSAGES INICIAIS ----------------------------------------
	if(tab[prod])then
		itemName = prod
		selfSay('Deseja comprar um {'..getItemNameById(tab[itemName].ID)..'} Por '..(tab[itemName].qte)..' online points?', cid)
		selfSay('Para saber quantos pontos possui digite {!opshop}.', cid)
		talkState[talkUser] = 1
	elseif (msgcontains(msg, 'negociar') or msgcontains(msg, 'trade')) then
		selfSay('No momento tenho disponivel em meu estoque os seguintes itens: '..getTabNames(tab), cid)
		talkState[talkUser] = 0
---------------------- NEGOCIAÇÃO -------------------------------
	elseif talkState[talkUser] == 1 then
		if (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) then
			if getPlayerStorageValue(cid, bonuscoin) >= tab[itemName].qte then
				setPlayerStorageValue(cid, bonuscoin, getPlayerStorageValue(cid, bonuscoin) - tab[itemName].qte)
				doPlayerAddItem(cid, tab[itemName].ID, 1)
				selfSay('Parabéns, voce acabou de adquirir 1x '..getItemNameById(tab[itemName].ID)..'!', cid)
				doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Agora voce tem: " .. getPlayerStorageValue(cid,bonuscoin) .. " Online Bonus.")
			else
				selfSay('Voce precisa de '..(tab[itemName].qte..' online bonus para adquirir esse item.', cid)
			end
		else
			selfSay('Morra! FDP!', cid)		
		end
		talkState[talkUser] = 0	
	else
		npcHandler:say('Foda-se! nao sei o que tu quer.', cid)
	end
	return true
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

Deu este BUG

[14/08/2020 12:38:24] [Warning - NpcScript::NpcScript] Cannot load script: data/npc/scripts/trade/Lucy.lua
[14/08/2020 12:38:24] data/npc/scripts/trade/Lucy.lua:79: ')' expected near ','
[14/08/2020 12:38:26] [Error - LuaScriptInterface::loadFile] data/npc/scripts/trade/Lucy.lua:79: ')' expected near ','
[14/08/2020 12:38:26] [Warning - NpcScript::NpcScript] Cannot load script: data/npc/scripts/trade/Lucy.lua
[14/08/2020 12:38:26] data/npc/scripts/trade/Lucy.lua:79: ')' expected near ','

Agosto 14, 2020

Eu queria por 2 comandos pra so premium account pode usar.

Comando CORRER

function onSay(cid, words, param)
if exhaustion.get(cid, 501) then
doPlayerSendCancel(cid, 'Você precisa espera 10 segundos para usar novamente.')
return true
end 

if getPlayerStorageValue(cid, 32001) == 1 then
        doPlayerSendCancel(cid, "Você não pode usar bike e correr ao mesmo tempo")
		return false
		end
		
		if getPlayerStorageValue(cid, 17000) == 1 then
        doPlayerSendCancel(cid, "Você não pode usar bike e correr ao mesmo tempo")
		return false
		end
		
		if getPlayerStorageValue(cid, 17001) == 1 then
        doPlayerSendCancel(cid, "Você não pode usar bike e correr ao mesmo tempo")
		return false
		end


if isCreature(cid) then
doCreatureSay(cid, "correr", TALKTYPE_ORANGE_1)
setPlayerStorageValue(cid, 19000, 1)
doChangeSpeed(cid, 1 * 5000)
doSendMagicEffect(getPlayerPosition(cid), 1)
exhaustion.set(cid, 501, 10)
addEvent(function()
setPlayerStorageValue(cid, 19000, 0)
doRegainSpeed(cid)
end, 15000) -- Tempo que vai durar a talkaction
return true
end
end

Comando LUZ

local minutes = 15 -- Minutos
 
function onSay(cid, words, param)
if isPlayer(cid) then
doSetCreatureLight(cid, 50000, 2000, minutes*60*1000)
doSendAnimatedText(getCreaturePosition(cid), "Luz", math.random(1, 255))
end
return true
end

REP+++

Agosto 14, 2020

9 horas atrás, Poccnn disse:

na tabela items só existem 8 elementos.
na linha 65, existe uma concatenação de dados que está buscando, na tabela "items", mais de 8 elementos; mais precisamente, estou citando isso aqui:

Para solucionar isso, tu pode remover essas duas menções excedentes ou formular uma função que pegue os dados de forma automática da tabela.

Entao amigo.

Eu nao entendi foi nada kkkkkkkkkkkkk se tu puder arruma pra min pois nao entendi nada kkkkkkk

Bom este BUG ele sempre da quando vo fala com NPC so de FALA com NPC ele ja BUGA ele ja da isso

Agosto 12, 2020

1 hora atrás, Yan18 disse:

O erro acontece quando o player tenta comprar qualquer backpack?

sim

Agosto 11, 2020

9 minutos atrás, Yan18 disse:


local pos = {x=1411, y=1287, z=5}
local need_lv = 300

function onUse(cid, item, frompos, item2, topos)
if isPremium(cid) then
    if getPlayerLevel(cid) >= need_lv then
        doTeleportThing(cid, pos)
        doSendMagicEffect(pos, CONST_ME_TELEPORT)
	return true
	
    else
        return doPlayerSendCancel(cid, "Você precisa ser level "..need_lv.." para passar por esta porta.")
    end
        
else
    doPlayerSendCancel(cid, "Você precisa ser level "..need_lv.." para passar por esta porta.")
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você precisa ser premium account para passar por esta porta.")
    doTeleportThing(cid, frompos)
return true	
end
 
end

Foii vlw ?

Agosto 11, 2020

Eu queria por a funçao premium account nesta script.

Tipo ela e uma script de door so level 300+ pode passar so que queria por que o cara o player tem que ser premium account tbem

SCRIPT

function onUse(cid, item, frompos, item2, topos)
 
local pos = {x=1411, y=1287, z=5}
local need_lv = 300
 
    if getPlayerLevel(cid) >= need_lv then
        doTeleportThing(cid, pos)
        doSendMagicEffect(pos, CONST_ME_TELEPORT)
    else
        return doPlayerSendCancel(cid, "Você precisa ser level "..need_lv.." para passar por esta porta.")
    end
    return 1
end

Rep+++

Agosto 9, 2020

Estou com um BUG em um NPC relacionado a online point.

BUG

[09/08/2020 11:35:29] [Error - Npc interface] 
[09/08/2020 11:35:29] data/npc/scripts/trade/Lucy.lua:onCreatureSay
[09/08/2020 11:35:29] Description: 
[09/08/2020 11:35:29] data/lib/050-function.lua:227: attempt to index a boolean value
[09/08/2020 11:35:29] stack traceback:
[09/08/2020 11:35:29] 	data/lib/050-function.lua:227: in function 'getItemNameById'
[09/08/2020 11:35:29] 	data/npc/scripts/trade/Lucy.lua:65: in function 'callback'
[09/08/2020 11:35:29] 	data/npc/lib/npcsystem/npchandler.lua:391: in function 'onCreatureSay'
[09/08/2020 11:35:29] 	data/npc/scripts/trade/Lucy.lua:8: in function <data/npc/scripts/trade/Lucy.lua:8>

SCRIPT

local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
local talkState = {}

function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end
function onCreatureDisappear(cid)            npcHandler:onCreatureDisappear(cid)            end
function onCreatureSay(cid, type, msg)            npcHandler:onCreatureSay(cid, type, msg)        end
function onThink()                    npcHandler:onThink()                    end

function creatureSayCallback(cid, type, msg)
if(not npcHandler:isFocused(cid)) then
return false
end

local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
------------------- Configuração dos Itens -----------------------

local items = {12683, 12682, 12684, 12681, 2365, 15600, 23828, 17069} -- ID dos Itens
local nome = {'pokeball backpack', 'greatball backpack', 'superball backpack', 'facebook backpack', 'backpack of holding', 'love teddy', 'dogs house', 'music box'}


------------------- MESSAGES INICIAIS ----------------------------------------
if msgcontains(msg, nome[1]) then
selfSay('Deseja comprar 1x {'..getItemNameById(items[1])..'} Por 10 online points?', cid)
selfSay('Para saber quantos pontos possui digite {!opshop}.', cid)
talkState[talkUser] = 1

elseif msgcontains(msg, nome[2]) then
selfSay('Deseja comprar um {'..getItemNameById(items[2])..'} Por 12 online points?', cid)
selfSay('Para saber quantos pontos possui digite {!opshop}.', cid)
talkState[talkUser] = 2

elseif msgcontains(msg, nome[3]) then
selfSay('Deseja comprar um {'..getItemNameById(items[3])..'} Por 15 online points?', cid)
selfSay('Para saber quantos pontos possui digite {!opshop}.', cid)
talkState[talkUser] = 3

elseif msgcontains(msg, nome[4]) then
selfSay('Deseja comprar um {'..getItemNameById(items[5])..'} Por 20 online points?', cid)
selfSay('Para saber quantos pontos possui digite {!opshop}.', cid)
talkState[talkUser] = 4

elseif msgcontains(msg, nome[5]) then
selfSay('Deseja comprar um {'..getItemNameById(items[6])..'} Por 25 online points?', cid)
selfSay('Para saber quantos pontos possui digite {!opshop}.', cid)
talkState[talkUser] = 5

elseif msgcontains(msg, nome[6]) then
selfSay('Deseja comprar um {'..getItemNameById(items[7])..'} Por 30 online points?', cid)
selfSay('Para saber quantos pontos possui digite {!opshop}.', cid)
talkState[talkUser] = 6

elseif msgcontains(msg, nome[7]) then
selfSay('Deseja comprar um {'..getItemNameById(items[8])..'} Por 40 online points?', cid)
selfSay('Para saber quantos pontos possui digite {!opshop}.', cid)
talkState[talkUser] = 7

elseif msgcontains(msg, nome[8]) then
selfSay('Deseja comprar um {'..getItemNameById(items[9])..'} Por 50 online points?', cid)
selfSay('Para saber quantos pontos possui digite {!opshop}.', cid)
talkState[talkUser] = 8

elseif (msgcontains(msg, 'negociar') or msgcontains(msg, 'trade')) then
selfSay('No momento tenho disponivel em meu estoque os seguintes itens: {'..getItemNameById(items[1])..'}, {'..getItemNameById(items[2])..'}, {'..getItemNameById(items[3])..'}, {'..getItemNameById(items[4])..'}, {'..getItemNameById(items[5])..'}, {'..getItemNameById(items[6])..'}, {'..getItemNameById(items[7])..'}, {'..getItemNameById(items[8])..'}, {'..getItemNameById(items[9])..'} e {'..getItemNameById(items[10])..'}.', cid)
talkState[talkUser] = 0

---------------------- NEGOCIAÇÃO -------------------------------

elseif talkState[talkUser] == 1 then
if (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) then
local qnt = 10
local bonuscoin = 5984548
    if getPlayerStorageValue(cid, bonuscoin) >= qnt then
        setPlayerStorageValue(cid, bonuscoin, getPlayerStorageValue(cid, bonuscoin) - qnt)
        doPlayerAddItem(cid, items[1], 1)
        selfSay('Parabéns, voce acabou de adquirir 1x '..getItemNameById(items[1])..'!', cid)
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Agora voce tem: " .. getPlayerStorageValue(cid,5984548) .. " Online Bonus.")
    else
        selfSay('Voce precisa de 10 online bonus para adquirir esse item.', cid)
     talkState[talkUser] = 0
    end
end

elseif talkState[talkUser] == 2 then
if (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) then
local qnt = 12
local bonuscoin = 5984548
    if getPlayerStorageValue(cid, bonuscoin) >= qnt then
        setPlayerStorageValue(cid, bonuscoin, getPlayerStorageValue(cid, bonuscoin) - qnt)
        doPlayerAddItem(cid, items[2], 1)
        selfSay('Parabens, voce acaba de adquirir um '..getItemNameById(items[2])..'.', cid)
    else
        selfSay('Voce precisa de 13 online bonus para adquirir esse item.', cid)
    talkState[talkUser] = 0
    end
end

elseif talkState[talkUser] == 3 then
if (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) then
local bonuscoin = 5984548
local qnt = 15
    if getPlayerStorageValue(cid, bonuscoin) >= qnt then
        setPlayerStorageValue(cid, bonuscoin, getPlayerStorageValue(cid, bonuscoin) - qnt)
        doPlayerAddItem(cid, items[3], 1)
        selfSay('Parabens, voce acaba de adquirir um '..getItemNameById(items[3])..'.', cid)
    else
        selfSay('Voce precisa de 15 online bonus para adquirir esse item.', cid)
    talkState[talkUser] = 0
    end
end

elseif talkState[talkUser] == 4 then
if (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) then
if getPlayerStorageValue(cid, 5984548) >= 20 then
        setPlayerStorageValue(cid, 5984548, getPlayerStorageValue(cid, 5984548) - 10)
        doPlayerAddItem(cid, items[5], 1)
        selfSay('Parabens, voce acaba de adquirir um '..getItemNameById(items[5])..'.', cid)
    else
        selfSay('Voce precisa de 20 online bonus para adquirir esse item.', cid)
    talkState[talkUser] = 0
    end
end

elseif talkState[talkUser] == 5 then
if (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) then
if getPlayerStorageValue(cid, 5984548) >= 25 then
        setPlayerStorageValue(cid, 5984548, getPlayerStorageValue(cid, 5984548) - 10)
        doPlayerAddItem(cid, items[6], 1)
        selfSay('Parabens, voce acaba de adquirir um '..getItemNameById(items[6])..'.', cid)
    else
        selfSay('Voce precisa de 30 online bonus para adquirir esse item.', cid)
    talkState[talkUser] = 0
    end
end

elseif talkState[talkUser] == 6 then
if (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) then
if getPlayerStorageValue(cid, 5984548) >= 30 then
        setPlayerStorageValue(cid, 5984548, getPlayerStorageValue(cid, 5984548) - 10)
        doPlayerAddItem(cid, items[7], 1)
        selfSay('Parabens, voce acaba de adquirir um '..getItemNameById(items[7])..'.', cid)
    else
        selfSay('Voce precisa de 35 online bonus para adquirir esse item.', cid)
    talkState[talkUser] = 0
    end
end

elseif talkState[talkUser] == 7 then
if (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) then
if getPlayerStorageValue(cid, 5984548) >= 40 then
        setPlayerStorageValue(cid, 5984548, getPlayerStorageValue(cid, 5984548) - 10)
        doPlayerAddItem(cid, items[8], 1)
        selfSay('Parabens, voce acaba de adquirir um '..getItemNameById(items[8])..'.', cid)
    else
        selfSay('Voce precisa de 40 online bonus para adquirir esse item.', cid)
    talkState[talkUser] = 0
    end
end

elseif talkState[talkUser] == 8 then
if (msgcontains(msg, 'sim') or msgcontains(msg, 'yes')) then
if getPlayerStorageValue(cid, 5984548) >= 50 then
        setPlayerStorageValue(cid, 5984548, getPlayerStorageValue(cid, 5984548) - 10)
        doPlayerAddItem(cid, items[9], 1)
        selfSay('Parabens, voce acaba de adquirir um '..getItemNameById(items[9])..'.', cid)
    else
        selfSay('Voce precisa de 45 online bonus para adquirir esse item.', cid)
    talkState[talkUser] = 0
    end
end

end
return true
end

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

OBS: Caso precise de mais alguma script so fala que posto ^^

REP+++

Agosto 9, 2020

43 minutos atrás, lSainty disse:


function onSay(cid, words, param)

local typess = {
[1] = "normal",
[2] = "great",
[3] = "super",
[4] = "ultra"
}

if param == "" then
doPlayerSendCancel(cid, 'Command needs parameters, function structure: "/cb [Pokemon Name], [boost], [Gender]".')
return 0
end

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

local name = ""
local gender = 0
local btype = pokeballs["ultra"].on                --"normal"
local typeee = typess[math.random(1, 4)]

if t[1] then
	local n = string.explode(t[1], " ")
	local str = string.sub(n[1], 1, 1)
	local sta = string.sub(n[1], 2, string.len(n[1]))
	name = ""..string.upper(str)..""..string.lower(sta)..""
	if n[2] then
	str = string.sub(n[2], 1, 1)
	sta = string.sub(n[2], 2, string.len(n[2]))
	name = name.." "..string.upper(str)..""..string.lower(sta)..""
	end
	if not pokes[name] then
	doPlayerSendCancel(cid, "Sorry, a pokemon with the name "..name.." doesn't exists.")
	return true
	end
print(""..name.." ball has been created by "..getPlayerName(cid)..".")
end

local genders = {
["male"] = 4,
["female"] = 3,
["1"] = 4,
["0"] = 3}

if t[3] then
	if genders[t[3]] then
		gender = genders[t[3]]
	else
	local rate = newpokedex[name].gender
		if rate == 0 then
			gender = 3
		elseif rate == 1000 then
			gender = 4
		elseif rate == -1 then
			gender = 0
		elseif math.random(1, 1000) <= rate then
			gender = 4
		else
			gender = 3
		end
	end
	else
	local rate = newpokedex[name].gender
		if rate == 0 then
			gender = 3
		elseif rate == 1000 then
			gender = 4
		elseif rate == -1 then
			gender = 0
		elseif math.random(1, 1000) <= rate then
			gender = 4
		else
			gender = 3
		end
end

local mypoke = pokes[name]
local happy = 255

local item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", name)
doItemSetAttribute(item, "hp", 1)
if t[2] and tonumber(t[2]) > 0 and tonumber(t[2]) <= 50 then
   doItemSetAttribute(item, "boost", tonumber(t[2]))
end
doItemSetAttribute(item, "happy", happy)
doItemSetAttribute(item, "gender", gender)
if name == "Shiny Hitmonchan" or name == "Hitmonchan" then
   doItemSetAttribute(item, "hands", 0)
end
doItemSetAttribute(item, "description", "Contains a "..name..".")


doItemSetAttribute(item, "addon", 0)
doItemSetAttribute(item, "fakedesc", "Contains a "..name..".")
	    doPlayerAddItemEx(cid, item, true)		
		doItemSetAttribute(item, "ball", "Icone")
		doItemSetAttribute(item, "icon", "yes")
		doItemSetAttribute(item, "morta", "no")
	    doTransformItem(item, btype)		
return 1
end

Deu certo ^^

vlw ?

Agosto 9, 2020

32 minutos atrás, Deadpool disse:

erro meu ^^

Ocultar conteúdo



function onSay(cid, words, param)

if param == "" then
doPlayerSendCancel(cid, 'Command needs parameters, function structure: "/cb [Pokemon Name], [boost], [Gender]".')
return 0
end

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

local name = ""
local gender = 0
local btype = "ultra"              
local typeee = "ultra" 

if t[1] then
	local n = string.explode(t[1], " ")
	local str = string.sub(n[1], 1, 1)
	local sta = string.sub(n[1], 2, string.len(n[1]))
	name = ""..string.upper(str)..""..string.lower(sta)..""
	if n[2] then
	str = string.sub(n[2], 1, 1)
	sta = string.sub(n[2], 2, string.len(n[2]))
	name = name.." "..string.upper(str)..""..string.lower(sta)..""
	end
	if not pokes[name] then
	doPlayerSendCancel(cid, "Sorry, a pokemon with the name "..name.." doesn't exists.")
	return true
	end
print(""..name.." ball has been created by "..getPlayerName(cid)..".")
end

local genders = {
["male"] = 4,
["female"] = 3,
["1"] = 4,
["0"] = 3}

if t[3] then
	if genders[t[3]] then
		gender = genders[t[3]]
	else
	local rate = newpokedex[name].gender
		if rate == 0 then
			gender = 3
		elseif rate == 1000 then
			gender = 4
		elseif rate == -1 then
			gender = 0
		elseif math.random(1, 1000) <= rate then
			gender = 4
		else
			gender = 3
		end
	end
	else
	local rate = newpokedex[name].gender
		if rate == 0 then
			gender = 3
		elseif rate == 1000 then
			gender = 4
		elseif rate == -1 then
			gender = 0
		elseif math.random(1, 1000) <= rate then
			gender = 4
		else
			gender = 3
		end
end

local mypoke = pokes[name]
local happy = 255

local item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", name)
doItemSetAttribute(item, "hp", 1)
if t[2] and tonumber(t[2]) > 0 and tonumber(t[2]) <= 50 then
   doItemSetAttribute(item, "boost", tonumber(t[2]))
end
doItemSetAttribute(item, "happy", happy)
doItemSetAttribute(item, "gender", gender)
if name == "Shiny Hitmonchan" or name == "Hitmonchan" then
   doItemSetAttribute(item, "hands", 0)
end
doItemSetAttribute(item, "description", "Contains a "..name..".")


doItemSetAttribute(item, "addon", 0)
doItemSetAttribute(item, "fakedesc", "Contains a "..name..".")
local x = icons[getItemAttribute(item, "poke")]
	    doPlayerAddItemEx(cid, item, true)		
		doItemSetAttribute(item, "ball", "Icone")
		doItemSetAttribute(item, "icon", "yes")
		doItemSetAttribute(item, "morta", "no")
	    doTransformItem(item, x.on)		
return 1
end

Nao funcionou =/

Nao deu ERRO nem nada porem quando crio ou uso o /cb ele cria com poke ball normal =/

Agosto 8, 2020

32 minutos atrás, Deadpool disse:

aqui esta.. mas pelo que vi aqui, usa icone, então nem vai mudar nada..


function onSay(cid, words, param)

if param == "" then
doPlayerSendCancel(cid, 'Command needs parameters, function structure: "/cb [Pokemon Name], [boost], [Gender]".')
return 0
end

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

local name = ""
local gender = 0
local btype = "ultra"                --"normal"
local typeee = typess[math.random(1, 4)]

if t[1] then
	local n = string.explode(t[1], " ")
	local str = string.sub(n[1], 1, 1)
	local sta = string.sub(n[1], 2, string.len(n[1]))
	name = ""..string.upper(str)..""..string.lower(sta)..""
	if n[2] then
	str = string.sub(n[2], 1, 1)
	sta = string.sub(n[2], 2, string.len(n[2]))
	name = name.." "..string.upper(str)..""..string.lower(sta)..""
	end
	if not pokes[name] then
	doPlayerSendCancel(cid, "Sorry, a pokemon with the name "..name.." doesn't exists.")
	return true
	end
print(""..name.." ball has been created by "..getPlayerName(cid)..".")
end

local genders = {
["male"] = 4,
["female"] = 3,
["1"] = 4,
["0"] = 3}

if t[3] then
	if genders[t[3]] then
		gender = genders[t[3]]
	else
	local rate = newpokedex[name].gender
		if rate == 0 then
			gender = 3
		elseif rate == 1000 then
			gender = 4
		elseif rate == -1 then
			gender = 0
		elseif math.random(1, 1000) <= rate then
			gender = 4
		else
			gender = 3
		end
	end
	else
	local rate = newpokedex[name].gender
		if rate == 0 then
			gender = 3
		elseif rate == 1000 then
			gender = 4
		elseif rate == -1 then
			gender = 0
		elseif math.random(1, 1000) <= rate then
			gender = 4
		else
			gender = 3
		end
end

local mypoke = pokes[name]
local happy = 255

local item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", name)
doItemSetAttribute(item, "hp", 1)
if t[2] and tonumber(t[2]) > 0 and tonumber(t[2]) <= 50 then
   doItemSetAttribute(item, "boost", tonumber(t[2]))
end
doItemSetAttribute(item, "happy", happy)
doItemSetAttribute(item, "gender", gender)
if name == "Shiny Hitmonchan" or name == "Hitmonchan" then
   doItemSetAttribute(item, "hands", 0)
end
doItemSetAttribute(item, "description", "Contains a "..name..".")


doItemSetAttribute(item, "addon", 0)
doItemSetAttribute(item, "fakedesc", "Contains a "..name..".")
local x = icons[getItemAttribute(item, "poke")]
	    doPlayerAddItemEx(cid, item, true)		
		doItemSetAttribute(item, "ball", "Icone")
		doItemSetAttribute(item, "icon", "yes")
		doItemSetAttribute(item, "morta", "no")
	    doTransformItem(item, x.on)		
return 1
end

ue nao uso nao aqui ta sem icone ta normal kkkkkkkkkkkk

mas vo testa sua script

Deu Este BUG @Deadpool

[08/08/2020 17:55:22] [Error - TalkAction Interface] 
[08/08/2020 17:55:22] data/talkactions/scripts/createpokeball.lua:onSay
[08/08/2020 17:55:22] Description: 
[08/08/2020 17:55:22] data/talkactions/scripts/createpokeball.lua:13: attempt to index global 'typess' (a nil value)
[08/08/2020 17:55:22] stack traceback:
[08/08/2020 17:55:22] 	data/talkactions/scripts/createpokeball.lua:13: in function <data/talkactions/scripts/createpokeball.lua:1>

Agosto 8, 2020

Eu queria deixa o comando >> /cb quando o ADM usa-lo pra cria o pokemon dentro da ball que a ball vinha so de ultra ball.

Tipo: /cb charizard

Ai vinha um charizard dentro de uma ultra ball

Quando o ADM ou STAFF que seja usar o comando ela so vinha com pokemons dentro de ultra ball

Rep++

SCRIPT >> /CB

function onSay(cid, words, param)

local typess = {
[1] = "normal",
[2] = "great",
[3] = "super",
[4] = "ultra"
}

if param == "" then
doPlayerSendCancel(cid, 'Command needs parameters, function structure: "/cb [Pokemon Name], [boost], [Gender]".')
return 0
end

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

local name = ""
local gender = 0
local btype = typess[math.random(1, 4)]                --"normal"
local typeee = typess[math.random(1, 4)]

if t[1] then
	local n = string.explode(t[1], " ")
	local str = string.sub(n[1], 1, 1)
	local sta = string.sub(n[1], 2, string.len(n[1]))
	name = ""..string.upper(str)..""..string.lower(sta)..""
	if n[2] then
	str = string.sub(n[2], 1, 1)
	sta = string.sub(n[2], 2, string.len(n[2]))
	name = name.." "..string.upper(str)..""..string.lower(sta)..""
	end
	if not pokes[name] then
	doPlayerSendCancel(cid, "Sorry, a pokemon with the name "..name.." doesn't exists.")
	return true
	end
print(""..name.." ball has been created by "..getPlayerName(cid)..".")
end

local genders = {
["male"] = 4,
["female"] = 3,
["1"] = 4,
["0"] = 3}

if t[3] then
	if genders[t[3]] then
		gender = genders[t[3]]
	else
	local rate = newpokedex[name].gender
		if rate == 0 then
			gender = 3
		elseif rate == 1000 then
			gender = 4
		elseif rate == -1 then
			gender = 0
		elseif math.random(1, 1000) <= rate then
			gender = 4
		else
			gender = 3
		end
	end
	else
	local rate = newpokedex[name].gender
		if rate == 0 then
			gender = 3
		elseif rate == 1000 then
			gender = 4
		elseif rate == -1 then
			gender = 0
		elseif math.random(1, 1000) <= rate then
			gender = 4
		else
			gender = 3
		end
end

local mypoke = pokes[name]
local happy = 255

local item = doCreateItemEx(2219)
doItemSetAttribute(item, "poke", name)
doItemSetAttribute(item, "hp", 1)
if t[2] and tonumber(t[2]) > 0 and tonumber(t[2]) <= 50 then
   doItemSetAttribute(item, "boost", tonumber(t[2]))
end
doItemSetAttribute(item, "happy", happy)
doItemSetAttribute(item, "gender", gender)
if name == "Shiny Hitmonchan" or name == "Hitmonchan" then
   doItemSetAttribute(item, "hands", 0)
end
doItemSetAttribute(item, "description", "Contains a "..name..".")


doItemSetAttribute(item, "addon", 0)
doItemSetAttribute(item, "fakedesc", "Contains a "..name..".")
local x = icons[getItemAttribute(item, "poke")]
	    doPlayerAddItemEx(cid, item, true)		
		doItemSetAttribute(item, "ball", "Icone")
		doItemSetAttribute(item, "icon", "yes")
		doItemSetAttribute(item, "morta", "no")
	    doTransformItem(item, x.on)		
return 1
end

Rep+++

Agosto 5, 2020

17 minutos atrás, Yan18 disse:

Vamos testar sem eventos, pode ser algum evento.

Substitui o código por esse:


local config = {
    loginMessage = getConfigValue('loginMessage'),
    useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

--alterado v2.6 tabelas soh em lib/configuration.lua;

local looktype_accountmanager = 352 -- LOOKTYPE DO ACCOUNT MANAGER
local storage_online_points = 5984548 -- STORAGE QUE ARMAZENA PONTOS ONLINE

function onLogin(cid)

	doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'Bem Vindo Ao Pokemon Venetta Server')
	
----------------------------------------------------------- ACCOUNT MANAGER -----------------------------------------------------------
    local accountManager = getPlayerAccountManager(cid)

    if(accountManager == MANAGER_NONE) then
        local lastLogin = getPlayerLastLoginSaved(cid)
		local str = config.loginMessage
		
        if(lastLogin > 0) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
            str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
        end
        
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

    elseif(accountManager == MANAGER_NAMELOCK) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Ola, parece que voce teve seu nome bloqueado (nameblock), escolha outro nome.")
	
	elseif(accountManager == MANAGER_ACCOUNT) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
    
    else	
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
    end

    if getCreatureName(cid) == "Account Manager" then
        local outfit = {}
		
        if accountManagerRandomPokemonOutfit then
            outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}
        else
            outfit = {lookType = looktype_accountmanager} -- OUTFIT QUE O ACCOUNT MANAGER TEM SE NÃO FOR OUTFIT DE POKÉMON RANDOM
        end
    
        doSetCreatureOutfit(cid, outfit, -1)
    return true
    end
	
---------------------------------------------------------------------------------------------------------------------------------------

	------------------ EVENTOS ------------------
	  --registerCreatureEvent(cid, "hmup")
	  --registerCreatureEvent(cid, "PlayerAttack")
      --registerCreatureEvent(cid, "dropStone") 
      --registerCreatureEvent(cid, "OnAdvanced")
	  --registerCreatureEvent(cid, "vipexp")
      --registerCreatureEvent(cid, "ShowPokedex") 
      --registerCreatureEvent(cid, "ClosePokedex")
      --registerCreatureEvent(cid, "WatchTv")
	  --registerCreatureEvent(cid, "DropShiny")
      --registerCreatureEvent(cid, "StopWatchingTv")
      --registerCreatureEvent(cid, "WalkTv")
      --registerCreatureEvent(cid, "RecordTv")
      --registerCreatureEvent(cid, "Death")
      --registerCreatureEvent(cid, "PlayerLogout")
      --registerCreatureEvent(cid, "WildAttack")
      --registerCreatureEvent(cid, "Idle")
      --registerCreatureEvent(cid, "PokemonIdle")
      --registerCreatureEvent(cid, "EffectOnAdvance")
      --registerCreatureEvent(cid, "reward")
      --registerCreatureEvent(cid, "GeneralConfiguration")
      --registerCreatureEvent(cid, "ExtendedOpcode")
      --registerCreatureEvent(cid, "ReportBug")
      --registerCreatureEvent(cid, "LookSystem")
      --registerCreatureEvent(cid, "T1")
      --registerCreatureEvent(cid, "T2")
      --registerCreatureEvent(cid, "ll1")
      --registerCreatureEvent(cid, "task_count")
      --registerCreatureEvent(cid, "effectdeath")
      --registerCreatureEvent(cid, "dota")
      --registerCreatureEvent(cid, "atk")
      --registerCreatureEvent(cid, "balance")
	  --registerCreatureEvent(cid, "BlockHit")
	  --registerCreatureEvent(cid, "Ataque")
	  --registerCreatureEvent(cid, "NlooT")
	  --registerCreatureEvent(cid, "KillTask")
	  --registerCreatureEvent(cid, "KillTaske")
	  --registerCreatureEvent(cid, "KillTask3")
	  --registerCreatureEvent(cid, "KillTask4")
	  --registerCreatureEvent(cid, "PlayerDeath")
	  --registerCreatureEvent(cid, "PetKill")
	  --registerCreatureEvent(cid, "onlinebonus")
	  --registerCreatureEvent(cid, "AtLoot")
	  --registerCreatureEvent(cid, "Monster Hunterl")
	  --registerCreatureEvent(cid, "Monster Hunter")
	  
	
    doCreatureSetDropLoot(cid, false)
	  
      doRegainSpeed(cid)
      
		  
	if getCreatureName(cid) ~= "Account Manager" then -- O "ACCOUNT MANAGER" É EXCEÇÃO.
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "(Online Points) Voce Possui " ..getPlayerStorageValue(cid, storage_online_points).. " Online Points Armazenados Em Seu Personagem. Digite !opshop A Qualquer Momento Para Saber Quantos Online Points Voce Possui.")
	end	  
	

	if getPlayerStorageValue(cid, 17000) >= 1 then
	setPlayerStorageValue(cid, 17000, 0)
	doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false) 
	sendMsgToPlayer(cid, 20, "Voce Deslogou No Fly E Foi Teleportado Para O CP Por Questoes De Seguranca.")    
	return true
	end

	setPlayerStorageValue(cid, 17001, 0) --ride
	setPlayerStorageValue(cid, 92003, 0) --water robotic
	setPlayerStorageValue(cid, 92002, 0) --fire robotic
	setPlayerStorageValue(cid, 92001, 0) --water robotic
	setPlayerStorageValue(cid, 32001, 0) --bike 


	

	if getPlayerStorageValue(cid, storage_online_points) < 0 then
		setPlayerStorageValue(cid, storage_online_points, 0)
	return true end
	

-- SE AS QUANTIDADES DE FUSION HELDS POINTS FOREM MENOR QUE 0, SETA AS QUANTIDADES DE FUSION HELDS POINTS PARA 0
	if getPlayerStorageValue(cid, 1234601) < 0 then
		setPlayerStorageValue(cid, 1234601, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234602) < 0 then
		setPlayerStorageValue(cid, 1234602, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234603) < 0 then
		setPlayerStorageValue(cid, 1234603, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234604) < 0 then
		setPlayerStorageValue(cid, 1234604, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234605) < 0 then
		setPlayerStorageValue(cid, 1234605, 0)
	return true end
	
	
    if getPlayerStorageValue(cid, 1234606) < 0 then
		setPlayerStorageValue(cid, 1234606, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234607) < 0 then
		setPlayerStorageValue(cid, 1234607, 0)
	return true end
	

    if(not isPlayerGhost(cid)) then
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
    end
	
	doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 25)
	
	doUpdatePokemonsBar(cid)

    local outfit = {}

    if getPlayerVocation(cid) == 0 then
        doPlayerSetMaxCapacity(cid, 7)
        doPlayerSetVocation(cid, 1)
        setCreatureMaxMana(cid, 6)
        doPlayerAddSoul(cid, -getPlayerSoul(cid))
        setPlayerStorageValue(cid, 19898, 0)
            if getCreatureOutfit(cid).lookType == 510 then
                outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            elseif getCreatureOutfit(cid).lookType == 511 then
                outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            end
        doCreatureChangeOutfit(cid, outfit)
    end	  
	  
    if getPlayerStorageValue(cid, 99284) == 1 then
        setPlayerStorageValue(cid, 99284, -1)
    end

    if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then
       setPlayerStorageValue(cid, 6598754, -1)
       setPlayerStorageValue(cid, 6598755, -1)
       doRemoveCondition(cid, CONDITION_OUTFIT)             --alterado v2.9 \/
       doTeleportThing(cid, posBackPVP, false)
       doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
    end
    
    doChangeSpeed(cid, -(getCreatureSpeed(cid)))
    
    --///////////////////////////////////////////////////////////////////////////--
    -- local storages = {17000, 63215, 17001, 13008, 5700}
    -- for s = 1, #storages do
        -- if not tonumber(getPlayerStorageValue(cid, storages)) then
           -- if s == 3 then
              -- setPlayerStorageValue(cid, storages, 1)
           -- elseif s == 4 then
              -- setPlayerStorageValue(cid, storages, -1)
           -- else   
              -- if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then
                 -- setPlayerStorageValue(cid, storages, 1)                 --alterado v2.6
              -- else
                 -- setPlayerStorageValue(cid, storages, -1) 
              -- end
           -- end
           -- doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")
        -- end
    -- end
    --/////////////////////////////////////////////////////////////////////////--
       
    if getPlayerStorageValue(cid, 17000) >= 1 then -- fly
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        doRemoveCondition(cid, CONDITION_OUTFIT)
                local addonfly = getPlayerSlotItem(cid, 8).uid
                local addofly = getItemAttribute(addonfly,"addonfly")
                if not addofly then
                                doSetItemAttribute(addonfly,"addonfly",0) 
                                        doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)

                end
                if addofly > 0 then
                               doSetCreatureOutfit(cid, {lookType = addofly}, -1)

                end

    local apos = getFlyingMarkedPos(cid)
    apos.stackpos = 0
        
            if getTileThingByPos(apos).itemid <= 2 then
                doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)
                doCreateItem(460, 1, getFlyingMarkedPos(cid))
            end 

    doTeleportThing(cid, apos, false) 
    if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
       sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
    end  
 
    local posicao = getTownTemplePosition(getPlayerTown(cid))
    markFlyingPos(cid, posicao)
    
    elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf

        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
                     local addonsurf = getPlayerSlotItem(cid, 8).uid
                local addosurf = getItemAttribute(addonsurf,"addonsurf")
                if not addosurf then
                                doSetItemAttribute(addonsurf,"addonsurf",0) 
        doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1)

                end
                if addosurf > 0 then
                                doSetCreatureOutfit(cid, {lookType = addosurf}, -1)

                end    
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
           sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
        end 

    elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        
        
        if rides[poke] then
           doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
           doRemoveCondition(cid, CONDITION_OUTFIT)
                     local addonride = getPlayerSlotItem(cid, 8).uid
                local addoride = getItemAttribute(addonride,"addonride")
                if not addofly then
                                doSetItemAttribute(addonride,"addonride",0) 
           doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1)

                end
                if addoride > 0 then
                                doSetCreatureOutfit(cid, {lookType = addoride}, -1)

                end
           if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
              sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
           end 
        else
        end
		
    
        local posicao2 = getTownTemplePosition(getPlayerTown(cid))
        markFlyingPos(cid, posicao2)
        
    elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive
       if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then
            setPlayerStorageValue(cid, 13008, 0)
            doRemoveCondition(cid, CONDITION_OUTFIT)
        return true
        end   
          
       if getPlayerSex(cid) == 1 then
          doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       else
          doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       end
       doChangeSpeed(cid, 800)

     elseif getPlayerStorageValue(cid, 5700) > 0 then   --bike
        doChangeSpeed(cid, -getCreatureSpeed(cid))
        doChangeSpeed(cid, getPlayerStorageValue(cid, 5700))  --alterado v2.8
        if getPlayerSex(cid) == 1 then
           doSetCreatureOutfit(cid, {lookType = 1394}, -1)
        else
           doSetCreatureOutfit(cid, {lookType = 1393}, -1)
        end
    elseif getPlayerStorageValue(cid, 75846) >= 1 then     --alterado v2.9 \/
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false)  
        setPlayerStorageValue(cid, 75846, -1)
        sendMsgToPlayer(cid, 20, "You have been moved to your town!")    
     else
        doRegainSpeed(cid)  --alterado v2.6
     end
    
    if getPlayerStorageValue(cid, 22545) >= 1 then   --golden arena
       setPlayerStorageValue(cid, 22545, -1)              --alterado v2.4
       doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)
       setPlayerRecordWaves(cid)     --alterado v2.7 
    end
	
	-- local CP = {x=1056, y=1049, z=7}
	
	-- if getPlayerStorageValue(cid, 17000) >= 1 then
-- setPlayerStorageValue(cid, 17000, 0)
       -- doTeleportThing(cid, CP)

-- end
    
    return true
end

Testei deu bug aquele bug da barra de pokemons que aparece no lado e as mensagens continuo =/

Agosto 5, 2020

56 minutos atrás, Yan18 disse:

Vamos descobrir esse problema ^^, testa esse script:


local config = {
    loginMessage = getConfigValue('loginMessage'),
    useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

--alterado v2.6 tabelas soh em lib/configuration.lua;

local looktype_accountmanager = 352 -- LOOKTYPE DO ACCOUNT MANAGER
local storage_online_points = 5984548 -- STORAGE QUE ARMAZENA PONTOS ONLINE

function onLogin(cid)

	doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'Bem Vindo Ao Pokemon Venetta Server')
	
----------------------------------------------------------- ACCOUNT MANAGER -----------------------------------------------------------
    local accountManager = getPlayerAccountManager(cid)

    if(accountManager == MANAGER_NONE) then
        local lastLogin = getPlayerLastLoginSaved(cid)
		local str = config.loginMessage
		
        if(lastLogin > 0) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
            str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
        end
        
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

    elseif(accountManager == MANAGER_NAMELOCK) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Ola, parece que voce teve seu nome bloqueado (nameblock), escolha outro nome.")
	
	elseif(accountManager == MANAGER_ACCOUNT) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
    
    else	
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
    end

    if getCreatureName(cid) == "Account Manager" then
        local outfit = {}
		
        if accountManagerRandomPokemonOutfit then
            outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}
        else
            outfit = {lookType = looktype_accountmanager} -- OUTFIT QUE O ACCOUNT MANAGER TEM SE NÃO FOR OUTFIT DE POKÉMON RANDOM
        end
    
        doSetCreatureOutfit(cid, outfit, -1)
    return true
    end
	
---------------------------------------------------------------------------------------------------------------------------------------

	------------------ EVENTOS ------------------
	  registerCreatureEvent(cid, "hmup")
	  registerCreatureEvent(cid, "PlayerAttack")
      registerCreatureEvent(cid, "dropStone") 
      registerCreatureEvent(cid, "OnAdvanced")
	  registerCreatureEvent(cid, "vipexp")
      registerCreatureEvent(cid, "ShowPokedex") 
      registerCreatureEvent(cid, "ClosePokedex")
      registerCreatureEvent(cid, "WatchTv")
	  registerCreatureEvent(cid, "DropShiny")
      registerCreatureEvent(cid, "StopWatchingTv")
      registerCreatureEvent(cid, "WalkTv")
      registerCreatureEvent(cid, "RecordTv")
      registerCreatureEvent(cid, "Death")
      registerCreatureEvent(cid, "PlayerLogout")
      registerCreatureEvent(cid, "WildAttack")
      registerCreatureEvent(cid, "Idle")
      registerCreatureEvent(cid, "PokemonIdle")
      registerCreatureEvent(cid, "EffectOnAdvance")
      registerCreatureEvent(cid, "reward")
      registerCreatureEvent(cid, "GeneralConfiguration")
      registerCreatureEvent(cid, "ExtendedOpcode")
      registerCreatureEvent(cid, "ReportBug")
      registerCreatureEvent(cid, "LookSystem")
      registerCreatureEvent(cid, "T1")
      registerCreatureEvent(cid, "T2")
      registerCreatureEvent(cid, "ll1")
      registerCreatureEvent(cid, "task_count")
      registerCreatureEvent(cid, "effectdeath")
      registerCreatureEvent(cid, "dota")
      registerCreatureEvent(cid, "atk")
      registerCreatureEvent(cid, "balance")
	  registerCreatureEvent(cid, "BlockHit")
	  registerCreatureEvent(cid, "Ataque")
	  registerCreatureEvent(cid, "NlooT")
	  registerCreatureEvent(cid, "KillTask")
	  registerCreatureEvent(cid, "KillTaske")
	  registerCreatureEvent(cid, "KillTask3")
	  registerCreatureEvent(cid, "KillTask4")
	  registerCreatureEvent(cid, "PlayerDeath")
	  registerCreatureEvent(cid, "PetKill")
	  registerCreatureEvent(cid, "onlinebonus")
	  registerCreatureEvent(cid, "AtLoot")
	  registerCreatureEvent(cid, "Monster Hunterl")
	  registerCreatureEvent(cid, "Monster Hunter")
	  
	
    doCreatureSetDropLoot(cid, false)
	  
      doRegainSpeed(cid)
      
		  
	if getCreatureName(cid) ~= "Account Manager" then -- O "ACCOUNT MANAGER" É EXCEÇÃO.
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "(Online Points) Voce Possui " ..getPlayerStorageValue(cid, storage_online_points).. " Online Points Armazenados Em Seu Personagem. Digite !opshop A Qualquer Momento Para Saber Quantos Online Points Voce Possui.")
	end	  
	

	if getPlayerStorageValue(cid, 17000) >= 1 then
	setPlayerStorageValue(cid, 17000, 0)
	doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false) 
	sendMsgToPlayer(cid, 20, "Voce Deslogou No Fly E Foi Teleportado Para O CP Por Questoes De Seguranca.")    
	return true
	end

	setPlayerStorageValue(cid, 17001, 0) --ride
	setPlayerStorageValue(cid, 92003, 0) --water robotic
	setPlayerStorageValue(cid, 92002, 0) --fire robotic
	setPlayerStorageValue(cid, 92001, 0) --water robotic
	setPlayerStorageValue(cid, 32001, 0) --bike 


	

	if getPlayerStorageValue(cid, storage_online_points) < 0 then
		setPlayerStorageValue(cid, storage_online_points, 0)
	return true end
	

-- SE AS QUANTIDADES DE FUSION HELDS POINTS FOREM MENOR QUE 0, SETA AS QUANTIDADES DE FUSION HELDS POINTS PARA 0
	if getPlayerStorageValue(cid, 1234601) < 0 then
		setPlayerStorageValue(cid, 1234601, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234602) < 0 then
		setPlayerStorageValue(cid, 1234602, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234603) < 0 then
		setPlayerStorageValue(cid, 1234603, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234604) < 0 then
		setPlayerStorageValue(cid, 1234604, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234605) < 0 then
		setPlayerStorageValue(cid, 1234605, 0)
	return true end
	
	
    if getPlayerStorageValue(cid, 1234606) < 0 then
		setPlayerStorageValue(cid, 1234606, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234607) < 0 then
		setPlayerStorageValue(cid, 1234607, 0)
	return true end
	

    if(not isPlayerGhost(cid)) then
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
    end
	
	doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 25)
	
	doUpdatePokemonsBar(cid)

    local outfit = {}

    if getPlayerVocation(cid) == 0 then
        doPlayerSetMaxCapacity(cid, 7)
        doPlayerSetVocation(cid, 1)
        setCreatureMaxMana(cid, 6)
        doPlayerAddSoul(cid, -getPlayerSoul(cid))
        setPlayerStorageValue(cid, 19898, 0)
            if getCreatureOutfit(cid).lookType == 510 then
                outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            elseif getCreatureOutfit(cid).lookType == 511 then
                outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            end
        doCreatureChangeOutfit(cid, outfit)
    end	  
	  
    if getPlayerStorageValue(cid, 99284) == 1 then
        setPlayerStorageValue(cid, 99284, -1)
    end

    if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then
       setPlayerStorageValue(cid, 6598754, -1)
       setPlayerStorageValue(cid, 6598755, -1)
       doRemoveCondition(cid, CONDITION_OUTFIT)             --alterado v2.9 \/
       doTeleportThing(cid, posBackPVP, false)
       doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
    end
    
    doChangeSpeed(cid, -(getCreatureSpeed(cid)))
    
    --///////////////////////////////////////////////////////////////////////////--
    -- local storages = {17000, 63215, 17001, 13008, 5700}
    -- for s = 1, #storages do
        -- if not tonumber(getPlayerStorageValue(cid, storages)) then
           -- if s == 3 then
              -- setPlayerStorageValue(cid, storages, 1)
           -- elseif s == 4 then
              -- setPlayerStorageValue(cid, storages, -1)
           -- else   
              -- if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then
                 -- setPlayerStorageValue(cid, storages, 1)                 --alterado v2.6
              -- else
                 -- setPlayerStorageValue(cid, storages, -1) 
              -- end
           -- end
           -- doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")
        -- end
    -- end
    --/////////////////////////////////////////////////////////////////////////--
       
    if getPlayerStorageValue(cid, 17000) >= 1 then -- fly
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        doRemoveCondition(cid, CONDITION_OUTFIT)
                local addonfly = getPlayerSlotItem(cid, 8).uid
                local addofly = getItemAttribute(addonfly,"addonfly")
                if not addofly then
                                doSetItemAttribute(addonfly,"addonfly",0) 
                                        doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)

                end
                if addofly > 0 then
                               doSetCreatureOutfit(cid, {lookType = addofly}, -1)

                end

    local apos = getFlyingMarkedPos(cid)
    apos.stackpos = 0
        
            if getTileThingByPos(apos).itemid <= 2 then
                doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)
                doCreateItem(460, 1, getFlyingMarkedPos(cid))
            end 

    doTeleportThing(cid, apos, false) 
    if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
       sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
    end  
 
    local posicao = getTownTemplePosition(getPlayerTown(cid))
    markFlyingPos(cid, posicao)
    
    elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf

        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
                     local addonsurf = getPlayerSlotItem(cid, 8).uid
                local addosurf = getItemAttribute(addonsurf,"addonsurf")
                if not addosurf then
                                doSetItemAttribute(addonsurf,"addonsurf",0) 
        doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1)

                end
                if addosurf > 0 then
                                doSetCreatureOutfit(cid, {lookType = addosurf}, -1)

                end    
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
           sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
        end 

    elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        
        
        if rides[poke] then
           doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
           doRemoveCondition(cid, CONDITION_OUTFIT)
                     local addonride = getPlayerSlotItem(cid, 8).uid
                local addoride = getItemAttribute(addonride,"addonride")
                if not addofly then
                                doSetItemAttribute(addonride,"addonride",0) 
           doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1)

                end
                if addoride > 0 then
                                doSetCreatureOutfit(cid, {lookType = addoride}, -1)

                end
           if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
              sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
           end 
        else
        end
		
    
        local posicao2 = getTownTemplePosition(getPlayerTown(cid))
        markFlyingPos(cid, posicao2)
        
    elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive
       if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then
            setPlayerStorageValue(cid, 13008, 0)
            doRemoveCondition(cid, CONDITION_OUTFIT)
        return true
        end   
          
       if getPlayerSex(cid) == 1 then
          doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       else
          doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       end
       doChangeSpeed(cid, 800)

     elseif getPlayerStorageValue(cid, 5700) > 0 then   --bike
        doChangeSpeed(cid, -getCreatureSpeed(cid))
        doChangeSpeed(cid, getPlayerStorageValue(cid, 5700))  --alterado v2.8
        if getPlayerSex(cid) == 1 then
           doSetCreatureOutfit(cid, {lookType = 1394}, -1)
        else
           doSetCreatureOutfit(cid, {lookType = 1393}, -1)
        end
    elseif getPlayerStorageValue(cid, 75846) >= 1 then     --alterado v2.9 \/
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false)  
        setPlayerStorageValue(cid, 75846, -1)
        sendMsgToPlayer(cid, 20, "You have been moved to your town!")    
     else
        doRegainSpeed(cid)  --alterado v2.6
     end
    
    if getPlayerStorageValue(cid, 22545) >= 1 then   --golden arena
       setPlayerStorageValue(cid, 22545, -1)              --alterado v2.4
       doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)
       setPlayerRecordWaves(cid)     --alterado v2.7 
    end
	
	-- local CP = {x=1056, y=1049, z=7}
	
	-- if getPlayerStorageValue(cid, 17000) >= 1 then
-- setPlayerStorageValue(cid, 17000, 0)
       -- doTeleportThing(cid, CP)

-- end
    
    return true
end

Mesma coisa =/

Agosto 5, 2020

15 minutos atrás, Yan18 disse:

Que bom que deu certo sobre o looktype ?. Sobre as mensagens, provavelmente é algum evento, pois, você deixou para os eventos serem a primeira coisa a ser carregados, e não é o ideal.

Testa assim:


local config = {
    loginMessage = getConfigValue('loginMessage'),
    useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

--alterado v2.6 tabelas soh em lib/configuration.lua;

local looktype_accountmanager = 352 -- LOOKTYPE DO ACCOUNT MANAGER
local storage_online_points = 5984548 -- STORAGE QUE ARMAZENA PONTOS ONLINE

function onLogin(cid)

	doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'Bem Vindo Ao Pokemon Venetta Server')
	
	doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 25)
    doCreatureSetDropLoot(cid, false)
	
----------------------------------------------------------- ACCOUNT MANAGER -----------------------------------------------------------
    local accountManager = getPlayerAccountManager(cid)

    if(accountManager == MANAGER_NONE) then
        local lastLogin = getPlayerLastLoginSaved(cid)
		local str = config.loginMessage
		
        if(lastLogin > 0) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
            str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
        end
        
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

    elseif(accountManager == MANAGER_NAMELOCK) then
	    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Ola, parece que voce teve seu nome bloqueado (nameblock), escolha outro nome.")
	
    elseif(accountManager == MANAGER_ACCOUNT) then
	    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
    
    else	
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
    end

    if getCreatureName(cid) == "Account Manager" then
        local outfit = {}
		
        if accountManagerRandomPokemonOutfit then
            outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}
        else
            outfit = {lookType = looktype_accountmanager} -- OUTFIT QUE O ACCOUNT MANAGER TEM SE NÃO FOR OUTFIT DE POKÉMON RANDOM
        end
    
        doSetCreatureOutfit(cid, outfit, -1)
    return true
    end
	
---------------------------------------------------------------------------------------------------------------------------------------

	------------------ EVENTOS ------------------
	  registerCreatureEvent(cid, "hmup")
	  registerCreatureEvent(cid, "PlayerAttack")
      registerCreatureEvent(cid, "dropStone") 
      registerCreatureEvent(cid, "OnAdvanced")
	  registerCreatureEvent(cid, "vipexp")
      registerCreatureEvent(cid, "ShowPokedex") 
      registerCreatureEvent(cid, "ClosePokedex")
      registerCreatureEvent(cid, "WatchTv")
	  registerCreatureEvent(cid, "DropShiny")
      registerCreatureEvent(cid, "StopWatchingTv")
      registerCreatureEvent(cid, "WalkTv")
      registerCreatureEvent(cid, "RecordTv")
      registerCreatureEvent(cid, "Death")
      registerCreatureEvent(cid, "PlayerLogout")
      registerCreatureEvent(cid, "WildAttack")
      registerCreatureEvent(cid, "Idle")
      registerCreatureEvent(cid, "PokemonIdle")
      registerCreatureEvent(cid, "EffectOnAdvance")
      registerCreatureEvent(cid, "reward")
      registerCreatureEvent(cid, "GeneralConfiguration")
      registerCreatureEvent(cid, "ExtendedOpcode")
      registerCreatureEvent(cid, "ReportBug")
      registerCreatureEvent(cid, "LookSystem")
      registerCreatureEvent(cid, "T1")
      registerCreatureEvent(cid, "T2")
      registerCreatureEvent(cid, "ll1")
      registerCreatureEvent(cid, "task_count")
      registerCreatureEvent(cid, "effectdeath")
      registerCreatureEvent(cid, "dota")
      registerCreatureEvent(cid, "atk")
      registerCreatureEvent(cid, "balance")
	  registerCreatureEvent(cid, "BlockHit")
	  registerCreatureEvent(cid, "Ataque")
	  registerCreatureEvent(cid, "NlooT")
	  registerCreatureEvent(cid, "KillTask")
	  registerCreatureEvent(cid, "KillTaske")
	  registerCreatureEvent(cid, "KillTask3")
	  registerCreatureEvent(cid, "KillTask4")
	  registerCreatureEvent(cid, "PlayerDeath")
	  registerCreatureEvent(cid, "PetKill")
	  registerCreatureEvent(cid, "onlinebonus")
	  registerCreatureEvent(cid, "AtLoot")
	  registerCreatureEvent(cid, "Monster Hunterl")
	  registerCreatureEvent(cid, "Monster Hunter")
	  
	  
	  
      doRegainSpeed(cid)
      doUpdatePokemonsBar(cid)
		  
	if getCreatureName(cid) ~= "Account Manager" then -- O "ACCOUNT MANAGER" É EXCEÇÃO.
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "(Online Points) Voce Possui " ..getPlayerStorageValue(cid, storage_online_points).. " Online Points Armazenados Em Seu Personagem. Digite !opshop A Qualquer Momento Para Saber Quantos Online Points Voce Possui.")
	end	  
	

	if getPlayerStorageValue(cid, 17000) >= 1 then
	setPlayerStorageValue(cid, 17000, 0)
	doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false) 
	sendMsgToPlayer(cid, 20, "Voce Deslogou No Fly E Foi Teleportado Para O CP Por Questoes De Seguranca.")    
	return true
	end

	setPlayerStorageValue(cid, 17001, 0) --ride
	setPlayerStorageValue(cid, 92003, 0) --water robotic
	setPlayerStorageValue(cid, 92002, 0) --fire robotic
	setPlayerStorageValue(cid, 92001, 0) --water robotic
	setPlayerStorageValue(cid, 32001, 0) --bike 


	

	if getPlayerStorageValue(cid, storage_online_points) < 0 then
		setPlayerStorageValue(cid, storage_online_points, 0)
	return true end
	

-- SE AS QUANTIDADES DE FUSION HELDS POINTS FOREM MENOR QUE 0, SETA AS QUANTIDADES DE FUSION HELDS POINTS PARA 0
	if getPlayerStorageValue(cid, 1234601) < 0 then
		setPlayerStorageValue(cid, 1234601, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234602) < 0 then
		setPlayerStorageValue(cid, 1234602, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234603) < 0 then
		setPlayerStorageValue(cid, 1234603, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234604) < 0 then
		setPlayerStorageValue(cid, 1234604, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234605) < 0 then
		setPlayerStorageValue(cid, 1234605, 0)
	return true end
	
	
    if getPlayerStorageValue(cid, 1234606) < 0 then
		setPlayerStorageValue(cid, 1234606, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234607) < 0 then
		setPlayerStorageValue(cid, 1234607, 0)
	return true end
	

    if(not isPlayerGhost(cid)) then
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
    end

    local outfit = {}

    if getPlayerVocation(cid) == 0 then
        doPlayerSetMaxCapacity(cid, 7)
        doPlayerSetVocation(cid, 1)
        setCreatureMaxMana(cid, 6)
        doPlayerAddSoul(cid, -getPlayerSoul(cid))
        setPlayerStorageValue(cid, 19898, 0)
            if getCreatureOutfit(cid).lookType == 510 then
                outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            elseif getCreatureOutfit(cid).lookType == 511 then
                outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            end
        doCreatureChangeOutfit(cid, outfit)
    end	  
	  
    if getPlayerStorageValue(cid, 99284) == 1 then
        setPlayerStorageValue(cid, 99284, -1)
    end

    if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then
       setPlayerStorageValue(cid, 6598754, -1)
       setPlayerStorageValue(cid, 6598755, -1)
       doRemoveCondition(cid, CONDITION_OUTFIT)             --alterado v2.9 \/
       doTeleportThing(cid, posBackPVP, false)
       doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
    end
    
    doChangeSpeed(cid, -(getCreatureSpeed(cid)))
    
    --///////////////////////////////////////////////////////////////////////////--
    -- local storages = {17000, 63215, 17001, 13008, 5700}
    -- for s = 1, #storages do
        -- if not tonumber(getPlayerStorageValue(cid, storages)) then
           -- if s == 3 then
              -- setPlayerStorageValue(cid, storages, 1)
           -- elseif s == 4 then
              -- setPlayerStorageValue(cid, storages, -1)
           -- else   
              -- if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then
                 -- setPlayerStorageValue(cid, storages, 1)                 --alterado v2.6
              -- else
                 -- setPlayerStorageValue(cid, storages, -1) 
              -- end
           -- end
           -- doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")
        -- end
    -- end
    --/////////////////////////////////////////////////////////////////////////--
       
    if getPlayerStorageValue(cid, 17000) >= 1 then -- fly
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        doRemoveCondition(cid, CONDITION_OUTFIT)
                local addonfly = getPlayerSlotItem(cid, 8).uid
                local addofly = getItemAttribute(addonfly,"addonfly")
                if not addofly then
                                doSetItemAttribute(addonfly,"addonfly",0) 
                                        doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)

                end
                if addofly > 0 then
                               doSetCreatureOutfit(cid, {lookType = addofly}, -1)

                end

    local apos = getFlyingMarkedPos(cid)
    apos.stackpos = 0
        
            if getTileThingByPos(apos).itemid <= 2 then
                doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)
                doCreateItem(460, 1, getFlyingMarkedPos(cid))
            end 

    doTeleportThing(cid, apos, false) 
    if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
       sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
    end  
 
    local posicao = getTownTemplePosition(getPlayerTown(cid))
    markFlyingPos(cid, posicao)
    
    elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf

        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
                     local addonsurf = getPlayerSlotItem(cid, 8).uid
                local addosurf = getItemAttribute(addonsurf,"addonsurf")
                if not addosurf then
                                doSetItemAttribute(addonsurf,"addonsurf",0) 
        doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1)

                end
                if addosurf > 0 then
                                doSetCreatureOutfit(cid, {lookType = addosurf}, -1)

                end    
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
           sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
        end 

    elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        
        
        if rides[poke] then
           doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
           doRemoveCondition(cid, CONDITION_OUTFIT)
                     local addonride = getPlayerSlotItem(cid, 8).uid
                local addoride = getItemAttribute(addonride,"addonride")
                if not addofly then
                                doSetItemAttribute(addonride,"addonride",0) 
           doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1)

                end
                if addoride > 0 then
                                doSetCreatureOutfit(cid, {lookType = addoride}, -1)

                end
           if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
              sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
           end 
        else
        end
		
    
        local posicao2 = getTownTemplePosition(getPlayerTown(cid))
        markFlyingPos(cid, posicao2)
        
    elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive
       if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then
            setPlayerStorageValue(cid, 13008, 0)
            doRemoveCondition(cid, CONDITION_OUTFIT)
        return true
        end   
          
       if getPlayerSex(cid) == 1 then
          doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       else
          doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       end
       doChangeSpeed(cid, 800)

     elseif getPlayerStorageValue(cid, 5700) > 0 then   --bike
        doChangeSpeed(cid, -getCreatureSpeed(cid))
        doChangeSpeed(cid, getPlayerStorageValue(cid, 5700))  --alterado v2.8
        if getPlayerSex(cid) == 1 then
           doSetCreatureOutfit(cid, {lookType = 1394}, -1)
        else
           doSetCreatureOutfit(cid, {lookType = 1393}, -1)
        end
    elseif getPlayerStorageValue(cid, 75846) >= 1 then     --alterado v2.9 \/
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false)  
        setPlayerStorageValue(cid, 75846, -1)
        sendMsgToPlayer(cid, 20, "You have been moved to your town!")    
     else
        doRegainSpeed(cid)  --alterado v2.6
     end
    
    if getPlayerStorageValue(cid, 22545) >= 1 then   --golden arena
       setPlayerStorageValue(cid, 22545, -1)              --alterado v2.4
       doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)
       setPlayerRecordWaves(cid)     --alterado v2.7 
    end
	
	-- local CP = {x=1056, y=1049, z=7}
	
	-- if getPlayerStorageValue(cid, 17000) >= 1 then
-- setPlayerStorageValue(cid, 17000, 0)
       -- doTeleportThing(cid, CP)

-- end
    
    return true
end

Testa e vê se permanece as mensagens.

Bom ja este deu aquele bug de aparecer a barra de pokemons e as mensagens nao saiu kkkkkkkkk

Mas se nao souber dboa o principal ja resolveu kkkkk ^^

Agosto 5, 2020

1 hora atrás, Yan18 disse:

Eu dei uma refatorada nesse seu último código, testa e vê se funciona normal agora o looktype do account manager:


local config = {
    loginMessage = getConfigValue('loginMessage'),
    useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

--alterado v2.6 tabelas soh em lib/configuration.lua;

local looktype_accountmanager = 352 -- LOOKTYPE DO ACCOUNT MANAGER
local storage_online_points = 5984548 -- STORAGE QUE ARMAZENA PONTOS ONLINE

function onLogin(cid)
          
	  registerCreatureEvent(cid, "hmup")
	  registerCreatureEvent(cid, "PlayerAttack")
          registerCreatureEvent(cid, "dropStone") 
          registerCreatureEvent(cid, "OnAdvanced")
	  registerCreatureEvent(cid, "vipexp")
          registerCreatureEvent(cid, "ShowPokedex") 
          registerCreatureEvent(cid, "ClosePokedex")
          registerCreatureEvent(cid, "WatchTv")
	  registerCreatureEvent(cid, "DropShiny")
          registerCreatureEvent(cid, "StopWatchingTv")
          registerCreatureEvent(cid, "WalkTv")
          registerCreatureEvent(cid, "RecordTv")
          registerCreatureEvent(cid, "Death")
          registerCreatureEvent(cid, "PlayerLogout")
          registerCreatureEvent(cid, "WildAttack")
          registerCreatureEvent(cid, "Idle")
          registerCreatureEvent(cid, "PokemonIdle")
          registerCreatureEvent(cid, "EffectOnAdvance")
          registerCreatureEvent(cid, "reward")
          registerCreatureEvent(cid, "GeneralConfiguration")
          registerCreatureEvent(cid, "ExtendedOpcode")
          registerCreatureEvent(cid, "ReportBug")
          registerCreatureEvent(cid, "LookSystem")
          registerCreatureEvent(cid, "T1")
          registerCreatureEvent(cid, "T2")
          registerCreatureEvent(cid, "ll1")
          registerCreatureEvent(cid, "task_count")
          registerCreatureEvent(cid, "effectdeath")
          registerCreatureEvent(cid, "dota")
          registerCreatureEvent(cid, "atk")
          registerCreatureEvent(cid, "balance")
	  registerCreatureEvent(cid, "BlockHit")
	  registerCreatureEvent(cid, "Ataque")
	  registerCreatureEvent(cid, "NlooT")
	  registerCreatureEvent(cid, "KillTask")
	  registerCreatureEvent(cid, "KillTaske")
	  registerCreatureEvent(cid, "KillTask3")
	  registerCreatureEvent(cid, "KillTask4")
	  registerCreatureEvent(cid, "PlayerDeath")
	  registerCreatureEvent(cid, "PetKill")
	  registerCreatureEvent(cid, "onlinebonus")
	  registerCreatureEvent(cid, "AtLoot")
	  registerCreatureEvent(cid, "Monster Hunterl")
	  registerCreatureEvent(cid, "Monster Hunter")
	  
	  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'Bem Vindo Ao Pokemon Venetta Server')
	  
          doRegainSpeed(cid)
          doUpdatePokemonsBar(cid)
          doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 25)
          doCreatureSetDropLoot(cid, false)
		  
	if getCreatureName(cid) ~= "Account Manager" then -- O "ACCOUNT MANAGER" É EXCEÇÃO.
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "(Online Points) Voce Possui " ..getPlayerStorageValue(cid, storage_online_points).. " Online Points Armazenados Em Seu Personagem. Digite !opshop A Qualquer Momento Para Saber Quantos Online Points Voce Possui.")
	end	  
	
	----------------------------------------------------------- ACCOUNT MANAGER -----------------------------------------------------------
	local accountManager = getPlayerAccountManager(cid)

    if(accountManager == MANAGER_NONE) then
        local lastLogin = getPlayerLastLoginSaved(cid)
		local str = config.loginMessage
		
        if(lastLogin > 0) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
            str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
        end
        
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

        elseif(accountManager == MANAGER_NAMELOCK) then
			doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Ola, parece que voce teve seu nome bloqueado (nameblock), escolha outro nome.")
		elseif(accountManager == MANAGER_ACCOUNT) then
			doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
    
	else	
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
    end

    if getCreatureName(cid) == "Account Manager" then
        local outfit = {}
		
        if accountManagerRandomPokemonOutfit then
            outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}
        else
            outfit = {lookType = looktype_accountmanager} -- OUTFIT QUE O ACCOUNT MANAGER TEM SE NÃO FOR OUTFIT DE POKÉMON RANDOM
        end
    
        doSetCreatureOutfit(cid, outfit, -1)
    return true
    end
	
	---------------------------------------------------------------------------------------------------------------------------------------

	if getPlayerStorageValue(cid, 17000) >= 1 then
	setPlayerStorageValue(cid, 17000, 0)
	doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false) 
	sendMsgToPlayer(cid, 20, "Voce Deslogou No Fly E Foi Teleportado Para O CP Por Questoes De Seguranca.")    
	return true
	end

	setPlayerStorageValue(cid, 17001, 0) --ride
	setPlayerStorageValue(cid, 92003, 0) --water robotic
	setPlayerStorageValue(cid, 92002, 0) --fire robotic
	setPlayerStorageValue(cid, 92001, 0) --water robotic
	setPlayerStorageValue(cid, 32001, 0) --bike 


	

	if getPlayerStorageValue(cid, storage_online_points) < 0 then
    setPlayerStorageValue(cid, storage_online_points, 0)
	return true end
	

-- SE AS QUANTIDADES DE FUSION HELDS POINTS FOREM MENOR QUE 0, SETA AS QUANTIDADES DE FUSION HELDS POINTS PARA 0
	if getPlayerStorageValue(cid, 1234601) < 0 then
	setPlayerStorageValue(cid, 1234601, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234602) < 0 then
	setPlayerStorageValue(cid, 1234602, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234603) < 0 then
	setPlayerStorageValue(cid, 1234603, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234604) < 0 then
	setPlayerStorageValue(cid, 1234604, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234605) < 0 then
	setPlayerStorageValue(cid, 1234605, 0)
	return true end
	
	
    if getPlayerStorageValue(cid, 1234606) < 0 then
	setPlayerStorageValue(cid, 1234606, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234607) < 0 then
	setPlayerStorageValue(cid, 1234607, 0)
	return true end
	

    if(not isPlayerGhost(cid)) then
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
    end

    local outfit = {}

    if getPlayerVocation(cid) == 0 then
        doPlayerSetMaxCapacity(cid, 7)
        doPlayerSetVocation(cid, 1)
        setCreatureMaxMana(cid, 6)
        doPlayerAddSoul(cid, -getPlayerSoul(cid))
        setPlayerStorageValue(cid, 19898, 0)
            if getCreatureOutfit(cid).lookType == 510 then
                outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            elseif getCreatureOutfit(cid).lookType == 511 then
                outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            end
        doCreatureChangeOutfit(cid, outfit)
    end	  
	  
    if getPlayerStorageValue(cid, 99284) == 1 then
        setPlayerStorageValue(cid, 99284, -1)
    end

    if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then
       setPlayerStorageValue(cid, 6598754, -1)
       setPlayerStorageValue(cid, 6598755, -1)
       doRemoveCondition(cid, CONDITION_OUTFIT)             --alterado v2.9 \/
       doTeleportThing(cid, posBackPVP, false)
       doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
    end
    
    doChangeSpeed(cid, -(getCreatureSpeed(cid)))
    
    --///////////////////////////////////////////////////////////////////////////--
    -- local storages = {17000, 63215, 17001, 13008, 5700}
    -- for s = 1, #storages do
        -- if not tonumber(getPlayerStorageValue(cid, storages)) then
           -- if s == 3 then
              -- setPlayerStorageValue(cid, storages, 1)
           -- elseif s == 4 then
              -- setPlayerStorageValue(cid, storages, -1)
           -- else   
              -- if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then
                 -- setPlayerStorageValue(cid, storages, 1)                 --alterado v2.6
              -- else
                 -- setPlayerStorageValue(cid, storages, -1) 
              -- end
           -- end
           -- doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")
        -- end
    -- end
    --/////////////////////////////////////////////////////////////////////////--
       
    if getPlayerStorageValue(cid, 17000) >= 1 then -- fly
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        doRemoveCondition(cid, CONDITION_OUTFIT)
                local addonfly = getPlayerSlotItem(cid, 8).uid
                local addofly = getItemAttribute(addonfly,"addonfly")
                if not addofly then
                                doSetItemAttribute(addonfly,"addonfly",0) 
                                        doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)

                end
                if addofly > 0 then
                               doSetCreatureOutfit(cid, {lookType = addofly}, -1)

                end

    local apos = getFlyingMarkedPos(cid)
    apos.stackpos = 0
        
            if getTileThingByPos(apos).itemid <= 2 then
                doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)
                doCreateItem(460, 1, getFlyingMarkedPos(cid))
            end 

    doTeleportThing(cid, apos, false) 
    if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
       sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
    end  
 
    local posicao = getTownTemplePosition(getPlayerTown(cid))
    markFlyingPos(cid, posicao)
    
    elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf

        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
                     local addonsurf = getPlayerSlotItem(cid, 8).uid
                local addosurf = getItemAttribute(addonsurf,"addonsurf")
                if not addosurf then
                                doSetItemAttribute(addonsurf,"addonsurf",0) 
        doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1)

                end
                if addosurf > 0 then
                                doSetCreatureOutfit(cid, {lookType = addosurf}, -1)

                end    
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
           sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
        end 

    elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        
        
        if rides[poke] then
           doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
           doRemoveCondition(cid, CONDITION_OUTFIT)
                     local addonride = getPlayerSlotItem(cid, 8).uid
                local addoride = getItemAttribute(addonride,"addonride")
                if not addofly then
                                doSetItemAttribute(addonride,"addonride",0) 
           doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1)

                end
                if addoride > 0 then
                                doSetCreatureOutfit(cid, {lookType = addoride}, -1)

                end
           if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
              sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
           end 
        else
        end
		
    
        local posicao2 = getTownTemplePosition(getPlayerTown(cid))
        markFlyingPos(cid, posicao2)
        
    elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive
       if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then
            setPlayerStorageValue(cid, 13008, 0)
            doRemoveCondition(cid, CONDITION_OUTFIT)
        return true
        end   
          
       if getPlayerSex(cid) == 1 then
          doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       else
          doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       end
       doChangeSpeed(cid, 800)

     elseif getPlayerStorageValue(cid, 5700) > 0 then   --bike
        doChangeSpeed(cid, -getCreatureSpeed(cid))
        doChangeSpeed(cid, getPlayerStorageValue(cid, 5700))  --alterado v2.8
        if getPlayerSex(cid) == 1 then
           doSetCreatureOutfit(cid, {lookType = 1394}, -1)
        else
           doSetCreatureOutfit(cid, {lookType = 1393}, -1)
        end
    elseif getPlayerStorageValue(cid, 75846) >= 1 then     --alterado v2.9 \/
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false)  
        setPlayerStorageValue(cid, 75846, -1)
        sendMsgToPlayer(cid, 20, "You have been moved to your town!")    
     else
        doRegainSpeed(cid)  --alterado v2.6
     end
    
    if getPlayerStorageValue(cid, 22545) >= 1 then   --golden arena
       setPlayerStorageValue(cid, 22545, -1)              --alterado v2.4
       doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)
       setPlayerRecordWaves(cid)     --alterado v2.7 
    end
	
	-- local CP = {x=1056, y=1049, z=7}
	
	-- if getPlayerStorageValue(cid, 17000) >= 1 then
-- setPlayerStorageValue(cid, 17000, 0)
       -- doTeleportThing(cid, CP)

-- end
    
    return true
end

Mesmo esquema do outro script que fiz, deixei mais fácil até, só mudar o ID do looktype na variável looktype_accountmanager no começo do arquivo. Também criei uma variável para a storage dos pontos online que exibe para o player quando loga.

Testa e vê se continua voltando aquela outfit de ADM.

Deu certo \o/

Viu antes de finaliza so uma coisa caso saiba claro ^^

No account manager aparece estas frases um eu sei que e de sistema de exp pra vip e talz eu queria tira esta frase do account manager so quando o player loga.

O outro nao sei se e bug e se tem como tira que e a frase de baixo.

Agosto 4, 2020

1 minuto atrás, Yan18 disse:

É normal acontecer isso, eu fiz apenas um teste ^^. Eu fiz uma verificação se for account manager setar uma outfit e em seguida dei um return true, ou seja, ele encerra o arquivo ali mesmo e não carrega os eventos (módulos) porque estão mais para baixo no script.

Bom, então está trocando, porém alguma parte do seu script está setando a outfit, vou dar uma olhada aqui.

ok ?

Eu mandei uma ultima aii e que dei uma editada ^^

Agosto 4, 2020

28 minutos atrás, Yan18 disse:

Testa primeiro com a que mandei, não é definitivo, testa lá e me fala.

Deu certo ^^

Porem deu um problema.

No exe do server nao deu ERRO nao deu nada porem em game.

Troco a outfit porem aparece as barras como se tive-se em player marquei em vermelho.

Agosto 4, 2020

8 minutos atrás, Yan18 disse:

Eu tenho uma base DXP aqui, e fiz um teste, mas no caso, o meu login.lua tinha uma linha a mais que estava setando a outfit, mudei o looktype e funcionou.

Mas vamos descobrir o problema, faz um teste para mim, substitui o seu login.lua por esse:


local config = {
    loginMessage = getConfigValue('loginMessage'),
    useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

local looktype_account_manager = {lookType = 215}

--alterado v2.6 tabelas soh em lib/configuration.lua;

function onLogin(cid)

	if getCreatureName(cid) == "Account Manager" then
		doSetCreatureOutfit(cid, looktype_account_manager, -1)
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Account Manager com outfit")
	return true
	end
		
		
          
	  registerCreatureEvent(cid, "hmup")
	  registerCreatureEvent(cid, "PlayerAttack")
          registerCreatureEvent(cid, "dropStone") 
          registerCreatureEvent(cid, "OnAdvanced")
	  registerCreatureEvent(cid, "vipexp")
          registerCreatureEvent(cid, "ShowPokedex") 
          registerCreatureEvent(cid, "ClosePokedex")
          registerCreatureEvent(cid, "WatchTv")
	  registerCreatureEvent(cid, "DropShiny")
          registerCreatureEvent(cid, "StopWatchingTv")
          registerCreatureEvent(cid, "WalkTv")
          registerCreatureEvent(cid, "RecordTv")
          registerCreatureEvent(cid, "Death")
          registerCreatureEvent(cid, "PlayerLogout")
          registerCreatureEvent(cid, "WildAttack")
          registerCreatureEvent(cid, "Idle")
          registerCreatureEvent(cid, "PokemonIdle")
          registerCreatureEvent(cid, "EffectOnAdvance")
          registerCreatureEvent(cid, "reward")
          registerCreatureEvent(cid, "GeneralConfiguration")
          registerCreatureEvent(cid, "ExtendedOpcode")
          registerCreatureEvent(cid, "ReportBug")
          registerCreatureEvent(cid, "LookSystem")
          registerCreatureEvent(cid, "T1")
          registerCreatureEvent(cid, "T2")
          registerCreatureEvent(cid, "ll1")
          registerCreatureEvent(cid, "task_count")
          registerCreatureEvent(cid, "effectdeath")
          registerCreatureEvent(cid, "dota")
          registerCreatureEvent(cid, "atk")
          registerCreatureEvent(cid, "balance")
	  registerCreatureEvent(cid, "BlockHit")
	  registerCreatureEvent(cid, "Ataque")
	  registerCreatureEvent(cid, "NlooT")
	  registerCreatureEvent(cid, "KillTask")
	  registerCreatureEvent(cid, "KillTaske")
	  registerCreatureEvent(cid, "KillTask3")
	  registerCreatureEvent(cid, "KillTask4")
	  registerCreatureEvent(cid, "PlayerDeath")
	  registerCreatureEvent(cid, "PetKill")
	  registerCreatureEvent(cid, "onlinebonus")
	  registerCreatureEvent(cid, "AtLoot")
	  registerCreatureEvent(cid, "Monster Hunterl")
	  registerCreatureEvent(cid, "Monster Hunter")
          doRegainSpeed(cid)
          doUpdatePokemonsBar(cid)
          doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 25)
          doCreatureSetDropLoot(cid, false)

	if getPlayerStorageValue(cid, 17000) >= 1 then
	setPlayerStorageValue(cid, 17000, 0)
	doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false) 
	sendMsgToPlayer(cid, 20, "Voce Deslogou No Fly E Foi Teleportado Para O CP Por Questoes De Seguranca.")    
	return true
	end

	setPlayerStorageValue(cid, 17001, 0) --ride
	setPlayerStorageValue(cid, 92003, 0) --water robotic
	setPlayerStorageValue(cid, 92002, 0) --fire robotic
	setPlayerStorageValue(cid, 92001, 0) --water robotic
	setPlayerStorageValue(cid, 32001, 0) --bike 


	if getCreatureName(cid) ~= "Account Manager" then -- O "ACCOUNT MANAGER" É EXCEÇÃO.
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce possui " .. getPlayerStorageValue(cid,5984548) .. "x Online Bonus armazenados em seu personagem. Digite !opshop a qualquer momento para saber quantos Online Points voce possui.")
	end

	if getPlayerStorageValue(cid, 5984548) < 0 then
    setPlayerStorageValue(cid, 5984548, 0)
	return true end
	

-- SE AS QUANTIDADES DE FUSION HELDS POINTS FOREM MENOR QUE 0, SETA AS QUANTIDADES DE FUSION HELDS POINTS PARA 0
	if getPlayerStorageValue(cid, 1234601) < 0 then
	setPlayerStorageValue(cid, 1234601, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234602) < 0 then
	setPlayerStorageValue(cid, 1234602, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234603) < 0 then
	setPlayerStorageValue(cid, 1234603, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234604) < 0 then
	setPlayerStorageValue(cid, 1234604, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234605) < 0 then
	setPlayerStorageValue(cid, 1234605, 0)
	return true end
	
	
    if getPlayerStorageValue(cid, 1234606) < 0 then
	setPlayerStorageValue(cid, 1234606, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234607) < 0 then
	setPlayerStorageValue(cid, 1234607, 0)
	return true end


    local accountManager = getPlayerAccountManager(cid)

    if(accountManager == MANAGER_NONE) then
        local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
        if(lastLogin > 0) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
            str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
        end


   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'Bem Vindo Ao Pokemon Venetta Server')
 
                
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

        elseif(accountManager == MANAGER_NAMELOCK) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Ola, parece que voce teve seu nome bloqueado (nameblock), escolha outro nome.")
    elseif(accountManager == MANAGER_ACCOUNT) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
    else
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
    end

    if getCreatureName(cid) == "Account Manager" then
        local outfit = {}
		
        if accountManagerRandomPokemonOutfit then
            outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}
        else
            outfit = looktype_account_manager
        end
    
        doSetCreatureOutfit(cid, outfit, -1)
    return true
    end

    if(not isPlayerGhost(cid)) then
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
    end

    local outfit = {}

    if getPlayerVocation(cid) == 0 then
        doPlayerSetMaxCapacity(cid, 7)
        doPlayerSetVocation(cid, 1)
        setCreatureMaxMana(cid, 6)
        doPlayerAddSoul(cid, -getPlayerSoul(cid))
        setPlayerStorageValue(cid, 19898, 0)
            if getCreatureOutfit(cid).lookType == 510 then
                outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            elseif getCreatureOutfit(cid).lookType == 511 then
                outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            end
        doCreatureChangeOutfit(cid, outfit)
    end


	  
	  
    if getPlayerStorageValue(cid, 99284) == 1 then
        setPlayerStorageValue(cid, 99284, -1)
    end

    if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then
       setPlayerStorageValue(cid, 6598754, -1)
       setPlayerStorageValue(cid, 6598755, -1)
       doRemoveCondition(cid, CONDITION_OUTFIT)             --alterado v2.9 \/
       doTeleportThing(cid, posBackPVP, false)
       doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
    end
    
    doChangeSpeed(cid, -(getCreatureSpeed(cid)))
    
    --///////////////////////////////////////////////////////////////////////////--
    -- local storages = {17000, 63215, 17001, 13008, 5700}
    -- for s = 1, #storages do
        -- if not tonumber(getPlayerStorageValue(cid, storages)) then
           -- if s == 3 then
              -- setPlayerStorageValue(cid, storages, 1)
           -- elseif s == 4 then
              -- setPlayerStorageValue(cid, storages, -1)
           -- else   
              -- if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then
                 -- setPlayerStorageValue(cid, storages, 1)                 --alterado v2.6
              -- else
                 -- setPlayerStorageValue(cid, storages, -1) 
              -- end
           -- end
           -- doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")
        -- end
    -- end
    --/////////////////////////////////////////////////////////////////////////--
       
    if getPlayerStorageValue(cid, 17000) >= 1 then -- fly
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        doRemoveCondition(cid, CONDITION_OUTFIT)
                local addonfly = getPlayerSlotItem(cid, 8).uid
                local addofly = getItemAttribute(addonfly,"addonfly")
                if not addofly then
                                doSetItemAttribute(addonfly,"addonfly",0) 
                                        doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)

                end
                if addofly > 0 then
                               doSetCreatureOutfit(cid, {lookType = addofly}, -1)

                end

    local apos = getFlyingMarkedPos(cid)
    apos.stackpos = 0
        
            if getTileThingByPos(apos).itemid <= 2 then
                doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)
                doCreateItem(460, 1, getFlyingMarkedPos(cid))
            end 

    doTeleportThing(cid, apos, false) 
    if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
       sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
    end  
 
    local posicao = getTownTemplePosition(getPlayerTown(cid))
    markFlyingPos(cid, posicao)
    
    elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf

        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
                     local addonsurf = getPlayerSlotItem(cid, 8).uid
                local addosurf = getItemAttribute(addonsurf,"addonsurf")
                if not addosurf then
                                doSetItemAttribute(addonsurf,"addonsurf",0) 
        doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1)

                end
                if addosurf > 0 then
                                doSetCreatureOutfit(cid, {lookType = addosurf}, -1)

                end    
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
           sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
        end 

    elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        
        
        if rides[poke] then
           doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
           doRemoveCondition(cid, CONDITION_OUTFIT)
                     local addonride = getPlayerSlotItem(cid, 8).uid
                local addoride = getItemAttribute(addonride,"addonride")
                if not addofly then
                                doSetItemAttribute(addonride,"addonride",0) 
           doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1)

                end
                if addoride > 0 then
                                doSetCreatureOutfit(cid, {lookType = addoride}, -1)

                end
           if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
              sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
           end 
        else
        end
		
    
        local posicao2 = getTownTemplePosition(getPlayerTown(cid))
        markFlyingPos(cid, posicao2)
        
    elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive
       if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then
            setPlayerStorageValue(cid, 13008, 0)
            doRemoveCondition(cid, CONDITION_OUTFIT)
        return true
        end   
          
       if getPlayerSex(cid) == 1 then
          doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       else
          doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       end
       doChangeSpeed(cid, 800)

     elseif getPlayerStorageValue(cid, 5700) > 0 then   --bike
        doChangeSpeed(cid, -getCreatureSpeed(cid))
        doChangeSpeed(cid, getPlayerStorageValue(cid, 5700))  --alterado v2.8
        if getPlayerSex(cid) == 1 then
           doSetCreatureOutfit(cid, {lookType = 1394}, -1)
        else
           doSetCreatureOutfit(cid, {lookType = 1393}, -1)
        end
    elseif getPlayerStorageValue(cid, 75846) >= 1 then     --alterado v2.9 \/
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false)  
        setPlayerStorageValue(cid, 75846, -1)
        sendMsgToPlayer(cid, 20, "You have been moved to your town!")    
     else
        doRegainSpeed(cid)  --alterado v2.6
     end
    
    if getPlayerStorageValue(cid, 22545) >= 1 then   --golden arena
       setPlayerStorageValue(cid, 22545, -1)              --alterado v2.4
       doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)
       setPlayerRecordWaves(cid)     --alterado v2.7 
    end
	
	-- local CP = {x=1056, y=1049, z=7}
	
	-- if getPlayerStorageValue(cid, 17000) >= 1 then
-- setPlayerStorageValue(cid, 17000, 0)
       -- doTeleportThing(cid, CP)

-- end
    
    return true
end

Veja se mudou outfit e se vai aparecer uma mensagem no console.

Se pode edita a minha eque dei uma editada da que postei ^^

Editei algumas coisinhas rs

Se puder editar essa ^^

local config = {
    loginMessage = getConfigValue('loginMessage'),
    useFragHandler = getBooleanFromString(getConfigValue('useFragHandler'))
}

--alterado v2.6 tabelas soh em lib/configuration.lua;

function onLogin(cid)
          
	  registerCreatureEvent(cid, "hmup")
	  registerCreatureEvent(cid, "PlayerAttack")
          registerCreatureEvent(cid, "dropStone") 
          registerCreatureEvent(cid, "OnAdvanced")
	  registerCreatureEvent(cid, "vipexp")
          registerCreatureEvent(cid, "ShowPokedex") 
          registerCreatureEvent(cid, "ClosePokedex")
          registerCreatureEvent(cid, "WatchTv")
	  registerCreatureEvent(cid, "DropShiny")
          registerCreatureEvent(cid, "StopWatchingTv")
          registerCreatureEvent(cid, "WalkTv")
          registerCreatureEvent(cid, "RecordTv")
          registerCreatureEvent(cid, "Death")
          registerCreatureEvent(cid, "PlayerLogout")
          registerCreatureEvent(cid, "WildAttack")
          registerCreatureEvent(cid, "Idle")
          registerCreatureEvent(cid, "PokemonIdle")
          registerCreatureEvent(cid, "EffectOnAdvance")
          registerCreatureEvent(cid, "reward")
          registerCreatureEvent(cid, "GeneralConfiguration")
          registerCreatureEvent(cid, "ExtendedOpcode")
          registerCreatureEvent(cid, "ReportBug")
          registerCreatureEvent(cid, "LookSystem")
          registerCreatureEvent(cid, "T1")
          registerCreatureEvent(cid, "T2")
          registerCreatureEvent(cid, "ll1")
          registerCreatureEvent(cid, "task_count")
          registerCreatureEvent(cid, "effectdeath")
          registerCreatureEvent(cid, "dota")
          registerCreatureEvent(cid, "atk")
          registerCreatureEvent(cid, "balance")
	  registerCreatureEvent(cid, "BlockHit")
	  registerCreatureEvent(cid, "Ataque")
	  registerCreatureEvent(cid, "NlooT")
	  registerCreatureEvent(cid, "KillTask")
	  registerCreatureEvent(cid, "KillTaske")
	  registerCreatureEvent(cid, "KillTask3")
	  registerCreatureEvent(cid, "KillTask4")
	  registerCreatureEvent(cid, "PlayerDeath")
	  registerCreatureEvent(cid, "PetKill")
	  registerCreatureEvent(cid, "onlinebonus")
	  registerCreatureEvent(cid, "AtLoot")
	  registerCreatureEvent(cid, "Monster Hunterl")
	  registerCreatureEvent(cid, "Monster Hunter")
          doRegainSpeed(cid)
          doUpdatePokemonsBar(cid)
          doPlayerSetLossPercent(cid, PLAYERLOSS_EXPERIENCE, 25)
          doCreatureSetDropLoot(cid, false)

	if getPlayerStorageValue(cid, 17000) >= 1 then
	setPlayerStorageValue(cid, 17000, 0)
	doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false) 
	sendMsgToPlayer(cid, 20, "Voce Deslogou No Fly E Foi Teleportado Para O CP Por Questoes De Seguranca.")    
	return true
	end

	setPlayerStorageValue(cid, 17001, 0) --ride
	setPlayerStorageValue(cid, 92003, 0) --water robotic
	setPlayerStorageValue(cid, 92002, 0) --fire robotic
	setPlayerStorageValue(cid, 92001, 0) --water robotic
	setPlayerStorageValue(cid, 32001, 0) --bike 


	if getCreatureName(cid) ~= "Account Manager" then -- O "ACCOUNT MANAGER" É EXCEÇÃO.
    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "(Online Points) Voce Possui " .. getPlayerStorageValue(cid,5984548) .. " Online Points Armazenados Em Seu Personagem. Digite !opshop A Qualquer Momento Para Saber Quantos Online Points Voce Possui.")
	end

	if getPlayerStorageValue(cid, 5984548) < 0 then
    setPlayerStorageValue(cid, 5984548, 0)
	return true end
	

-- SE AS QUANTIDADES DE FUSION HELDS POINTS FOREM MENOR QUE 0, SETA AS QUANTIDADES DE FUSION HELDS POINTS PARA 0
	if getPlayerStorageValue(cid, 1234601) < 0 then
	setPlayerStorageValue(cid, 1234601, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234602) < 0 then
	setPlayerStorageValue(cid, 1234602, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234603) < 0 then
	setPlayerStorageValue(cid, 1234603, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234604) < 0 then
	setPlayerStorageValue(cid, 1234604, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234605) < 0 then
	setPlayerStorageValue(cid, 1234605, 0)
	return true end
	
	
    if getPlayerStorageValue(cid, 1234606) < 0 then
	setPlayerStorageValue(cid, 1234606, 0)
	return true end
	
    if getPlayerStorageValue(cid, 1234607) < 0 then
	setPlayerStorageValue(cid, 1234607, 0)
	return true end


    local accountManager = getPlayerAccountManager(cid)

    if(accountManager == MANAGER_NONE) then
        local lastLogin, str = getPlayerLastLoginSaved(cid), config.loginMessage
        if(lastLogin > 0) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)
            str = "Your last visit was on " .. os.date("%a %b %d %X %Y", lastLogin) .. "."
        end


   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'Bem Vindo Ao Pokemon Venetta Server')
 
                
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, str)

        elseif(accountManager == MANAGER_NAMELOCK) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Ola, parece que voce teve seu nome bloqueado (nameblock), escolha outro nome.")
    elseif(accountManager == MANAGER_ACCOUNT) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to manage your account and if you want to start over then type 'cancel'.")
    else
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Hello, type 'account' to create an account or type 'recover' to recover an account.")
    end

    if getCreatureName(cid) == "Account Manager" then
        local outfit = {}
        if accountManagerRandomPokemonOutfit then
            outfit = {lookType = getPokemonXMLOutfit(oldpokedex[math.random(151)][1])}
        else
            outfit = accountManagerOutfit
        end
    
        doSetCreatureOutfit(cid, outfit, -1)
    return true
    end

    if(not isPlayerGhost(cid)) then
        doSendMagicEffect(getCreaturePosition(cid), CONST_ME_TELEPORT)
    end

    local outfit = {}

    if getPlayerVocation(cid) == 0 then
        doPlayerSetMaxCapacity(cid, 7)
        doPlayerSetVocation(cid, 1)
        setCreatureMaxMana(cid, 6)
        doPlayerAddSoul(cid, -getPlayerSoul(cid))
        setPlayerStorageValue(cid, 19898, 0)
            if getCreatureOutfit(cid).lookType == 510 then
                outfit = {lookType = 510, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            elseif getCreatureOutfit(cid).lookType == 511 then
                outfit = {lookType = 511, lookHead = math.random(0, 132), lookBody = math.random(0, 132), lookLegs = math.random(0, 132), lookFeet = math.random(0, 132)}
            end
        doCreatureChangeOutfit(cid, outfit)
    end


	  
	  
    if getPlayerStorageValue(cid, 99284) == 1 then
        setPlayerStorageValue(cid, 99284, -1)
    end

    if getPlayerStorageValue(cid, 6598754) >= 1 or getPlayerStorageValue(cid, 6598755) >= 1 then
       setPlayerStorageValue(cid, 6598754, -1)
       setPlayerStorageValue(cid, 6598755, -1)
       doRemoveCondition(cid, CONDITION_OUTFIT)             --alterado v2.9 \/
       doTeleportThing(cid, posBackPVP, false)
       doCreatureAddHealth(cid, getCreatureMaxHealth(cid))
    end
    
    doChangeSpeed(cid, -(getCreatureSpeed(cid)))
    
    --///////////////////////////////////////////////////////////////////////////--
    -- local storages = {17000, 63215, 17001, 13008, 5700}
    -- for s = 1, #storages do
        -- if not tonumber(getPlayerStorageValue(cid, storages)) then
           -- if s == 3 then
              -- setPlayerStorageValue(cid, storages, 1)
           -- elseif s == 4 then
              -- setPlayerStorageValue(cid, storages, -1)
           -- else   
              -- if isBeingUsed(getPlayerSlotItem(cid, 8).itemid) then
                 -- setPlayerStorageValue(cid, storages, 1)                 --alterado v2.6
              -- else
                 -- setPlayerStorageValue(cid, storages, -1) 
              -- end
           -- end
           -- doPlayerSendTextMessage(cid, 27, "Sorry, but a problem occurred on the server, but now it's alright")
        -- end
    -- end
    --/////////////////////////////////////////////////////////////////////////--
       
    if getPlayerStorageValue(cid, 17000) >= 1 then -- fly
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        doRemoveCondition(cid, CONDITION_OUTFIT)
                local addonfly = getPlayerSlotItem(cid, 8).uid
                local addofly = getItemAttribute(addonfly,"addonfly")
                if not addofly then
                                doSetItemAttribute(addonfly,"addonfly",0) 
                                        doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1)

                end
                if addofly > 0 then
                               doSetCreatureOutfit(cid, {lookType = addofly}, -1)

                end

    local apos = getFlyingMarkedPos(cid)
    apos.stackpos = 0
        
            if getTileThingByPos(apos).itemid <= 2 then
                doCombatAreaHealth(cid, FIREDAMAGE, getFlyingMarkedPos(cid), 0, 0, 0, CONST_ME_NONE)
                doCreateItem(460, 1, getFlyingMarkedPos(cid))
            end 

    doTeleportThing(cid, apos, false) 
    if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
       sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
    end  
 
    local posicao = getTownTemplePosition(getPlayerTown(cid))
    markFlyingPos(cid, posicao)
    
    elseif getPlayerStorageValue(cid, 63215) >= 1 then -- surf

        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
                     local addonsurf = getPlayerSlotItem(cid, 8).uid
                local addosurf = getItemAttribute(addonsurf,"addonsurf")
                if not addosurf then
                                doSetItemAttribute(addonsurf,"addonsurf",0) 
        doSetCreatureOutfit(cid, {lookType = surfs[poke].lookType + 351}, -1)

                end
                if addosurf > 0 then
                                doSetCreatureOutfit(cid, {lookType = addosurf}, -1)

                end    
        doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
        if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
           sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
        end 

    elseif getPlayerStorageValue(cid, 17001) >= 1 then -- ride
        
        local item = getPlayerSlotItem(cid, 8)
        local poke = getItemAttribute(item.uid, "poke")
        
        
        if rides[poke] then
           doChangeSpeed(cid, getPlayerStorageValue(cid, 54844))
           doRemoveCondition(cid, CONDITION_OUTFIT)
                     local addonride = getPlayerSlotItem(cid, 8).uid
                local addoride = getItemAttribute(addonride,"addonride")
                if not addofly then
                                doSetItemAttribute(addonride,"addonride",0) 
           doSetCreatureOutfit(cid, {lookType = rides[poke][1] + 351}, -1)

                end
                if addoride > 0 then
                                doSetCreatureOutfit(cid, {lookType = addoride}, -1)

                end
           if getItemAttribute(item.uid, "boost") and getItemAttribute(item.uid, "boost") >= 50 and getPlayerStorageValue(cid, 42368) >= 1 then   
              sendAuraEffect(cid, auraSyst[getItemAttribute(item.uid, "aura")])                     --alterado v2.8
           end 
        else
        end
		
    
        local posicao2 = getTownTemplePosition(getPlayerTown(cid))
        markFlyingPos(cid, posicao2)
        
    elseif getPlayerStorageValue(cid, 13008) >= 1 then -- dive
       if not isInArray({5405, 5406, 5407, 5408, 5409, 5410}, getTileInfo(getThingPos(cid)).itemid) then
            setPlayerStorageValue(cid, 13008, 0)
            doRemoveCondition(cid, CONDITION_OUTFIT)
        return true
        end   
          
       if getPlayerSex(cid) == 1 then
          doSetCreatureOutfit(cid, {lookType = 1034, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       else
          doSetCreatureOutfit(cid, {lookType = 1035, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet}, -1)
       end
       doChangeSpeed(cid, 800)

     elseif getPlayerStorageValue(cid, 5700) > 0 then   --bike
        doChangeSpeed(cid, -getCreatureSpeed(cid))
        doChangeSpeed(cid, getPlayerStorageValue(cid, 5700))  --alterado v2.8
        if getPlayerSex(cid) == 1 then
           doSetCreatureOutfit(cid, {lookType = 1394}, -1)
        else
           doSetCreatureOutfit(cid, {lookType = 1393}, -1)
        end
    elseif getPlayerStorageValue(cid, 75846) >= 1 then     --alterado v2.9 \/
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)), false)  
        setPlayerStorageValue(cid, 75846, -1)
        sendMsgToPlayer(cid, 20, "You have been moved to your town!")    
     else
        doRegainSpeed(cid)  --alterado v2.6
     end
    
    if getPlayerStorageValue(cid, 22545) >= 1 then   --golden arena
       setPlayerStorageValue(cid, 22545, -1)              --alterado v2.4
       doTeleportThing(cid, getClosestFreeTile(cid, posBackGolden), false)
       setPlayerRecordWaves(cid)     --alterado v2.7 
    end
	
	-- local CP = {x=1056, y=1049, z=7}
	
	-- if getPlayerStorageValue(cid, 17000) >= 1 then
-- setPlayerStorageValue(cid, 17000, 0)
       -- doTeleportThing(cid, CP)

-- end
    
    return true
end

Entrar

BrunooMaciell

Total de itens

Registro em

Última visita

Dias Ganhos

Tipo de Conteúdo

Perfis

Fóruns

Posts postados por BrunooMaciell

(Bug) AutoLoot

(BUG) Revive

(BUG) Revive

(BUG) Revive

(Bug) NPC

(Bug) NPC

Comando

(Bug) NPC

Comando

(Bug) NPC

(Bug) NPC

(Pedido) Funçao Premium

(Pedido) Funçao Premium

(Bug) NPC

Comando >> /cb

Comando >> /cb

Comando >> /cb

Comando >> /cb

(Duvida) Account Manager

(Duvida) Account Manager

(Duvida) Account Manager

(Duvida) Account Manager

(Duvida) Account Manager

(Duvida) Account Manager

(Duvida) Account Manager

Quem Está Navegando 0 membros estão online

Fóruns

Tutoriais

Suporte