1. Tải bản cài đặt AutoIT mới nhất

    Chào Khách. Nếu bạn mới tham gia và chưa cài đặt AutoIT.
    Vui lòng vào topic trên để tải bản AutoIT mới nhất nhé
    Dismiss Notice
  2. Quy định và nội quy

    Chào Khách. Vui lòng đọc kỹ nội quy và quy định của diễn đàn
    Để tránh bị ban một cách đáng tiếc nhé!
    Dismiss Notice
  3. Hướng dẫn chèn mã AutoIT trong diễn đàn

    Chào Khách. Vui lòng xem qua bài viết này
    Để biết cách chèn mã AutoIT trong diễn đàn bạn nhé :)
    Dismiss Notice

Hỏi đáp ai giúp mình với. mình không thể tìm được ảnh

Thảo luận trong 'Thảo luận chung - Hỏi đáp' bắt đầu bởi dior95, 29/5/20.

  1. dior95

    dior95 Thành viên mới
    • 1/6

    Tham gia ngày:
    28/5/20
    Bài viết:
    2
    Đã được thích:
    0
    #include <GDIPlus.au3>
    #include "_ImageSearchEX.au3"
    #include-once
    $port='62027'
    _GDIPlus_Startup()
    ;chup anh man hinh nox

    for $i=0 to 5
    RunWait(@ComSpec & ' /c adb -s 127.0.0.1:' & $port & ' shell screencap -p /sdcard/screen.png', "", @SW_HIDE)
    RunWait(@ComSpec & ' /c adb -s 127.0.0.1:' & $port & ' pull /sdcard/screen.png "C:\Users\ngacuong\Desktop\adb-and-autoit-master\tmp\'&$i&'.png"', "", @SW_HIDE)
    MsgBox(0,0,$i)
    Sleep(1000)
    Next
    ;tim kiem ben trong anh chup man hinh
    $Bitmap = _GDIPlus_BitmapCreateFromFile(@ScriptDir & '\tmp\'&$i&'.png')
    $hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($Bitmap)

    $filename=@ScriptDir & '\image\search1.bmp'
    _searchClick($filename,$hBitmap)
    _GDIPlus_BitmapDispose($Bitmap)
    _WinAPI_DeleteObject($hBitmap)
    Sleep(1500)
    _GDIPlus_Shutdown()
    Func _searchClick($filename,$hBitmap)
    ;Searching for the image
    Local $aCoords = _ImageSearchAreaEX($filename, $hBitmap, 0, 0, @DesktopWidth, @DesktopHeight,70)

    If IsArray($aCoords) Then

    MsgBox(0,0,'co')
    MsgBox(0,0,$aCoords[0])
    MsgBox(0,0,$aCoords[1])
    Run(@ComSpec & ' /c adb -s 127.0.0.1:' & $port & ' shell input tap ' & $aCoords[0] & ' ' & $aCoords[1], "", @SW_HIDE)


    Else

    Sleep(200)
    EndIf
    EndFunc ;==>_searchClick
     

    Các file đính kèm:

  2. dior95

    dior95 Thành viên mới
    • 1/6

    Tham gia ngày:
    28/5/20
    Bài viết:
    2
    Đã được thích:
    0
    chờ các cao nhân :(((
     

Chia sẻ trang này

Đang tải...