ฟอรั่ม PSsix

Would you like to react to this message? Create an account in a few clicks or log in to continue.

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


2 posters

    บอท Auto Keyboard

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


    บอท Auto Keyboard Empty บอท Auto Keyboard Empty
    จำนวนข้อความ : 1
    ความนิยม : 0
    เข้าร่วมเมื่อ : 28/05/2012

    บอท Auto Keyboard Empty บอท Auto Keyboard

    ตั้งหัวข้อ by max16072 28/05/12, 09:28 pm

    ตอนนี้ผมกำลังฝึกเขียนอยู่ครับ โดยกด Keyboard ตามปุ่มและเวลาที่กำหนด

    แต่เหมือนมันจะรอคิว ตาม Loop while ครับ จะแก้ไงให้มันไม่ต้องสนใจ พอตัวไหนครบเวลาแล้วกดเองไม่ต้องรอตัวอื่นครับ

    Global $GameHD ;

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

    If _PSsixLoadH("Crystal Saga - Mozilla Firefox") Then WinActivate($GameHD);

    While 999999999999999999999999999999999999;
    ControlSend($GameHD, "", "", "`") ; ;
    Sleep(4000);
    WEnd ;
    While 999999999999999999999999999999999999;
    ControlSend($GameHD, "", "", "2") ; ;
    Sleep(180000);
    WEnd ;
    While 999999999999999999999999999999999999;
    ControlSend($GameHD, "", "", "ww") ; ;
    Sleep(8000);
    WEnd ;
    While 999999999999999999999999999999999999;
    ControlSend($GameHD, "", "", "ee") ; ;
    Sleep(6500);
    WEnd ;
    While 999999999999999999999999999999999999;
    ControlSend($GameHD, "", "", "q") ; ;
    Sleep(1000);
    WEnd ;
    While 999999999999999999999999999999999999;
    ControlSend($GameHD, "", "", "r") ; ;
    Sleep(180000);
    WEnd ;

    While 999999999999999999999999999999999999;
    ControlSend($GameHD, "", "", " ") ; ;
    Sleep(2000);
    WEnd ;

    While 999999999999999999999999999999999999;
    ControlSend($GameHD, "", "", "44") ; ;
    Sleep(20000);
    WEnd ;

    อันนี้ Code ผมผิดพลาดประการใดต้องขอโทษด้วยครับกำลังหัดเขียนเอง



    ปล. ใครมี Code bot : Crystal Saga ขอผมบ้างนะครับ
    POS
    POS
    PSsix
    PSsix


    บอท Auto Keyboard Empty บอท Auto Keyboard Empty บอท Auto Keyboard Empty
    จำนวนข้อความ : 1152
    ความนิยม : 326
    เข้าร่วมเมื่อ : 19/07/2010

    บอท Auto Keyboard Empty Re: บอท Auto Keyboard

    ตั้งหัวข้อ by POS 28/05/12, 10:15 pm


    ตัวอย่างตามลิงก์นี้ครับ

    [You must be registered and logged in to see this link.]


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

      เวลาขณะนี้ 29/03/24, 01:14 am