valakas

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 if (msgcontains(msg, 'Evoluir') or msgcontains(msg, 'evoluir')) then --alterado v1.7 selfSay("Voce quer tranformar seu Tangela em Tangrowth? Voce precisa do Tangela+20 + 2,5kk!", cid) talkState[talkUser] = 1 elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 1 then if getPlayerSlotItem(cid, 8).uid <= 0 then selfSay("Desculpe, voce nao esta com o pokemon na slot!", cid) talkState[talkUser] = 0 return true end --alterado v1.2 if #getCreatureSummons(cid) >= 1 then selfSay("Puxe seu pokemon para pokebola!", cid) talkState[talkUser] = 0 return true end local pb = getPlayerSlotItem(cid, 8).uid if getItemAttribute(pb, "poke") ~= "Tangela" then selfSay("Coloca seu Tangela+20 na slot por favor!", cid) talkState[talkUser] = 0 return true end if not getItemAttribute(pb, "boost") or getItemAttribute(pb, "boost") < 20 then selfSay("Desculpe seu Tangela não esta boosted +20!", cid) talkState[talkUser] = 0 return true end if (msgcontains(msg, 'Item') or msgcontains(msg, 'item')) then selfSay("eu vendo um item especial, voce vai querer?", cid) talkState[talkUser] = 1 elseif (msgcontains(msg, 'yes') or msgcontains(msg, 'Yes')) and talkState[talkUser] == 1 then doPlayerRemoveMoney(cid, 250000009) doPlayerAddItem(cid,27044,1) selfSay("aqui esta seu item", cid) talkState[talkUser] = 1 else selfSay("Você nao tem dinheiro suficiente!", cid) talkState[talkUser] = 0 return true end --100000 = 1k, 1000000 = 10k, 10000000 = 100k if doPlayerRemoveMoney(cid, 250000009) == true then selfSay("So there is it! Enjoy!", cid) doItemSetAttribute(pb, "hp", 1) doItemSetAttribute(pb, "poke", "Tangrowth") doItemSetAttribute(pb, "description", "Contains a Tangrowth.") doItemEraseAttribute(pb, "boost") doTransformItem(getPlayerSlotItem(cid, 7).uid, fotos["Tangrowth"]) doItemSetAttribute(pb, "Icone", "yes") doTransformItem(pb, icons[getItemAttribute(pb, "poke")].on) if useKpdoDlls then doCreatureExecuteTalkAction(cid, "/pokeread") end talkState[talkUser] = 0 return true else selfSay("Você nao tem dinheiro suficiente!", cid) talkState[talkUser] = 0 return true end end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) rapais sou noob em script acho que isso deve funcionar, n é certesa, eu comecei a estudar lua agora :v

no config.lua, tudo que esta ali dentro vai ser bloqueado

--utito tempo-- local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0) local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, 20000) setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, 60) setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, 60) setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, 60) setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, 60) setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE) setCombatCondition(combat, condition) function onCastSpell(cid, var) return doCombat(cid, combat, var) end onde está 20000 vai ser 20 segundos 60000 vai ser 1 min utito tempo san local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0) local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, 10000) setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, 80) setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, 100) setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE) setCombatCondition(combat, condition) function onCastSpell(cid, var) return doCombat(cid, combat, var) end

é seu config.lua que tem algo errado então coloca isso -- Extras advertisingBlock = ".net;servegame;no-ip;.org;.pl;.net;.biz;ddns.net;sytes.net;no ip;ddns"

Experimenta esse exe 0.4, tem anti divulgação e anti clonagem e anti rollback, o bug que vc sitou n acontece comigo aqui boa sorte, tem cast e war system http://www.mediafire.com/download/6sa4s047gg87ygp/TheForgottenServer.rar

pokemon dash v6 tem menos bug

esse aqui e bom sem bugs graves http://www.xtibia.com/forum/topic/237660-pokemon-dash-v10-revolution/

ola gente alguem poderia me ajudar a achar uma script que cura os player quando eles ficarem em tal position, quero que cure nesses locais veja a print, a script é um globalevent, para tibia 8.60 tfs 0.4

function onGetFormulaValues(cid, level, skill, attack, factor) local skillTotal, levelTotal = skill + attack * 12, level * 2 return -(skillTotal * 1.1 + levelTotal), -(skillTotal * 7 + levelTotal) end alguem pode me explicar esse trexo? da minha spells eu gostaria de aumentar o dano dela de acordo com a skill do knight e de acordo com o dano da arma

acredito que para ser suporte eu teria que trazer uma script com problemas e pedir para alguem fazer modificação, mais não vim apenas fazer um pedido

irei testar novamente

zipter é o cara nunca descensona nas script vao tudo 100% funcional, até o momento, a proposito voce poderia me conseguir uma script de n se atacarem em party? grato, http://www.xtibia.com/forum/topic/238459-sem-danos-na-mesma-party/

entao gente é assim se o jogador estiver com a vocação 9,10,11 e 12 o npc recuse a dar o promotion segue abaixo a script do meu npc local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) 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 local node1 = keywordHandler:addKeyword({'promot'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'I can promote you for 20000 gold coins. Do you want me to promote you?'}) node1:addChildKeyword({'yes'}, StdModule.promotePlayer, {npcHandler = npcHandler, cost = 0,level = 1, promotion = 1, text = 'Congratulations! You are now promoted.'}) node1:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Alright then, come back when you are ready.', reset = true}) npcHandler:addModule(FocusModule:new())

deu um bug os cara n consegue se atacar depois da party e como se o ot virasse non-pvp up up

hehe muito bom reputado

então gente alguem tem uma creaturescript que não de dano na pessoa da mesma party ?

então gente eu queria um sistema de quando um player matar outro apareça no default em laranja tipo Y matou Z tipo assim, outro sistema que eu preciso é de não poder matar membros da propria party

então galera alguem teria uma script quando ataca de wand o alvo fique com poison e fica recebendo dmage UP

então gente tenho uma spell e queria configurar ela para dar somente de 10k a 20k de dano alguem poderia ajudar? local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MORTAREA) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -59.3, -30, -69.7, 0) local arr = { {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, } local area = createCombatArea(arr) setCombatArea(combat, area) function onCastSpell(cid, var) return doCombat(cid, combat, var) end na verdade só quero saber a formula para eu fazer em todas

eu aprendi muito com esse cara ai recomendo ele explica todos os detalhes da LUA

verifique seus npcs algum deles está com o parameter errado Exemplo <parameters> <parameter key="module_shop" value="1"/> <parameter key="message_greet" value="Hello |PLAYERNAME|. I sell ham, meat, carrots, apples, brown breads, brown mushrooms and eggs (everything for 8 gold coins)!"/> <parameter key="shop_buyable" value="egg,2695,8"/> </parameters>

um digitibia caia bem,

Ola galera hoje vim trazer um heroserv feito por min, o servidor foi feito a partir de um global utilizando source 0.4 na versão 8.60 o servidor não possui bugs como a maioria por ai possui por exemplo bug de GOD bug de grana ou items entre outros A Distro é completamente estável suporta uma boa quantidade de jogadores Testado em windows e não houve problemas já n sei os outros sistemas operacionais O servidor possui alguns comandos segue abaixo !notice /commands !myhp !mymp !rank !rank "skills" rep system ao matar pk se ganha rep ao matar player se perde rep mesmo tando com rep positivo ou negativo voce ganha addon de Hero ou de grin reaper !rep !fuck "playername" tira rep do jogador !hail "playername" dar rep para o jogador comandos para sorcerer e druid !druid, !sorcerer !druidshield, !sorcerershield ============================= comandos para paladin !distance !paladinmagic !paladinshield ============================= comandos para knight !axe !sword !club !knightshield !knightmagic ============================= não tem como comprar vida ou mana items especiais são obtidas no npc dragões dropa até 1kk Demon dropa até 2kk todos os items especiais são 20kk o servidor possui fast attack em 100 ms rapido se aumentar mais o fast pode dar debug todos os monstros do heroserv menos tentox eu irei colocar em breve na v2 por enquanto vou aguardar os comentarios e ver se vão falar de bugs para eu reparar PRINT http://i.imgur.com/3FXKHSG.jpg http://i.imgur.com/W5V4nKf.png http://i.imgur.com/JsmNhz4.png Download Server: http://www.mediafire.com/download/3k0i13v99r0wmy9/HEROSERV+PROJETC+BY+VALAKINHAS+V1.rar scanner https://www.virustotal.com/pt/file/dcdc50eac09ee6974a22daa470260e07e9448861ca349adf3d65c327cb058e50/analysis/1449065395/ Creditos: Eu e o criador do mapa que desconheço curta minha fan page projeto 10000x com 3 cidades "Baiak" "Carlin City" e "Thais city" todos os items do servidor customizados curta: http://fb.com/110535049313667

sim

não acho necessario por plain por enquanto rsrsrs porque logo o cara quer usar mysql