Quote:
Originally posted by anantasia+May 7 2007, 20:50--></span><table border='0' align='center' width='95%' cellpadding='3' cellspacing='1'><tr><td>QUOTE (anantasia @ May 7 2007, 20:50)</td></tr><tr><td id='QUOTE'> <!--QuoteBegin--DyNy28@May 8 2007, 00:20
Damn!
Who can give me the Poke for the HP, i have tryed 2 days and it is not working here. i need an Poke for VB.NET 2005
Im working olso with Tsearch16, that's olso an easy program i have get from Blinko, but i don't know anymore how we do that to get the Poke. en d how i need to write all the values below in the code!
when that is correct, the HP is working again
here is the code i use:
Code:
Public Sub InjectDMA_HP()
* * * *Dim phandle As Integer
* * * *Dim hwnd As Integer
* * * *Dim NewBytes1(11) As Byte
* * * *Dim NewBytes2(5) As Byte
* * * *Dim NewBytes3(5) As Byte
* * * *'Poke 10E00 89 08 89 0D CC 0D 01 00 50 8B CE
* * * *'Poke 10E0B E9 4A BC 49 00
* * * *'Poke 4ACA55 E9 A6 43 B6 FF
* * * *NewBytes1(1) = &H89S '89
* * * *NewBytes1(2) = &H8S '08
* * * *NewBytes1(3) = &H89S '89
* * * *NewBytes1(4) = &HDS '0D
* * * *NewBytes1(5) = &HCCS 'CC
* * * *NewBytes1(6) = &HDS '0d
* * * *NewBytes1(7) = &H1S '01
* * * *NewBytes1(8) = &H0S '00
* * * *NewBytes1(9) = &H50S '50
* * * *NewBytes1(10) = &H8BS '8B
* * * *NewBytes1(11) = &HCES 'CE
* * * *NewBytes2(1) = &HE9S : NewBytes2(2) = &H4AS : NewBytes2(3) = &HBCS : NewBytes2(4) = &H49S : NewBytes2(5) = &H0S
* * * *NewBytes3(1) = &HE9S : NewBytes3(2) = &HA6S : NewBytes3(3) = &H43S : NewBytes3(4) = &HB6S : NewBytes3(5) = &HFFS
* * * * * *
* * * * * *WriteProcessMemoryBuffer(phandle, &H10E00, NewBytes1(1), 11, 0)
* * * * * *WriteProcessMemoryBuffer(phandle, &H10E0B, NewBytes2(1), 5, 0)
* * * * * *WriteProcessMemoryBuffer(phandle, &H4ACA55, NewBytes3(1), 5, 0)
* * * * * *CloseHandle(phandle)
* * * * * *System.Array.Clear(NewBytes1, 0, NewBytes1.Length)
* * * * * *System.Array.Clear(NewBytes2, 0, NewBytes2.Length)
* * * * * *System.Array.Clear(NewBytes3, 0, NewBytes3.Length)
* * * *End If
Please Help!!
|
I'm curious with your VB program,
Do your VB work on Conquere 4347?
If yes, I wonder that why you trap at address 4ACA55 with E9A643B6FF = JMP 00010E00,
At conquer patch 4347, No program running on this address and code that write on address 00010E00 is not old command.
Quote:
00010E00:
89 08* * * * * * * * * * * * * * mov [eax],ecx
89 0D CC 0D 01 00* * * mov [10dcc],ecx
50* * * * * * * * * * * * * * * * push eax
8B CE* * * * * * * * * * * * * * mov ecx,esi
E9 4A BC 49 00* * * * * * jmp 004aca5a
|
Anyway i suggest poke command for my edit
Quote:
00010E00:
89 05 CC 0D 01 00* * * * MOV [00010DCC],EAX* * * * * * // Save HP value at address 10DCC
6A 0F* * * * * * * * * * * * * * PUSH 0F* * * * * * * * * * * * * * * * // Old replaced Inject command
8B 4D C4* * * * * * * * * * * MOV ECX, [EBP-3C]* * * * * * * * //
E9 44 A0 46 00* * * * * * * JMP 0047AE46* * * * * * * * * * * // Jump to next command
0047AE41:
E9 BA 5F B9 FF* * * * * * * JMP 00010E00* * * * * * * * * * * // Jump to hook command
|
So poke command as your request is here
Quote:
* * * * 'Poke 10E00 89 05 CC 0D 01 00 6A 0F6 68 FF 00 8B 4D C4
* * * * 'Poke 10E0B E9 44 A0 46 00
* * * * 'Poke 47AE41 E9 BA 5F B9 FF
* * * * * WriteProcessMemoryBuffer(phandle, &H10E00, NewBytes1(1), 11, 0)
* * * * * WriteProcessMemoryBuffer(phandle, &H10E0B, NewBytes2(1), 5, 0)
* * * * * WriteProcessMemoryBuffer(phandle, &H47AE41, NewBytes3(1), 5, 0)
|
[/b][/quote]
yes my VB work works fully now with patch 4347 only the Auto HP doesnt work yet
<hr>
Append on May 7 2007, 23:13<hr> hmmm,
i have change the code with your poke and stuff but my client crached!
i have to find out why, i'm an noob with this hahahahaha
that memory stuff and POKE is difficult, but im learning