Líderes
-
MaXwEllDeN
HéroiPontos1185Total de itens -
TibiaHamachiBrasil
MembroPontos26Total de itens -
Fire Water Earth Air
MembroPontos94Total de itens -
Conteúdo Popular
Exibindo conteúdo com a maior reputação em 05/08/13 em todas áreas
-
[Aula 1] Introdução
[Aula 1] Introdução
jhonathan wendrell reagiu a MaXwEllDeN por uma resposta no tópico
1 pontoIntrodução Aula 1 O que é scripting? Do modo mais simples possível: scripting é o ato de programar. O nome scripting vem do nome "script". O que é um script? De um modo geral, um script é um bloco de código escrito em uma linguagem de programação interpretada, ou seja, ele precisa que alguma coisa leia ele e possa "traduzir" seu conteúdo. Lembre-se de que "script" não é um termo específico de Open Tibia Servers. O que é uma linguagem de programação interpretada? Os brasileiros falam português, ingleses falam inglês e chineses falam mandarim, e com isso o mundo é composto por várias línguas. No mundo da programação não é diferente. Existem várias línguas que podem ser usadas, cada uma com uma característica e modo de escrever diferente (Assim como o português é diferente do inglês). Entre estas linguagens, existem 2 tipos: as linguagens interpretadas e as linguagens compiladas (Não-interpretadas). Podemos fazer uma comparação tosca com a vida real: o português seria uma linguagem interpretada (Nosso cérebro precisa "traduzir" a mensagem), e os desenhos seriam a língua compilada (Nosso cérebro reconhece automaticamente a "mensagem" do desenho). As linguagens compiladas são aquelas que não precisam ser lidas por nenhum programa, pois "conversam" diretamente com o computador, enquando a linguagem interpretada não consegue se comunicar com o computador, então a linguagem compilada recebe a mensagem do codigo interpretado e traduz numa linguagem que o computador entenda, dai a linguagem interpretada pode conversar com o computador (Desde que alguém traduza suas mensagens). Voltando para a parte de Open Tibia Servers, a linguagem compilada é a linguagem usada no seu servidor: o .exe no Windows, por exemplo, e a linguagem interpretada são os scripts .lua. O seu servidor compilado vai ler os scripts .lua e traduzir o conteúdo deles para que o computador possa executar o que o script manda. Se os scripts são escritos em linguagens interpretadas, qual é a linguagem dos script usados nos Open Tibia Servers? Os Open Tibia Servers usam uma linguagem de programação (Interpretada) chamada Lua, que foi feita aqui no Brasil mesmo. Características da linguagem de programação Lua: Linguagem de Programação Interpretada Linguagem de Programação Imperativa ou Programação Procedural Linguagem de Scripts ou Linguagem de Extensão Pequena, Fácil, Leve e Eficiente " Lua foi criada por um time de desenvolvedores do Tecgraf da PUC-Rio, a princípio, para ser usada em um projeto da Petrobras. Devido à sua eficiência, clareza e facilidade de aprendizado, passou a ser usada em diversos ramos da programação, como no desenvolvimento de jogos (a LucasArts, por exemplo, usou a linguagem no jogo Escape from Monkey Island), controle de robôs, processamento de texto, etc. Também é freqüentemente usada como uma linguagem de propósito geral. " Wikipédia - Lua (Linguagem de Programação) O que eu preciso para aprender Lua e começar a produzir meus scripts? Paciência (Embora seja de fácil aprendizado, você vai levar algum tempo para aprender a linguagem) Humildade (Nunca se sinta o melhor, nem ridicularize aqueles que tiverem um conhecimento menor que o seu) Vontade (Não adianta fazer as coisas sem o menor interesse, você não chegará a lugar nenhum sem vontade) Criatividade (O principal para produzir um script é ter a idéia do que você vai fazer) Conhecer a Lógica da Programação (Não se preocupe, eu vou ensinar a Lógica da Programação nas próximas aulas.) Interpretador Lua (Para testar seus scripts, claro. Você pode usar o seu OTServer para testar, e ainda usar um interpretador Lua para testar seus scripts simples fora do OTServer) Editor Lua (Não é realmente necessário, uma vez que você pode usar um editor de textos qualquer, como o bloco de notas, mas ter um Editor Lua vai ajudar muito, e alguns até vêm com um Interpretador Lua junto!) Pagar uma taxa de R$ 700,00, afinal, não estou escrevendo estas aulas de graça! (OK, não precisa pagar nada, mas no mínimo poste seus scripts aqui e ajude a seção a crescer ) Onde posso encontrar um Interpretador e/ou Editor Lua? Como interpretador (No caso de produzir scripts para Open Tibia Servers) você deve usar um servidor próprio, pessoal somente para testar os scripts que você fez, e pode usar também um Interpretador Lua geral, para testar seus scripts fora dos OTServers. Como Editor Lua você pode usar qualquer editor de textos, mas eu recomendo usar um editor que seja próprio para a linguagem Lua. Existem dois editores que já vem com um Interpretador Lua "embutido". São eles: OTScript Live! [Download] e SciTE (Scintilla) [Download]. Exercício-Tarefa: Pesquise mais na internet sobre a linguagem Lua, Scripts, etc... Somente dúvidas serão aceitas aqui! Comentários que não forem dúvidas serão apagados e os autores serão reportados! Essa aula foi escrita por uma raposa levada Skyen Hasus, todos os créditos são dele. Aula 2 - Lógica da programação >> Script Live By colex.rar1 ponto -
[RME] 8.60 sem bugs
1 pontoVejo em muitos tópicos não somente neste forum como em outros que grande parte do pessal esta com problemas no RME 8.60 na hora de carregar o client no RME, vem com bugs ou coisas do tipo, então vou disponibilizar oque eu uso 100% nunca deu bug nem nada do tipo. RME : http://www.mediafire.com/?5b8k6c8nr47qbj2 Tibia 8.60 : http://www.mediafire.com/?ax6yitt6ncc7g7z Desculpe o nome "tibia 8.60000" foi um modo so de diferenciar dos outros. caso haver bugs me avise, se estiver algum tópico que esteja funcionando 100% me desculpe estar postando novamente, caso isto ocorra feche este tópico. att ~ Tiago1 ponto
-
Combat fórmulas
Combat fórmulas
Agaka reagiu a MaXwEllDeN por uma resposta no tópico
1 pontoCriado por: Kaotar Testado e Baseado em: TFS 0.4_DEV Informações adicionais: Todo mundo já se deparou, quando foi modificar a sua spell, com a formula e não entendeu o que cada numero significava, irei explicar tudo o que necessitas nesse tópico. Hail, bom como já leram nas informações adicionais acima, estou aqui para explicar o que cada numero, na formulas de combat, significam. Formula: setCombatFormula(combat, type, mina, minb, maxa, maxb[, minl, maxl[, minm, maxm[, minc[, maxc]]]]) Como podem ver são varios os argumentos que passamos para essa função: para facilitar a explicação vou chama-los de forma diferente. Notem as cores, você pode escolher até que cor quer usar, você pode usar só os argumentos azuis, os azuis e os vermelhos ou todos. PS: Impossível usar apenas o vermelho ou apenas o marrom é obrigatório seguir a ordem. Vamos as explicações: Bom como não é obrigatório colocar os numero em vermelho, quando não é especificados esses números nas spells a formula pega eles do config.lua na parte. formulaLevel = 5.0 formulaMagic = 1.0 Sendo que: Mas e o i ,j? Explicando em outras palavas: i, j serão valores padrões para Minimo e Maximo, se eles forem menores que i, j então i, j que serão considerados.Exemplo: Se Minimo = 50, Maximo = 100, i = 60 e j = 80 então a formula vai ter o Minimo de 60 por causa que i substitui o Minimo, pois é maior Maximo vai ser 100, pois j é menor que o Maximo, então não substitui. Bom acho que isso vai facilitar a vida de muita gente, pois avia varias duvidas na seção de suporte sobre o assunto, então decidi fazer esse tópico. Alguma observações: Este tópico aplica-se apenas quando o tipo de formula é COMBAT_FORMULA_LEVELMAGIC; Está formula ainda tem sofre o adicional da vocação e dos equipamentos; Está formula foi retirada do TFS 0.4_DEV, e pode ter alterações em outras verções. Espero ter ajudado. TODO: Explicar outros tipos de formulas e mostrar outras formas de fazer isso. Lembrando: Não fui eu quem criou esse tutorial, foi o Kaotar, de outro fórum, eu só trouxe ele para o TibiaKing.1 ponto -
[Resolvido] Ajuda edição de Site de Ot
[Resolvido] Ajuda edição de Site de Ot
brenus reagiu a Fire Water Earth Air por uma resposta no tópico
1 pontoPor que não acha uma team para seu otserver ? vá ate o fórum em formação de equipes e mais fácil ai você Pode achar uma boa equipe !1 ponto -
[PEDIDO] Mapa do Ot Pokemon Br
[PEDIDO] Mapa do Ot Pokemon Br
Terrorista reagiu a jucanando por uma resposta no tópico
1 ponton quero o site e sim um mapa pelomenos parecido1 ponto -
[Tutorial] Manipulando arquivos de configuração .ini
[Tutorial] Manipulando arquivos de configuração .ini
PostadorHunter reagiu a Puncker por uma resposta no tópico
1 ponto{Manipulando arquivos de configuração .ini} O que é um arquivo INI ? Um arquivo INI é um arquivo texto usado para armazenar/fornecer configurações pessoais para sistemas/usuários ; Um arquivo INI é um arquivo com dados externo ao programa principal e esta formatado em : Secções(FileName) , Entradas e Valores. Como por exemplo: Eu quero que o usuário digite algo em um "EditBox" mas que o que ele digite fique guardado e sempre seja usado, então irei gravar o que ele digitou em um arquivo .ini (Chamado de arquivo de inicialização mas também pode ser chamado de configuração) e quando eu quizer usar o que o usuário digitou eu busco dentro do arquivo .ini. Funções Primeiramente em seu projeto do VB adicione um novo "Module" chamado "INIread.vb" e outro chamado "INIwrite.vb". (para criar um novo module, clique com botão direito no primeiro item da lista do Solution Explorer, Add > Module) Dentro do INIread.vb apague tudo e cole isso: Option Strict Off Option Explicit On Module INIread Public Function ReadIniValue(ByRef INIpath As String, ByRef KEY As String, ByRef Variable As String) As String Dim NF As Short Dim Temp As String Dim LcaseTemp As String Dim ReadyToRead As Boolean AssignVariables: NF = FreeFile ReadIniValue = "" KEY = "[" & LCase(KEY) & "]" Variable = LCase(Variable) EnsureFileExists: FileOpen(NF, INIpath, OpenMode.Binary) FileClose(NF) SetAttr(INIpath, FileAttribute.Archive) LoadFile: FileOpen(NF, INIpath, OpenMode.Input) While Not EOF(NF) Temp = LineInput(NF) LcaseTemp = LCase(Temp) If InStr(LcaseTemp, "[") <> 0 Then ReadyToRead = False If LcaseTemp = KEY Then ReadyToRead = True If InStr(LcaseTemp, "[") = 0 And ReadyToRead = True Then If InStr(LcaseTemp, Variable & "=") = 1 Then ReadIniValue = Mid(Temp, 1 + Len(Variable & "=")) FileClose(NF) : Exit Function End If End If End While FileClose(NF) End Function End Module E dentro do INIwrite.vb cole isso: Option Strict Off Option Explicit On Module INIwrite Public Function WriteIniValue(ByRef INIpath As String, ByRef PutKey As String, ByRef PutVariable As String, ByRef PutValue As String) As Object Dim Temp As String Dim LcaseTemp As String Dim ReadKey As String Dim ReadVariable As String Dim LOKEY As Short Dim HIKEY As Short Dim KEYLEN As Short Dim VAR As Short Dim VARENDOFLINE As Short Dim NF As Short Dim X As Short AssignVariables: NF = FreeFile ReadKey = vbCrLf & "[" & LCase(PutKey) & "]" & Chr(13) KEYLEN = Len(ReadKey) ReadVariable = Chr(10) & LCase(PutVariable) & "=" EnsureFileExists: FileOpen(NF, INIpath, OpenMode.Binary) FileClose(NF) SetAttr(INIpath, FileAttribute.Archive) LoadFile: FileOpen(NF, INIpath, OpenMode.Input) Temp = InputString(NF, LOF(NF)) Temp = vbCrLf & Temp & "[]" FileClose(NF) LcaseTemp = LCase(Temp) LogicMenu: LOKEY = InStr(LcaseTemp, ReadKey) If LOKEY = 0 Then GoTo AddKey HIKEY = InStr(LOKEY + KEYLEN, LcaseTemp, "[") VAR = InStr(LOKEY, LcaseTemp, ReadVariable) If VAR > HIKEY Or VAR < LOKEY Then GoTo AddVariable GoTo RenewVariable AddKey: Temp = Left(Temp, Len(Temp) - 2) Temp = Temp & vbCrLf & vbCrLf & "[" & PutKey & "]" & vbCrLf & PutVariable & "=" & PutValue GoTo TrimFinalString AddVariable: Temp = Left(Temp, Len(Temp) - 2) Temp = Left(Temp, LOKEY + KEYLEN) & PutVariable & "=" & PutValue & vbCrLf & Mid(Temp, LOKEY + KEYLEN + 1) GoTo TrimFinalString RenewVariable: Temp = Left(Temp, Len(Temp) - 2) VARENDOFLINE = InStr(VAR, Temp, Chr(13)) Temp = Left(Temp, VAR) & PutVariable & "=" & PutValue & Mid(Temp, VARENDOFLINE) GoTo TrimFinalString TrimFinalString: Temp = Mid(Temp, 2) Do Until InStr(Temp, vbCrLf & vbCrLf & vbCrLf) = 0 Temp = Replace(Temp, vbCrLf & vbCrLf & vbCrLf, vbCrLf & vbCrLf) Loop Do Until Right(Temp, 1) > Chr(13) Temp = Left(Temp, Len(Temp) - 1) Loop Do Until Left(Temp, 1) > Chr(13) Temp = Mid(Temp, 2) Loop OutputAmendedINIFile: FileOpen(NF, INIpath, OpenMode.Output) PrintLine(NF, Temp) FileClose(NF) End Function End Module Pronto as funções agora estão funcionando em seu projeto. Aparecerá 2 warnings mas ignore. Como usar as funções? Vamos definir uma variável "File" que será o caminho do arquivo .ini. Dim File as String Agora vamos atribuir um valor para a variável file. File = "C:\teste.ini" E agora? Como escrever/gravar ou ler este arquivo? Para escrever/gravar: WriteIniValue(File, "Teste", "Valor1", "Oi") Código inteiro (Coloque em algum botão ou algo do tipo): Dim File as String File = "C:\teste.ini" WriteIniValue(File, "Teste", "Valor1", "Oi") O arquivo .ini após ele executar isso ficara assim: [Teste] Valor1=Oi Agora vamos ler e exibir o que está escrito no arquivo .ini (Coloque em algum botão ou algo do tipo) Dim Str as String Str = ReadIniValue(File, "Teste", "Valor1") MsgBox(Str) Com essas funções você pode criar várias idéias, use a sabedoria e crie idéias perfeitas com isto.1 ponto