Ir para conteúdo

chumarer18

Membro
  • Registro em

  • Última visita

  1. hashahshash valeu ai galera eu achei oque estava faltano Public Function Memory_ReadString(ByVal Address As Long, ByVal CharCount As Int32) As String Dim ret As Byte() = Nothing Dim vBuffer As Long Dim processHandle As IntPtr = OpenProcess(PROCESS_VM_READ, 0, Tibia_Hwnd) Dim tStr(CharCount) As Char Dim retStr As String = "" For i As Int32 = 0 To CharCount ReadProcessMemory(processHandle, Address + i, vBuffer, 1, 0) ret = BitConverter.GetBytes(vBuffer) tStr(i) = System.Text.Encoding.ASCII.GetString(ret) : retStr += tStr(i) Next Return retStr CloseHandle(processHandle) End Function Muito Obrigado a Galera que me ajudo
  2. Agusto tu ta me ajudano muito so que sou nub no vb.net olha so oque deu
  3. Intao esse Code ai eu tentei usa mas nao concegui resolver esse problema do UTIL olha a print
  4. Eu achei uma funcao aqui mas nao sei se ta certa eu so novo no Vb.net ajuda no erro ai :/ e essa funcao le as string ?
  5. Voce nao intendeu vou dar um explo esse le a memoria certo Private Function Memory_ReadLong(ByVal Address As Int32) As Long Dim vBuffer As Long Dim processHandle As IntPtr = OpenProcess(PROCESS_VM_READ, 0, Tibia_Hwnd) ReadProcessMemory(processHandle, Address, vBuffer, 4, 0) Return vBuffer CloseHandle(processHandle) End Function esse fala pra min o address que quero ler no label esse e da vida H613B6C Label1.Text = Memory_ReadLong(&H613B6C) agora eu quero ler um nome tipo letra "Tibiano" eu tenho a address do nome so nao sei converte para letra o nome sai tudo em numeros sai em 4 bytes quero em txt
  6. eu acho os addrress do tibia em 4 bytes certo porque a vida sao em numeros eu tentei acha do nome achei o nome so que em numeros queria transforma em text [char] Ajuda aguem ai ou so da uma dica

Informação Importante

Confirmação de Termo