AutoIt and Keyboard problem

07/24/2010 10:47 shoneusering#1
Hello

I created a script with AutoIt but it does not work with 4Story. I feel that the keys are blocked by the program.
Here's the script code:
Code:
#region ---Au3Recorder generated code Start ---
Opt("WinWaitDelay",100)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)

_WinWaitActivate("4Story","")
While 1
Send("1xzxzxzxzxz")
Sleep(1000)
WEnd

#region --- Internal functions Au3Recorder Start ---
Func _WinWaitActivate($title,$text,$timeout=0)
	WinWait($title,$text,$timeout)
	If Not WinActive($title,$text) Then WinActivate($title,$text)
	WinWaitActive($title,$text,$timeout)
EndFunc
#endregion --- Internal functions Au3Recorder End ---

#endregion --- Au3Recorder generated code End ---
I just need to cast archer aoe (key 1) and loot (key x z)

What is the problem?

Thank you in advance
07/24/2010 12:30 westside313#2
take controlsend

Controlsend("4Story", "", "","{1}")
Controlsend("4Story", "", "","{z}")
07/24/2010 12:52 ©£¥ňŋ²©#3
download ac tool and tipe this:
loop 99999999
keys 1xz
delay 30
end
07/25/2010 13:57 shoneusering#4
Thanks westside, Controlsend works fine but i have an other problem.
When i start my script, after 5 minute i have an error "Suspicious macro function has been detected. (Code = 10104" and 4story is closed.

I have try to add movement in the script, random but i always have this error message.

Does anyone know the solution ?

Thanks in advance,

Code:
$i = 1
While 1
#region Move
Switch $i
Case 1
	Controlsend("4Story", "", "","{z down}")
	Sleep(500)
	Controlsend("4Story", "", "","{z up}")
Case 2
	Controlsend("4Story", "", "","{q down}")
	Sleep(500)
	Controlsend("4Story", "", "","{q up}")
Case 1
	Controlsend("4Story", "", "","{s down}")
	Sleep(500)
	Controlsend("4Story", "", "","{s up}")
Case 2
	Controlsend("4Story", "", "","{d down}")
	Sleep(500)
	Controlsend("4Story", "", "","{d up}")
EndSwitch

$i = $i + 1
If ($i > 4) Then
	$i = 1
EndIf
Sleep(Random(3,5,0)*1000)
#endregion

#region Hit
Controlsend("4Story", "", "","{1}")
Sleep(Random(1,2,0)*1000)
#endregion

#region Loot
For $j = 0 To 30
Switch Random(1,3,1)
Case 1
	Controlsend("4Story", "", "","{x}")
	Sleep(Random(1,2,0)*1000)
	Controlsend("4Story", "", "","{w}")
	Sleep(Random(1,2,0)*1000)
Case 2
	Controlsend("4Story", "", "","{a down}")
	Sleep(300)
	Controlsend("4Story", "", "","{a up}")
	Sleep(Random(1,2,0)*1000)	
Case 3
	Controlsend("4Story", "", "","{e down}")
	Sleep(300)
	Controlsend("4Story", "", "","{e up}")
	Sleep(Random(1,2,0)*1000)	
EndSwitch
Next
#endregion
WEnd
07/25/2010 18:08 westside313#5
thats because you need a bypass >.<
4Story blocks your bot
so an error pops up

download the bypass from nekki...
07/26/2010 16:40 28daniel28#6
Was will e machen? Nen Hack?
07/26/2010 16:46 ©£¥ňŋ²©#7
Quote:
Originally Posted by 28daniel28 View Post
Was will e machen? Nen Hack?
Er macht sich einen eigenen Bot:facepalm:
07/26/2010 17:17 .FaZe#8
Quote:
Originally Posted by Finneding View Post
Er macht sich einen eigenen Bot:facepalm:
woher willste wissen das er nen bot macht?
08/06/2010 14:44 lolman3210#9
jo ich hab das selbe Problem. Hab schon oft neu runtergeladen und auch die Grafik 4story einstellungen überprüft. HELFT mir please.