ฟอรั่ม 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

    ช่วยปรับ ให้มันเรียบร้อย ทีครับ

    avatar
    polamin_thrash
    PSsix Member
    PSsix Member


    ช่วยปรับ ให้มันเรียบร้อย ทีครับ Empty
    จำนวนข้อความ : 29
    ความนิยม : 0
    เข้าร่วมเมื่อ : 26/11/2010

    ช่วยปรับ ให้มันเรียบร้อย ทีครับ Empty ช่วยปรับ ให้มันเรียบร้อย ทีครับ

    ตั้งหัวข้อ by polamin_thrash 15/01/11, 11:53 pm

    มี 2 อันใช้ร่วมกัน เพื่อให้เกิด ความพึงพอใจในการใช้ งาน555

    HotKeySet("!e","et")

    Func et()
    ToolTip("E+T+R",1,1,"Skill")
    Send("e")
    WinWait("Untitled - Notepad")
    Send("t")
    WinWait("Untitled - Notepad")
    Send("r")
    tooltip("")
    EndFunc

    นี่คืออันแรกนะครับ



    #include <Misc.au3>

    $dll = DllOpen("user32.dll")

    While 1
    Sleep ( 1)
    If _IsPressed("09", $dll) Then
    Run("notepad.exe","","@sw_hide")
    Sleep(100)
    ProcessClose("notepad.exe")

    EndIf
    WEnd
    DllClose($dll)



    นี่คืออัน 2 นะครับ


    สรุปคือ ผมแยกมันออกมาเพราะ ทำให้มัน รอจนกดปุ่มtab แล้วให้ทำงานต่อครับ
    แต่ทำได้แค่นี้ 555
    aut
    aut
    PSsix Powerful Scripting Class
    PSsix Powerful Scripting Class


    PSsix Game Coder
    จำนวนข้อความ : 472
    ความนิยม : 126
    เข้าร่วมเมื่อ : 24/07/2010

    ช่วยปรับ ให้มันเรียบร้อย ทีครับ Empty Re: ช่วยปรับ ให้มันเรียบร้อย ทีครับ

    ตั้งหัวข้อ by aut 17/01/11, 06:25 pm

    เราว่านายทำงี้ ง่ายกว่า

    HotKeySet("{TAB}","Pause")
    Global $pssix


    While 1
    ; ใส่คำสั่งตงนี้
    ToolTip("E+T+R",1,1,"Skill")
    Send("e")
    WinWait("Untitled - Notepad")
    Send("t")
    WinWait("Untitled - Notepad")
    Send("r")
    tooltip("")
    WEnd


    Func Pause()
    $pssix = Not $pssix
    While $pssix
    Sleep(500)
    ToolTip('หยุดชั่วคราว', 0, 0)
    WEnd
    ToolTip("")
    EndFunc

    อ่านเพิ่ม [You must be registered and logged in to see this link.]

      เวลาขณะนี้ 26/04/24, 09:47 pm