เขียนสคิป คลิกสุ่มๆ ยังไงครับ

คือผม เขียนบอทไว้แล้ว อยากให้มันเดินแบบสุ่มๆหา มอน (เกมส์ 2มิติ)

ทำยังไงครับ และมี แบบคลิกทีเดียวเปลี่ยนมอนได้ไหมครับ บอทมันคลิกเรื่อยๆ จนกว่าสีมอนจะหายถึงเปลี่ยนเป้าหมาย

(มอนยิง 1ทีตายอะครับ)

Code:

for $i= 1 to 10 ;คลิกสุ่ม 10 ครั้ง
MouseClick("",Random(0,1000,1),Random(0,1000,1))
Next

แล้วถ้าอยากให้ คลิกเฉพาะ พิกัดที่เราต้องการอะครับ

themeenmm พิมพ์ว่า:แล้วถ้าอยากให้ คลิกเฉพาะ พิกัดที่เราต้องการอะครับ

ประมาณนี้เปล่า...ครับ

Code:


#RequireAdmin

Dim $arrayxy[3][2]
$arrayxy[0][0] = 521 ;ของพิกัดแกน X
$arrayxy[0][1] = 612 ;ของพิกัดแกน Y

$arrayxy[1][0] = 115
$arrayxy[1][1] = 551

$arrayxy[2][0] = 682
$arrayxy[2][1] = 525

For $i = 0  to 10
   $randomindexX = Random(0,2,1)
MouseClick("",$arrayxy[$randomindexX][0],$arrayxy[$randomindexX][1])

Next



ขอบคุณครับ จะลองดู มันคอยคลิกนอกเกมส์ทุกที

ขอเป็น สุ่มในพิกัดสี่เหลี่ยม เหมือนที่ทำบอทให้คลิกมอนเฉพาะ ในพิกัดสี่หลี่ยมอะครับ

ถ้าคุณมัวแต่ขอให้คนเขียนสคริปต์ให้ตลอด เมื่อไหร่จะพัฒนาตัวเองละครับ

ความจริงสคริปต์อันแรก หากคุณอ่านคำอธิบายใน Help จะเข้าใจและประยุกต์ใช้ได้เองอยู่แล้ว
สมมุติคุณต้องการคลิกในบริเวณพิกัด 200x300 ในรัศมี 100 พิกเซล แก้ไขสคริปต์ก็เพียง

Code:



for $i= 1 to 10
MouseClick("",Random(200-50,200+50,1),Random(300-50,300+50,1))
Next



ถ้าจะเอาขอบเขตเป็นพิกัดสี่เหลี่ยม ต้องกำหนดก่อนว่าสี่เหลี่ยมนั้นใหญ่เท่าไหร่ จากนั้นค่อยสุ่มตัวเลขออกมา แล้วกรองตัวเลขให้อยู่ในกรอบสี่เหลี่ยมที่กำหนด (ผมไม่ทำให้นะครับ ตัวอย่างสคริปต์ด้านบนสามารถนำไปประยุกต์ได้อยู่แล้ว)

ผมลองปรับแต่ง สคริป ของคุณ POS หลายครั้งแล้วครับแต่มันผิดบ่อย ผมเลยตั้งกระทู้ขอสคิปใหม่ (เพระาอธิบายอาจจะไม่เข้าใจ) ยังไงก็ขอบคุณมากๆเลย ครับ บทความที่คุณPOS ทำไว้ ผมก็ลองทำลองปรับมาก็สำเร็จเป็นบางอย่าง ที่ผมมาตั้งกระทู้ถาม เพราะผมไม่รู็จะหาจากไหน

สิ่งสำคัญที่สุดในการเขียนสคริปต์ คือ ต้องมีประสบการณ์ รู้ว่าเขียนอย่างไรแล้วผิด รู้ว่าต้องแก้ไขอย่างไร ตัดแปะโค้ดหรือขอให้คนอื่นเขียนมันง่ายกว่าทำเอง แต่ถ้าวันหนึ่งคุณเขียนโค้ดที่คนไม่สนใจจะช่วยแก้ให้ หรือไม่มีใครมีความรู้เกี่ยวกับโค้ดที่คุณจะทำ แบบนี้จะไม่สามารถทำโปรแกรมให้สำเร็จลุล่วงได้เลย

จากที่อ่านเีราเข้าใจอีกแบบว่าใช้MouseMove randomมากกว่าโดย
Func moveหาตัวมอนเตอร์()
While 1
$x = Random(xxx, xxx, 1)
$y = Random(xxx, xxx, 1)
MouseMove($x, $y)
Sleep(300)
$var = 1
If $var = 1 Then
อันนี้ทำพิกัดหาสีก็ได้ถ้าใช้สีก็ทำงาน()
EndIf
WEnd
EndFunc

Func หาสี- -*()
While 1
Sleep(300)
PixelSearch(xxx, xxx, xxx, xx, สี) ;บอร์ดพี่ pos สอนไว้ไปลองอ่านดู
If Not @error Then ;<ถ้ามันหาสีถูกต้อง
MouseMove(xxx, xx);ไปที่พิกัด
แล้วใส่ของพี่ posต่อMouseClick("",Random(xxx,xxx),Random(xxx,xxx))

EndIf ;จบif
If PixelGetColor(xx, xxx) = สีที่ไม่ถูกต้องแล้ว Then
กลับไปmoveหาตัวมอนเตอร์()
EndIf
WEnd
EndFunc
พวกxxxคือทำเหมือนflapjackกล่าวไว้ดีที่สุดเพราะมันแก้ได้ง่ายดึงสติงไปไว้ในอาย์เรย์เจ๋งเลย-0-ไม่เข้าใจอาร์เรย์พี่ pos ก็ทำไว้แล้ว-0-
โทษทีหาบอร์ดที่พี่Autกับพี่posทำไว้ไม่เจอที่มันหาพื้นที่วงกลมอะมันช่วยได้เยอะเรื่องคอสแทนไรซะอย่าง-*-ลองเปิดๆหาดูแล้วกัน-*-