'Autoit'에 해당되는 글 4건

Autoit Inputbox 사용방법

안녕하세요 홍초팡입니다

오늘은 인풋박스 사용방법에 대해서 알아볼께요!

많은분들이 매크로 만드시는중에 방번호와 비밀번호 즉 방재입장 기능을 넣으시려고하시면

이걸 꼭 따라하시고 하시면됩니다!

$_1 = GUICreate("FMHC 유료매크로 V0.1", 225, 355, 192, 125)
$input1 = GUICtrlCreateInput("/go", 0, 8, 57, 21)
$input2 = GUICtrlCreateInput("비밀번호입력", 0, 32, 113, 21)
GUISetState(@SW_SHOW)

======================================================

픽셀서치 사용시

$pixel = PixelSearch(0,0,0,0,0x000000) ;색

if IsArray($pixel)= true then ;발견시 방입장 
 MouseClick("left", 228, 563, 1,0) ;마우스 좌표를 이동
Send(  GUICtrlRead(  $input1 ) ) ;인풋1의 내용을 입력한다
send ("{enter}") ;엔터 누름
Send(  GUICtrlRead(  $input2 ) ) ;인풋2의 내용을 입력한다
send ("{enter}") ;엔터 누름

EndIf

======================================================

이미지서치 사용시

$res = _imagesearch('bp2.bmp',1,$x,$y,10) ;이미지인식

if $res = 1 Then ;발견시 방입장
 MouseClick("left", 228, 563, 1,0) ;마우스 좌표를 이동
Send(  GUICtrlRead(  $input1 ) ) ;인풋1의 내용을 입력한다
send ("{enter}") ;엔터 누름
Send(  GUICtrlRead(  $input2 ) ) ;잇풋2의 내용을 입력한다
send ("{enter}") ;엔터누름
Endif

======================================================

방재입장에 필요한 픽셀서치/이미지서치 부분을 통해서 방재입장을 구현햇습니다.

픽셀서치 와 이미지서치 는 전에쓴 글을 보시면 됩니다

2015년 02월18일

From.홍초팡

func Example()
    ; 메모장 시작
   Run ("notepad.exe") 

    ; 메모장 창이 나타날 때까지 10 초 정도 기다린다
   Local $hWnd = WinWait("[CLASS:Notepad]", "", 10)

    ; 메모장 윈도우의 위치뿐만 아니라, 폭과 높이를 검색. 사용할수있다 
   Local $aPos = WingetPos($hWnd)

    ;, X 0, 0의 y 위치를 메모장을 이동하고, 200에서 200 높이와 너비를 설정합니다.
   WinMove($hWnd, "", 0, 0, 200, 200)

    ; 2 초 메모장 윈도우의 새로운 위치를 표시 할 때까지 기다립니다.
   Sleep(2000)

    ; WinGetPos에 의해 반환 된 배열을 사용하여 원래 위치로 메모장 창을 이동합니다.

    WinMove($hWnd, "", $aPos[0], $aPos[1], $aPos[2], $aPos[3])

    ; 2 초 메모장 창의 원래 위치를 표시 할 때까지 기다립니다.
    Sleep(2000)

    ; WinWait에 의해 반환 된 핸들을 사용하여 메모장 창을 닫습니다.
   WinClose($hWnd)

EndFunc   ;==>Example

$pixel = PixelSearch(0, 0,0,0,0xFF0000) ;좌표 색상
if IsArray($pixel)= True then ;좌표에 색상이 보이면
MouseClick("left") ; 마우스 왼쪽클릭
EndIf

#include <ImageSearch.au3> ;선언

HotKeySet("{F1}", "checkForImage") ;F1 을 누르면 checkForImage 가 시작이된다

global $y = 0, $x = 0

while 1 ;반복
   sleep(10) ;0.01초동안 
WEnd ;끝

Func checkForImage() ;checkForImage 시작
   Local $search = _ImageSearch("checkImage.bmp", 0, $x, $y, 0) ;이미지
  If $search = 1 Then ;이미지를 발견하면
   MouseClick($x, $y, 10) ;이미지를 누름
   EndIf ;끝
EndFunc :구분 끝