Ir para conteúdo

Kaina1234

Membro
  • Registro em

  • Última visita

Histórico de Curtidas

  1. Gostei
    Kaina1234 deu reputação a xWhiteWolf em (Resolvido)Atributos diferentes nos items   
    /\ esse não é o jeito de se fazer isso.

    Seguinte, se vc quiser adicionar esses atributos numa tag do items.xml vc precisará fazer alterações na source, todas elas são conditions que vc vai ter que adicionar ao equipar um item.

    Como vc pode ver nesse tópico, nenhum desses atributos existe realmente no tibia http://www.tibiaking.com/forum/topic/31450-pedido-editar-items/

     
    local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, -1) setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, 50) setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, 50) setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, 50) setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, 50) function onEquip(cid, item, slot) doAddCondition(cid, condition) doSendMagicEffect(getCreaturePos(cid), 10) return true end function onDeEquip(cid, item, slot) doRemoveCondition(cid, CONDITION_ATTRIBUTES) return true end <movevent type="Equip" itemid="11234" slot="feet" event="script" value="set.lua"/> <movevent type="DeEquip" itemid="11234" slot="feet" event="script" value="set.lua"/> Dessa maneira vc pode editar os atributos que serão adicionados com todas as conditions existentes no seu servidor:




    Agora sobre a espada que tira dano em % é só vc editar ela pelo items.xml igual a fire sword por exemplo, se ela tiver 80 de ataque físico e 20 de ataque de fire/ice serão 20% certinho. Qualquer outro valor vc faz regra de 3 e chega.. o outro modo de fazer isso é por 2 combats num script de weapons mas não é tão eficaz como a maneira citada acima.
  2. Gostei
    Kaina1234 deu reputação a Bruno Carvalho em Área Vip e área 2k   
    Negativado pela sub moderação e pelo double post!Na próxima é banimento.
  3. Gostei
    Abra sua configuration.lua
     
    Procure o nome de quaisquer pokémon que vooa, no meu caso vou pesquizar "MEW"
     
    Vá pesquizando até você achar um código parecido com este.
    ["Mew"] = {232, 2200}, -- Mew é o nome do poke, 232 é a id do fly subtraida por 301, 2200 é a velocidade. Copie o codigo e cole embaixo
    Onde está escrito Mew, substitua pelo nome do seu pokémon Onde está escrito 232, é o ID do seu poke (ex 533) subtraido por -301 (533-301=232) Onde ta escrito 2.200 é a velocidade do fly. Um exemplo de Charizard
    ["Charizard"] = {216, 4000}, Troquei o Mew pelo nome do meu pokémon (Charizard) Troquei 233 pela id do fly do charizard (lembrando de subtrair por -301) Troquei a velocidade do fly do Mew de 2.200 para 4.000 no Charizard. Agora procura novamente o nome do tal pokémon que vooa, no meu caso Mew,
    até você achar um código parecido com este.
    ["fly"] = {"Mew"}, --Vai ter varios poke, apenas tirei eles para não atrapalhar. Adicione o nome do seu pokémon que vai ter fly, no meu caso, Charizard
    ["fly"] = {"Mew", "Charizard"}, --Adicionei Charizard :3 Creio que seja isso, até a próxima =D
  4. Gostei
    Kaina1234 deu reputação a Bruno Carvalho em [AJUDA] Base de NaruTibia 7.9   
    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 Servidores Derivados"
  5. Gostei
    Kaina1234 recebeu reputação de luanluciano93 em Comando De Mudar Nome Do Player   
    Eae Galera Do Tk,Este é Meu 1° Tópico De Talkaction /rename Para Seu Ot,Como a Maioria De Vocês Sabem Muitas Pessoas Tem O Trabalho De Ter Que Ir Láá No Editor Account Para Mudar O Nome De Um Player.
     
    Aqui Esta Sua Soluçao! Sistema de /rename pra vcs.
     
    Vá Em Data/Talkactions/Scripts
    Crie ou Copie Um Arquivo Xml changename.lua
    Dentro Dele Apague Oque Estiver Escrito e Coloque:
     
    Funciona Assim: O GOD ou Cm Diz:  /rename nome do player,novo nome do player
    Ex: /rename kaina,kaina1234               kaina é o meu nome atual e kaina1234 é o  novo nome dado.
    Galera Do Tk Mals Nao Achei Os Creditos Peguei Do Narutibia Que Eu Tenho Vlws.!   
  6. Gostei
    Kaina1234 recebeu reputação de Drazyn1291 em Comando De Mudar Nome Do Player   
    Eae Galera Do Tk,Este é Meu 1° Tópico De Talkaction /rename Para Seu Ot,Como a Maioria De Vocês Sabem Muitas Pessoas Tem O Trabalho De Ter Que Ir Láá No Editor Account Para Mudar O Nome De Um Player.
     
    Aqui Esta Sua Soluçao! Sistema de /rename pra vcs.
     
    Vá Em Data/Talkactions/Scripts
    Crie ou Copie Um Arquivo Xml changename.lua
    Dentro Dele Apague Oque Estiver Escrito e Coloque:
     
    Funciona Assim: O GOD ou Cm Diz:  /rename nome do player,novo nome do player
    Ex: /rename kaina,kaina1234               kaina é o meu nome atual e kaina1234 é o  novo nome dado.
    Galera Do Tk Mals Nao Achei Os Creditos Peguei Do Narutibia Que Eu Tenho Vlws.!   
  7. Gostei
    Kaina1234 deu reputação a Max willain em Comando De Mudar Nome Do Player   
    Amigo min desculpe mais creio que já tem essa Talkaction aqui no forum mais Rep + pela iniciativa   
  8. Gostei
    Kaina1234 deu reputação a Drazyn1291 em Comando De Mudar Nome Do Player   
    XML? presta mais atenção no tutorial antes de postar >_>
  9. Gostei
    Kaina1234 recebeu reputação de TioDoLeite em Comando De Mudar Nome Do Player   
    Eae Galera Do Tk,Este é Meu 1° Tópico De Talkaction /rename Para Seu Ot,Como a Maioria De Vocês Sabem Muitas Pessoas Tem O Trabalho De Ter Que Ir Láá No Editor Account Para Mudar O Nome De Um Player.
     
    Aqui Esta Sua Soluçao! Sistema de /rename pra vcs.
     
    Vá Em Data/Talkactions/Scripts
    Crie ou Copie Um Arquivo Xml changename.lua
    Dentro Dele Apague Oque Estiver Escrito e Coloque:
     
    Funciona Assim: O GOD ou Cm Diz:  /rename nome do player,novo nome do player
    Ex: /rename kaina,kaina1234               kaina é o meu nome atual e kaina1234 é o  novo nome dado.
    Galera Do Tk Mals Nao Achei Os Creditos Peguei Do Narutibia Que Eu Tenho Vlws.!   
  10. Gostei
    Kaina1234 recebeu reputação de Max willain em Comando De Mudar Nome Do Player   
    Eae Galera Do Tk,Este é Meu 1° Tópico De Talkaction /rename Para Seu Ot,Como a Maioria De Vocês Sabem Muitas Pessoas Tem O Trabalho De Ter Que Ir Láá No Editor Account Para Mudar O Nome De Um Player.
     
    Aqui Esta Sua Soluçao! Sistema de /rename pra vcs.
     
    Vá Em Data/Talkactions/Scripts
    Crie ou Copie Um Arquivo Xml changename.lua
    Dentro Dele Apague Oque Estiver Escrito e Coloque:
     
    Funciona Assim: O GOD ou Cm Diz:  /rename nome do player,novo nome do player
    Ex: /rename kaina,kaina1234               kaina é o meu nome atual e kaina1234 é o  novo nome dado.
    Galera Do Tk Mals Nao Achei Os Creditos Peguei Do Narutibia Que Eu Tenho Vlws.!   
  11. Gostei
    Kaina1234 deu reputação a Wend em Duvida proteger tibia.spr | tibia.dat | tibia.pic   
    é isso que vocês querem? 
     
    https://www.youtube.com/watch?v=GSxA2lOChtE 
  12. Gostei
    Kaina1234 deu reputação a Cat em [PEDIDO] Sistema de !fly   
    amigão, eu não tenho esse script e não sei como fazer, mas talvez o script do Mock possa ser útil, não sei se vai funcionar mas vou tentar ;p
     
    Créditos: Mock
    CONST_FLYVOID = 460 CONT_FLYOUTFIT = 239 IGNORED = {6495,7096,7099,5167,5162,5163,405,7100, 5315,5521,5316,5193,5192,5191,945,5048,923,950,951, 952,953,3623,954,955,949,9101,3352,9106,9103,1524, 1111,437,433,443,434,442,436,445,941,444,435,943, 1027,925,930,926,928,922,921,1112,406,904,931,934, 932,933,5319} --- Config here up = {} down = {} fly = {} fly.win = function(cid)-- Script by mock     setPlayerStorageValue(cid, 102015,1)     doPlayerSendTextMessage(cid,27,'Now you can fly.') end fly.add = function(cid)-- Script by mock     if getPlayerStorageValue(cid, 102015) == -1 or getPlayerStorageValue(cid,13241) == 1 then         return false     end     if getPlayerStorageValue(cid, 102059) <= 0 then         local outfit = getCreatureOutfit(cid)         outfit.lookType = CONT_FLYOUTFIT         doSetCreatureOutfit(cid, outfit, -1)         setPlayerStorageValue(cid, 102059,1)         doChangeSpeed(cid, 390)         doPlayerSendTextMessage(cid,27,'Fale \'up\' e \'down\'.' )         return true     else         doPlayerSendTextMessage(cid,27, "Você ja esta voando.")         return false     end end function isWalkable(pos, creature, proj, pz)-- by Nord     if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end     if getTopCreature(pos).uid > 0 and creature then return false end     if getTileInfo(pos).protection and pz then return false, true end     local n = not proj and 3 or 2     for i = 0, 255 do         pos.stackpos = i         local tile = getTileThingByPos(pos)         if tile.itemid ~= 0 and not isCreature(tile.uid) then             if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then                 return false             end         end     end     return true end fly.using=function(cid)-- Script by mock return getPlayerStorageValue(cid, 102059) > 0 end fly.logout = function(cid)-- Script by mock     if fly.using(cid) then         local p = getCreaturePosition(cid)         setPlayerStorageValue(cid, 102010,1)         setPlayerStorageValue(cid, 102011,p.x)         setPlayerStorageValue(cid, 102012,p.y)         setPlayerStorageValue(cid, 102013,p.z)         deletarEmVolta(p)         fly.del(cid)     end     return true end fly.login = function(cid)-- Script by mock     if getPlayerStorageValue(cid, 102010) ~= -1 then         setPlayerStorageValue(cid, 102010,-1)         local p = {}         p.x = getPlayerStorageValue(cid, 102011)         p.y = getPlayerStorageValue(cid, 102012)         p.z = getPlayerStorageValue(cid, 102013)         if not checkAround(p) then             fly.add(cid)             down.gerarEmVolta(p)             doTeleportThing(cid,p)         end     end     return true end fly.die = function(cid)-- Script by mock     if fly.using(cid) then         local p = getCreaturePosition(cid)         setPlayerStorageValue(cid, 102011,-1)         setPlayerStorageValue(cid, 102012,-1)         setPlayerStorageValue(cid, 102013,-1)         deletarEmVolta(p)         fly.del(cid)     end     return true end fly.del = function(cid)-- Script by mock     if getPlayerStorageValue(cid, 102059) > 0 then         if getSqmId(getCreaturePosition(cid)).itemid == CONST_FLYVOID then             return false         end         doRemoveCondition(cid, CONDITION_OUTFIT)         setPlayerStorageValue(cid, 102059,-1)         doChangeSpeed(cid, -390)         return true     end end function hasSqm2(pos)-- Script by mock     local f = getTileThingByPos(pos)     if f.itemid ~= 0 and f.itemid ~= 1 and (not isWalkable(pos) and not isInArray(IGNORED,f.itemid)) then         return true     end     return false end function hasSqm3(pos)-- Script by mock     local f = getTileThingByPos(pos)     if f.itemid ~= 0 and f.itemid ~= 1 and f.itemid ~= CONST_FLYVOID and not isInArray(IGNORED,f.itemid) then         return true     end     return false end function deletar(pos)-- Script by mock     if hasSqm(pos) then         local sqm = getSqmId(pos)         if sqm.itemid == CONST_FLYVOID then             doRemoveItem(sqm.uid,1)         end     end end function deletarEmVolta(pos)     for x=-1,1 do         for y=-1,1 do             deletar({x=pos.x+x,y=pos.y+y,z=pos.z})         end     end end function checkAround(pos)-- Script by mock     for x=-1,1 do         for y=-1,1 do             if hasSqm2({x=pos.x+x,y=pos.y+y,z=pos.z}) then                 return true             end         end     end     return false end function fly.checkAround(pos)-- Script by mock     local n = 0     for x=-1,1 do         for y=-1,1 do             local g = getTileThingByPos({x=pos.x+x,y=pos.y+y,z=pos.z})             if g.itemid == CONST_FLYVOID then                 n = n+1             end             if isCreature(getTopCreature({x=pos.x+x,y=pos.y+y,z=pos.z}).uid) then                 return false             end         end     end     if n == 9 then         return true     end     return false end function up.checkAround(pos)-- Script by mock     for x=-1,1 do         for y=-1,1 do         local g = getTileThingByPos({x=pos.x+x,y=pos.y+y,z=pos.z})             if hasSqm3({x=pos.x+x,y=pos.y+y,z=pos.z}) or g.itemid == CONST_FLYVOID then                 return true             end         end     end     return false end function down.checkAround(pos,f)-- Script by mock     for x=-1,1 do         for y=-1,1 do         local g = getTileThingByPos({x=pos.x+x,y=pos.y+y,z=pos.z})             if (not f and hasSqm2({x=pos.x+x,y=pos.y+y,z=pos.z})) or g.itemid == CONST_FLYVOID then                 return true             end         end     end     return false end function gerarEmVolta(pos)-- Script by mock     local n = 30000     for x=-1,1 do         for y=-1,1 do             n =n+1             doItem({x=pos.x+x,y=pos.y+y,z=pos.z},n)         end     end end function doItem(pos,a,d)-- Script by mock     if not hasSqm2(pos) then         doCreateTile(CONST_FLYVOID,pos)         pos.stackpos = 0         local c = getTileThingByPos(pos)         doSetItemActionId(c.uid, a)     end end function getSqmId(pos,t)-- Script by mock     if hasSqm(pos) or t then         pos.stackpos = 0         local i = getTileThingByPos(pos)         return i     end     return nil end function down.doItem(pos,a)-- Script by mock     if not hasSqm(pos) then         doCreateTile(CONST_FLYVOID,pos)         pos.stackpos = 0         local c = getTileThingByPos(pos)         doSetItemActionId(c.uid, a)     end end function down.gerarEmVolta(pos)-- Script by mock     local n = 30000     for x=-1,1 do         for y=-1,1 do             n =n+1             down.doItem({x=pos.x+x,y=pos.y+y,z=pos.z},n)         end     end end function doCreateTile(id,pos) -- Script by mock     doAreaCombatHealth(0,0,pos,0,0,0,255)     doCreateItem(id,1,pos) end Agora é 1 scritp em creaturescripts, 3 em talkactions e 1 em movements.
    Creaturescripts
    Em seu login.lua coloque isso:
    fly.login(cid)
    no seu logout.lua coloque isso:
    fly.logout(cid)
    e no script que o player morre coloque isso:
    fly.die(cid)
    Isso é para quando o player entrar e sair do server pra voltar onde ele estava :coolface:
    Movements
    Em movements.xml:
    <movevent type="StepIn" actionid="30001" event="script" value="fly.lua"/>     <movevent type="StepIn" actionid="30002" event="script" value="fly.lua"/>     <movevent type="StepIn" actionid="30003" event="script" value="fly.lua"/>     <movevent type="StepIn" actionid="30004" event="script" value="fly.lua"/>     <movevent type="StepOut" actionid="30005" event="script" value="fly.lua"/>     <movevent type="StepIn" actionid="30006" event="script" value="fly.lua"/>     <movevent type="StepIn" actionid="30007" event="script" value="fly.lua"/>     <movevent type="StepIn" actionid="30008" event="script" value="fly.lua"/>     <movevent type="StepIn" actionid="30009" event="script" value="fly.lua"/>     <movevent type="AddItem" tileitem="1" itemid="460" event="script" value="fly.lua"/> E no script fly.lua
    ---Script by mock the bear function doCopyItem(item,pos) ---Script by mock the bear     for i=1,6 do         pos.z = pos.z+1         if hasSqm(pos) and getSqmId(pos).itemid ~= 10217 then                 local i = doCreateItem(item.itemid,item.type,pos)                 if item.actionid ~= 0 then                     doSetItemActionid(i,item.actionid)                 end                 doSendMagicEffect(pos,9)                 return i         else             local p2 = {x=pos.x+1,y=pos.y+1,z=pos.z}             doSendDistanceShoot(pos,p2,40)             doSendMagicEffect(pos,2)         end     end end function onAddItem(item,pos,k) ---Script by mock the bear doCopyItem(item,k) doRemoveItem(item.uid,item.type == 0 and 1 or item.type) end function onStepIn(cid, item, position, fromPosition) ---Script by mock the bear     local dir = {     [30004] = {0,6,7},     [30007] = {7,0,6,1,5},     [30008] = {1,5,7},     [30009] = {5,4,2,1,7},     [30006] = {2,5,4},     [30003] = {4,3,6,2,5},     [30002] = {3,4,6},     [30001] = {6,0,7,3,4},     }     if isPlayer(cid) then         local chkps = {x=position.x,y=position.y,z=position.z}         local ig = false         for i,b in pairs(dir[item.actionid]) do             local nw = getPosByDir(chkps,b)             local g = getTileThingByPos(nw)             if hasSqm3(nw) or g.itemid == CONST_FLYVOID or nw.x < 35 or nw.y < 35 then                 ig = true                 break             end         end         if not ig then             deletarEmVolta(fromPosition)             gerarEmVolta(getCreaturePosition(cid))         else             doTeleportThing(cid,fromPosition,false)             doPlayerSendTextMessage(cid,27, "Sorry, you cannot fly here.")         end     end end function onStepOut(cid, item, position, fromPosition,q)     addEvent(function(pos) if fly.checkAround(pos) then deletarEmVolta(pos) end end,10000,position) end Talkactions
    Em talkactions.xml
    <talkaction words="up" case-sensitive="no" event="script" value="flyup.lua"/>     <talkaction words="down" case-sensitive="no" event="script" value="flydown.lua"/>     <talkaction words="!fly" case-sensitive="no" event="script" value="fly.lua"/> Em fly.lua
    function onSay(cid, words, param) --- By moc kthe bear (MTB) if param ~= '' and getPlayerGroupId(cid) > 3 then local cida = getPlayerByName(param) if cida and isPlayer(cida) then fly.win(cida) end return true end if fly.using(cid) then local p = getCreaturePosition(cid) p.stackpos = 0 local f = getTileThingByPos(p) if fly.del(cid) then if f.itemid ~= 0 and f.itemid ~= 1 and f.itemid ~= CONST_FLYVOID then return true else setPlayerStorageValue(cid,10941,1) local p = getCreaturePosition(cid) setPlayerStorageValue(cid, 102011,p.x) setPlayerStorageValue(cid, 102012,p.y) setPlayerStorageValue(cid, 102013,p.z) return true end else doPlayerSendTextMessage(cid,27,'You cannot turn off the fly here.') end else if fly.add(cid) then local pos = getCreaturePosition(cid) if getSqmId(pos).itemid == 10217 then down.gerarEmVolta(pos) end return true else doPlayerSendTextMessage(cid,27,'You cannot fly.') return true end end return true endFlyup.lua function onSay(cid)--- By moc kthe bear (MTB) local time = os.time() if time < getPlayerStorageValue(cid, 102054) then doPlayerSendCancel(cid, "You are exhausted.") return true end if not fly.using(cid) then return false end local pos = getCreaturePosition(cid) pos.z = pos.z-1 if hasSqm(pos) or pos.z < 0 or up.checkAround(pos) then doPlayerSendTextMessage(cid,27,'You cannot fly higger.') return true else gerarEmVolta(pos) doTeleportThing(cid,pos) pos.z = pos.z+1 deletarEmVolta(pos) end return true endFlydown.lua function onSay(cid)--- By moc kthe bear (MTB) local time = os.time() if time < getPlayerStorageValue(cid, 102054) then doPlayerSendCancel(cid, "You are exhausted.") return true end if not fly.using(cid) then return false end local pos = getCreaturePosition(cid) pos.stackpos = 0 local g = getTileThingByPos(pos) pos.z = pos.z+1 local f = getTileThingByPos(pos) if getSqmId(getCreaturePosition(cid)).itemid ~= CONST_FLYVOID or down.checkAround(pos) or (g.itemid ~= CONST_FLYVOID and f.itemid ~= CONST_FLYVOID and f.itemid ~= 0 and f.itemid ~= 1) or (not isWalkable(pos,true,false,false) and hasSqm(pos)) or (hasSqm(pos) and not getTileHouseInfo(pos)) == 0 then doPlayerSendTextMessage(cid,27,'You cannot go to down here.') return true else down.gerarEmVolta(pos) doTeleportThing(cid,pos) pos.z = pos.z-1 deletarEmVolta(pos) end return true end
  13. Gostei
    Kaina1234 deu reputação a firewerewolf em [8.54] Pokemon Ownz   
    cara\ este server e bom mais tem buge que players podem fazer itens como um buge aqui !xxt
  14. Gostei
    Kaina1234 deu reputação a Ives Natanael em [8.54] Pokemon Ownz   
    Obg Amigo
  15. Gostei
    Kaina1234 deu reputação a mateus alla em [8.54] Pokemon Ownz   
    v
  16. Gostei
    Kaina1234 deu reputação a Jenabento em [8.54] Pokemon Ownz   
    Qual acc do god??
  17. Gostei
    Kaina1234 deu reputação a MgExe em [8.54] Pokemon Ownz   
    Cara Esse Server Tem O Comando   /cb    ?
     
     
     
    Att : [~BIEL~]
     
     
     
     
    REP+
  18. Gostei
    Kaina1234 deu reputação a Abreu e Drogs em [DOWNLOAD] Server PokeZot   
    e a Conta GOD ?
  19. Gostei
    Kaina1234 deu reputação a zerobrillo em [DOWNLOAD] Server PokeZot   
    +REP
  20. Gostei
    Kaina1234 deu reputação a vbm em [DOWNLOAD] Server PokeZot   
    Ei me ajuda, quando eu baixei tá todo bugado o jogo ! como desbugo?
  21. Gostei
    Kaina1234 deu reputação a ClaudioMarcio em [DOWNLOAD] Server PokeZot   
    Sem Querer Se Meter Mais o Topico Não Está Escrito Obrigatorio Baixar e Sim Baixa Quem Quizer
  22. Gostei
    Kaina1234 deu reputação a jeszao em [DOWNLOAD] Server PokeZot   
    390 MB um servidor de pokemon? nem um mapa global mega editado tem isso ??? sem condições de abaixar....
  23. Gostei
    Kaina1234 deu reputação a danieuu em comandos gm poketibia   
    (lista dos que eu conheço) alguns não funcionam, mais é só testar!



  24. Gostei
    Kaina1234 deu reputação a jackfan em comandos gm poketibia   
    eu quero saber os comandos do gm de poketibia os outros topicos estao tudo desorganizados tudo separado quero saber comandos so de gm todos se for possivel e quero saber se gm pode invocar monstros assim /s palkia valendo +rep
  25. Gostei
    Kaina1234 deu reputação a elios99 em [Pedido]Gesior Website Poketibia   
    Gente estou fazendo um Ot pokemon com a base do Ot pokemon Centurion v8 estou arrumando ainda
    Eu queria pedir um site com o tema de black and whit igual a do pokemon br q tenha lojas e etc
    Entao Obrigado
     
    Att:elios99

Informação Importante

Confirmação de Termo