Thời Gian

Đang tải...








































  • $pause = 0
    HotKeySet("{f4}", "ActivePauseAuto")
    Func activepauseauto()
    $pause = NOT $pause
    ToolTip("F4 Dừng", 0, 0)
    While $pause
    ToolTip("", 0, 0)
    WEnd
    EndFunc






    HotKeySet("{f3}", "On_Exit")
    Func On_Exit()
    While 1
    Sleep(10)
       Send("Mình Thích Thì Mình Spam Thôi HêHê :)) =))))")
       Sleep(10)
       Send("{enter}")
    WEnd
    EndFunc
    HotKeySet("{f2}", "On_Tool")
    Func On_Tool()
    Exit
    EndFunc












    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Kích Hoạt", 360, 72, 192, 164)
    $Input1 = GUICtrlCreateInput("", 80, 32, 169, 21)
    $Label1 = GUICtrlCreateLabel("Key", 32, 32, 37, 22)
    GUICtrlSetFont(-1, 12, 800, 0, "Verdana")
    GUICtrlSetColor(-1, 0xFF0000)
    $Button1 = GUICtrlCreateButton("Kích Hoạt", 256, 32, 75, 25)
    GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
    $Label2 = GUICtrlCreateLabel("Vui Lòng Kích Hoạt Key Để Khởi Động Tool", 32, 8, 298, 20)
    GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xFF00FF)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
            Case $Button1
       If GUICtrlRead($Input1)='KT01-OPE1-3DFE5-TOKEY' Then
                    MsgBox(0,"Thông Báo","Kích Hoạt Thành Công")
    GUIDelete($Form1)
                ProgressOn("Ðang Khởi Ðộng Tool Vui Lòng Chờ", "Ðang Khởi Ðộng", "0%"); Just to let more beautiful
                For $i = 1 To 100 Step 1
                Sleep(20)
    ProgressSet($i, $i & "%")
                Next
                ProgressSet(100, "Oke Xong", "Thành Công")
                Sleep(500)
                ProgressOff()
                MsgBox(0,'Thông Báo',"Chạy Tool Thành Công")
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Tool Spam", 442, 246, 192, 164)
    $Label1 = GUICtrlCreateLabel("Tool Spam By Cường", 96, 16, 244, 29)
    GUICtrlSetFont(-1, 16, 800, 0, "Verdana")
    GUICtrlSetColor(-1, 0xFF00FF)
    $Label2 = GUICtrlCreateLabel("F2 Để Thoát Tool ", 112, 56, 208, 29)
    GUICtrlSetFont(-1, 16, 800, 0, "Verdana")
    GUICtrlSetColor(-1, 0xFF0000)
    $Label3 = GUICtrlCreateLabel("F3 Để Khởi Động Tool", 88, 96, 254, 29)
    GUICtrlSetFont(-1, 16, 800, 0, "Verdana")
    GUICtrlSetColor(-1, 0x00FF00)
    $Label4 = GUICtrlCreateLabel("F4 Để Đừng Tool", 112, 136, 196, 29)
    GUICtrlSetFont(-1, 16, 800, 0, "Verdana")
    GUICtrlSetColor(-1, 0x00FFFF)
    $Label5 = GUICtrlCreateLabel("F4 Lần Nữa Để Tiếp Tục Chạy Tool", 24, 168, 400, 29)
    GUICtrlSetFont(-1, 16, 800, 0, "Verdana")
    GUICtrlSetColor(-1, 0x0000FF)
    $Label6 = GUICtrlCreateLabel("Chúc Dùng Tool Vui Vẻ Hehe", 48, 208, 346, 29)
    GUICtrlSetFont(-1, 16, 800, 0, "Verdana")
    GUICtrlSetColor(-1, 0x808000)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    EndSwitch
    WEnd

               Else
        MsgBox(0,'Thông Báo',"Sai Key Hoặc Key Chưa Kích Hoạt Vui Lòng Thử Lại")
           EndIf

           EndSwitch
    WEnd











  • Copyright © - ෴χїη ¢ɦàσ ¢á¢ bạη෴

    ෴χїη ¢ɦàσ ¢á¢ bạη෴ - Powered by Blogger - Designed by Johanes Djogan