Source *From 1 to 999999 demo (sản phẩm nhờ vả)

Xin các mod thấu hiểu cho em vì máy của một đồng dâm không thể truy cập Pastebin nên mới phải up lên đây

Mã (AutoIt):

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Opt("GUIOnEventMode", 1)

Global $Form1 = GUICreate("From 1 to 999999", 323, 288, 214, 125)
GUISetFont(15, 400, 0, "Arial")
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
Global $Button1 = GUICtrlCreateButton("Send", 96, 168, 131, 65)
GUICtrlSetOnEvent(-1, "Button1Click")
Global $Label1 = GUICtrlCreateLabel("Number: ", 64, 56, 84, 27)
Global $Number = GUICtrlCreateLabel("0", 160, 56, 70, 27)
GUICtrlSetColor(-1, 0x648BCB)
Global $StatusBar1 = _GUICtrlStatusBar_Create($Form1)
_GUICtrlStatusBar_SetText($StatusBar1, "A demo made by MrTheDzam - TCTTeaM®")
GUISetState(@SW_SHOW)


While 1
    Sleep(69)
    Global $GlobalNumber = GUICtrlRead($Number)
WEnd

Func Button1Click()
    $NewNumber = $GlobalNumber + 1
    If $NewNumber <= 999999 then
        GUICtrlSetData($Number, $NewNumber)
    Else
        MsgBox(16 + 262144, "Message", "Max value!")
        Return False
    EndIf
EndFunc

Func Form1Close()
    Exit
EndFunc
 

To đồng dâm thân thương: chúc thým may mắn

 

Cảm ơn bạn nhiều lắm