ViitinG

Bom para quem não sabe como funciona o script,é uma marcação que fica no minimap(in-game) que ao deixar o ponteiro do mouse em cima aparece uma descrição,pode ser mudado tanto a descrição quanto o icone que aparece no minimap. • Adicionando o script • Em "data/creaturescripts/creaturescripts.xml" adicione está tag : <event type="think" name="IconMap" event="script" value="iconmap.lua"/> Em "data/creaturescripts/scripts" crie um arquivo lua chamado "iconmap" e cole isso dentro : local config = { storage = 030220122041, version = 1, marks = { {mark = 5, pos = {x = 1095, y = 1062, z = 7}, desc = "Temple."}, {mark = 4, pos = {x = 895, y = 996, z = 7}, desc = "Depot."} } } local f_addMark = doPlayerAddMapMark if(not f_addMark) then f_addMark = doAddMapMark end function onThink(cid, interval) if(isPlayer(cid) ~= TRUE or getPlayerStorageValue(cid, config.storage) == config.version) then return end for _, m in pairs(config.marks) do f_addMark(cid, m.pos, m.mark, m.desc ~= nil and m.desc or "") end setPlayerStorageValue(cid, config.storage, config.version) return TRUE end Em "data/creaturescripts/scripts/login.lua" adicione está tag no fim do script : registerCreatureEvent(cid, "IconMap") Caso use TFS 1.0 use este register no login.lua : player:registerEvent(cid, "IconMap") Creditos : Comedinhas. - ViitinG pelo tutorial. • Configurando • • Icones •

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Scripting → CreatureScripts, GlobalEvents e MoveMents" Para: "OTServ → Suporte OTServ → Suporte de Scripts"

"data/actions/scripts/removerparede.lua" local pos = {x = 1000, y = 1000, z = 7} local parede = 1355 local level = 10 local segundos = 30 local event = 0 local function reset(leverPos) local lever = getTileItemById(leverPos, 1946).uid doTransformItem(lever, 1945) doCreateItem(parede, 1, pos) doPlayerSendTextMessage(cid,21,"A Passagem está fechada!") end function onUse(cid, item, fromPosition, itemEx, toPosition) if item.itemid == 1945 and getPlayerLevel(cid) >= level then doRemoveItem(getTileItemById(pos,parede).uid) doPlayerSendTextMessage(cid,21,"Você Abriu a passagem, tenha cuidado!") event = addEvent(reset, segundos * 1000, getThingPos(item.uid)) doTransformItem(item.uid,item.itemid+1) elseif item.itemid == 1946 and getPlayerLevel(cid) >= level then stopEvent(event) doPlayerSendTextMessage(cid,21,"Você fechou a passagem!") doTransformItem(item.uid,item.itemid-1) doCreateItem(parede, 1, pos) end return true end "data/actions/actions.xml" : <action actionid="21653" event="script" value="removerparede.lua"/> obs : coloque o actionID 21653 na alavanca.

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Projetos / Formação de Equipes → Formação de Equipes" Para: "OTServ → Projetos / Formação de Equipes → Projetos de OTServ"

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → OTServ Geral" Para: "OTServ → Projetos / Formação de Equipes → Formação de Equipes"

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → OTServ Geral" Para: "OTServ → Suporte OTServ → Suporte de OTServ Geral"

Cuidado amigo,você só pode dar UP após 24 da criação ou depois de um UP no mesmo. Leia as regras do fórum : http://www.tibiaking.com/forum/forum/23-regras-do-forum/

Acho que o problema não é no script,tente remover os NPCs em volta do King Tibianus.

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de Scripts" Para: "OTServ → Suporte OTServ → Suporte de WebSites"

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de OTServ Geral" Para: "OTServ → Suporte OTServ → Suporte de Scripts"

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de Servidores Diferentes" Para: "OTServ → Suporte OTServ → Suporte de Scripts"

function onUse(cid, item, fromPosition, itemEx, toPosition) local effect = 30 -- efeito ao clicar local storage = 34559 if(getPlayerStorageValue(cid, 34530) > 0) then doPlayerSendTextMessage(cid, 25, "Received a mount.") return TRUE end doPlayerAddMount(cid, 7) -- Aqui é o ID da montaria. doPlayerSendTextMessage(cid, 25, "You receive a new mount.") doRemoveItem(item.uid) doSendMagicEffect(getPlayerPosition(cid), effect)] return TRUE end

Não,é só ele colocar nas tags de ADM,porque 10.xx é diferente o xml.

@Natanael Beckman regras foram feitas para serem cumpridas,oque você fez foi flood e eu te alertei.Negativado por insulto a staff! Leia as regras do fórum : http://www.tibiaking.com/forum/forum/23-regras-do-forum/

@ulatson cuidado com double-post e você reviveu um tópico de 2012 cujo o dono fez seu ultimo login no TK em 2013 !! Leia as regras do fórum : http://www.tibiaking.com/forum/forum/23-regras-do-forum/

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de OTServ Geral" Para: "OTServ → Suporte OTServ → Suporte de Scripts"

Tenta assim amigo : "data/npc/scripts/trocaitems.lua" : 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 playerHaveItems(cid, itemid) local items = type(itemid) == "table" and itemid or {itemid} for i = 1, #items do if getPlayerItemCount(cid, items[i]) <= 0 then return false end end return true end function doPlayerRemoveItems(cid, itemid, count) local items = type(itemid) == "table" and itemid or {itemid} for i = 1, #items do doPlayerRemoveItem(cid, items[i], count ~= nil and count or 1) end return nil end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end if msgcontains(msg, "trocar") then if playerHaveItems(cid, {1234, 1235, 1236, 1237, 1238, 1239, 1240}) then doPlayerRemoveItems(cid, {1234, 1235, 1236, 1237, 1238, 1239, 1240}, 10) doPlayerAddItem(cid, 2160, 10) else selfSay("Voce precisa de 1 item, 1 item, 1 item, 1 item, 1 item, 1 item e 1 item, para conseguir trocar por um item.") end end return true endnpcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) "data/npc/Osvaldo.xml" <?xml version="1.0" encoding="UTF-8"?> <npc name="Osvaldo" script="trocaitems.lua" walkinterval="2000" floorchange="0"> <health now="100" max="100"/> <look type="146" head="123" body="74" legs="123" feet="0" addons="2"/> <parameters> <parameter key="message_greet" value="Olá,fale {trocar} para trocar items por comigo."/> </parameters> </npc> obs : caso não entenda como funciona o script fale que eu posto como "citar" e com cores para você identificar melhor!

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Suporte OTServ → Suporte de OTServ Geral" Para: "OTServ → Suporte OTServ → Suporte de Programação"

@Dennyz amigo se possível quando for postar um script grande utiliza o spoiler pra ficar mais facil a visualização do mesmo ! Spoiler : [spoiler#] .script. [/spoiler#] só retirar o #.

Amigo antes de criar um tópico tente procurar pelo que precisa ! Ve se isso pode te ajudar : http://www.tibiaking.com/forum/topic/31842-item-mount-exclusivo1031-a-1037tfs-10/

O tópico foi movido para a área correta, preste mais atenção da próxima vez! Leia as regras do fórum: http://tibiaking.com/forum/topic/1281-regras-gerais/?p=7680 Este tópico foi movido: De: "OTServ → Scripting → Actions e TalkActions" Para: "OTServ → Suporte OTServ → Suporte de Scripts"

Tente esse aqui então : "data/talkactions/scripts/save.lua" : local savingEvent = 0 function onSay(cid, words, param) if getPlayerAccess(cid) ~= 0 then if isNumber(param) == TRUE then stopEvent(savingEvent) save(tonumber(param) * 60 * 1000) else saveServer() end end end function save(delay) saveServer() if delay > 0 then savingEvent = addEvent(save, delay, delay) end end "data/talkactions/talkactions.xml" : <talkaction words="/save" script="save.lua" />

@Natanael Beckman cuidado com flood amigo,nem todos os membros vão postar coisas que te interessão então se você não gostou do conteúdo do tópico evite comentar coisas sem sentido! Leia as regras do fórum : http://www.tibiaking.com/forum/forum/23-regras-do-forum/

Tenta esse para salvar o server todo com o ADM : "data/talkactions/scripts/save.lua" : local savingEvent = 0 function onSay(cid, words, param, channel) local tmp = tonumber(param) if(tmp ~= nil) then stopEvent(savingEvent) save(tmp * 60 * 1000) elseif(param:trim() == '') then doSaveServer(13) else local tid = getPlayerByNameWildcard(param) if(not tid or (isPlayerGhost(tid) and getPlayerGhostAccess(tid) > getPlayerGhostAccess(cid))) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player " .. param .. " not found.") else doPlayerSave(tid) end end return true end function save(delay) doSaveServer(13) if(delay > 0) then savingEvent = addEvent(save, delay, delay) end end "data/talkactions/talkactions.xml" : <talkaction log="yes" words="/save" access="3" event="script" value="save.lua"/>

@RamoS cuidado com o double post amigo.Quando precisar acrescentar alguma coisa edite o ultimo post ! Leia as regras do fórum : http://www.tibiaking.com/forum/topic/1281-regras-gerais/?p=7680#entry7680