SkyLigh

Este aki e do vodkart entao tudo aos creditos a ele Abre o arquivo 050-function.lua que está dentro da pasta data/lib e adicione no fim do arquivo: function doPlayerCountItems(cid, items) -- by Vodka local items = type(items) == "table" and items or {items} for i = 1, table.maxn(items) do if getPlayerItemCount(cid, items[i]) <= 0 then return false end end return true end NPC Script: 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 = {} 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 list = {111,222,333,444,555,666,777} -- id dos itens local pos = {x=160, y=54, z=7} -- para onde ele vai if(msgcontains(msg, 'TRAVEL') or msgcontains(msg, 'travel')) then selfSay("Para viajar comigo você ter os 7 items,você tem eles? {yes} ", cid) talkState[talkUser] = 1 elseif(msgcontains(msg, "yes") and talkState[talkUser] >= 1)then if doPlayerCountItems(cid, list) then selfSay("Boa viagem!.", cid) doTeleportThing(cid, pos) talkState[talkUser] = 0 npcHandler:releaseFocus(cid) else selfSay("desculpe,mas você não tem os itens!", cid) talkState[talkUser] = 0 npcHandler:releaseFocus(cid) end elseif msg == "no" and talkState[talkUser] >= 1 then selfSay("Then not", cid) talkState[talkUser] = 0 npcHandler:releaseFocus(cid) end return TRUE end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

Qual versao vc qer ?

aki esta local bless = {1, 2, 3, 4, 5} local cost = 80000 function onSay(cid, words, param) for i = 1, table.maxn(bless) do if(getPlayerBlessing(cid, bless[i])) then doPlayerSendCancel(cid, "Voceja tem todas as bless.") return TRUE end end if(doPlayerRemoveMoney(cid, cost) == TRUE) then for i = 1, table.maxn(bless) do doPlayerAddBlessing(cid, bless[i]) doPlayerSetLossSkill(cid, 0) doCreatureSetDropLoot(cid, false) end doCreatureSay(cid, "You are now blessed!" ,19) doSendMagicEffect(getPlayerPosition(cid), 49) else doPlayerSendCancel(cid, "Voce precisa de 80k para a bless.") end return TRUE end

Tchubaka tente postar um grátis pra baixar ele precisa ser premium no speedyshare Olha junior eu gosto muito de mapa baiakzik aki esta a primeira versao http://www.xtibia.com/forum/topic/170408-mapa-baiak-com-vip3/ e o templo mas show que eu ja vi e este aki http://www.xtibia.com/forum/topic/171439-baiak-zik-vip4/ e um baiakzik tbm mt show de se jogar e este e o map que mas fez sucesso do baiakzik que eu achei http://www.xtibia.com/forum/topic/172148-o-unico-mapa-baiak-com-vip6/

Iae galera !! hoje trago um script muito interessante adicionar premium por action ao dar use num item e comprar o item por 1 buyitem então vamos la va em data / talkactions / scripts / e ponha o nome de algum arquivo para premium e ponha isto la dentro function onSay(cid, words, param) local itens = { ["santa doll"] = {id = 6567, preco = 2000, count = 1 }, ["teddy bear"] = {id = 6568, preco = 1000, count = 1 }, ["jester doll"] = {id = 9663, preco = 500, count = 1 } } local param = string.lower(param) if (param == "lista") then local str = "" str = str .. "itens :\n\n" for name, preco in pairs(itens) do str = str..name.."\n" end str = str .. "" doShowTextDialog(cid, 7529, str) return TRUE end if not itens[param] or param == "" or not param then return doPlayerSendCancel(cid,"Desculpe esse item nao existe") end if itens[param] and doPlayerRemoveMoney(cid,itens[param].preco) then doPlayerAddItem(cid,itens[param].id,itens[param].count) doPlayerSendTextMessage(cid,27,"Parabéns Vc comprou 1 item") end return TRUE end <talkaction words="!buy" event="script" value="itens.lua"/> dps em data / actions / scripts / ponha o nome de algum arquivo de premium e adicionar isto la dentro --((Script By Skylight Xtibia.com))-- function onUse(cid, item) if doRemoveItem(item.uid, 1) then end if item.itemid == 6567 then doPlayerAddPremiumDays(cid, 30) doPlayerSendTextMessage(cid, 22, "Parabéns Você Recebeu 30 dias de premium") return true end if item.itemid == 6568 then doPlayerAddPremiumDays(cid, 30) doPlayerSendTextMessage(cid, 22, "Parabéns Você Recebeu 15 dias de premium") return true end if item.itemid == 9693 then doPlayerAddPremiumDays(cid, 30) doPlayerSendTextMessage(cid, 22, "Parabéns Você Recebeu 10 dias de premium") end return true end dps em actions.xml <action itemid="6567" script="premium.lua"/> <action itemid="6568" script="premium.lua"/> <action itemid="9693" script="premium.lua"/> Então e so isso espero que gostem e se puder nao custara 1 rep + Créditos TnTSlin 30 %(Pelo script do buy) SkyLigh 70 % (Pelo Script Do Action E A Ideia E Adicionar A Lista no script do buy)

Reportado por double topic http://www.xtibia.com/forum/topic/190823-change-sex-e-new-recovery-key-gesior/ 1 em kda area

Download do programa http://www.xtibia.co...ditor-com-scan/ Como Criar http://www.xtibia.co...-e-sem-efeitos/

Desculpe pela demora porem esta muito ocupado eu ! entao aki esta se puder rep +

Tchubaka pq voce usou sua outra conta pra se reputar o lfelipebsilva05 você mesmo disse neste tópico http://www.xtibia.com/forum/topic/190545-sistema-de-reset-que-ganha-vocation/

local bless = {1, 2, 3, 4, 5} local cost = 80000 function onSay(cid, words, param) for i = 1, table.maxn(bless) do if(getPlayerBlessing(cid, bless[i])) then doPlayerSendCancel(cid, "Voceja tem todas as bless.") return TRUE end end if(doPlayerRemoveMoney(cid, cost) == TRUE) then for i = 1, table.maxn(bless) do doPlayerAddBlessing(cid, bless[i]) end doCreatureSay(cid, "You are now blessed!" ,19) doSendMagicEffect(getPlayerPosition(cid), 49) else doPlayerSendCancel(cid, "Voce precisa de 80k para a bless.") end return TRUE end

A Sua ficou bem legal mas se n tiver gostado posso fazer outra

Duvida sanada reportado , pra moverem O Meu Deu Certo Agora ?

Ótimo vídeo so faltou você colocar o credito do dono vo vídeo Porem eu ja sei script isto nao me interessa mas , mas estarei olhando pra Sempre lembrar pq e bom obrigado por compartilhar

Qual attack se qer ? se puder rep + agradeço

Pronto acho que agora arrumei local config = { storageGlobal = 12312, -- esta storage é global e armazenará um valor para verificar se alguem usou o sistema antes dele finalizar local premio = 2160 -- id do premio local premio_cont = 10503 -- quantidade do premio que vai ganhar valorAposta = 15000, -- preço, em GPS, de cada chance pos = {{x = 35,y = 81,z = 7,stackpos = 253},{x = 36,y = 81,z = 7,stackpos = 253},{x = 37,y = 81,z = 7,stackpos = 253}}, -- configure as 3 posições criaturas ={"Rabbit","Black Sheep","Dog","Cat"}, -- monstros que irão aparecer verificador = {}, -- não mecher } function onUse(cid, item, fromPosition, itemEx, toPosition) if(getStorage(config.storageGlobal) == 1) then doPlayerSendCancel(cid,"Aguade esta rodada acabar.") return true end if(getPlayerMoney(cid) < config.valorAposta) then doPlayerSendCancel(cid,"Consiga " .. config.valorAposta .. " gold coins antes.") return true end doPlayerRemoveMoney(cid, config.valorAposta) sumonarVerificar(cid,1) doSetStorage(config.storageGlobal, 1) -- adiciona o verificador para não clicar 100 veses e bugar addEvent(doSetStorage,4000,config.storageGlobal,-1) -- retira o verificador para poder clicar novamente return false end function sumonarVerificar(cid,i) if(not isPlayer(cid)) then -- evita erros for k = 1,3 do if(isMonster(getTopCreature(config.pos[k]).uid)) then doRemoveCreature(getTopCreature(config.pos[k]).uid) end end return false else if(i == 4)then if(config.verificador[1] == config.verificador[2] and config.verificador[2] == config.verificador[3]) then for k = 1,3 do doSendMagicEffect(config.pos[k], 29) end doSendMagicEffect(getCreaturePosition(cid), 29) doSendAnimatedText(getCreaturePosition(cid), "Congratz!", math.random(1,255)) addEvent(additem,2000,cid,premio,premio_cont) else for k = 1,3 do doSendMagicEffect(config.pos[k], 2) end doSendMagicEffect(getCreaturePosition(cid), 2) end for k = 1,3 do if(isMonster(getTopCreature(config.pos[k]).uid)) then doRemoveCreature(getTopCreature(config.pos[k]).uid) end end for k,v in pairs(config.verificador) do config.verificador[k]=nil end -- limpa tabela else rand = math.random(1,#config.criaturas) monstro = doCreateMonster(config.criaturas[rand],config.pos[i]) doSendMagicEffect(config.pos[i],2) table.insert(config.verificador, config.criaturas[rand]) -- adiciona a criatura na tabela para futura verificação doChangeSpeed(monstro, -getCreatureBaseSpeed(monstro)) -- fará com que ele não se mexa addEvent(sumonarVerificar,1000,cid,i + 1) end end end

Olha n ta muito show pq ainda to iniciante mas ai esta

Isto acontece quando algum player bugado vai logar ou deslogar ou atacar alguem ou algum monster !

Pessa Sua Desing ! Neste Tópico Como Pedir ? Simples So Você Falar Como Quer O Fundo E Oq Estara Escrito Prazo Mínimo de entrega 5 hrs e prazo max 48 hrs Então Ja A Sua

pronto fiz pra vc ! local config = { storageGlobal = 12312, -- esta storage é global e armazenará um valor para verificar se alguem usou o sistema antes dele finalizar premioQuantidade = 10503, -- como por em item? valorAposta = 15000, -- preço, em GPS, de cada chance pos = {{x = 35,y = 81,z = 7,stackpos = 253},{x = 36,y = 81,z = 7,stackpos = 253},{x = 37,y = 81,z = 7,stackpos = 253}}, -- configure as 3 posições criaturas ={"Rabbit","Black Sheep","Dog","Cat"}, -- monstros que irão aparecer verificador = {}, -- não mecher } function onUse(cid, item, fromPosition, itemEx, toPosition) if(getStorage(config.storageGlobal) == 1) then doPlayerSendCancel(cid,"Aguade esta rodada acabar.") return true end if(getPlayerMoney(cid) < config.valorAposta) then doPlayerSendCancel(cid,"Consiga " .. config.valorAposta .. " gold coins antes.") return true end doPlayerRemoveMoney(cid, config.valorAposta) sumonarVerificar(cid,1) doSetStorage(config.storageGlobal, 1) -- adiciona o verificador para não clicar 100 veses e bugar addEvent(doSetStorage,4000,config.storageGlobal,-1) -- retira o verificador para poder clicar novamente return false end function sumonarVerificar(cid,i) if(not isPlayer(cid)) then -- evita erros for k = 1,3 do if(isMonster(getTopCreature(config.pos[k]).uid)) then doRemoveCreature(getTopCreature(config.pos[k]).uid) end end return false else if(i == 4)then if(config.verificador[1] == config.verificador[2] and config.verificador[2] == config.verificador[3]) then for k = 1,3 do doSendMagicEffect(config.pos[k], 29) end doSendMagicEffect(getCreaturePosition(cid), 29) doSendAnimatedText(getCreaturePosition(cid), "Congratz!", math.random(1,255)) doPlayerAddItem(cid,premioQuantidade) else for k = 1,3 do doSendMagicEffect(config.pos[k], 2) end doSendMagicEffect(getCreaturePosition(cid), 2) end for k = 1,3 do if(isMonster(getTopCreature(config.pos[k]).uid)) then doRemoveCreature(getTopCreature(config.pos[k]).uid) end end for k,v in pairs(config.verificador) do config.verificador[k]=nil end -- limpa tabela else rand = math.random(1,#config.criaturas) monstro = doCreateMonster(config.criaturas[rand],config.pos[i]) doSendMagicEffect(config.pos[i],2) table.insert(config.verificador, config.criaturas[rand]) -- adiciona a criatura na tabela para futura verificação doChangeSpeed(monstro, -getCreatureBaseSpeed(monstro)) -- fará com que ele não se mexa addEvent(sumonarVerificar,1000,cid,i + 1) end end end

Então va no map version poem o 6.0 flw.

então faza assim va no rme / map / propieties / cient version / e poem 8.54 vlw.

Qual e a versao do mapa que vc vai importar?

O Erro e pq as versoes do mapa esta diferente !

pode por uma print do erro ?

faltou o scan se n ninguém ira baixar