julhinhuu

Qual TFS eu posso usar para abrir a versão 10.80 do tibia, ou precisarei compilar? Posso favor poste o Link de Download se houver algum. Agradeço

Boa noite Xtibianos meu amores e paixões de minha vida, tudo bem com vocês? Espero que sim Hoje o que eu gostaria e que alguém me explicasse este script, as posições e o que tiver para explicar, alguns até sei mais outros é complicados. Só queria que me explicassem isso mesmo. Agradeço a todos que me ajudarem talkactions.xml talkactions/scripts crie bomb.lua talkactions/scripts crie lever.lua items.xml modifique os items listados abaixo do jeito que estão: movements/scripts crie powerups.lua: Crie outro arquivo bombtiles.lua Em movements.xml coloque: UP Up

Digite o seguinte código DB: ALTER TABLE players ADD reset INTEGER not null default 0 Execute este código. Pode ser que ao executar o código, demore um pouco, aguarde.

Digite o seguinte código no seu SQL Query editor: ALTER TABLE players ADD reset INTEGER not null default 0 Execute este código, apertando F9. Pode ser que ao executar o código, demore um pouco, aguarde.

Tenta esse aqui:

Apenas comentei porque não havia visto a data, e já haviam revivido o tópico.

Você é foda mesmo se eu fosse uma mulher já sabe(risos) zoa.. só teve um probleminha. segue: [28/9/2015 15:11:43] [Error - CreatureScript Interface] [28/9/2015 15:11:43] data/creaturescripts/scripts/protectionreset.lua:onTarget [28/9/2015 15:11:43] Description: [28/9/2015 15:11:43] data/creaturescripts/scripts/protectionreset.lua:11: attempt to call global 'getPlayerReset' (a nil value) [28/9/2015 15:11:43] stack traceback: [28/9/2015 15:11:43] data/creaturescripts/scripts/protectionreset.lua:11: in function <data/creaturescripts/scripts/protectionreset.lua:10> Arrumei amor Só por causa de 2 letras tava dando o erro olha ai: local reset_count = 5 --Quantidade máxima de resets para receber proteção. function onStatsChange(cid, attacker, type, combat, value) if isPlayer(attacker) and isPlayer(cid) and getPlayerResets(cid) <= reset_count and type == STATSCHANGE_HEALTHLOSS then return false end return true end function onTarget(cid, target) if isPlayer(cid) and isPlayer(target) and getPlayerResets(target) <= reset_count then return false end return true end

Não sei colocar esta tag zipter . tentei: <event type="statschange" name="protectionreset" event="script" value="protectionreset.lua"/> <event type="target" name="protectionreset" event="script" value="protectionreset.lua"/> Deixa eu te explicar melhor o pedido: - Player de 0 a 5 resets não poderão ser mortos nem atacar outros players, apenas não poderão ser mortos por players monstros será normalmente. -Apartir do 6 eles ja podem se matarem do jeito que quiserem.

Está área de TPS já existia em algum lugar não sei ao certo informa a localização mais você apenas copio

Ficou muito bom, parabéns e reputado

Ainda pode atacar player com menos de 5 reset, coloquei a segunte tag ver se está certo: Creatureevents.XML <event type="kill" name="protectionreset" event="script" value="protectionreset.lua"/> Login.lua registerCreatureEvent(cid, "protectionreset") e fiz sem o registro do login.lua mas nada :\

O nome ficou show so as imaggens que saiu zoado kkk mais valeu, pode retirar a imagens e deixa so o nome?

local exhaustionMinutes = 1 -- exausted em segundoslocal storageUse = 34538 -- storage usado no exausted.function onSay(cid, words, param)if words =="!resetar" thenif(exhaustion.check(cid, storageUse) == TRUE) then if (exhaustion.get(cid, storageUse) >= 10) then doPlayerSendCancel(cid, "Voçê só pode usar após [" .. math.floor(exhaustion.get(cid, storageUse) / 10 + 1) .."] Segundos.") end if (exhaustion.get(cid, storageUse) <= 10) then doPlayerSendCancel(cid, "Voçê só pode usar após [" .. exhaustion.get(cid, storageUse).."] segundos.") endreturn TRUEendexhaustion.set(cid, storageUse, exhaustionMinutes*10)--[ Condições de Reset ] --local coNdConf = {needPz = false, -- Precisa estar em Pz pra resetar? [false, false]needPa = false, -- Precisa ser Premium Account Pra resetar? [true, false]withe = false, -- Players com Pk Withe podem resetar? [false, false]red = true, -- Players com Pk Red pode resetar? [false, false]battle = true, -- Players precisão estar sem battle pra resetar? [true, true]teleport = false, -- Teleportar Player para o templo após resetar? [false, false]look = true, -- Aparecer Resets no Look do Player? [true, true]pid = getPlayerGUID(cid), -- Não Mexer.--[ Configurações do Reset ] --resetConf = {Level = 350, -- Level Necessário para Resetar. [Valor]backLvl = 8, -- Level que voltará após o Reset. [Valor]time = 0, -- Tempo para o Player deslogar ao resetar, em segundos. [Valor] },} --[[>> STAGES <<]]--x=true;X=true -- Não Mexer.local stage = {Abilitar = {x}, Desabilitar = {}, --<< Abilitar Stages?? >>-- [{x};{}]-- [RESETS] | [PREMMY] | [FREE]stage1= {resets= 1, premmy= 330, free= 350},} --[[>> FIM STAGES <<]]----=[Pega Valor de Resets]=--function getPlayerReset(cid)local qr = db.getResult("SELECT `reset` FROM `players` WHERE `id`= "..coNdConf.pid..";")rss = qr:getDataInt("reset", coNdConf.pid)if rss < 0 thenrss = 0endreturn rssendlocal success = " Personagem resetado com sucesso! \nVocê tem agora "..(getPlayerReset(cid)+1).." resets. \nVocê será deslogado em "..coNdConf.resetConf.time.." segundos." ;err = doPlayerSendTextMessagelocal qrt = db.getResult("SELECT `reset` FROM `players` WHERE `id`= "..coNdConf.pid..";");rss_db = qrt:getDataInt("reset", coNdConf.pid)local lvl_query = "UPDATE `players` SET `level` = "..(coNdConf.resetConf.backLvl)..", `experience` = 0 WHERE `id`= " .. coNdConf.pid .. ";"local reset_query = "UPDATE `players` SET `reset` = "..(getPlayerReset(cid)+(1)).." WHERE `id`= " .. coNdConf.pid .. ";"local nolook_query = "UPDATE `players` SET `description` = '' WHERE `players`.`id`= " .. coNdConf.pid .. ";"local look_query = "UPDATE `players` SET `description` = ' [Reset "..(getPlayerReset(cid)+(1)).."]' WHERE `players`.`id`= " .. coNdConf.pid .. ";"--=[Reseta]=--function addValue(value)if coNdConf.look == false then doRemoveCreature(cid)db.executeQuery(lvl_query);db.executeQuery(reset_query);db.executeQuery(nolook_query)else doRemoveCreature(cid) db.executeQuery(lvl_query);db.executeQuery(reset_query);db.executeQuery(look_query) return LUA_NO_ERRORendendfunction nowReseting()if (getPlayerLevel(cid) < coNdConf.resetConf.Level) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "- Level Necessário Para o Reset ["..coNdConf.resetConf.Level.."]. Faltam "..coNdConf.resetConf.Level-getPlayerLevel(cid).." level's para você Resetar. -") return trueendif getPlayerLevel(cid) >= coNdConf.resetConf.Level and (coNdConf.teleport == false) then doPlayerPopupFYI(cid, success) addEvent(addValue, coNdConf.resetConf.time*1, value) else doPlayerPopupFYI(cid, success) addEvent(doTeleportThing, coNdConf.resetConf.time*900, cid, getTownTemplePosition(getPlayerTown(cid))) addEvent(addValue, coNdConf.resetConf.time*1000, value) return trueendend--[STAGES Nao mexer em nada.]--function checkLevelStageReset(cid)local stages = { {resets= stage.stage1.resets, premmy= stage.stage1.premmy, free= stage.stage1.free},} local resets = getPlayerReset(cid) for i, tab in ipairs(stages) do if resets <= tab.resets then coNdConf.resetConf.Level = isPremium(cid) and tab.premmy or tab.free break end endif (getPlayerLevel(cid) < coNdConf.resetConf.Level) thenerr(cid, MESSAGE_STATUS_CONSOLE_BLUE, "- Level Necessário Para o Reset ["..coNdConf.resetConf.Level.."]. Faltam "..coNdConf.resetConf.Level-getPlayerLevel(cid).." level's para você Resetar. -")return TRUEend if getPlayerLevel(cid) >= coNdConf.resetConf.Level and (coNdConf.teleport == false) then doPlayerPopupFYI(cid, success) addEvent(addValue, coNdConf.resetConf.time*1000, value) else doPlayerPopupFYI(cid, success) addEvent(addValue, coNdConf.resetConf.time*1000, value) addEvent(doTeleportThing, coNdConf.resetConf.time*900, cid, getTownTemplePosition(getPlayerTown(cid))) return true endend function newReset(cid) if(coNdConf.needPz == true) and (getTilePzInfo(getCreaturePosition(cid)) == LUA_ERROR) then err(cid,MESSAGE_STATUS_CONSOLE_BLUE,"- Você Precisa estar em Protection Zone Para Resetar. -") return TRUE end if(coNdConf.needPa == true) and not isPremium(cid) then err(cid,MESSAGE_STATUS_CONSOLE_BLUE,"- Você Precisa ser Premium Account para Resetar. -") return TRUE end if(coNdConf.withe == false) and (getCreatureSkullType(cid) == 3) then err(cid,MESSAGE_STATUS_CONSOLE_BLUE,"- Você não pode resetar em condições de PK Withe. -") return TRUE end if(coNdConf.red == false) and (getCreatureSkullType(cid) == 4) then err(cid,MESSAGE_STATUS_CONSOLE_BLUE,"- Você não pode resetar em condições de PK Red. -") return TRUE end if(coNdConf.battle == true) and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then err(cid,MESSAGE_STATUS_CONSOLE_BLUE,"- Você Precisa estar sem Battle para Resetar. -") return TRUE endlocal xy = {true,false}table.insert(stage.Abilitar, false)table.insert(stage.Desabilitar, false)if stage.Abilitar[1] == xy[1] and stage.Desabilitar[1] == xy[2] thencheckLevelStageReset(cid)elseif stage.Abilitar[1] == xy[2] and stage.Desabilitar[1] == xy[1] thennowReseting()elsedoPlayerPopupFYI(cid, "LUA_ERROR; Configure corretamente o Sistema de STAGES!")endreturn trueend function tableResetInstall() print(not rss_db and LUA_ERROR or "Tabela de Resets: Instalada ... [success] ") addEvent(newReset, 1000, cid) return false end if tableResetInstall() then endend --=[Install System]=-- function installReset() if db.executeQuery("ALTER TABLE `players` ADD reset INT(11) NOT NULL DEFAULT 0;") then print("[MarcelloMkez] -= Advanced Reset System 2.0 por DataBase =- Instalado com sucesso!") return TRUE end print('[Advanced Reset System/MarcelloMkez] Não foi possível instalar o Sistema.') return FALSE end local tt = { "Preparando Instalação...", "Instalando: TableReset Db...", "Instalando: getPlayerReset()...", "Instalando: addValue()...", "Instalando: checkLevelStageReset()...", "Instalando: newReset() and nowReseting()...", "Finalizando Instalação...", "...", success = { "Iniciando...", "function: TableReset Db... [success]", "function: getPlayerReset()... [success]", "function: addValue(value)... [success]", "function: checkLevelStageReset()... [success]", "function: newReset() and nowReseting()... [success]", "Fim da Instalação. ", "by: ~~ MarcelloMkez ~~ \nContato: marcello_dirt@hotmail.com", inst = {"MarcelloMkez","Advanced Reset System 2.0 por DataBase" }, }, } if words == "/installresetguiizeera" and getPlayerAccess(cid) >= 3 then function install() if installReset() then print(""..tt.success[7].."") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,""..tt.success[8].."") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "["..tt.success.inst[1].."] -="..tt.success.inst[2].."=- Instalado com sucesso!") else print("["..tt.success.inst[1].."] FALHA NA INSTALAÇÃO! [O sistema ja foi instalado].") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "["..tt.success.inst[1].."] FALHA NA INSTALAÇÃO! [O sistema ja foi instalado].") end return 1 end function concl(cid) local typetx = MESSAGE_STATUS_CONSOLE_BLUE print(""..tt.success[7].."") print(""..tt[8].."") doPlayerSendTextMessage(cid, typetx,""..tt.success[7].."") doPlayerSendTextMessage(cid, typetx,""..tt[8].."") addEvent(install, 1000,cid) end function finall(cid) local typetx = MESSAGE_STATUS_CONSOLE_BLUE print(""..tt.success[6].."") print(""..tt[7].."") doPlayerSendTextMessage(cid, typetx,""..tt.success[6].."") doPlayerSendTextMessage(cid, typetx,""..tt[7].."") addEvent(concl, 3000,cid) end function installDd(cid) local typetx = MESSAGE_STATUS_CONSOLE_BLUE print(""..tt.success[5].."") print(""..tt[6].."") doPlayerSendTextMessage(cid, typetx,""..tt.success[5].."") doPlayerSendTextMessage(cid, typetx,""..tt[6].."") addEvent(finall, 1000,cid) end function installCc(cid) local typetx = MESSAGE_STATUS_CONSOLE_BLUE print(""..tt.success[4].."") print(""..tt[5].."") doPlayerSendTextMessage(cid, typetx,""..tt.success[4].."") doPlayerSendTextMessage(cid, typetx,""..tt[5].."") addEvent(installDd, 1000,cid) end function installBb(cid) local typetx = MESSAGE_STATUS_CONSOLE_BLUE print(""..tt.success[3].."") print(""..tt[4].."") doPlayerSendTextMessage(cid, typetx,""..tt.success[3].."") doPlayerSendTextMessage(cid, typetx,""..tt[4].."") addEvent(installCc, 1000,cid) end function installAa(cid) local typetx = MESSAGE_STATUS_CONSOLE_BLUE print(""..tt.success[2].."") print(""..tt[3].."") doPlayerSendTextMessage(cid, typetx,""..tt.success[2].."") doPlayerSendTextMessage(cid, typetx,""..tt[3].."") addEvent(installBb, 1000,cid) end function toInstall() local typetx = MESSAGE_STATUS_CONSOLE_BLUE print(""..tt.success[1].."") print(""..tt[2].."") doPlayerSendTextMessage(cid, typetx,""..tt.success[1].."") doPlayerSendTextMessage(cid, typetx,""..tt[2].."") addEvent(installAa, 1000,cid) end function preparation() local typetx = MESSAGE_STATUS_CONSOLE_BLUE print(""..tt[1].."") doPlayerSendTextMessage(cid, typetx,""..tt[1].."") addEvent(toInstall, 3000,cid) end if preparation() then end endreturn 1endUp

Fico muito bom, quero o meu amor sz (risos).

Agora sim, o npc está perfeito só falta o Dennyz testa no otserver dele.

Coloca mais o menos assim: local destinations = { ["carlin"] = {x =1234, y = 1234, z = 1}, -- 1º destino ["thais"] = {x =1234, y = 1234, z = 2}, -- 2º destino e assim por diante } 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 return destinations[msg] and doTeleportThing(cid, destinations[msg]) or selfSay("This option isn't available.", cid) end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) Zipter não se poderia colocar esta parte assim: local destinations = { ["carlin","Carlin"] = {x =1234, y = 1234, z = 1}, ["thais", "Thais"] = {x =1234, y = 1234, z = 2}, }

Também preciso desse npc.

Tenta assim: local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat, COMBAT_PARAM_BLOCKARMOR, TRUE) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_WEAPONTYPE) setCombatParam(combat, COMBAT_PARAM_USECHARGES, TRUE) setCombatFormula(combat, COMBAT_FORMULA_SKILL, 0, -60, 0.8, 0) local combat2 = createCombatObject() setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat2, COMBAT_PARAM_BLOCKARMOR, TRUE) setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_WEAPONTYPE) setCombatParam(combat2, COMBAT_PARAM_USECHARGES, TRUE) setCombatFormula(combat2, COMBAT_FORMULA_SKILL, 0, -60, 0.8, 0) local combat3 = createCombatObject() setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat3, COMBAT_PARAM_BLOCKARMOR, TRUE) setCombatParam(combat3, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_WEAPONTYPE) setCombatParam(combat3, COMBAT_PARAM_USECHARGES, TRUE) setCombatFormula(combat3, COMBAT_FORMULA_SKILL, 0, -60, 0.8, 0) function onCastSpell(cid, var) local parameters = { cid = cid, var = var, combat = combat, combat2 = combat2, combat3 = combat3 } addEvent(doCombat, 600, cid, combat, var) -- 600 = é o tempo entre cada hit addEvent(doCombat, 800, cid, combat2, var) -- 800 = é o tempo entre cada hit addEvent(doCombat, 1000, cid, combat3, var) -- 1000 = é o tempo entre cada hit return TRUE end

Vlw zipter se manja demais mano, MDS se eu fosse uma mulher dava pra você, rsrsrs Zoa, Brigadão mesmo em

Quase que perfeito, teria como pular 3 sqms de uma só vez?

Está ai uma spell: local config = { percentM = 0.5, --porcentagem que irá drenar dos montros. percentP = 25, -- porcentagem que irá drenar dos players exhaust = 0 --tempo em segundos para usar a magia de novo. } local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, 13) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, 40) function onCastSpell(cid, var) local enemy = getCreatureTarget(cid) local enemyHealthP = (getCreatureMaxHealth(enemy) / 100 * config.percentP) local enemyHealthM = (getCreatureMaxHealth(enemy) / 100 * config.percentM) if exhaustion.get(cid, 10223) then return false end if isMonster(enemy) then if getCreatureHealth(enemy) >= enemyHealthM then doCreatureAddHealth(enemy, -(enemyHealthM)) doCreatureAddHealth(cid, enemyHealthM) doSendAnimatedText(getThingPos(enemy), "-"..enemyHealthM, 5001) exhaustion.set(cid, 10223, config.exhaust) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"Uma drenagem de health foi ativada, retirando " .. config.percentM .."% de life de sua vitima e acrescentando a você.") return doCombat(cid, combat, var) else doPlayerSendTextMessage(cid, 22, "Seu alvo está com menos de " .. config.percentM .. "% de life a magia não pode ser usada!") return false end elseif isPlayer(enemy) then if getCreatureHealth(enemy) >= enemyHealthP then doCreatureAddHealth(enemy, -(enemyHealthP)) doCreatureAddHealth(cid, enemyHealthP) doSendAnimatedText(getThingPos(enemy), "-"..enemyHealthP, 5001) exhaustion.set(cid, 10223, config.exhaust) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"Uma drenagem de health foi ativada, retirando " .. config.percentP .. "% de life de sua vitima e acrescentando a você.") return doCombat(cid, combat, var) else doPlayerSendTextMessage(cid, 22, "Seu alvo está com menos de "..config.percentP.."% de life a magia não pode ser usada!") return false end end return true end

Leia o tópico atentamente, este e para adicionar e não tem target algum. Crie um tópico ou pesquise o que você necessita.

Agora vai funcionar

Obrigado zipter te amo cara, pena que você não entre na vida de vender seus scripts. (Risos), mais agradeço em nome de todos tudo o que você faz aqui para ajudar. Att: Júlio César, seu fã.

Pode fechar o tópico ja consegui. , vou fazer um tutorial pra ajuda a comunidade rs.