ฟอรั่มของบล็อก http://pssix.blogspot.com


ขออนุญาติรบกวนผู้รู้ครับบอกผมหน่อยครับผมมือใหม่ หัดเขียน scite

Share

malibu_1036
มือใหม่เพิ่งสมัคร
มือใหม่เพิ่งสมัคร


จำนวนข้อความ : 1
ความนิยม : 0
เข้าร่วมเมื่อ : 13/03/2015

ขออนุญาติรบกวนผู้รู้ครับบอกผมหน่อยครับผมมือใหม่ หัดเขียน scite

ตั้งหัวข้อ by malibu_1036 on 13/03/15, 06:24 pm

Global $GameHD

Func _PSsixLoadH($gtitle)
$GameHD = WinGetHandle($gtitle)
If @error Then
MsgBox(4096, "Error", "no comment")
Else
Return 1
EndIf
EndFunc

If _PSsixLoadH("BlueStacks App Player") Then WinActivate($GameHD)

ControlClick ($GameHD, "", "","left",10,334,518)
ControlClick ($GameHD, "", "","left",10,689,620)
ControlClick ($GameHD, "", "","left",10,381,320)
ControlClick ($GameHD, "", "","left",10,334,518)
ControlClick ($GameHD, "", "","left",10,578,572)
ControlClick ($GameHD, "", "","left",10,590,620)
Return 100


อันนี้คือที่ผมลองเขียนเองครับ แต่สิ่งที่ผมทำไม่ได้คือ ผมอยากให้ scite ตัวนี้ run ต่อไปเรื่อยๆ อะครับ พอเวลาผมกด run มัน จะ คลิกเมาส์ให้ผมแค่ทีเดียวครับ ถ้าอยากจะให้ ทำต่อ ผมต้องกด รัน อีกครั้ง มันก็จะ คลิกเมาส์ให้ผมแค่ทีเดียวเช่นเคย em229 ขอรบกวนพี่ๆเพื่อนๆ ผู้รู้ ชี้แนะให้ผมที่ครับ ปล. ขอบพระคุณมากๆครับ
avatar
flapjack
PSsix Member Super Class III
PSsix Member Super Class III

PSsix Moderator PSsix Master PSsix Game Coder
จำนวนข้อความ : 311
ความนิยม : 74
เข้าร่วมเมื่อ : 05/10/2010

Re: ขออนุญาติรบกวนผู้รู้ครับบอกผมหน่อยครับผมมือใหม่ หัดเขียน scite

ตั้งหัวข้อ by flapjack on 14/03/15, 03:06 pm

ลองศึกษาเรื่อง loop  ดูน่ะครับ ลิงค์ตามนี้ครับ
แล้วลองมาประยุกต์ใน code ดู เช่น
Code:

For  $i= 1 to 100
   ControlClick ($GameHD, "", "","left",10,334,518)
   Next

oukiii
มือใหม่เพิ่งสมัคร
มือใหม่เพิ่งสมัคร


จำนวนข้อความ : 1
ความนิยม : 0
เข้าร่วมเมื่อ : 18/03/2015

Re: ขออนุญาติรบกวนผู้รู้ครับบอกผมหน่อยครับผมมือใหม่ หัดเขียน scite

ตั้งหัวข้อ by oukiii on 26/03/15, 05:06 pm

while 1
ControlClick ($GameHD, "", "","left",10,334,518)
WEnd

อันนี้จะเป็นการลูปเรื่อยๆครับ

    เวลาขณะนี้ 27/03/17, 01:34 pm