Blazera 8.60
blazera.net
SOBRE O BLAZERA
Um fresh start em um servidor 8.6 clássico, com real map, focado na experiência raiz do Tibia. | Classic Real Map • Fresh Start • Client 8.6 • Old School Gameplay • Active Community
Inicia em:
--
Participar
Histórico de Curtidas
-
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.
-
Kaina1234 deu reputação a Bruno Carvalho em Área Vip e área 2kNegativado pela sub moderação e pelo double post!Na próxima é banimento.
-
Kaina1234 deu reputação a Factur em (Resolvido)[Duvida] Como Adicionar Fly, Ride e Poder caçar o corpse do PokemonAbra 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
-
Kaina1234 deu reputação a Bruno Carvalho em [AJUDA] Base de NaruTibia 7.9O 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"
-
Kaina1234 recebeu reputação de luanluciano93 em Comando De Mudar Nome Do PlayerEae 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.!
-
Kaina1234 recebeu reputação de Drazyn1291 em Comando De Mudar Nome Do PlayerEae 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.!
-
Kaina1234 deu reputação a Max willain em Comando De Mudar Nome Do PlayerAmigo min desculpe mais creio que já tem essa Talkaction aqui no forum mais Rep + pela iniciativa
-
Kaina1234 deu reputação a Drazyn1291 em Comando De Mudar Nome Do PlayerXML? presta mais atenção no tutorial antes de postar >_>
-
Kaina1234 recebeu reputação de TioDoLeite em Comando De Mudar Nome Do PlayerEae 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.!
-
Kaina1234 recebeu reputação de Max willain em Comando De Mudar Nome Do PlayerEae 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.!
-
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
-
Kaina1234 deu reputação a Cat em [PEDIDO] Sistema de !flyamigã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 -
Kaina1234 deu reputação a firewerewolf em [8.54] Pokemon Ownzcara\ este server e bom mais tem buge que players podem fazer itens como um buge aqui !xxt
-
Kaina1234 deu reputação a Ives Natanael em [8.54] Pokemon OwnzObg Amigo
-
Kaina1234 deu reputação a mateus alla em [8.54] Pokemon Ownzv
-
Kaina1234 deu reputação a Jenabento em [8.54] Pokemon OwnzQual acc do god??
-
Kaina1234 deu reputação a MgExe em [8.54] Pokemon OwnzCara Esse Server Tem O Comando /cb ?
Att : [~BIEL~]
REP+
-
Kaina1234 deu reputação a Abreu e Drogs em [DOWNLOAD] Server PokeZote a Conta GOD ?
-
Kaina1234 deu reputação a zerobrillo em [DOWNLOAD] Server PokeZot+REP
-
Kaina1234 deu reputação a vbm em [DOWNLOAD] Server PokeZotEi me ajuda, quando eu baixei tá todo bugado o jogo ! como desbugo?
-
Kaina1234 deu reputação a ClaudioMarcio em [DOWNLOAD] Server PokeZotSem Querer Se Meter Mais o Topico Não Está Escrito Obrigatorio Baixar e Sim Baixa Quem Quizer
-
Kaina1234 deu reputação a jeszao em [DOWNLOAD] Server PokeZot390 MB um servidor de pokemon? nem um mapa global mega editado tem isso ??? sem condições de abaixar....
-
Kaina1234 deu reputação a danieuu em comandos gm poketibia(lista dos que eu conheço) alguns não funcionam, mais é só testar!
-
Kaina1234 deu reputação a jackfan em comandos gm poketibiaeu 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
-
Kaina1234 deu reputação a elios99 em [Pedido]Gesior Website PoketibiaGente 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