Tutoriais sobre Programação

Olá estou criando o meu bot e gostaria de saber como eu faço para adicionar teclas de atalho Alguem poderia me ajudar?

Galera, espero que gostem e comentem =D ~By: Lucas S. / lucasmerick (OBS: Não sei fazer aparecer o player do YouTube aqui, se alguem me ensinar agradeço)

Como o fórum de VB.NET está parado, fiz um tutorial rapidinho aqui. Do que se trata o tutorial? De uma calculadora de danos ( runas ). Irá disponibilizar o código fonte para download? Sim, no final do post estará o link para download do mesmo. Vídeo http://www.youtube.com/watch?v=88fOGtTeyoY Caso não apareça, clique aqui ~ Youtube Download Código Fonte / Programa Clique aqui ~ 4Shared Scan Clique aqui ~ VirusTotal

Este tutorial irá mostrar como se define o Client e o Player. Começando defino o que é Client e Player. Dim client As Client Dim player As Player Veja na imagem: Agora vamos "mostrar" para a API qual é o Player e qual é o Player "Mostrando o client" client = ClientChooser.ShowBox Veja na imagem: Agora vamos criar um Timer. no Load do Form1 inicie o timer: client = ClientChooser.ShowBox [b]Timer1.Start()[/b] Veja na imagem: No timer, vamos definir qual é o player: If client.LoggedIn Then player = client.GetPlayer Else End If Veja na imagem: Codigo completo: …

Well this is a kind Rune Maker in C#, you can convert it to VB easy. Is not complete but is an idea to start one, you need to better it. So the event for the bottom is: private void button1_Click(object sender, EventArgs e) { Item itemMovedToAmmo = null; ItemLocation newLocation = null; ItemLocation oldLocation = null; Item original = client.Inventory.GetItems().FirstOrDefault(i => i.Id == Tibia.Constants.Items.Rune.Blank.Id); uint item = Tibia.Constants.Items.Rune.PoisonField.Id; if (original != null) { oldLocation = ori…

Introdução Porquê o Visual Basic * É de fácil aprendizagem * Pode criar controlos ActiveX * Pode-se integrar com a Internet * Disponibiliza muitos assistentes para melhor produtividade * É uma linguagem POO (Programação Orientada por Objectos) * Permite criações OLE (Object Linking and Embedded) * Permite utilizar API's do Windows (Application Programming Interface) * Permite desenvolver rápidas aplicações * É excelente como linguagem de negócios Tipo de Aplicações em Visual Basic Há muitos tipos de aplicações que podes criar em Visual basic. Estes diferentes tipos são usados quando pretendes reso…

olá gente. estou aqui para escrever meu primeiro tutorial (ignorem se meus codigos nao forem perfeitos sou iniciante). hoje estava desenvolvendo um utilitario para tibia e axei uma função que eu axei muito interessante "p.WarIcon" entao estarei criando com vcs um utilitario que apenas muda a aparencia do war icone do personagem vamos precisar de : 4 radiobutton 1 groupbox (para organização) 1 button (opicional) primeiro crie o "design" do ultilitario mais ou menos assim : Após isso clicke duas vezes no primeiro radion button que vc deve ter modificado em "text" em propriedades para "verde". clickando aparecerar um codigo pare…

Já que algumas pessoas daqui do forum andam tendo dificuldades com algumas coisas da própria linguagem de programação, resolvi fazer upload de um ebook ("Beginning Microsoft Visual Basic 2010" / "Começando No Visual Basic 2010") que achei há um tempo na internet. Até onde li, ele explica bastante o principal do Visual Basic (e lógica de programação em geral), e pra quem quiser se aprofundar tem alguns assuntos mais "avançados" sobre a plataforma .NET, programação orientada a objetos etc.. Acho que ele seria bastante útil pra quem está começando. E pra quem pensa que ler (não necessariamente todo) o livro é perda de tempo, não é. Você ganhará muito mais tempo programa…

{System Tray} Provavelmente todos sabem o que um System Tray né? Mas vou explicar... O system tray em vez de você minimizar o programa para a barra de tarefas ele vai para a área do relógio do Windows. Já existe um tópico de System Tray do EdsonJunior porém o método dele é maior e exige mais códigos porém também é funcional. Componentes Será preciso que um ContextMenuStrip seja adicionado ao programa. O ContextMenuStrip servirá de menu para o ícone do tray. Declarando Variável No início do form será necessário a declaração da seguinte variável dentro do Public Class NomeDoSeuForm para ser declarado globalmente. Private WithEvents…

Pessoal como alguns sabem estou começando na área de programação e estou aprendendo alguns recursos e acabei de aprender uma coisinha e vou passar para vocês aqui, com certeza a maioria sabe, mas se não sabe irei mostrar a todos... O Código Exibe uma Mensagem ao clicar no Botão, é bem simples mas gostaria de compartilhar com todos... Primeiramente siga os passos: File -> New Project (CTRL + N) Após isto abra o seu Form1 e vai de estar vazio. Após adicione um Label no Form como a imagem abaixo: Após adicionar o Label, adicione um TextBox como na imagem abaixo: E por último após adicionar o TextBox adicione um Button como mos…

Entao gente, como eu estou comecando VB.Net tou fazendo uns codigos leves mas bem uteis Ai vou posta um Cap Alert pra vcs Vamos prescisar de um Timer, CheckBox, Text Box No timer coloque isso No checkbox vc poe isso e no textbox vc coloca a cap pra alerta exemplo 40 se o char tiver com uma cap 40 ou menor o bot apita Traduzindo para noiz se a cap do char menor ou igual a que esta escrita no text box, o bot vai toca uma musiquinha legal OBS: Se gostaram Rep++

Pessoal, hoje eu estava explorando as funções "p" e "c" e na função "p" achei uma coisinha interessante... Você precisará apenas de um CheckBox, apenas! Dentro do CheckBox você adiciona: if c.LoggedIn Then If checkbox1.checked then p.Skull = Skull.Black else p.Skull = Skull.None end if End if Isto você ficará com o Black Skull... Você pode trocar o Black por: p.Skull = Skull.Green p.Skull = Skull.Yellow p.Skull = Skull.None p.Skull = Skull.Red p.Skull = Skull.White Prontinho... Créditos: Felipe Sartori Kaiofirma

{Listando Pastas e Subpastas} Irei ensinar como listar pastas e subpastas de um certo diretório. Componentes Um Button Um Listbox Função Será usada a função SubDiretorios que deve ser inserido no local onde você preferir do código do seu programa: procedure SubDiretorios(Diretorio: string; Lista: TStrings); var SearchRec: TSearchRec; begin if FindFirst(Diretorio + '*.*', faDirectory, SearchRec) = 0 then repeat if (SearchRec.Attr and faDirectory = faDirectory) and (SearchRec.Name <> '.') and (SearchRec.Name <> '..') then begin Lista.Add(Diretorio + SearchRec…

Pessoal, vocês precisaram apenas de um CheckBox! Após adicionar no CheckBox, adicione dentro: Dim Food3 As Tibia.Objects.Item = c.Inventory.GetItemInSlot(Tibia.Constants.SlotNumber.Ammo) If Food3 IsNot Nothing AndAlso Tibia.Constants.ItemLists.Foods.ContainsKey(Food3.Id) Then c.Inventory.GetItemInSlot(Tibia.Constants.SlotNumber.Ammo).Use() End If Prontinho! Auto-Eat adicionado no seu bot... Créditos: Puncker

Galera eu procurei um monte de site e achei um bem legal aqui Pra quem esta comecando a programar seria legal da uma olhada nessas apostilas Apostilando VB.Net

{Utilizando a função Split} A função Split que em português significa divisão, divide strings/chars/integers de acordo com o que você definiu que será a serapação desses valores. Digamos que eu tenha um cavebot e nele os registros são assim: 89,498,7,G 89 = X 498 = Y 7 = Z G = Comando no caso G é abreviação de Goto Mas para usalos não poderei ter virgulas e principalmente esse G daria erro no bot então usario o split mas vou declarar uma variável Matriz (Array) em que pode conter varios valores dentro dessa variavel e para chamar os valores irei usar Matriz(0)=o valor contido no local 0 da Matriz, Matriz(1)=valor contido no local 1 da Matri…

Muito simples, simplismente acompanhe a imagem: Créditos: Júlio Espindula (FnTools)

Criando um MC Opener. Crie um botão e nele bote: Client.OpenMC() Veja na imagem: Créditos: Júlio Espindula (FnTools)

Renovador de IP 0.1 Ele Atualiza Seu IP Code: Creditos: Robson47 Orbtitan

Olá pessoal, eu estava na net procurando uns tutoriais de VB e achei uma apostila de 100 páginas e vou compartilhar com vocês... Download: Apostila de VB.rar Scan: VirusTotal *Apostila baseado em VB6 Espero que gostem; Abraços.

Hi everybody I have this attacker, but i think is poor, somebody know how to better? private void Timer_Ataque_Tick(object sender, EventArgs e) { Player p = client.GetPlayer(); if (p.TargetId == 0) { foreach (Creature c in client.BattleList.GetCreatures()) { foreach (String monLista in listBox1.Items) { if (c.Name == monLista) { if (c.IsReachable()) { c.Attack(); …

{Desligando o computador em determinada hora} Essa é uma função que o agendador do windows faz, mas vou ensinar como fazer isso em delphi. 1 - Componentes Adicione um Edit e defina sua propriedade visible para false Adicione um MaskEdit e vá na propriedade EditMask e coloque Short Time Adicione um Timers e defina o "interval" como 1 2 - Timer begin Edit1.text := FormatDateTime('HH:MM',time); if MaskEdit1.Text = Edit1.Text Then WinExec('Shutdown -s -f -t 00', SW_SHOWNORMAL); end; Agora seu programa está pronto para uso.

[source] BOT de Tibia v2.0 BOT de Tibia.cpp: config.ini: Utilize a lib: -lconio para compilar. Crédito: ------->Aluxes (99,9%). ------>Orbtitan(0,1%).

Salvando/Carregando um Listbox Créditos a FnTools, se for copiar apenas coloque os devidos créditos.

O que é VB ? O Visual Basic é uma linguagem programação produzida pela empresa Microsoft, e é parte integrante do pacote Microsoft Visual Studio. Sua versão mais recente faz parte do pacote Visual Studio .NET, voltada para aplicações .Net. Sua versão anterior fez parte do Microsoft Visual Studio 6.0, ainda muito utilizado atualmente. Um aperfeiçoamento do BASIC, a linguagem é dirigida por eventos (event driven), e possui também um ambiente de desenvolvimento integrado (IDE - Integrated Development Environment) totalmente gráfico, facilitanto enormemente a construção da interface das aplicações (GUI - Graphical User Interface), daí…

Descrição: Codigo para colocar seu programa na Bandeja do Windows, mais conhecido como System Tray. Codigo: Option Explicit Declare Function Shell_NotifyIcon Lib "shell32.dll" Alias _ "Shell_NotifyIconA" (ByVal dwMessage As Long, lpData As _ NOTIFYICONDATA) As Long Public Type NOTIFYICONDATA cbSize As Long hWnd As Long uID As Long uFlags As Long uCallbackMessage As Long hIcon As Long szTip As String * 64 End Type Public Const NIM_ADD = &H0 Public Const NIM_MODIFY = &H1 Public Const NIM_DELETE = &H2 Public Const NIF_MESSAGE = &H1 Public Const NIF_ICON = &H2 Public Const NIF_TIP …

Calculadora Básica Olá, aqui neste tutorial irei ensiná-los á como criar uma calculadora putaquiparivelmente simples. Seguinte, ela funciona desta forma: Em 'somar' você tem 3 textboxs, um pro primeiro número, outro para o segundo número e outro para o resultado da soma. O mesmo para dividir, multiplicar e subtrair. Então já sabe que ela não será igual a do windows que você poe subtração, multiplicação, divisão e soma juntos. É só pra você aprender um pouco mais da linguagem VB.net. Design: No seu form ponha uma label com texto 'somar', um textbox, um label com texto '+', outro textbox, um label com texto '=', o último text box e um botão …

{Fazer janela piscar na barra de tarefas (Igual à MSN)} Não tenho muito o que falar, é igual quando uma pessoa te chama no MSN e o seu msn fica piscando na barra de tarefas. Dê dois cliques no form do seu projeto para ir para os códigos. Após: implementation {$R *.dfm} Adicione isto: procedure flash; var FWInfo: FLASHWINFO; begin with FWInfo do begin cbSize:=SizeOf(FWInfo); //Tamanho do struct em bytes hWnd:=Application.Handle; //Handle da janela dwFlags:=FLASHW_TRAY; //Piscar na barra de tarefas uCount:=5; //Piscar cinco vezes dwTimeOut:=200; //Tempo de duração de cada piscada em milisegundos …

{Salvando e carregando conteúdo de Listbox, Memo etc.. em arquivos de texto} A maioria dos componentes do Delphi que possuem alguma entrada de texto tem uma função que salva e carrega esses textos. A seguir vou citar como usar as funções. Memo Salvando o conteúdo do Memo: Memo1.Lines.SaveToFile('Arquivo.txt'); Sendo a extenção do arquivo não obrigatoriamente .txt pode ser ao seu gosto como .oi, .phm, etc... Carregando o conteúdo contido no arquivo de texto: Memo1.Lines.LoadFromFile('Arquivo.txt'); Se o arquivo não existir ele retornará um erro. ListBox Salvando o conteúdo do listbox: listbox1.Items.SaveToFile('Arquivo.txt'…

Vamos lá: Inicie um projeto, depois clique duas vezes no form. Public Class Form Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Process.Start("www.tibiabot.net") End Sub End Class Caso queira abrir outro site, só mudar a URL ;*

{Pegando nome da janela ativa} O que é "a janela ativa"? Janela ativa é a janela em que você está no desktop, como por exemplo se você está usando o navegador Firefox o nome lá em cima "TibiaBots - Mozilla Firefox" é o nome da janela ativa pois você está nela. 1 - Componentes Adicione um "Edit" da aba "Standard" Adicione um "Timer" da aba "System" 2 - Código Dê dois cliques no Timer e adicione o seguinte código: var titulo: string; begin setlength( titulo, 255 ); GetWindowText( GetforegroundWindow, PChar(titulo), 255); Edit1.Text := trim( titulo ); Pronto , Simples, Fácil e Prático. Para testar seu projeto basta ape…

Olá TB's. Agora que já sabem criar seus proprios bots, já sabem o que fazer. Todos em Botões. First Addon. Code: p.Addon = Tibia.Constants.OutfitAddon.Addon1 [/code] Second Addon. Code: [code] p.Addon = Tibia.Constants.OutfitAddon.Addon2 First and Second Addon. Code: p.Addon = Tibia.Constants.OutfitAddon.Both [/code] Desativar. Code: [code] p.Addon = Tibia.Constants.OutfitAddon.None Abraços.

Criando seu tibia bot com TibiaAPI - Parte 2 {Visual Basic interface} Vamos conhecer o Visual Basic um pouco melhor. Abra seu Visual Basic 9.0, vá em file > new project > escolha Windos Forms Application e escreva o nome do seu BOT e pronto. Seu projeto foi devidamente criado. Agora, perceberás que tem um 'programa' com o título Form1. Este será seu BOT. Maaas... calmai. Form1 não é o nome do seu bot! Então vamos mudar (: Clique (uma vez só) no programa (Form1), e vá nas Properties (propriedades) s que está no canto direito inferior >> \/. E mude aonde esta escrito Text e não aonde está escrito (name). Escreva o nome do seu bot, …

Neste artigo irei ensinar como criar um injetor de DLL. Muitas vezes ficamos dependentes de um injetor de DLL pra injetar o trainer que fizemos em .dll, e normalmente a maioria dos injectors vêm infectados. A injeção de dll pelo método simples consiste em: 1 - Pegar o address da API LoadLibraryA. Essa API carrega uma DLL no processo que a chamou. O address dessa API é o mesmo em todos os processos. 2 - Abrir o processo que se quer injetar a dll, com privilégios de acesso total. 3 - Alocar memória no processo alvo para guardar o caminho da DLL a ser injetada. 4 - Escrever no endereço alocado o caminho da DLL. 5 - Criar uma thread no processo alvo, c…

# Arquivos nescessários: Delphi 7 # Tutorial: Primeiramente abra o Delphi e redimensione a tela da Form até que fique mais ou menos desta maneira: Em seguida, adicione um TButton (localizado na parte Standart), um TOpenDialog (localizado na parte Dialogs) e um TMediaPlayer (localizado na parte System) : Organize mais ou menos assim: Agora renomeie o TButton para "Abir" pelo Caption: Dê um duplo clique no TButton, apague o código procedure TForm1.Button1Click(Sender: TObject); begin e adicione o seguinte código: procedure TForm1.BitBtn1Click(Sender: TObject); begin MediaPlay…