잘 살아보세~

저번시간에는 마우스의 좌표를 얻어와봤습니다. 그러면 오늘은 마우스를 이동해봅시다.

바로 이어지는 실전 예제 입니다.

While(1)
sleep("100")
HotKeySet("+0",movepos)
WEnd

Func movepos()
MouseMove(188,127)
MouseMove(1256,127)
MouseMove(1256,606)
MouseMove(188,606)
EndFunc

자 위에 처럼 입력하고 저장하고 실행합니다.

직접 한번 해보세요.

우리집은 디스플레이가 작기에 좌표가 낮습니다. 마우스가 자동으로 이동하게 됩니다.

우리 While문에 대해서 조금 살펴봅시다.

While 기본적으로 반복문으로 알고있습니다. 저 또한 기본적으로 while문을 반복문으로 이용하였습니다.

WEnd While의 끝을 알려주는 함수입니다. 

그리고 MouseMove(x좌표,y좌표) 이런식으로 움직인다는것인데, 우리는 메크로를 위해서 핫키를

계속 이용하고 있기때문에 Func 로 함수를 만들어서 사용하고 있다는 겁니다.

함수의 마지막 또한 EndFunc로 마지막을 정하는것입니다.

While(1) ;반복문 시작 {무한}
sleep("100") ;시스템 또한 너무 쉴새없으면 힘들까 싶어서 실제로 cpu도 많이 줄여줍니다.
HotKeySet("+0",movepos) ; shift+0 단축키를 이용해서 함수를 실행시킵니다.
WEnd ;반복문의 마무리

Func movepos() ;movepos라는 함수를 정의했습니다.
MouseMove(188,127) ;(188,127)좌표로 이동하세요!
MouseMove(1256,127);(1256,127)좌표로 이동하세요! 
MouseMove(1256,606) ;(1256,606)좌표로 이동하세요!
MouseMove(188,606) ;(188,606)좌표로 이동하세요!
EndFunc;함수의 마무리

자 이렇게 설명을 해봤는데요. 솔직히 도대체 어디에 마우를 이동할지는 여러분의 단순 노가다에 

활용을 해보시는것도 나쁘진 않을듯 합니다.

저는 마우스라도 움직이지 않으면 반응을 안하는 프로그램을 위해서 사용했다는 사실입니다.

이렇게 단순한 일이라도 내 손으로 직접 마우스를 움직이는 것보다 단축키 하나로 한다면

솔직히 좀 덜 번거롭다는 겁니다. 

그 다음은 바로 응용편도 좀 허접하지만 만들어 봤다는것 저는 사용해보니 좋습니다.

그러면 바로 밑에 제가 오늘 사용한 소스코드를 올려보겠습니다.

Dim $x[6], $y[6] ; 변수를 정의합니다{x좌표, y좌표를 넣으려고 배열을 만들었습니다
$n=0 ; n변수 
While(1) ; 반복문
sleep("100") ;쉬기
HotKeySet("+{F3}",enrollpos) ;Shift+F3 단축키 지정 (좌표 저장)
HotKeySet("+{F2}",movepos) ;shift+F2 단축키 지정 (마우스 동작)
HotKeySet("+{ESC}",Terminate) ;shift+ESC 단축키 지정 (끄기)
WEnd ;반복문 종료

Func enrollpos() ; 좌표 등록하기 저는 6군대를 정했어요 
$pos = MouseGetPos() ; 좌표 따와서 배열에 넣고
$x[$n] = $pos[0] ;x좌표 넣고
$y[$n] = $pos[1] ;y좌표 넣고
$n=$n+1 ; n=n+1 하는것
EndFunc ;종료

Func movepos() ;마우스 이동하기
MouseMove($x[0],$y[0]) ; 1번 좌표
MouseMove($x[1],$y[1]) ; 2번 좌표
MouseMove($x[2],$y[2]) ; 3번 좌표
MouseMove($x[3],$y[3]) ; 4번 좌표
MouseMove($x[4],$y[4]) ; 5번 좌표
MouseMove($x[5],$y[5]) ; 6번 좌표
EndFunc

Func Terminate()
    Exit 0 ;종료
EndFunc

마지막으로 오늘의 피드백은 내가 원하는 좌표로 이동하면서 마지막에는 마우스가 항상 잘 보일 수 있는 위치에

보내주는것을 하면 더 좋을거라는 생각이 들었다는것!!

자 그러면 다시 조금 더 수정을 해야겠습니다.

여러분의 머리를 이용해서 더 응용편을 만들어 보세요!!