snoopy Posted January 31, 2009 Posted January 31, 2009 tried, most did not have much success, could you give me any tips on how to turn this into autoit, or upgrade to autoit? tentei, mais não consegui ter muito sucesso, poderia me dar alguma dica em como transformar isso em autoit, ou melhorar para autoit CODE AHK HOME:: ;;start script { WinWait, title, IfWinNotActive, title, , title, title, WinWaitActive, title, expandcollapse popup#Persistent SetTimer, NumberToPick, 180 ;;determine the time "NumberToPick" SetTimer, getitens, 130 ;;determine the time "get itens" SetTimer, target, 1000 ;;determine the time "target" SetTimer, hp, 110 ;;determine the time "hp" SetTimer, mp, 100 ;;determine the time "mp" SetTimer, hppet, 100 ;;determine the time "hppet" hp: PixelSearch, Px, Py, 206, 56, 208, 64, 0x2092CC6, 38, Fast if ErrorLevel= 1 send, {- down}{- up} return mp: PixelSearch, Px, Py, 207, 69, 209, 76, 0xC15318, 38, Fast if ErrorLevel= 1 send, {0 down}{0 up} return hppet: PixelSearch, Px, Py, 174, 109, 202, 114, 0X092FCA, 38, Fast if ErrorLevel= 1 send, {= down}{= up}{= down}{= up} return NumberToPick: Random, NumberToPress, 1,5 Send, {%NumberToPress% down}{%NumberToPress% up} return getitens: send, {s down}{s up} Return target: send, {space down}{space up}{space down}{space up} return } MButton::pause ;;pause script DEL::exitapp ;;exit script returnfirst of all, what are you trieng to get? #Persistent SetTimer, NumberToPick, 180 ;;determine the time "NumberToPick" SetTimer, getitens, 130 ;;determine the time "get itens" SetTimer, target, 1000 ;;determine the time "target" SetTimer, hp, 110 ;;determine the time "hp" SetTimer, mp, 100 ;;determine the time "mp" SetTimer, hppet, 100 ;;determine the time "hppet" this doesent make any sence to me, can you explain?
snoopy Posted January 31, 2009 Posted January 31, 2009 Sorry but thats all i could acctually figure out from what you showed -.-.... hp: $PixelSearch-PixelSearch( X, Y, @DesktopWidth, @DesktopHeight, 0x2092CC6,); X position and y position If IsArray($pixelSearch) = 1 Then;what ever you wanna do next... EndIf WEnd mp: $PixelSearch-PixelSearch( X, Y, @DesktopWidth, @DesktopHeight, 0xC15318) If IsArray($pixelSearch) = 1 Then;what ever you wanna do next... EndIf wend hppet: $PixelSearch-PixelSearch( X, Y, @DesktopWidth, @DesktopHeight, 0X092FCA) If IsArray($pixelSearch) = 1 Then;what ever you wanna do next... EndIf wend PLEASE CORRECT IF WRONG... and sence i have 0 idea of what he is trieng to do and need more description i dont know what step you would take from there.
TerarinK Posted January 31, 2009 Posted January 31, 2009 Aqui está uma maneira de obter o AHK em formato Autoit: expandcollapse popupAutoItSetOption("SendKeyDownDelay", 5) WinWait($Title) If WinWaitNotActive($Title, "", 3000) Then WinWaitActive($Title) $ClientSize = WinGetClientSize("[active]") AdlibEnable("_HP", 100) AdlibEnable("_MP", 100) AdlibEnable("_HPPet", 100) AdlibEnable("_NumberToPick", 180) AdlibEnable("_TimeToGet", 130) AdlibEnable("_TargetFind", 1000) Func _Send($sString) Send("{" & $sString & "}") EndFunc ;==>_Send Func _HP() $PixelSearch = PixelSearch($pX, $pY, $ClientSize[0], $ClientSize[1], 0x2092CC6) If IsArray($PixelSearch) = 1 Then _Send("-") EndIf EndFunc ;==>_HP Func _MP() $PixelSearch = PixelSearch($pX, $pY, $ClientSize[0], $ClientSize[1], 0xC15318) If IsArray($PixelSearch) = 1 Then _Send("0") EndIf EndFunc ;==>_MP Func _HPPet() $PixelSearch = PixelSearch($pX, $pY, $ClientSize[0], $ClientSize[1], 0X092FCA) If IsArray($PixelSearch) = 1 Then _Send("=") EndIf EndFunc ;==>_HPPet Func _NumberToPick() $NumberToPress = Random(0, 1.5) _Send($NumberToPress) EndFunc ;==>_NumberToPick Func _TimeToGet() _Send("s") EndFunc ;==>_TimeToGet Func _TargetFind() _Send(" ") EndFunc ;==>_TargetFind É bem isso que eu poderia receber de, como, ainda não testada, porque não tenho um editor de ahk em torno de para-me verificar. Além disso, mais uma coisa é que não falo do Brasil para se nada for out errado não acusar-me 0x576520616C6C206469652C206C697665206C69666520617320696620796F75207765726520696E20746865206C617374207365636F6E642E
10031992 Posted June 10, 2009 Posted June 10, 2009 alguem conseguiu fazer um bot ?? eu uso o autoit para Meu Trainer de Last War , porem queria criar um Bot, mas não tenho muita noção de como fazer tentei algum desse scripts acima mais nao tive exito -------------------------------------------------------------------------------------------------------------------------------------------- [center][/center][center]Autoit Support Forum in Portuguese | AutoitBrasil.com[/center] [sub]My Script :[/sub]Simples Login for Program
Recommended Posts