Ir para conteúdo

markindoot

Visconde
  • Total de itens

    323
  • Registro em

  • Última visita

  • Dias Ganhos

    3

Tudo que markindoot postou

  1. s e também vá em monster e localize o que queira editar, abra ele e vai em experience =''xxxx'' em rates é como se fosse 1 porcentagem. tente diminuir a magic level para 0.5 e também, pegue a spell que ta dando a ml absurda e coloque outra formula. Espero Ter Ajudado, Se Ajudei REP+ Se Não REP+ Afinal, Eu Tentei.
  2. ou voce pode procurar items editados recentemente Brunnoo.
  3. tenta ver em movements ou em weapons, quando de isso no meu GTA, achei o erro em movements, também reveja os scripts recentes. Espero Ter Ajudado Se Ajudei REP+ Se Não REP+ Afinal, Eu Tentei.
  4. sou fã de exp menores mesmo =D Rep fica pra manhã ok? boa sorte com o servidor.
  5. pode informar o exp? se é Stages? Skills...
  6. tenta esse npc, ele é um NPC de troca, ele troca Queijo por items, troque o ID do queiro pelo Scarab Coins e o item que o NPC dará ao player pelo seu shop. -- NPC de troca - By Conde Sapo local focus = 0 local talk_start = 0 local target = 0 local following = false local attacking = false local addon_state = 0 function onThingMove(creature, thing, oldpos, oldstackpos) end function onCreatureAppear(creature) end function onCreatureDisappear(cid, pos) if focus == cid then selfSay('Good bye then.') focus = 0 talk_start = 0 end end function onCreatureTurn(creature) end function msgcontains(txt, str) return (string.find(txt, str) and not string.find(txt, '(%w+)' .. str) and not string.find(txt, str .. '(%w+)')) end function onCreatureSay(cid, type, msg) msg = string.lower(msg) if (msgcontains(msg, 'hi') and (focus == 0)) and getDistanceToCreature(cid) < 4 then selfSay('Olá ' .. getCreatureName(cid) .. '... Eu daria tudo por alguns queijos... Você tem 5 sobrando aí? Eu posso te dar meu escudo em troca!') focus = cid talk_start = os.clock() elseif msgcontains(msg, 'hi') and (focus ~= cid) and getDistanceToCreature(cid) < 4 then selfSay('Sorry, ' .. getCreatureName(cid) .. '! I talk to you in a minute.') elseif focus == cid then talk_start = os.clock() if msgcontains(msg, 'queijo') or msgcontains(msg, 'escudo') then if doPlayerRemoveItem(cid,2696,5) == 0 then selfSay('Eu disse 5 QUEIJOS!') addon_state = 0 else selfSay('Obrigado, muito mesmo! Tome, isto pode ser útil para você!') doPlayerAddItem(cid, 2512, 1) talk_start = 0 end elseif msgcontains(msg, 'bye') and getDistanceToCreature(cid) < 4 then selfSay('Good bye, ' .. getCreatureName(cid) .. '! Come back soon..') focus = 0 talk_start = 0 end end end function onCreatureChangeOutfit(creature) end function onThink() doNpcSetCreatureFocus(focus) if (os.clock() - talk_start) > 30 then if focus > 0 then selfSay('Next Please...') end focus = 0 end if focus ~= 0 then if getDistanceToCreature(focus) > 5 then selfSay('Good bye then.') focus = 0 end end end em NPC <?xml version="1.0"?> <npc name="Taxijab" script="data/npc/scripts/Cheese.lua" access="3" lookdir="1" autowalk="200" speed="200"> <health now="1" max="1"/> <look type="120" head="38" body="79" legs="107" feet="114"/> </npc>
  7. nesse que lhe passei deu oq? vou dar uma olhada no script anterior e vejo oq posso fazer 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 local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid local shopWindow = {} local moeda = 2159 local t = { [2540] = {price = 20}, [2651] = {price = 20}, [2663] = {price = 20}, [7430] = {price = 20}, [7892] = {price = 20}, [9928] = {price = 20}, } local onBuy = function(cid, item, subType, amount, ignoreCap, inBackpacks) if t[item] and not doPlayerRemoveItem(cid, 2159, t[item].price) then selfSay("you dont have"..t[item].price.." "..getItemNameById(2159), cid) else doPlayerAddItem(cid, item) selfSay("Here your item!", cid) end return true end if (msgcontains(msg, 'trade') or msgcontains(msg, 'TRADE'))then for var, ret in pairs(t) do table.insert(shopWindow, {id = var, subType = 0, buy = ret.price, sell = 0, name = getItemNameById(var)}) end openShopWindow(cid, shopWindow, onBuy, onSell) end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) ve se vai esse, vou chegar em casa e vou criar 1 npc para testar antes de ficar lhe mandando ok? é que tou no trampo e n tenho o tibia e pior ainda 1 otserv, entao 16:30 eu chego e jogo até... Abraço!
  8. Show de bola o servidor eim... voltando: tenta esse aqui 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 local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid -- Conversa Jogador/NPC if(msgcontains(msg, 'list')) then selfSay('Eu vendo {Vip Helmet }, {Vip Armor}.', cid) elseif(msgcontains(msg, 'Vip Helmet')) then selfSay('Voc\ê quer comprar Vip Helmet por 20 moedas de ouro?', cid) talkState[talkUser] = 1 elseif(msgcontains(msg, 'Vip Armor')) then selfSay('Voc\ê quer comprar Vip Armor por 100 moedas de ouro?', cid) talkState[talkUser] = 2 -- Confirmação da Compra elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 1) then if(doPlayerRemoveItem(cid, 2159, 20) == true) then selfSay('Obrigado por comprar!', cid) doPlayerAddItem(cid, xxxx, 1) talkState[talkUser] = 0 else selfSay('Voc\ê n\ão tem 20 moedas de ouro', cid) talkState[talkUser] = 0 end elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 2) then if(doPlayerRemoveItem(cid, 2159, 100) == true) then selfSay('Obrigado por comprar!', cid) doPlayerAddItem(cid, xxxx, 1) talkState[talkUser] = 0 else selfSay('Voc\ê n\ão tem 100 moedas de ouro', cid) talkState[talkUser] = 0 end end end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) sanada? REP+ porfavor e reportar para ser movido!
  9. nen sabia disso ^^ mais pretendo criar ainda, e não é copiar se a pessoa nunca viu =D
  10. Você pode postar uma ss? com o trade aberto e com 1kk na bag e mostrando no npc pra ver oq ele ta aceitando e não.
  11. xml? minha criança, issu é em NPC/Scripts e o numero do scarab coin é 3440, troca la o local moeda = 2159 <- (3440) e se o script já vende, retira o buyable e ve no que da, se continuar me manda ss do npc em trade com voce
  12. se quiser um mapper tou ai =D e spriter também (Meu irmão), ai agente fais esse filme ai ^^
  13. Isso é bem simples, pegue um NPC comun que vende aol, acrescente os items e mude o ID do item que o NPC (ao inveiz de ser Money) aceita, no seu caso é o Scarab Coins ae achei esse pra voce. 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 local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid local shopWindow = {} local moeda = 9020 -- ID da moeda local t = { [2195] = {price = 15}, -- [ITEM ID PARA VENDER] = {QNTO CUSTARÁ} [2493] = {price = 25}, [2361] = {price = 30}, [8851] = {price = 20}, [8925] = {price = 30}, [2640] = {price = 50}, [2494] = {price = 100}, [9932] = {price = 50}, [2472] = {price = 70}, [8931] = {price = 100} } local onBuy = function(cid, item, subType, amount, ignoreCap, inBackpacks) if t[item] and not doPlayerRemoveItem(cid, moeda, t[item].price) then selfSay("you dont have"..t[item].price.." "..getItemNameById(moeda), cid) else doPlayerAddItem(cid, item) selfSay("Here your item!", cid) end return true end if (msgcontains(msg, 'trade') or msgcontains(msg, 'TRADE'))then for var, ret in pairs(t) do table.insert(shopWindow, {id = var, subType = 0, buy = ret.price, sell = 0, name = getItemNameById(var)}) end openShopWindow(cid, shopWindow, onBuy, onSell) end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())
  14. Falae Galerinha do XTibia, Queria pedir a vocês um NPC que promove player level 100+ e Uma spell. Um player level 100 chega no npc e diz: NPC Name: Moluf Master Player: hi NPC; Ola jovem aventureiro, gostaria de ser [promovido] Player: yes NPC: Você Foi Promovido, agora voce é um [Class nova que irei criar]. Obs: o NPC cobra 100k para promover os players. <----------------------> Queria pedir uma spell que bufa o player por 5 minutos, ela iria estourar aqueles effects do (Exevo Gran Mas Flam) em diferentes posições, almentaria as skills Axe, Club, Sword.
  15. local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat1, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA) setCombatParam(combat1, COMBAT_PARAM_USECHARGES, true) local combat2 = createCombatObject() setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat2, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA) setCombatParam(combat2, COMBAT_PARAM_USECHARGES, true) local combat3 = createCombatObject() setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat3, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA) setCombatParam(combat3, COMBAT_PARAM_USECHARGES, true) local combat4 = createCombatObject() setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat4, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA) setCombatParam(combat4, COMBAT_PARAM_USECHARGES, true) local combat5 = createCombatObject() setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat5, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA) setCombatParam(combat5, COMBAT_PARAM_USECHARGES, true) local combat6 = createCombatObject() setCombatParam(combat6, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat6, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA) setCombatParam(combat6, COMBAT_PARAM_USECHARGES, true) local combat7 = createCombatObject() setCombatParam(combat7, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat7, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA) setCombatParam(combat7, COMBAT_PARAM_USECHARGES, true) local combat8 = createCombatObject() setCombatParam(combat8, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat8, COMBAT_PARAM_EFFECT, CONST_ME_HITAREA) setCombatParam(combat8, COMBAT_PARAM_USECHARGES, true) local arr1 = { {0, 0, 0}, {0, 2, 0}, {0, 0, 1}, } local arr2 = { {0, 0, 0}, {0, 2, 0}, {0, 1, 0}, } local arr3 = { {0, 0, 0}, {0, 2, 0}, {1, 0, 0}, } local arr4 = { {0, 0, 0}, {1, 2, 0}, {0, 0, 0}, } local arr5 = { {1, 0, 0}, {0, 2, 0}, {0, 0, 0}, } local arr6 = { {0, 1, 0}, {0, 2, 0}, {0, 0, 0}, } local arr7 = { {0, 0, 1}, {0, 2, 0}, {0, 0, 0}, } local arr8 = { {0, 0, 0}, {0, 2, 1}, {0, 0, 0}, } local area1 = createCombatArea(arr1) local area2 = createCombatArea(arr2) local area3 = createCombatArea(arr3) local area4 = createCombatArea(arr4) local area5 = createCombatArea(arr5) local area6 = createCombatArea(arr6) local area7 = createCombatArea(arr7) local area8 = createCombatArea(arr8) setCombatArea(combat1, area1) setCombatArea(combat2, area2) setCombatArea(combat3, area3) setCombatArea(combat4, area4) setCombatArea(combat5, area5) setCombatArea(combat6, area6) setCombatArea(combat7, area7) setCombatArea(combat8, area8) local function onCastSpell1(parameters) doCombat(parameters.cid, parameters.combat1, parameters.var) end local function onCastSpell2(parameters) doCombat(parameters.cid, parameters.combat2, parameters.var) end local function onCastSpell3(parameters) doCombat(parameters.cid, parameters.combat3, parameters.var) end local function onCastSpell4(parameters) doCombat(parameters.cid, parameters.combat4, parameters.var) end local function onCastSpell5(parameters) doCombat(parameters.cid, parameters.combat5, parameters.var) end local function onCastSpell6(parameters) doCombat(parameters.cid, parameters.combat6, parameters.var) end local function onCastSpell7(parameters) doCombat(parameters.cid, parameters.combat7, parameters.var) end local function onCastSpell8(parameters) doCombat(parameters.cid, parameters.combat8, parameters.var) end function onCastSpell(cid, var) local parameters = { cid = cid, var = var,combat1 = combat1,combat2 = combat2,combat3 = combat3,combat4 = combat4,combat5 = combat5,combat6 = combat6,combat7 = combat7,combat8 = combat8 } addEvent(onCastSpell1, 100, parameters) addEvent(onCastSpell2, 300, parameters) addEvent(onCastSpell3, 500, parameters) addEvent(onCastSpell4, 700, parameters) addEvent(onCastSpell5, 900, parameters) addEvent(onCastSpell6, 1100, parameters) addEvent(onCastSpell7, 1300, parameters) addEvent(onCastSpell8, 1500, parameters) end Desculpa pelo imenso script, ve se esse serve =D
  16. nao sei se funfa, mas nun seria melhor se por um Tile embaixo do teleport? de Vip System. só arrumar o script do Script de VIP System e por a storage dele no Piso, em seguida coloque o teleport emcima. issu funciona com piso pz, para pks nao entra no tp.
  17. Não é anime mais é filme, fais o Senhor dos Aneis, seria uma boa para tibia e outra, a maioria das sprites existentes podem ser usadas =D ai voce removeria o Druida e deixaria só o mage. colocaria level 1 ao 8 tipo uma rookguard, falasse com 1 oracle para se transformar em Guerreiro, Arqueiro ou Mago ai no level 100+ eles podem evoluir para Destroyer, Atirador de Elite e Bruxo sei la =D ou poderia por no mago o nome do Gandalf ^^ como Vocation, eu tava pensando em montar um servidor assim, mais estou sem tempo. Também poderiar criar 2 nações, 1 de humans e outra de orcs e faser esse system ai, Nações de Orcs: Guerreiro (Destryer) - Arqueiro (Atirador de ELITE) - Mago (Bruxo).<- Modo Orc Nações Humans: Guerreiro (Destryer) - Arqueiro (Atirador de ELITE) - Mago (Bruxo). <- Humanos.
  18. só vou poder logar amanha, adc skype: marcelo.vinicuis264
  19. @edit ja lhe ajudarao com o script correto =D retirando o meu que não era do seu gosto.
  20. sla eu vi la no outro topic ensinando scripting kk mais deixa, ve ai e me diz como tinha ficado meu script =D tenho 18 horas de scripting só
  21. melhor que voce fais é retirar as spr do PBO Brasil, segunda é jogar as spr dele no tibia 8.6 como eu disse ou 8.54. Va em Files/Preferencias/Client e muda para um deles, dependendo da sua versão (8.54 / 8.6) em seguida de um Ctrl + S ou se não atualizar, feche e abra o RME. Se continuar o erro volte a postar. Se Ajudei REP+ Se Não Ajudei REP+ Afinal, Eu Tentei.
  22. markindoot

    função

    @Edit Vou tentar lhe ajudar 1 min creio que voce quer reduzir essa função (area)
  23. meu amigo, issu não é uma spell e sim uma Action!
  24. Roksas meu Script tava servindo de algo? tava bom? +/- para um iniciante? ou tava uma grande caquinha? kkk =D analisa o meu ai é me fala oq tu acha. mel dels agora que percebi que fiz a primeira burrada que nunca deve se faser em um script, colocar um if dentro de outro kkkk. Já arrumei =D
  25. Meu caro amigo faça oq eu disser: Exclua seu SCRIPT e Ponha este! function onUse(cid, item, fromPosition, itemEx, toPosition) local need_target = true -- Precisa de target? (true / false) Se false, o sistema utilizará o Use With. local bullet_id = 2160 -- ID da munição local shots_amount = 1 -- Tiros por vez local exhaustion_time = 1 -- Segundos de exhaustion local exhaust = 19301 -- Storage da exhaustion local dmg_min, dmg_max = -100, -200 -- Dano mínimo, dano máximo local shot_effect = 10 -- Efeito do tiro local shot_distance_effect = 1 -- Distance effect do tiro local damage_type = COMBAT_PHYSICALDAMAGE -- Tipo de dano local shots_delay = 200 -- Delay dos tiros (em milissegundos) if need_target then if getCreatureTarget(cid) <= 0 then return doPlayerSendCancel(cid, "Selecione um alvo primeiro.") elseif getPlayerItemCount(cid, bullet_id) < shots_amount then return doPlayerSendCancel(cid, "Você não possui munição.") elseif exhaustion.check(cid, exhaust) then return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.") end exhaustion.set(cid, exhaust, exhaustion_time) for i = 0, shots_amount-1 do addEvent(function() if getCreatureTarget(cid) <= 0 then return true elseif getPlayerItemCount(cid, bullet_id) < 1 then return doPlayerSendCancel(cid, "Você não possui munição.") end doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(getCreatureTarget(cid)), shot_distance_effect) doTargetCombatHealth(cid, getCreatureTarget(cid), damage_type, dmg_min, dmg_max, shot_effect) doPlayerRemoveItem(cid, bullet_id, 1) end, shots_delay*i) end else if not isCreature(itemEx.uid) then return doPlayerSendCancel(cid, "Selecione um alvo primeiro.") elseif getPlayerItemCount(cid, bullet_id) < shots_amount then return doPlayerSendCancel(cid, "Você não possui munição.") elseif exhaustion.check(cid, exhaust) then return doPlayerSendCancel(cid, "Aguarde "..(exhaustion.get(cid, exhaust)).." segundos para usar a arma novamente.") end exhaustion.set(cid, exhaust, exhaustion_time) for i = 0, shots_amount-1 do addEvent(function() if not isCreature(itemEx.uid) then return true elseif getPlayerItemCount(cid, bullet_id) < 1 then return doPlayerSendCancel(cid, "Você não possui munição.") end doSendDistanceShoot(getCreaturePosition(cid), getCreaturePosition(itemEx.uid), shot_distance_effect) doTargetCombatHealth(cid, itemEx.uid, damage_type, dmg_min, dmg_max, shot_effect) doPlayerRemoveItem(cid, bullet_id, 1) end, shots_delay*i) end end return true end TAG <action itemid="xxxx" script="pistol.lua" allowfaruse="1"/> Obs: allowfaruse = distance, 1 = 1sqm, 5 = 5sqm de distancia e assim sucessivamente! Se Ajudei REP+ Se Não Ajudei REP+ Afinal, Eu Tentei.
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...