ผมเริ่มด้วยคำสั่ง while
mouseclick ....
ไปเรื่อยๆพอคอมไพล์ออกมาปรากฎว่าใช้ไม่ได้ครับ ไม่รู้ว่าผมจะต้องเริ่มอย่างไรครับ
หรือว่าผมจะหาพิกัดหน้าจอผิดไปครับ
Global $color1,$color2
While 1
$color1 = PixelSearch(0, 0, @DesktopWidth, @DesktopHeight, รหัสสีมุมซ้ายบน)
If IsArray($color1) Then
MouseClick("",$color1[0],$color1[1])
$color2 = PixelSearch(0, 0, @DesktopWidth, @DesktopHeight,รหัสสีมุมขวาล่าง)
If IsArray($color2) Then
MouseClick("",$color2[0],$color2[1])
ExitLoop
EndIf
EndIf
Sleep(100)
WEnd
POS พิมพ์ว่า:AutoIt Window Info ไม่สามารถแยกส่วนประกอบในไฟล์แฟลช
ดังนั้นถ้าจะเขียนคำสั่งควบคุมต้องใช้คำสั่งที่ตรวจสอบสีเท่านั้น เช่น PixelGetColor, PixelSearch แล้วก็สั่งคลิกโดยใช้คำสั่ง MouseClick ไปยังตำแหน่งที่ต้องการ
While PixelGetColor($color1[0], $color1[1) = 0xE2A447
MouseClick("left", $color1[0], $color1[1])
WEnd
aaa()
Func aaa()
$aaa = PixelSearch( 0, 0, 20, 300, 0xFF0000 ) ;หาสีทีมุม เพื่ออัปเดทตำแหน่ง
EndFunc
While 1
$color1 = PixelSearch(292, 80, 1037, 620, 0xE2A447);coin
If IsArray($color1) Then
While PixelGetColor($color1[0], $color1[1]) = 0xE2A447
MouseClick("left", $color1[0], $color1[1], 1, 0)
Sleep(200)
WEnd
wend
While 1
WinWait("ชื่อไตเติล") ;เปลี่ยนชื่อไตเติลของหน้าต่างที่จะปิด
WinClose("ชื่อไตเติล") ;เปลี่ยนชื่อไตเติลของหน้าต่างที่จะปิด
Sleep(100)
WEnd
POS พิมพ์ว่า:คลิกในหน้าต่างเกมส์ให้บ็อปอัฟแสดงขึ้นมา
ใช้ AutoIt Window Info ส่องเอาชื่อไตเติลของบ็อปอัฟ
ก๊อปปี้ชื่อนำมาใส่โค้ดด้านลางนี้แล้วลองรันดู
ดูว่าปิดได้หรือไม่
ถ้าโค้ดด้านล่างนี้สามารถปิดบ็อปอัฟได้ ก็สามารถเขียนให้คอยตรวจบ็อปอัฟและปิดได้
- Code:
While 1
WinWait("ชื่อไตเติล") ;เปลี่ยนชื่อไตเติลของหน้าต่างที่จะปิด
WinClose("ชื่อไตเติล") ;เปลี่ยนชื่อไตเติลของหน้าต่างที่จะปิด
Sleep(100)
WEnd
While Sleep(100)
findcolor();หาสีเหรียญ
findpopup();หาสีบ็อปอัป
WEnd
Func findcolor()
;ใส่คำสั่ง
EndFunc
Func findpopup()
;ใส่คำสั่ง
EndFunc
While Sleep(100)
findpopup();หาสีบ็อปอัป
WEnd
Func FINDPOPUP()
$CONPOS = ControlGetPos("แฮปปี้คนเลี้ยงหม", "", "[CLASS:NativeWindowClass; INSTANCE:2]")
$COORDINATES = PixelSearch(199 + $CONPOS[0], 78 + $CONPOS[1], 803 + $CONPOS[0], 146 + $CONPOS[1], 56000000, "", "", WinGetHandle("แฮปปี้คนเลี้ยงหม"))
If IsArray($COORDINATES) Then
ControlClick("แฮปปี้คนเลี้ยงหม", "", "[CLASS:NativeWindowClass; INSTANCE:2]", "left", 1, 803 ,146)
Sleep(100)
POPUP()
EndIf
EndFunc
toto2tor พิมพ์ว่า:สวัสดีคับ POS ผมไม่รู้ว่าใส่ถูกไหมคับ ฟังฌั่นที่ POS ให้มา รบกวน POS ด้วยนะคับ ขอบคุณคับ
- Code:
While Sleep(100)
findpopup();หาสีบ็อปอัป
WEnd
Func FINDPOPUP()
$CONPOS = ControlGetPos("แฮปปี้คนเลี้ยงหม", "", "[CLASS:NativeWindowClass; INSTANCE:2]")
$COORDINATES = PixelSearch(199 + $CONPOS[0], 78 + $CONPOS[1], 803 + $CONPOS[0], 146 + $CONPOS[1], 56000000, "", "", WinGetHandle("แฮปปี้คนเลี้ยงหม"))
If IsArray($COORDINATES) Then
ControlClick("แฮปปี้คนเลี้ยงหม", "", "[CLASS:NativeWindowClass; INSTANCE:2]", "left", 1, 803 ,146)
Sleep(100)
POPUP()
EndIf
EndFunc
flapjack พิมพ์ว่า:toto2tor พิมพ์ว่า:สวัสดีคับ POS ผมไม่รู้ว่าใส่ถูกไหมคับ ฟังฌั่นที่ POS ให้มา รบกวน POS ด้วยนะคับ ขอบคุณคับ
- Code:
While Sleep(100)
findpopup();หาสีบ็อปอัป
WEnd
Func FINDPOPUP()
$CONPOS = ControlGetPos("แฮปปี้คนเลี้ยงหม", "", "[CLASS:NativeWindowClass; INSTANCE:2]")
$COORDINATES = PixelSearch(199 + $CONPOS[0], 78 + $CONPOS[1], 803 + $CONPOS[0], 146 + $CONPOS[1], 56000000, "", "", WinGetHandle("แฮปปี้คนเลี้ยงหม"))
If IsArray($COORDINATES) Then
ControlClick("แฮปปี้คนเลี้ยงหม", "", "[CLASS:NativeWindowClass; INSTANCE:2]", "left", 1, 803 ,146)
Sleep(100)
POPUP()
EndIf
EndFunc
เปลี่ยนชื่อฟังชั่น Func FINDPOPUP() เป็นตัวพิมพ์เล็กด้วยครับ
ส่วนในโค๊ดรอผู้รู้มาตอบอีกที ครับ
flapjack พิมพ์ว่า:toto2tor พิมพ์ว่า:สวัสดีคับ POS ผมไม่รู้ว่าใส่ถูกไหมคับ ฟังฌั่นที่ POS ให้มา รบกวน POS ด้วยนะคับ ขอบคุณคับ
- Code:
While Sleep(100)
findpopup();หาสีบ็อปอัป
WEnd
Func FINDPOPUP()
$CONPOS = ControlGetPos("แฮปปี้คนเลี้ยงหม", "", "[CLASS:NativeWindowClass; INSTANCE:2]")
$COORDINATES = PixelSearch(199 + $CONPOS[0], 78 + $CONPOS[1], 803 + $CONPOS[0], 146 + $CONPOS[1], 56000000, "", "", WinGetHandle("แฮปปี้คนเลี้ยงหม"))
If IsArray($COORDINATES) Then
ControlClick("แฮปปี้คนเลี้ยงหม", "", "[CLASS:NativeWindowClass; INSTANCE:2]", "left", 1, 803 ,146)
Sleep(100)
POPUP()
EndIf
EndFunc
เปลี่ยนชื่อฟังชั่น Func FINDPOPUP() เป็นตัวพิมพ์เล็กด้วยครับ
ส่วนในโค๊ดรอผู้รู้มาตอบอีกที ครับ
|
|