෴χїη ¢ɦàσ ¢á¢ bạη෴

code1

$pause = 0
HotKeySet("{F7}", "ActivePauseAuto")
Func activepauseauto()
$pause = NOT $pause
ToolTip("F7 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("{f4}", "On_Tool")
Func On_Tool()
Exit
EndFunc










code2
#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", 323, 183, 192, 164)
$Label1 = GUICtrlCreateLabel("CODE SPAM", 85, 17, 274, 29)
GUICtrlSetFont(-1, 16, 800, 0, "Verdana")
GUICtrlSetColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("By Cường", 96, 48, 115, 29)
GUICtrlSetFont(-1, 16, 800, 0, "Verdana")
GUICtrlSetColor(-1, 0x00FFFF)
$Label3 = GUICtrlCreateLabel("F3 Để Spam", 80, 96, 144, 29)
GUICtrlSetFont(-1, 16, 800, 0, "Verdana")
GUICtrlSetColor(-1, 0x00FF00)
$Label4 = GUICtrlCreateLabel("F4 Để Tắt Tool Dừng Spam", 8, 136, 314, 29)
GUICtrlSetFont(-1, 16, 800, 0, "Verdana")
GUICtrlSetColor(-1, 0xFF00FF)
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