ผม อยากได้ Code AutoIt ประมานนี้ครับ เพื่อเป็นแนวทางการเขียนโปรแกรม ครับ
1.เมื่อกดใช่โปรแกรม ถามหารหัสผ่านก่อนทุกครั้ง
3.เขียนให้ รหัส ผ่าน หมด อายุตามกำหนด หรือทุกเดือน ทุกปี
3.อยาก เขียนให้ ดึงลิงค์เว็บไซต์ ที่อยู่ใน Text หรือไฟร์อื่น ขึนมาเปิด ที่ระ1 เว็บ
แล้ว เปิดใหม่ อีก 1 เว็บ ให้เปิดทับน่า เว็บเดิมเดิม ไปเลื่อยๆครับ
4.สร้างฟรอม เพื่อ ใส่โคด เวลา สี หรือโคด รหัส น่า จอ คลิกเม้า และอื่นๆ ขึนมา
5.สร้างฟรอมใสข้อความ เพิมเติม เพือ โพสลง น่าเว็บ คลาย กับ กด Ctrl+v
ผมได้เขียนโคด ขึนมา ปะมาน 3 วัน เพื่อทดลองใช้ดูบ้างแล้ว แต่เขียนจาก แนว ทางการ ทำ ฺBot
ผมก็เลยอยากได้แนวทาง ในการเขียนตามหัวข้อ ด้านบน เพิมเติมครับ ช่วยผมหน่อยนะครับ
ถ้าได้เป็น Code เลยจะขอบคุณ มากเลยครับ ขอบคุณรวง หน้าครับ ทุกๆท่าน
พี่ดู Code นี้แล้วพี่คง มองภาพกันออกนะครับ ว่ามัน เป็นยังไง
****************************************************
*******************************************************
1.เมื่อกดใช่โปรแกรม ถามหารหัสผ่านก่อนทุกครั้ง
3.เขียนให้ รหัส ผ่าน หมด อายุตามกำหนด หรือทุกเดือน ทุกปี
3.อยาก เขียนให้ ดึงลิงค์เว็บไซต์ ที่อยู่ใน Text หรือไฟร์อื่น ขึนมาเปิด ที่ระ1 เว็บ
แล้ว เปิดใหม่ อีก 1 เว็บ ให้เปิดทับน่า เว็บเดิมเดิม ไปเลื่อยๆครับ
4.สร้างฟรอม เพื่อ ใส่โคด เวลา สี หรือโคด รหัส น่า จอ คลิกเม้า และอื่นๆ ขึนมา
5.สร้างฟรอมใสข้อความ เพิมเติม เพือ โพสลง น่าเว็บ คลาย กับ กด Ctrl+v
ผมได้เขียนโคด ขึนมา ปะมาน 3 วัน เพื่อทดลองใช้ดูบ้างแล้ว แต่เขียนจาก แนว ทางการ ทำ ฺBot
ผมก็เลยอยากได้แนวทาง ในการเขียนตามหัวข้อ ด้านบน เพิมเติมครับ ช่วยผมหน่อยนะครับ
ถ้าได้เป็น Code เลยจะขอบคุณ มากเลยครับ ขอบคุณรวง หน้าครับ ทุกๆท่าน
พี่ดู Code นี้แล้วพี่คง มองภาพกันออกนะครับ ว่ามัน เป็นยังไง
****************************************************
- Code:
Global $GameHD
HotKeySet("{ESC}", "Terminate")
Func _PSsixLoadH($gtitle)
$GameHD = WinGetHandle($gtitle)
If @error Then
MsgBox(4096, "Error", "NOTAB")
Else
Return 1
EndIf
EndFunc
Opt("MouseCoordMode", 2)
Opt("PixelCoordMode", 2)
Opt("CaretCoordMode", 2)
If WinExists("System Configuration") Then WinActivate("System Configuration")
ShellExecute("C:\Program Files\Google\Chrome\Application\Chrome.exe", "http://www.google.co.th")
Sleep(4000)
Send("{altdown}")
Send("{d}")
Send("{altup}")
Sleep(3000)
ControlSend($GameHD, "", "", " https://www.facebook.com/groups/342552659120185")
Sleep(4000)
Send ("{ENTER}")
Sleep(9000)
MouseClick("left",340,315,1,10)
Sleep(5000)
Send("{ctrldown}")
send("{v}")
Send("{ctrlup}")
Sleep(9000)
$coord = PixelSearch( 199,303, 714,606, 0x5D76AA )
If Not @error Then
MouseClick("left",$coord[0] ,$coord[1],1,0)
EndIf
Sleep(4000)
Send("{altdown}")
Send("{d}")
Send("{altup}")
Sleep(3000)
ControlSend($GameHD, "", "", " https://www.facebook.com/groups/225279930912258")
Sleep(4000)
Send ("{ENTER}")
Sleep(9000)
MouseClick("left",350,465,1,10)
Sleep(5000)
Send("{ctrldown}")
send("{v}")
Send("{ctrlup}")
Sleep(9000)
$coord = PixelSearch( 199,303, 714,606, 0x5D76AA )
If Not @error Then
MouseClick("left",$coord[0] ,$coord[1],1,0)
EndIf
Sleep(9000)
Func Terminate()
Exit 0
EndFunc
*******************************************************
แก้ไขล่าสุดโดย eroieroieroi เมื่อ 06/08/13, 04:49 pm, ทั้งหมด 2 ครั้ง