Ir para conteúdo

caotic

Infante
  • Total de itens

    1599
  • Registro em

  • Última visita

  • Dias Ganhos

    7

Tudo que caotic postou

  1. Tópico movido para a seção de dúvidas e pedidos resolvidos.
  2. Não e que ele não e ligado ao um banco de dados. E que ele não tem suporte a php e nem mysql. Tópico Movido
  3. Tópico movido para a seção de dúvidas e pedidos resolvidos.
  4. Duvida em local incorreto. O correto seria a seção de pedidos e duvidas de servidores derivados. Tópico Fechado
  5. Esta não e a área correta e por enquanto xtibia não suporta duvidas sobre bots. Tópico Fechado
  6. Tibia Discussões - Seção para discutir coisas TIBIANAS. Seção Incorreta. Tópico Fechado
  7. Me explica como postamos noticias sem copiar informações de uma fonte? Toda a noticia vem de alguma fonte mesmo que seja de outro site terceiro. Usuário alertado em 10% por flood.
  8. do centurion? Não tem nada a haver com o centurion. E totalmente novo.
  9. Ola galera xtibiaaana. Venho disponibilizar o novo rep system. E um sistema igual ao do fórum você dá reputação para outros membros e também recebe reputação. Configs: No seu look também aparece a sua frase de efeito e sua reputação. E só dar look no player desejado. Agora vamos a instalação. Crie um arquivo lua em lib chamado de rep e coloque isto: local rep = { [0] = "Sem nenhum rep que maldade", ---Pode editar a frase mais não retire [1] = "Up up e mais um up", [2] = "Ai o to upando", [100] = "Fod@ e fod@ mesmo", [1000] = "DEUS DEUS GOD OF REP" } function getRepPlayer(cid) return getPlayerStorageValue(cid , 2332) end function doAddReputation(cid, player) setPlayerStorageValue(player, 2332, getPlayerStorageValue(player , 2332)+1) exhaustion.set(cid, 44226, 36000*1000) end function setRep(cid, player, quant) for i =1, quant do doAddReputation(cid, player) local t = rep[getPlayerStorageValue(cid, 2332)] if not t then else setPlayerStorageValue(cid, 52426, t) end end end function showRanksRep(cid) k = 1 str = 2332 local rep = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = "..str.." ORDER BY `value` DESC;") str = "Rank de Reputation:\n\n" if rep:getID() == -1 then doShowTextDialog(cid, 1387, "Não existe nenhuma pessoa com reputation") return true end while true do local players = rep:getDataInt("player_id") local players = getPlayerNameByGUID(players) str = str .. k .. "-"..players.." \n\n" k = k+1 if not rep:next() or k >= 10 then doShowTextDialog(cid, 1397, str) break end end end function getEffectRep(cid) if getPlayerStorageValue(cid, 52426) == -1 then setPlayerStorageValue(cid, 52426, rep[0]) return rep[0] end local t = rep[getPlayerStorageValue(cid, 2332)] if not t then return getPlayerStorageValue(cid, 52426) end setPlayerStorageValue(cid, 52426, t) return t end function getExhaustionRep(cid) return exhaustion.get(cid, 44226) end Agora vá em talkactions e crie um arquivo lua chamado de rep e coloque isto: function onSay(cid, words, param, channel) if param == "" or param == " " then return doShowTextDialog(cid, 1397, "/rep(nome do player) -- Dar reputação\n/rep(rank) -- Ve o rank de rep\n/rep(rep) -- Ve a quantidade de rep que você e sua frase de efeito") end if param == "rank" or param == "tops" then showRanksRep(cid) return ture end if param == "effect" or param == "frase" or param == "rep" then eff = getEffectRep(cid) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, ""..getRepPlayer(cid).." - "..getEffectRep(cid).."") return true end if getExhaustionRep(cid) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você tem que esperar para dar mais 1 rep") return true end if getPlayerGroupId(cid) >= 5 then local t = string.explode(param, ",") local pid = getPlayerByNameWildcard(t[1]) if not pid then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Este player não esta online ou não existe") return true end if pid == cid then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não pode se auto - reputar") return true end setRep(cid, pid, t[2] == "" and 1 or tonumber(t[2])) else local pid = getPlayerByNameWildcard(param) if not pid then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Este player não esta online ou não existe") return true end if pid == cid then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você não pode se auto - reputar") return true end doAddReputation(cid, player) end return true end Coloque esta tag em talacktions.xml: <talkaction words="/rep" event="script" value="rep.lua"/> Agora vá em creaturescripts e crie um arquivo lua chamado de rep e coloque isto: function onLook(cid, thing, position, lookDistance) if isPlayer(thing.uid) then local string = ""..getPlayerName(cid).." Reputação "..getRepPlayer(thing.uid).." - "..getEffectRep(thing.uid).."" doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, string) return false end return true end Agora vá em creaturescripts.xml e coloque esta tag: <event type="look" name="rep" register = "1" event="script" value="rep.lua"/> Agora vá em login.lua e registre o evento: registerCreatureEvent(cid, "rep")
  10. Tópico movido para a seção de dúvidas e pedidos resolvidos.
  11. Todo mundo ta fazendo usando gmatch. Em questão de praticidade ele e o melhor mesmo.
  12. Na verdade seria mais facil refazer as funções todas ehauehauheuahe'. Como disse eu fiz por fazer mesmo. E a função pass ela so gera um codigo codificado da string(e coisa de fbi tu não vai entender) Eheuaheuahe
  13. Você piorou tudo. Fiz uma modificação que ao invés de dar 10 meats ele apenas alimenta o jogador até o máximo, pra nao ter chances de jogadores sujarem todo o mapa. Assim: function onSay(cid, words, param) if getPlayerFood(cid) < 1200 then doSendMagicEffect(getPlayerPosition(cid), CONST_ME_MORTAREA) doPlayerFeed(cid, (1200-getPlayerFood(cid))) doCreatureSay(cid, "Estou alimentado agora =)", TALKTYPE_ORANGE_1) else doCreatureSay(cid, "Não preciso comer", TALKTYPE_ORANGE_1) end end Ele deve ter pensando que identação e soltar linhas atoa. Eheuaheuhauehae'
  14. Tava sem nada para fazer e fiz estas funções atoa. Eu não ia postar mais.... local Str = {string = ""} function Str:new(new) local st = {string = new} return setmetatable(st, {__index = self}) end function Str:reverse() k = #self.string newstr = "" while k > 1 do local str = string.sub(self.string, k, k) newstr = newstr..str k = k-1 end return newstr end function Str:table() x = {} for i=1, #self.string do sub = string.sub(self.string, i, i) table.insert(x, sub) end return x end function Str:pass() local x = {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z"} k = 1 y = "" for z=1, #x do for i=1, #self.string do local sub = string.sub(self.string, i, i) if sub == x[z]then local t = string.byte(sub)-96 y = y..t end end end return y end function Str:UP() local table = { ["a"] = "A", ["b"] = "B", ["c"] = "C", ["d"] = "D", ["f"] = "F", ["g"] = "G", ["h"] = "I", ["j"] = "J" } for k=1, #self.string do local sub = string.sub(self.string, k , k) if table[sub] then self.string = string.sub(self.string, 0, k-1)..table[sub]..""..string.sub(self.string, k+1, #self.string).."" end end return self.string end
  15. caotic

    Como usar "#"

    Ela também pega a quantidade de caracteres de uma string.
  16. caotic

    !go talkaction

    Tópico movido para a seção de dúvidas e pedidos resolvidos.
  17. Tópico movido para a seção de dúvidas e pedidos resolvidos.
  18. caotic

    NPC Músico

    Tópico movido para a seção de dúvidas e pedidos resolvidos.
  19. Mais cara tu pegou o script que ja tinha no forum e postou novamente. Se você tivesse feito alguma modificação no script seria outra coisa. Além de que você não pediu permissão para o dono do script e duvido muito que tenha falado com ele porque ele foi banido do forum inumeras vezes. Então tópico Fechado
  20. Tópico movido para a seção de dúvidas e pedidos resolvidos.
  21. E um arquivo de texto não tem segredo. E so abrir. Tu não esqueceu de criar o documento txt?
  22. Opa desculpa não responder. Tu me envio uma mp. Você pode alterar o limite de hora de treino: local limit = 60 -- Qual e o limite de horas que ele pode upar Só que este limite é até quantas horas ele pode treinar. E so você quiser eu já fiz a versão atualizada do treiner 1.0. Da uma olhada em actions no fórum.
  23. Tópico movido para a seção de dúvidas e pedidos resolvidos.
  • Quem Está Navegando   0 membros estão online

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