Global $Hero
Func _PSsixLoadH($gtitle)
$Hero = WinGetHandle($gtitle)
If @error Then
MsgBox(4096, "Error", "Please Open Game")
Else
Return 1
EndIf
EndFunc
If _PSsixLoadH("DungeonHero") Then WinActivate($Hero)
While 1
if WinActive ($Hero) then Send ("i")
Sleep(1000)
if WinActive ($Hero) then Send ("m")
Sleep(1000)
WEnd
คือจะสั่งให้กด i คือเปิดหน้าต่าง item และกด m เพื่อเปิด map ทดสอบเปิดแบบซ้ำไปซ้ำมาอะคับ
มันเด้งเข้ามาหน้าจอเกมแล้ว แต่ไม่ทำงานอะครับ ไม่แน่ใจว่า ต้อง เขียนตรงไหนเพิ่มเติมคับ ขอลคุณครับ
Func _PSsixLoadH($gtitle)
$Hero = WinGetHandle($gtitle)
If @error Then
MsgBox(4096, "Error", "Please Open Game")
Else
Return 1
EndIf
EndFunc
If _PSsixLoadH("DungeonHero") Then WinActivate($Hero)
While 1
if WinActive ($Hero) then Send ("i")
Sleep(1000)
if WinActive ($Hero) then Send ("m")
Sleep(1000)
WEnd
คือจะสั่งให้กด i คือเปิดหน้าต่าง item และกด m เพื่อเปิด map ทดสอบเปิดแบบซ้ำไปซ้ำมาอะคับ
มันเด้งเข้ามาหน้าจอเกมแล้ว แต่ไม่ทำงานอะครับ ไม่แน่ใจว่า ต้อง เขียนตรงไหนเพิ่มเติมคับ ขอลคุณครับ