คือผมได้เข้ามาเริ่มเขียน สคิปที่เวปนี้ เเค่ไม่กี่วันผมเขียนสคิปได้ตัวนึ่งเเร้ว
เเค่เวลาผมไช้นั้นเปิดขึ้นมามันจะไม่มีหน้าต่างโปรเเกรม มีนจะไปอยู่ ด้านขวาล่างของหน้าจอของผม
ผมเลยอยากไห้มีนมี หน้าต่างโปรเเกรมอ่ะครับ แบบว่าขอเเค่ กดตรงนี้ สต๊าท ตรงนี้ สต๊อป กดปุ่มนั้น ปุ่มนี้อ่ะครับ
ขอเริ่มแบบง่ายๆก่อน ขอท่านผู้รู้ช่วย เเนะเเนวทางการเริ่มเขี่ยนแบบ GUI หน่อยนะครับผมหาดูจากบรอดก้ไม่เจออ่ะครับ
ช่วยเเนะนำที ไม่ ก้ลอง เปลี่ยนสคิปของผม อ่ะไห้มันมีหน้าต่างหน่อยได้ไหมครับ ผมจะลองเทียบดูว่าตรงไหนเปลี่ยนยังไงบ้าง ผมลอสิ้นเดือนตังออกจะไปเดิน หาซื้อหนังสือมาอ่านอ่ะครับ ต้องลอ เดว ลูกเมียอด*-*
นี่สคิปครับ
Global $GameHD
HotkeySet("{F8}", "quit")
If _PSsixLoadH("ชื่อเกมผม") Then WinActivate($GameHD)
While 1
If PixelGetColor(602, 695) = 0x333124 Then
MouseClick("left", 602, 695, 1, 0)
EndIf
If PixelGetColor(807, 202) = 0xEAE8E8 Then
MouseClick("left", 498, 207, 1, 0)
EndIf
If PixelGetColor(631, 537) = 0x302D23 Then
MouseClick("left", 631, 537, 1, 0)
EndIf
Sleep(100)
WEnd
Func _PSsixLoadH($gtitle)
$GameHD = WinGetHandle($gtitle)
If @error Then
MsgBox(4096, "Error", "ไม่พบหน้าต่างเกม")
Else
Return 1
EndIf
EndFunc
func quit()
Exit
EndFunc
ขอบคุณล่วงหน้านะครับ
ป.ล ถ้าสคิปผม จัดเรียงไม่ดี หรือยังไง ช่วยเนอะนำหน่อยนะครับ
เเค่เวลาผมไช้นั้นเปิดขึ้นมามันจะไม่มีหน้าต่างโปรเเกรม มีนจะไปอยู่ ด้านขวาล่างของหน้าจอของผม
ผมเลยอยากไห้มีนมี หน้าต่างโปรเเกรมอ่ะครับ แบบว่าขอเเค่ กดตรงนี้ สต๊าท ตรงนี้ สต๊อป กดปุ่มนั้น ปุ่มนี้อ่ะครับ
ขอเริ่มแบบง่ายๆก่อน ขอท่านผู้รู้ช่วย เเนะเเนวทางการเริ่มเขี่ยนแบบ GUI หน่อยนะครับผมหาดูจากบรอดก้ไม่เจออ่ะครับ
ช่วยเเนะนำที ไม่ ก้ลอง เปลี่ยนสคิปของผม อ่ะไห้มันมีหน้าต่างหน่อยได้ไหมครับ ผมจะลองเทียบดูว่าตรงไหนเปลี่ยนยังไงบ้าง ผมลอสิ้นเดือนตังออกจะไปเดิน หาซื้อหนังสือมาอ่านอ่ะครับ ต้องลอ เดว ลูกเมียอด*-*
นี่สคิปครับ
Global $GameHD
HotkeySet("{F8}", "quit")
If _PSsixLoadH("ชื่อเกมผม") Then WinActivate($GameHD)
While 1
If PixelGetColor(602, 695) = 0x333124 Then
MouseClick("left", 602, 695, 1, 0)
EndIf
If PixelGetColor(807, 202) = 0xEAE8E8 Then
MouseClick("left", 498, 207, 1, 0)
EndIf
If PixelGetColor(631, 537) = 0x302D23 Then
MouseClick("left", 631, 537, 1, 0)
EndIf
Sleep(100)
WEnd
Func _PSsixLoadH($gtitle)
$GameHD = WinGetHandle($gtitle)
If @error Then
MsgBox(4096, "Error", "ไม่พบหน้าต่างเกม")
Else
Return 1
EndIf
EndFunc
func quit()
Exit
EndFunc
ขอบคุณล่วงหน้านะครับ
ป.ล ถ้าสคิปผม จัดเรียงไม่ดี หรือยังไง ช่วยเนอะนำหน่อยนะครับ