Ir para conteúdo

caotic

Infante
  • Total de itens

    1599
  • Registro em

  • Última visita

  • Dias Ganhos

    7

Tudo que caotic postou

  1. Aconteceu outro upgrade hoje de manha cedo. Atualizei o client agora temos o com opengl e dx9 para evitar problemas com o client. Iremos atualizar o sistema de evolução para que nao haja o bug da evolução shiny(Pokemon que nao tiver evolução shiny não evoluir) @amvnmarcio Teve muita sorte em conseguir o shiny alakazam bem seu level deve ser alto então pq tipo. Level para cima de 99 a chance de virar shiny é uma em 21 .
  2. Acho que você não entendeu o proposito da função. Era para fazer a operação sem usar um operador matematico ou um suporte como as blibiotecas maths. Fazendo assim você so ta transformando a string em um codigo. Aproveitando retirei a limitação dos numeros os algarismo podem ter quantidade diferentes
  3. Eu estava pensando em desenvolver o operador de adição então resolvi desenvolver uma função capaz de fazer a operação de adição sem usar nenhum tipo de operador matematico. Claro que antes precisamos da tabuada mais como ele e muito extensa e ninguem quer ficar escrevendo a tabuada desenvolvi uma função que e capaz de dar a tabuada numa tabela. Ela tem uma unica limitação que quando os valores somados tiver uma quantidade algarismo diferentes podem acontecer alguns bugs. Do mais FICO UM POG QUE NOSSA MAIS TA VALENDO. function string.explode(e, sep) local result = {} e:gsub("[^".. sep .."]+", function(s) table.insert(result, s:match("^%s*(.-)%s*$")) end) return result end function generateTableAdd(table) if table then local result = "local tab = {\n" end result = "{\n" for i=0, 9 do for x=0, 9 do local add = x+i local sep = "," if add >= 18 then sep = "" end result = result..'["'..i..'+'..x..'"] = '..add..''..sep..'\n' end end return result.."\n}" end function repeatValue(char, rep) str = "" for i=1, rep do str = str..char end return str end function getConvertPosByValueAddition(string) local sin = "+" local value = string.explode(string, sin) if #value[1] > #value[2] then string = value[1].."+"..repeatValue("0", #value[1]-#value[2])..value[2] end return string end function getAdditionByString(string) string = getConvertPosByValueAddition(string) print(string) local sin = "+" local add = string.explode(string, sin) local result = "" y = loadstring('return (' .. generateTableAdd() .. ')')() local table = loadstring('return (' .. generateTableAdd() .. ')')() i = #add[1] while i >= 1 do s = s and s or "no" local number = string.sub(add[1], i, i) ss = 0 if string.sub(add[2], i, i) ~= "" and s ~= "no" then local ss = y[string.sub(add[2], i, i).."+"..s] end local num = string.sub(add[2], i, i) ~= "" and string.sub(add[2], i, i) or "0" local p = s ~= "no" and s or "0" local number1 = ""..num.."+"..p.."" local adds = y[number1] local cont = tostring(y[number.."+"..adds]) s = "no" a = string.sub(cont, 2, 2) if #cont <= 1 then a = string.sub(cont, 1, 1) end result = result..a if #cont >= 2 then s = string.sub(cont, 1, 1) end i = i-1 end if s ~= "no" then result = result..s end return string.reverse(result) end print(getAdditionByString("500+500"))
  4. Mesmo no speedyshare? vo ve se faço outro upload mais concerteza o erro esta no seu navegador.
  5. Sim tem algumas pessoas com problemas no mediafire coloquei outra opção de download
  6. Estou fazendo upgrade que vai demorar +- 1 semana de desenvolvimento vou rever os bugs e colocar novos sistemas. Bem vou investir mais no servidor agora a porra fico séria . Vou colocar mais sons como na falha de capturar pokemons e concertar os bugs como o do safari. Vou também compilar um novo client com novas modificações que estarei realizando. @kttallan Me envia uma mp se você percebeu mais bugs ou algumas sugestões para o servidor. @nociam Tu deve ter errado o endereço rs.
  7. caotic

    Saudades

    oi galera como estão?
  8. rs obrigado Como os shinys foram retirados por causa das falta de sprites eles foram recolocados neste upgrade. Agora você também pode escutar os sons dos outros players.
  9. Eae galera ekstibiana tudo bem? O PWO e um otserv pokemon que foi lançado a 1 semana ele tem a proposta de inovocação. Vamos conhecer ele? Sistema de Som O sistema foi construido para a execuçao do audio quando o player solta/volta o pokemon na ball executa determinado som. Alem de poder escutar os "gritos" dos pokemons quando ele atacar tanto do seu pokemon tanto do selvagem. Alem de outros especias sound com "Ao logar/ao dar trade/ao pegar um poke e etc..." Barras Pokemons Tivemos um grande foco de trazer uma facilidade para o player para que seja rapido a troca de pokemons ou a visualização da felicidade de um certo pokemon. Entao fizemos varias barra como "Barra de troca pokemon/Barra especial de atalho e a Barra PokeInfo" Novas Habilidades Também reformaçamos a parte de habilidades fizemos a habilidade "find" capaz de procurar um player e visualizar o local de onde se encontra. Além de outras habilidade como atração. Outras coisas ineditas são evolução automatica de pokemon(se o player tiver level certo e o pokemon feliz) lembrando que optamos por não ter leveis nos pokemons. Mapa editado junto com ilha de tutorial entre outros... Jogabilidade reformulada e retiragem de bugs. Agente "falo falo" mais não podemos ficar sem a media.... Nosso website: worldpokemon.servegame.com:8090 Ja pode criar conta e baixar nosso client. PWO ATT.
  10. Eu nao permiti criarem um tpc sobre PBO sem minha permissao. Eu previa uma falta de organizaçao no topico como aconteceu.... Mais enfim. Logo eu irei fazer um topico mais organizado. Do mais. Fechem este topico
  11. Injection. Igual pokemon com as barras.
  12. Eae galera xtibiana hoje irei disponbilizar um novo sistema de audio. Ou melhor 2 sistemas de audios rs acho que alguns viram o sistema de som AFL que disponiblizei para o xtibia. Mais ele erá muito limitado e alem de alguns bugs. Então eu comecei um projeto pokemon(que ainda está em pé) e a primeira coisa que veio na cabeça e um sistema de som completo que não travesse e que funcione no client da cipsoft. Então vamos la: Vamos escolher qual sistema de som vamos usar primeiramente vou explicar cada ponto: Dll Audio - A dll e compacta e super eficiente mais tem uma instalação um pouco mais dificil e requer conhecimento *Junto vem um dll com o ip(127.0.0.1) mais não se preocupe coloquei o projeto do Visual C++ para você mudar o ip e recompilar. Ela está disponivel aki: Audio Dll+Project VC++.rar Prontinho agora vamos a instalação: Primeiro execute o server de audio junto ao seu otserv: Server Audio Dll or Vb Form.rar Instale a blibioteca lua socket no seu otserv: http://w3.impa.br/~diego/software/luasocket/ Agora coloque está funcão na sua lib: function sendAudio(cid, audio)require('socket') local ip = "127.0.0.1" -- Seu ip Akilocal client = socket.connect(ip, 1234)local t = "Send,"..doConvertIntegerToIp(getPlayerIp(cid))..","..audio.."" client:send(t.."\n") client:settimeout(0.1)client:close()end Pronto quando quiser executar um som basta usar a função sendAudio(cid, "id audio") Se tiver usando a dll todos o sons devem ser guardados junto a ela. Todos os formatos de audio devem ser ".wav" e todos precisam ser enumerados de 000 a 999 se não seguir tal regra terá varios problemas. Agora vou passar um codigo em vb que fiz para você injentar a dll antes que o seu client inicie: E NECESSARIO EXECUTAR DENTRO DE UM THEARED QUANDO FOR FAZER O SEU LAUNCHER. Audio Dll+Project VC++.rar Server Audio Dll or Vb Form.rar
  13. Pokemon Battle em breve...
  14. Gostei do servidor moura. E muito dificil inovar e mesmo assim continuar com o antigo rpg tibiano ainda mais com a decandencia dos servidores tibianos. Concordo com o vital que poderia ter ousado mais no servidor. Mais com as atualizações o servidor vai evoluindo... Se precisar de algo estou livre desejo boa sorte ao projeto.
  15. Curti as atualizações xtibia provo que pode se levantar.
  16. Eu acho sacanagem privar o xtibia de tal tool mesmo pertecendo da concorrência. Então: Ela já esta online O domínio e outro mais como tem a url da concorrência teria que passar tal: http://208.115.238.245:8080/ld.lp Espero que gostem
  17. E talvez um verificador de syntax tal como assert seria uma boa. Mais e melhor criar uma próprio verificador e rodar no código do CT antes dele executar.
  18. ehauehauehauhe'. Pois é. Já me chamaram de doido(eventide fdp) porque to desenvolvendo ela.
  19. caotic

    [BETA] CT LUA

    Bem estava pensando em desenvolver uma sub - linguagem ela não chega a ser uma linguagem(OBVIO) porque mesmo que use o comandos dela você estará executando em Lua. No final de tudo você esta programando em Lua . Ela e mais primitiva e então eu fiz uma demozinha e vou disponibilizar o andamento dela. Por enquanto ela tem 3 estruturas básicas função,um looopzinho e uma verificação. str = "\n--function print ['oi hear'['ola'['verdade'\n--function print ['oi'\n--loopCT [4 [{--function print ['year'}\n--gets [7 > 6 [{--function print ['oi'}\n" function string.explode(e, sep) local result = {} e:gsub("[^".. sep .."]+", function(s) table.insert(result, s:match("^%s*(.-)%s*$")) end) return result end function maior(x, y) if x == y then return "" end return "," end function interpreteFunctionInCt(str) for i in str:gmatch("--function (.*)") do local t = string.explode(i, "[") str = "" for x=2, #t do str = str..""..t[x]..""..maior(x, #t).."" end local str = t[1].."("..str..")" loadstring(str) () end end function ifCT(str) for i in str:gmatch("--gets (.*)") do local t = string.explode(i, "[") y = loadstring('return (' .. t[1].. ')')() if y then local y = string.match(i, "{(.-)}") print(y) interpreteFunctionInCt(y) end end end function loopCT(str) for i in str:gmatch("--loopCT (.*)") do local t = string.explode(i, "[") print(t[1]) for x =1, tonumber(t[1]) do local y = string.match(i, "{(.-)}") interpreteFunctionInCt(y) end end end function detectCTtype(str) for i in str:gmatch("--(.-)\n") do if string.sub(i, 1, 6) == "--func" then interpreteFunctionInCt(i) end if string.sub(i, 1, 6) == "--loop" then loopCT(i) end if string.sub(i, 1, 6) == "--gets" then ifCT(i) end end return true end detectCTtype(str) As únicas regras que existem na syntax. Saltar Linhas Cada estrutura em uma linha E sempre obedecer o "--" Veja como ficaria: --function print ['oi hear'['ola'['verdade' ---- Printa --function print ['oi'\n --- Printa --loopCT [4 [{--function print ['year'} ---Faz um loop e printa 4 vezes a função --gets [7 > 6 [{--function print ['oi'}" ----Verifica 1 argumento se for true executa a função se for false não executa a função Obs: Para que usar CT? Quem sabe para pequenos scripts ou configs. Ou mesmo para aprendizagem afinal ela super fácil de manipular.
  20. caotic

    [DÚVIDA] Summon Magic

    e uma spell pode usar qualquer tag de sua preferencia.
  21. E nunca aconteceu isso comigo. Mais se alguém quiser testar algo mais fundo. Tinha insertar todos os valores numa table e verificar se não tem repetição.
  22. caotic

    [DÚVIDA] Summon Magic

    local voc = { [1] = {level = 1, summon = "Demon"} } function onCastSpell(cid, var) if not voc[getPlayerVocation(cid)] then return 0 end local sum = voc[getPlayerVocation(cid)] local level = voc[getPlayerVocation(cid)].level local monster = voc[getPlayerVocation(cid)].summon if level <= getPlayerLevel(cid) then doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você necessita de "..level.." para summonar") return 0 end if #getCreatureSummons(cid) >= 1 then doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você já tem um summon") return 0 end local monstro = doCreateMonster(monster, getThingPos(cid)) doConvinceCreature(cid, monstro) return true end
  • Quem Está Navegando   0 membros estão online

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