[NEED HELP] Fast as Famas hack @ WarRock - client crash (VB6)

[_hitman_]

German: (for english browse down the page)
also das ist mein problem:
Ich hab das modul verwendet:

Option Explicit

Public Declare Function E073507F Lib "user32" Alias "GetWindowThreadProcessId" (ByVal hWnd As Long, lpdwID As Long) As Long
Public Declare Function BFE4EA63 Lib "kernel32" Alias "OpenProcess" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwID As Long) As Long
Public Declare Function C92B60B8 Lib "kernel32" Alias "WriteProcessMemory" (ByVal hProcess As Long, ByVal lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long
Public Declare Function E3CA2100 Lib "kernel32" Alias "CloseHandle" (ByVal hObject As Long) As Long
Public Decl83FD12are Function F79F1CC6 Lib "user32" Alias "FindWindowA" (ByVal Classname As String, ByVal WindowName As String) As Long
Public Declare Function EF17592B Lib "kernel32" Alias "ReadProcessMemory" (ByVal hProcess As Long, ByVal lpBaseAddress As Any, ByRef lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long
Public Declare Function E98B718D Lib "user32" Alias "GetAsyncKeyState" (ByVal key As Long) As Integer

'WriteAByte
Public Function WriteAByte(DDC50B45 As Long, F6109BFB As Byte)
	Dim B4AFE7C6 As Long
	Dim D8013DDD As Long
	Dim BBEB130B As Long

	B4AFE7C6= F79F1CC6(vbNullString, "WarRock")

	If (B4AFE7C6= 0) Then
		Exit Function
	End If

	E073507F B4AFE7C6,BBEB130B

	D8013DDD= BFE4EA63(&H1F0FFF, False,BBEB130B)

	If (D8013DDD= 0) Then
		    Exit Function
	End If

	C92B60B8 D8013DDD,DDC50B45,F6109BFB,1, 0&

	E3CA2100 D8013DDD
End Function

'WriteASM
Public Function WriteASM(Address As Long, ASM As String)
	Dim i As Integer
	Dim i2 As Integer

	i2 = 1
	While i < (Len(ASM) / 2)
		Call WriteAByte(Address + i,  Val("&H" & Mid$(ASM, i2, 2)))
		i = i + 1
		i2 = i2 + 2
	Wend
End Function

das modul ist DETECTED also nicht verwenden.

Und das ist mein timer:

Call WriteASM(&H((fast as famas addie)), "&H83FD0E")

Die Buttons:

Timer1.Enabled=True

das war der on button, beim off button steht statt "true" "false"

Ich hab alles richtig gemacht, ich krieg nicht mal nen error.
Aber wenn ich den hack vom WarRock ordner aus starte, crasht WarRock und schließt sich.
Ist auch bei meinem Freund so, der den hack ausprobiert hat.

Wer mir helfen kann, das problem zu lösen bekommt den hack mit 0min ban prevention.

-----
English:
I used this module:
[look at the first code in this post]

This module is DETECTED so don't use it.

For the timer look at the 2nd code.
Buttons the 3rd.

Well, i did everything right i think. The problem is ; Warrock closes when i start the hack.

Those who helped me, will get this hack.


BITTE HELFT MIR ICH WERD NOCH VERRÜCKT
PLEASE HELP ME I GOT MAD

[Burnzlow]

Ähh vllt. Merkt das Warrock? Paar funktionen gehen halt nicht da schützt sich der client dann vor indem er erst garnicht startet! Das ist so wie mit GG und Autoit geht einfach so auch nicht! Versuch es mal im Rootkit oder so starten zu lassen

[_hitman_]

im Rootkit starten?
Kannst du mir das genauer erklären?

[Vulcanraven]

Originally Posted by Godness_15

Ähh vllt. Merkt das Warrock? Paar funktionen gehen halt nicht da schützt sich der client dann vor indem er erst garnicht startet! Das ist so wie mit GG und Autoit geht einfach so auch nicht! Versuch es mal im Rootkit oder so starten zu lassen

Wird niemals klappen außerdem merkt WarRock das nicht sondern PB da er aber sagte das es nicht bei ihm klappt hat er etwas falsch gemacht.
Hab grade die Fast as Famas Addy nicht parat müsste ich eben WarRock starten und sie eben holen.

Fakt ist ich kann dir nicht helfen da ich VB6 nicht beherrsche...

[_hitman_]

Originally Posted by Vulcanraven

Wird niemals klappen außerdem merkt WarRock das nicht sondern PB da er aber sagte das es nicht bei ihm klappt hat er etwas falsch gemacht.
Hab grade die Fast as Famas Addy nicht parat müsste ich eben WarRock starten und sie eben holen.

Fakt ist ich kann dir nicht helfen da ich VB6 nicht beherrsche...

ok
ich hab mir noch paar freunde dazu geholt die mir helfen...die waren aber auch noch nicht erfolgreich

die fast as famas addie hab ich schon

[Burnzlow]

Hmm dann weiß ich auch nicht weiter.
Mit VB6 hab ich mich auch nicht allzulang beschäftigt sry!

[sean07]

ICH SUCHE MAL