매크로

질문
2018.12.03 15:25

멀티서치 관련 질문있습니다.

조회 수 184 추천 0 댓글 0


;==============================================================global변수

global adb := "C:\Program Files (x86)\Nox\bin\nox_adb.exe"
global adbIP := "127.0.0.1:62001"
global imageCount := 0
global Title:= "Nox" 

;==============================================================cmd상주



Attach:
DetectHiddenWindows, on
;Run, %comspec% /k  cPid
Run, %comspec% /k  ,,hide UseErrorLevel, cPid
WinWait, ahk_pid %cPid%,, 10
DllCall("AttachConsole","uint",cPid)
hCon:=DllCall("CreateFile","str","CONOUT$","uint",0xC0000000,"uint",7,"uint",0,"uint",3,"uint",0,"uint",0)
global objShell := ComObjCreate("WScript.Shell")
return

Clean_up:
DllCall("CloseHandle", "uint", hCon)
DllCall("FreeConsole")
Process, Close, %cPid%
ExitApp

;==============================================================함수

;로그작성함수
WriteLog(msg){
FormatTime, nowTime, ,MM-dd HH:mm:ss
LV_Add("",nowTime,+msg)
LV_ModifyCol()
}


;ADB 드래그함수
ADB_Drag(x1,y1,x2,y2,duration){
    
    objExec := objShell.Exec(adb " -s " adbIP " shell input swipe " x1 " " y1 " " x2 " " y2 " " duration)
    
}

;발견이미지 개수 카운트
M_ImageCount(image){
result:=MultipleImagesearch(0,0,A_ScreenWidth,A_ScreenHeight,image)
;imageCount :=result

Loop,Parse,result,`n
{
If A_LoopField=  ;잘라진문자열을 참조할수있다.  안에 문자열이없으면 
{
imageCount := A_Index-1
Break
} ;문자열없으면 break
}
return imageCount
}


M_ImageSearch(image,imageCount){ ;이미지 2개서치후 드래그  돌합치기
dir:="image/start.bmp" ;앱플레이어의 상대적위치를 계산하기위해서
Imagesearch,s_x,s_y,0,0,A_ScreenWidth,A_ScreenHeight,%dir%
;MsgBox,%s_x%,%s_y%
result:=MultipleImagesearch(0,0,A_ScreenWidth,A_ScreenHeight,image)

Loop,Parse,result,`n ;문자열을 지정의 단락 문자로 분할하고, 각각 대해 반복 처리
{ ; x a yi 으로 잘렸다.
If (imageCount<2 || A_Index==3){  ; 이미지가  2개까지만  중복서치되도록
Break
} ;문자열없으면 break
StringSplit,Pos,A_LoopField,a ;a 단위로자른다 x y 분리
;ToolTip,%A_Index%,%Pos1%,%Pos2%,%A_Index%
if(mod(A_Index,2)==1){
x1:=pos1-s_x
y1:=pos2-s_y-40
}else if(mod(A_Index,2)==0){
x2:=pos1-s_x
y2:=pos2-s_y-40
}
}
;MsgBox,%x1%,%y1%,%x2%,%y2%
if(x1!="" && x2!=""){
ADB_Drag(x1,y1,x2,y2,"300") ;드래그
return false
}else return true
}


;==============================================================시작


F2::
{
GuiControl,,매크로상태,매크로상태 : 일시정지
    Gui,Submit,nohide
pause
}
return

F3:: ;테스트용
{
SetBatchLines,-1
CoordMode,Pixel,Screen
CoordMode,ToolTip,Screen
ImageCount:= M_ImageCount("image/stone8.bmp")
M_ImageSearch("image/stone8.bmp",ImageCount)
sleep,200

return
}

Button로그:
{
Gui,2:Show,w270 h220, 로그
return
}


while(1){

ImageCount:= M_ImageCount("image/stone.bmp")
M_ImageSearch("image/stone.bmp",ImageCount)
sleep,400

}


return
}

Button재시작:
{
Reload
return
}
Button종료:
{
ExitApp
}




MultipleImagesearch(xs,ys,xl,yl,image)
{
pos=     ;pos 초기화
xss:=xs
yss:=ys
loop
{
Imagesearch,x,yi,%xss%,%yss%,%xl%,%yl%,%image%
If Errorlevel=1
Break
pos=%pos%%x%a%yi%`n   ; = 는 이어붙이기니까 pos에  기존꺼랑 그 이미지 위치저장됨 x a yi `n 순
;처음은 그냥 이미지서치
loop
{
xss:=x+1 ;x좌표에 1씩더해서  중복서치를 없앤다.
If xss=%xl%
Break
Imagesearch,x,y,%xss%,%yss%,%xl%,%yl%,%image%
If Errorlevel=1
Break
pos=%pos%%x%a%y%`n
}
xss:=xs
yss:=yi+1
If yss=%yl%
Break
}
Sort,pos,u  ;u 차례대로 정렬하고 중복을없앤다.
return pos
}

GuiClose:
ExitApp

어떤분의 공유로 해당 스크립트를 계속 공부 중인데요. 궁금중이 있어서 올립니다.
해당 내용 테스트 결과 x1,y1값을 못찾고 있어서 진행이 안되는 것으로 보입니다. 이미지를 못찾을 가능성이 커보이기는 한데...
정확한 어느부분을 손대야 할지 모르겠네요...이미지 위치도 정확히 인식은 하는데..프로그램에서 동일 이미지를 못찾는건지..수정해야 하는 부분 좀 지적 좀 해주세요.



List of Articles
분류 제목 글쓴이 최근변경 추천
자유 항상 네이버 카페에서만 배우다가.. 1 거므사마 2016.10.28 0/0
질문 핫키하나로 오토핫키를 온/오프 하고싶습니다. 7 서시 2017.09.08 0/0
질문 핫키하나로 서스펜드와 퍼즈를 동시에 온오프하고싶습... adde 2017.08.29 0/0
자유 핫키매크로 입문자용으로 설명잘되어있는곳 3 우후훅 2016.08.07 0/0
질문 핫키를 만들엇는데 원래 키입력을 무시 안할수 있나요? 2 ddfa4 2017.03.16 0/0
질문 핫키가 안먹혀서 하드웨어 키입력으로 할때 Pause 1 응애제니 2023.01.21 0/0
자유 핫키, Postmessage 어떻게들쓰고계세요? 15 우후훅 2016.04.08 0/0
정보 핫키 하나로 온오프 하기 2 저녁말고전역 2022.07.21 0/0
질문 핫키 편집기 scite 글자색상 바꾸고 하는설명있었는데요. 7 우후훅 2015.03.23 0/0
질문 핫키 지정이 안되는 키는 어떻게 지정하죠? 화프 2016.02.21 0/0
질문 핫키 입문자 질문드립니다 1 향취 2017.07.08 0/0
질문 핫키 동작을 조건을 판별하고 실행 시키고 싶습니다. 1 SFEH 2023.02.24 0/0
질문 핫키 궁금한게 있습니다. 유니윤 2019.06.06 0/0
질문 핫키 고수님들 ㅠ 변수비교하는데 비교가안되서 도움요... 2 개멍멍멍 2016.03.01 0/0
질문 핫키 vmware에서 처음만 실행하네요 지니블렉션 2015.02.27 0/0
질문 핫키 2개이상 실행해서 멀티작업 방법이 어떻게되나요 5 우후훅 2015.03.22 0/0
질문 핫린이 한수 여쭙습니다 ^^ 3 ddd123 2023.02.24 2/0
질문 함수지정에 대해 잘못알고 있는것 같습니다 3 망둥어 2018.04.27 0/0
질문 함수와 변수 질문 18 Hangoon 2015.01.16 0/0
질문 함수에다가 변수사용해서 카운팅 하고있는데 어렵네요 3 망겜판독기 2018.04.05 0/0
Board Pagination Prev 1 34567891011 ... 209 Next
/ 209

전체 최신 인기글

전체 주간 인기글