ผมบอกก่อนว่าผมมือใหม่มากครับ ทำบอทของเกม 5eal (เลข5เปนตัวS)
โดยใช้ปุ่ม Tab เลือกมอนแล้วกด F1 เข้าไปใส่สกิล
ในแมพที่ไปตีเป็นเวลสูง มอนพวกนั้นจะวิ่งเข้ามาตีคนทำให้ผมโดนรุม
แต่เหตุผลหลักมันไม่ใช่อันนั้นเหตุผลหลักคือมันโดน2ตัวรุมไม่เปนไรแต่พอมันตีตัวที่รุม
ตายไป1ตัวแล้ว แทนที่มันจะตีตัวที่รุมอีกตัวให้ตายมันกลับเดินไปตีมอนตัวอื่นอีก
ทำให้มอนตัวเก่าเดินตามมาโดนรุมกลายเป็น3ตัวตายหยังเขียดเลยครับ TT
สคริปผมเป็นตามข้างล่างครับ พึ่งหัดทำ อันไหนผิดยังไงแก้ให้ด้วยนะครับ
ขอบคุณล่วงหน้าครับ
Global $GameHD
Func _PSsixLoadH($gtitle)
$GameHD = WinGetHandle($gtitle)
If @error Then
MsgBox(4096, "Error", "ไม่พบหน้าต่างเกม")
Else
Return 1
EndIf
EndFunc
If _PSsixLoadH("SO3D") Then WinActivate($GameHD)
While Sleep(1000)
A1();Attack Monster
A2();CheckHP
A3();CheckMP
A4();PickItem
WEnd
Func A1()
Send("{TAB}")
Sleep(1000)
send("{F1}")
sleep(8000)
A2()
A3()
Sleep(2000)
Send("{F1}")
A2()
A3()
Sleep(2000)
Send("{F1}")
A2()
A3()
Sleep(2000)
Send("{F1}")
A2()
A3()
EndFunc
Func A2()
If PixelGetColor(191, 61) = 0x636673 Then
Send("{F2}")
EndIf
Sleep(100)
EndFunc
Func A3()
If PixelGetColor(364, 61) = 0x636673 Then
Send("{F3}")
EndIf
Sleep(100)
EndFunc
Func A4()
send("{space}")
EndFunc
โดยใช้ปุ่ม Tab เลือกมอนแล้วกด F1 เข้าไปใส่สกิล
ในแมพที่ไปตีเป็นเวลสูง มอนพวกนั้นจะวิ่งเข้ามาตีคนทำให้ผมโดนรุม
แต่เหตุผลหลักมันไม่ใช่อันนั้นเหตุผลหลักคือมันโดน2ตัวรุมไม่เปนไรแต่พอมันตีตัวที่รุม
ตายไป1ตัวแล้ว แทนที่มันจะตีตัวที่รุมอีกตัวให้ตายมันกลับเดินไปตีมอนตัวอื่นอีก
ทำให้มอนตัวเก่าเดินตามมาโดนรุมกลายเป็น3ตัวตายหยังเขียดเลยครับ TT
สคริปผมเป็นตามข้างล่างครับ พึ่งหัดทำ อันไหนผิดยังไงแก้ให้ด้วยนะครับ
ขอบคุณล่วงหน้าครับ
Global $GameHD
Func _PSsixLoadH($gtitle)
$GameHD = WinGetHandle($gtitle)
If @error Then
MsgBox(4096, "Error", "ไม่พบหน้าต่างเกม")
Else
Return 1
EndIf
EndFunc
If _PSsixLoadH("SO3D") Then WinActivate($GameHD)
While Sleep(1000)
A1();Attack Monster
A2();CheckHP
A3();CheckMP
A4();PickItem
WEnd
Func A1()
Send("{TAB}")
Sleep(1000)
send("{F1}")
sleep(8000)
A2()
A3()
Sleep(2000)
Send("{F1}")
A2()
A3()
Sleep(2000)
Send("{F1}")
A2()
A3()
Sleep(2000)
Send("{F1}")
A2()
A3()
EndFunc
Func A2()
If PixelGetColor(191, 61) = 0x636673 Then
Send("{F2}")
EndIf
Sleep(100)
EndFunc
Func A3()
If PixelGetColor(364, 61) = 0x636673 Then
Send("{F3}")
EndIf
Sleep(100)
EndFunc
Func A4()
send("{space}")
EndFunc