Quote:
Originally posted by blinko@Dec 17 2006, 12:23
*EDIT Here i have now a Zoom Hack made in Visual Basic 6.0
I figured out how to do it was simple after i thought about it.
Memory address: 00051790C
at 4 bytes the default zoom on the client is 256 which in hex is 0x100 or in VB6.0 &H100 the zoom setting i used was 150 in 4 bytes or 0x96 in hex or in VB6.0 &H96
The lower the number the farther out the zoom goes, the higher the closer it becomes.
combo box fills from 150 to 256(default) also takes your own typed in values and hex's them.
Dim String2Hex as Variant
Dim HexString as long
Public Function Zoom(ByVal Zoom_Amount As String)
If Trim(Zoom_Amount) = vbNullString Then Exit Function
String2Hex = CLng(Zoom_Amount)
HexString = "&H" & Hex(String2Hex)
P.hWnd = FindWindow(vbNullString, COWiN)
GetWindowThreadProcessId P.hWnd, P.pID
P.pHandle = OpenProcess(PROCESS_ALL_ACCESS, False, P.pID)
WriteProcessMemory P.pHandle, ByVal &H51790C, HexString, 4, 0&
CloseHandle P.pHandle
End Function
|
here's my full scan with
its look clean an also frendly user... hehehehe
Filename: CoZoom.zip
Size (Bytes): 36994
MD5 Hash: b8b9ae0a1613e9466f8667f9a781b607
Report link:
AntiVirus Engine Version Definition Version Status
Antivir 7.4.0.15 6.38.1.87 Nothing found
ArcaVir 1.0.4 2006.01.27 Nothing found
Avast 1.0.7 0738-1 Nothing found
AVG 7.5.45 269.6.2/787 Nothing found
BitDefender 7.60825 7.60825 Nothing found
ClamAV 43 3204 Nothing found
F-Prot 4.6.6 3.16.14 Nothing found
Norman 5.70.01 5.70.01 Nothing found
Rising 17.00.00.36 19.21.00.00 Nothing found
VirusBlokAda32 3.11.4 2007.05.03 Nothing found
VirusBuster 4.3.23:9 (2007-02-16) 9.75.7/11.0 Nothing found
BB Code:
Antivir: Nothing found
ArcaVir: Nothing found
Avast: Nothing found
AVG: Nothing found
BitDefender: Nothing found
ClamAV: Nothing found
F-Prot: Nothing found
Norman: Nothing found
Rising: Nothing found
VirusBlokAda32: Nothing found
VirusBuster: Nothing found
Scanned by
**Edit - attachment removed by DM*
