0

是否可以使用 AutoIT 单击 Flash 按钮？如果是这样，任何人都可以给我它的示例代码吗？

4

3 回答 3

2

如果您知道按钮将在哪里并且它就在那里，您可以在某个位置单击屏幕。

如果您不知道 flash 按钮的状态（是否存在，具体在哪里），您可以使用一个脚本来截取屏幕截图，处理图像，然后创建并运行一个 AutoIT 脚本，单击按钮。过去我不得不用 Perl 和 ImageMagick 来做这件事。

于 2013-04-16T16:24:35.883 回答
0

这是一个使用 AutoIt 自动化 Flash 游戏的示例。

#include <IE.au3>

example()

Func example()
    $oIE = _IECreate("http://andkon.com/arcade/puzzle/greatmatemaster/")

    Local $oEmbedFlash = _IETagNameGetCollection($oIE, "embed", 0)
    Local $hWin = _IEPropertyGet($oIE, "hwnd")
    WinSetState($hWin, "", @SW_MAXIMIZE)

    ;get the x/y position of the flash game
    Local $iX = _IEPropertyGet($oEmbedFlash, "screenx")
    Local $iY = _IEPropertyGet($oEmbedFlash, "screeny")

    ;add click positions
    Local $aPlayChestBtn = [$iX + 240, $iY + 350]
    Local $a2b = [$iX + 120, $iY + 390]
    Local $a4b = [$iX + 120, $iY + 300]

    ;click the play chest button
    Click($aPlayChestBtn, 2000)

    ;move pawn to 4b with clicks
    Click($a2b, 1000)
    Click($a4b, 1000)

EndFunc   ;==>example

Func Click($aPos, $iWaitTime = 0)
    ;waits for a set amount of time for nothing to change where you want to click
    If $iWaitTime <> 0 Then PixelChecksumWait($aPos, $iWaitTime)

    ;clicks the area you want to click
    MouseClick("left", $aPos[0], $aPos[1], 1, 0)
EndFunc   ;==>Click

Func PixelChecksumWait($aPos, $iWaitTime = 5000)
    Local $iCheckSum

    ;wait to make sure there is no change in the region
    While 1
        ;get checksum
        $iCheckSum = PixelChecksum($aPos[1] - 5, $aPos[0] - 5, 10, 10)

        ;sleep to make sure there is no change
        Sleep($iWaitTime)

        ;exit loop if there was no change
        If $iCheckSum = PixelChecksum($aPos[1] - 5, $aPos[0] - 5, 10, 10) Then ExitLoop
    WEnd
EndFunc   ;==>PixelChecksumWait
于 2015-12-12T00:48:51.780 回答
0

无需截屏，您可以计算像素的哈希值PixelChecksum。然后与您计算的先前版本进行比较。您将需要检查一系列像素区域。

https://www.autoitscript.com/autoit3/docs/functions/PixelChecksum.htm

于 2015-12-11T18:44:32.770 回答