Ir para conteúdo

LeoTK

Membro
  • Registro em

  • Última visita

Tudo que LeoTK postou

  1. @Julio Cavalheiro você reiniciou o servidor ... configurou corretamente o site para trabalhar com o servidor em mysql criou a tabela no banco de dados do shopping?
  2. @Julio Cavalheiro Vai na pasta do seu servidor/data/globalevents crie um arquivo e coloque isso dentro function onThink(interval, lastExecution, thinkInterval) local result = db.getResult("SELECT * FROM shop_history WHERE `processed` = 0;") if(result:getID() ~= -1) then while(true) do cid = getCreatureByName(tostring(result:getDataString("player"))) product = tonumber(result:getDataInt("product")) itemr = db.getResult("SELECT * FROM shop_offer WHERE `id` = "..product..";") if isPlayer(cid) then local id = tonumber(itemr:getDataInt("item")) local tid = tonumber(result:getDataInt("id")) local count = tonumber(itemr:getDataInt("count")) local tipe = tonumber(itemr:getDataInt("type")) local productn = tostring(itemr:getDataString("name")) if isInArray({5,8},tipe) then if getPlayerFreeCap(cid) >= getItemWeightById(id, count) then if isContainer(getPlayerSlotItem(cid, 3).uid) then received = doAddContainerItem(getPlayerSlotItem(cid, 3).uid, id,count) if received then doPlayerSendTextMessage(cid,19, "Voce recebeu >> "..productn.." << do nosso sistema de loja") db.executeQuery("UPDATE `shop_history` SET `processed`='1' WHERE id = " .. tid .. ";") else doPlayerSendTextMessage(cid,19, "Desculpe, voce nao tem espaco suficiente na mochila para receber o item >> "..productn.." <<") end else doPlayerSendTextMessage(cid,19, "Desculpe, voce nao tem uma mochila para receber o item >> "..productn.." <<") end else doPlayerSendTextMessage(cid,19, "Desculpe, voce nao tem capacidade suficiente para receber o item >> "..productn.." << (Voce precisa: "..getItemWeightById(id, count).." Capacidade)") end elseif isInArray({6,7},tipe) then if tipe == 6 then bcap = 8 bid = 1987 elseif tipe == 7 then bcap = 20 bid = 1988 end if isItemRune(id) then count = 1 end if getPlayerFreeCap(cid) >= (getItemWeightById(1987, 1) + getItemWeightById(id,count * bcap)) then local bag = doCreateItemEx(bid, 1) for i = 1,bcap do doAddContainerItem(bag, id, count) end received = doPlayerAddItemEx(getPlayerSlotItem(cid, 3).uid, bag) if received == RETURNVALUE_NOERROR then doPlayerSendTextMessage(cid,19, "Voce recebeu >> "..productn.." << do nosso sistema de loja") db.executeQuery("UPDATE `shop_history` SET `processed`='1' WHERE id = " .. tid .. ";") else doPlayerSendTextMessage(cid,19, "Desculpe, voce nao tem espaco suficiente para receber o item >> "..productn.." <<") end else doPlayerSendTextMessage(cid,19, "Desculpe, voce nao tem capacidade suficiente para receber o item >> "..productn.." << (Voce precisa: "..getItemWeightById(id, count).." Capacidade)") end end end itemr:free() if not(result:next()) then break end end result:free() end return true end em globalevents.xml coloque isso <globalevent name="shopModernAcc" interval="3" script="shopModernAcc.lua"/>
  3. @amora murder ja que ele ta enchendo o saco no seu servidor enche o saco no facebook dele chumbo trocado não doi manda mensagem pra mulher dele fala pra ela pedir para ele parar manda mensagem pra mãe dele pra pedir pra ele parar de te perturbar '- faz o inferninho também kkk
  4. @xMateuss kkk lembrei do pai do cris achou que eu estava brincando kkk @amora murder acredito que a única solução é permaban ou seja não da ban ip nesse cara mas todo char que ele criar e descobrir que é ele vai lá e toma delete no char ai perde tudo acredito que assim ele não iria encher tanto o saco ...
  5. LeoTK postou uma resposta no tópico em Mapas de Tibia
    @tataboy67 sim todo tipo de download é necessário ter scan para a segurança de quem vai baixar e para o próprio fórum mesmo para ter o controle de qualidade
  6. @iury alves potter bom não sou scripter mas para acelerar o processo para um scripter capacitado te ajudar mais rapido edite o tópico principal e coloque o script de bug também assim o scripter vai poder colocar a verificação da storage da prisão no script do bug.. @KotZletY @Vodkart poderiam ajudar nosso membro com isso?
  7. @iury alves potter seria melhor então você editar o script de bug verificando a storage do player caso o player tiver a storage de prisão ele não pode usar o comando bug ...
  8. @elifaz como assim remover eles do mapa?
  9. LeoTK postou uma resposta no tópico em Mapas de Tibia
    @tataboy67 tem uma parte da casa dentro da água é isso mesmo? se for mesmo iria sugerir para colocar areia para não parecer que ela ta flutuando na água
  10. LeoTK postou uma resposta no tópico em Portal
    @nickyfull você já não esta conectado no servidor????
  11. LeoTK postou uma resposta no tópico em Portal
    @nickyfull https://discord.gg/SFr9AGQ
  12. Este tópico foi movido para a área correta. Esta é uma mensagem automática! Pedimos que leia as regras do fórum!
  13. @Gustavo0098 não basta hookar a dll tem que fazer os procedimentos deixar o spr e dat extendido antes de hookar a dll no executavel usando o stud pe e depois transformar o extendido em dat2
  14. @Gustavo0098 só pra terminar não use o programa use a dll extended que tem aqui no fórum
  15. @Vodkart é um comando vod
  16. Fala galera bom eu estou precisando de uma spell de buff que de buff em área para aliados que estiverem em uma área pré-determinada os aliados precisam estar na mesma party local tempo = 80 -- tempo em segundos. local effect = {316} -- effect no player, caso queira apenas 1, basta remover os outros numeros. local ml = 35 -- quantos ira aumentar o skill de ML local skillsword = 35 -- quantos ira aumentar o skill de Sword local skillaxe = 35 -- quantos ira aumentar o skill de Axe local skillclub = 35 -- quantos ira aumentar o skill de Club local skilldistance = 35 -- quantos ira aumentar o skill de Distance local skillshield = 35 -- quantos ira aumentar o skill de Shield local health = 600 -- A cada 1 segundo quantos aumentar de vida local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0) local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000) setConditionParam(condition, CONDITION_PARAM_STAT_MAGICLEVEL, ml) setConditionParam(condition, CONDITION_PARAM_SKILL_SWORD, skillsword) setConditionParam(condition, CONDITION_PARAM_SKILL_AXE, skillaxe) setConditionParam(condition, CONDITION_PARAM_SKILL_CLUB, skillclub) setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCE, skilldistance) setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELD, skillshield) setConditionParam(condition, CONDITION_PARAM_OUTFIT, outfit) setCombatCondition(combat, condition) local condition = createConditionObject(CONDITION_REGENERATION) setConditionParam(condition, CONDITION_PARAM_SUBID, 1) setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE) setConditionParam(condition, CONDITION_PARAM_TICKS, tempo*1000) setConditionParam(condition, CONDITION_PARAM_HEALTHGAIN, health) setConditionParam(condition, CONDITION_PARAM_HEALTHTICKS, 600) setCombatCondition(combat, condition) local function magicEffect3(tempo2, tempo3, cid) if (isCreature(cid)) then if getPlayerStorageValue(cid, 102053) > 0 and getCreatureCondition(cid, CONDITION_REGENERATION, 1) then for i=1, #effect do local position = {x=getPlayerPosition(cid).x+0, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z} doSendMagicEffect(position, effect[i]) -- parte modificada local summons = getCreatureSummons(cid) if #summons > 0 then for k = 1, #summons do if getCreatureName(cid) == getCreatureName(summons[k]) then local pos = getCreaturePosition(summons[k]) local positions = {x = pos.x + 0, y = pos.y, z = pos.z} doSendMagicEffect(positions, effect[i]) end end end -- fim da parte modificada end end end end function onCastSpell(cid, var) local outfit = {lookType = 487, lookHead = 0, lookBody = 0, lookLegs = 0, lookFeet = 0, lookTypeEx = 0, lookAddons = 3} doSetCreatureOutfit(cid, outfit, 60000) local position129 = {x=getPlayerPosition(cid).x+1, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z} if getPlayerStorageValue(cid, 102053) ~= 1 or getCreatureCondition(cid, CONDITION_REGENERATION, 1) == false then doCombat(cid, combat, var) tempo2 = 0 while (tempo2 ~= (tempo*1000)) do addEvent(magicEffect3, tempo2, tempo2, tempo*1000, cid) tempo2 = tempo2 + 300 end setPlayerStorageValue(cid, 102053,1) -- storage verifica transformado, quando = 1 player esta transformado. doCreatureSay(cid, "Kyuubi Chakra", TALKTYPE_MONSTER) local position129 = {x=getPlayerPosition(cid).x+0, y=getPlayerPosition(cid).y+0, z=getPlayerPosition(cid).z} doSendMagicEffect(position129, 275) else doPlayerSendCancel(cid, "Voce ja esta no modo chakra da kyuubi") end end eu preciso que esse buff funcione para os aliados da party em um raio de 5x5 bom é isso mas só fique ativo nos aliados enquanto eles estiverem dentro da área caso sair da área o buff sai também ficarei no aguardo
  17. fala galera gostaria de pedir um favor para vocês alguém poderia me dizer como eu editaria essa parte do script o meu script usa a função doSetCreatureOutfit(cid, {lookType = transform.outfit}, -1) e toda vez que o player reloga não mantem a outfit trocada e eu olhei o script de newtype mantém ele usa essa função local tmp = getCreatureOutfit(pid) tmp.lookType = t[1] doCreatureChangeOutfit(pid, tmp) queria adicionar essa função para que mesmo se o jogador relogar continuar com a looktype.... tentei trocar as funções e da esse erro código editado doCreatureChangeOutfit(cid, {lookType = transform.outfit}, -1)
  18. Este tópico foi movido para a área correta. Esta é uma mensagem automática! Pedimos que leia as regras do fórum!
  19. @Vodkart vod eu consegui arrumar compilei novamente e funcionou o foda agora é que tava adaptada para linux ubuntu ... e eu voltei ela pra windows tenso kkk
  20. @Vodkart se eu te passar a minha source você poderia testar porfavor?
  21. @Eskarlatti a melhor opção pra você é o 8.60 porque existe muitos recursos disponíveis para 8.60 que seria um bom começo para o seu projeto a questão do 8.54 ela tem seus limites mas também é uma boa base tem bastante conteúdo disponível para atualizar para versões acima necessita de source, cliente, site, mapa e scripts atualizados para as versões basicamente são funções etc.. que precisa ser revisadas para a versão que você deseja isso vai dar uma trabalhão kkk
  22. @KR3 sim já desencanei dessa dll vlw
  23. @KR3 erro ... a dll protect ta foda kk não deixa a dll do ddraw passar nem ferrando kk
  24. Parabéns, seu tópico de conteúdo foi aprovado! Muito obrigado pela sua contribuição, nós do Tibia King agradecemos. Seu conteúdo com certeza ajudará à muitos outros, você recebeu +1 REP.
  25. @Hastafaru não funciona mesmo dx queto

Informação Importante

Confirmação de Termo