Ir para conteúdo

joaohd

Visconde
  • Total de itens

    361
  • Registro em

  • Última visita

  • Dias Ganhos

    10

Tudo que joaohd postou

  1. A versão pode ser de 8.54 acima. flw
  2. Somente 4 até agora... =x flw
  3. Tenta isso então: function onSay(cid, words, param) local t = string.explode(param, ",") local player = getPlayerByNameWildcard(t[1]) local premiumdays = tonumber(t[2]) if (not t[1]) then doPlayerSendCancel(cid, "You must fill with a player name.") end if (premiumdays < 0) then doPlayerAddPremiumDays(player, premiumdays) doPlayerSendTextMessage(cid,22,"You have removed " .. t[2] .. " premium days from " .. player .. ".") doPlayerSendTextMessage(player,25,"You have lost " .. t[2] .. " premium days.") end if (premiumdays >= 1 and premiumdays < 150) then doPlayerAddPremiumDays(player, premiumdays) doPlayerSendTextMessage(cid,22,"You have added " .. premiumdays .. " premium days from " .. player .. ".") doPlayerSendTextMessage(player,25,"You received " .. premiumdays .. " premium days from " .. getCreatureName(cid) .. ".") end end flw
  4. Ae gente, o prazo tá terminando hein... Os scripts recebidos estão muito bons e bem criativos. Boa sorte a todos. flw
  5. Parece que não tem as funções do casamento na lib. Pois ele tenta acessar e não encontra. Este é o erro. flw
  6. Usa a tag: <talkaction words="/addpremium" access="3" event="script" value="addp.lua"/> flw
  7. Desde que o creaturescript seja mais importante pode sim. flw
  8. Haja paciência pra ficar tirando screen... ahsahshash Tutorial muito bem feito. Parabéns. flw
  9. É um tema pouco explorado e não muito complicado. Vários sistemas podem ser feitos com ele e estão surgindo boas idéias. O tema inicial seria "Tibia e o problema dos botters", porém vimos que seria exigido muito dos participantes e muitos não conseguiriam fazer nada. flw
  10. Isso(?): function onStepIn(cid, item, pos, frompos) return doSummonCreature("Demon", frompos) end flw
  11. Acho que é só isso: function onTimer(time, lastExecution) saveServer() doSetGameState(GAMESTATE_SHUTDOWN) return TRUE end flw
  12. Sim, pode ser um sistema, porém tendo como foco principal o creaturescript. flw
  13. Já estou trabalhando na versão 2.0 mas infelizmente está bem difícil =x Só consegui implantar a lista lateral com as funções que, ao clicar, são inseridas ao script. flw
  14. Bom, tem como fazer sim, porém no momento estou na biblioteca do colégio e não tenho as funções em mãos. Mas, pela tarde poderei ajudar. Caso alguém queira fazer antes de mim, use o globalEvent: function onTimer(time, lastExecution) a tag seria <globalevent name="shutdown" time="24:00" event="script" value="shutdown.lua"/> flw
  15. joaohd

    [Pedido] Script

    O script verifica se o jogador pode usar a magia. Verifique a vocação, o lvl e premium da magia. Verifique também se na tag da magia, em spells.xml está assim; needLearn="1" E caso queira que remova o item: function onUse(cid, item, frompos, item2, topos) config = { storage = XXXX, spellName = "XXXX" --nome da spell, que esta no spells.xml } if getPlayerStorageValue(cid, config.storage) <= 0 then if not getPlayerLearnedInstantSpell(cid, config.spellName) then if canPlayerLearnInstantSpell(cid, config.spellName) then doPlayerLearnInstantSpell(cid, config.spellName) doRemoveItem(item.uid, 1) doPlayerSendTextMessage(cid, 25, "Parabéns! você aprendeu uma nova magia.") setPlayerStorageValue(cid, config.storage, 1) else doPlayerSendCancel(cid, "You cannot do this mission because you cant learn the spell.") end else doPlayerSendCancel(cid, "You have already learned the spell.") end else doPlayerSendCancel(cid, "You have already done.") end return TRUE end ps: Pow felzan, errou meu nick =x "apocaria" é tenso aahshashahs flw
  16. joaohd

    [Pedido] Modificaçao

    Tente este: local config = { item = 2160, quant = 1 } local storage = 13590 function onSay(cid, words, param, channel) if(param == "") then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command requires param.") return TRUE end if getPlayerStorageValue(cid,13590) <= -1 then doPlayerSendCancel(cid, "Você nao uso o item para pode falar.") return TRUE end if doPlayerRemoveItem(cid, config.item, config.quant) then doBroadcastMessage("[Mistic Server] " .. getPlayerName(cid) .. " Disse: " .. param .. "", MESSAGE_EVENT_ADVANCE) else doPlayerSendCancel(cid, "Você precisa de " .. config.quant .. " " .. getItemNameById(config.item) .. " para enviar a messagem.") end return TRUE end flw
  17. No rule violation não seria mais em LUA. O que podemos fazer por você é uma talkaction que delete o jogador. flw
  18. Ou tente usar o ipchanger com as configurações: Ip = 127.0.0.1 Port = 7171 flw
  19. joaohd

    Item Que Almenta Skill

    Adicione em seu movements.xml: <movement type="Equip" itemid="2503" event="function" value="OnEquipItem"/> <movement type="DeEquip" itemid="2503" event="function" value="OnDeEquipItem"/> Caso seu servidor seja mais novo: <movevent type="Equip" itemid="2503" event="function" value="OnEquipItem"/> <movevent type="DeEquip" itemid="2503" event="function" value="OnDeEquipItem"/> flw
  20. Não há como abrir diretamente pelo wlua.exe pois ele é apenas o executável da biblioteca wxlua. Eu inseri o arquivo na pasta para que não houvesse a necessidade de baixar um interpretador que possua a biblioteca wxlua. Para abrir indiretamente pelo wlua.exe, você tem que arrastar o arquivo XTSE.wlua até o wlua.exe. O XTSE.exe é um simples comando Batch que faz isso. No executável está escrito isto: wlua.exe "XTSE.wlua" flw
  21. Dicas anotadas! Muitas das funções básicas não puderam ser implementadas porque usei um método que não dava suporte à elas (wx.wxTextCtrl), caso contrário teríamos já na versão 1.0 a distinção de cores e muitas outras features =x flw
  22. Estranho porque foi testado no Windows Xp e Windows 7 Ultimate x64 ... Talvez seja algo com as dll's ou o próprio wlua.exe. Procurarei uma solução. flw
  23. @felzan Sim, o botão executar é um debugger. @Won Helder Abra pelo XTSE.exe flw
  24. Então... aqui estou novamente com mais um fruto de meus estudos em LUA. Recentemente fui apresentado à um novo ambiente de programação em LUA, o wxLua. Bom, mas primeiro, devemos saber o que é o wxLua: wxLua é um ambiente de programação LUA que tem como função principal a criação de uma interface gráfica para aplicação de scripts. Abaixo segue um exemplo do que pode ser feito com o wxLua: Obs: O script contém 352 linhas, podendo "bugar" o layout. E também algumas fotos do programa: Como é a primeira versão e ainda não sei muito sobre o assunto, o programa ficou bem básico, contendo apenas as funções: Arquivo ► Novo, Abrir, Salvar, Salvar como e exit Editar ► Copiar, Colar, Recortar, Desfazer, Refazer Ferramentas ► Funções, Executar Info ► Sobre o programa Link do Scan: Scan Link para download: X-Tibia Scripting Environment.rar Ps: Algumas pessoas podem obter um erro devido à falta de lua5.1.dll. Caso aconteça, basta copiar a dll de algum servidor para a pasta do programa. Bom, é isso. Aguardem novas versões... Agradecimentos: MatheusMkalo, Socket flw
  25. joaohd

    Npc Que Muda De Voc 8.57

    Última: 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 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 cfg = { itemid = xxxx, --Substitua 'xxxx' pelo ID do item usado na Promotion qnt = xx --Substitua 'xx' pela quantidade do item requerido } if msgcontains(msg, "promotion") then selfSay("I can promote you for " .. cfg.qnt .. "" .. getItemNameById(cfg.itemid) .. ". Are you sure?", cid) talkState[talkUser] = 1 elseif(msgcontains(msg, "yes") and talkState[talkUser] == 1)then if doPlayerRemoveItem(cid, cfg.itemid, cfg.qnt) then selfSay('From now, you are promoted!', cid) setPlayerPromotionLevel(cid, 1) talkState[talkUser] = 0 npcHandler:releaseFocus(cid) else selfSay('You don\'t have '.. cfg.qnt ..' '.. getItemNameById(cfg.itemid) ..'', cid) talkState[talkUser] = 0 npcHandler:releaseFocus(cid) end elseif msg == "no" and talkState[talkUser] == 1 then selfSay("Then not", cid) talkState[talkUser] = 0 npcHandler:releaseFocus(cid) end end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) flw
  • Quem Está Navegando   0 membros estão online

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