1. Tải bản cài đặt AutoIT mới nhất

    Chào Khách. Nếu bạn mới tham gia và chưa cài đặt AutoIT.
    Vui lòng vào topic trên để tải bản AutoIT mới nhất nhé
    Dismiss Notice
  2. Quy định và nội quy

    Chào Khách. Vui lòng đọc kỹ nội quy và quy định của diễn đàn
    Để tránh bị ban một cách đáng tiếc nhé!
    Dismiss Notice
  3. Hướng dẫn chèn mã AutoIT trong diễn đàn

    Chào Khách. Vui lòng xem qua bài viết này
    Để biết cách chèn mã AutoIT trong diễn đàn bạn nhé :)
    Dismiss Notice

Hỏi đáp Áp dụng Start/Pause trong GUI vào auto game ?

Thảo luận trong 'Thảo luận chung - Hỏi đáp' bắt đầu bởi sangqc001, 1/1/19.

  1. sangqc001

    sangqc001 Thành viên mới
    • 3/6

    Tham gia ngày:
    30/4/17
    Bài viết:
    13
    Đã được thích:
    1
    Mã (AutoIt):
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
       $Form1=GUICreate("",355,211)
       $Group1=GUICtrlCreateGroup("",8,48,249,97)
       $BtnStart=GUICtrlCreateButton("Start",16,64,65,33)
       $LblFooter=GUICtrlCreateLabel("Thông tin chung",8,192,337,17)
       GUICtrlCreateGroup("",-99,-99,1,1)
       GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    Global $paused=False
    Global $i=0

    While 1
       Switch GUIGetMsg()
           Case $GUI_EVENT_CLOSE
               Exit
           Case $BtnStart
                BtnStart_Click()
       EndSwitch
    WEnd


    Func BtnStart_Click()
       GUICtrlSetData($BtnStart,"Pause")
       $paused=False
       While 1
           $i+=1
           ToolTip('Đang hoạt động, biến tăng: '&$i)
            iSleep(500)
       WEnd
    EndFunc


    Func BtnPause_Click()
       GUICtrlSetData($BtnStart,"Resume")
       $paused=True
       ToolTip('Đang tạm dừng')
       While 1
            iSleep(100)
       WEnd
       ToolTip('')
    EndFunc


    Func iSleep($iDelay)
       $iBegin=TimerInit()
       While TimerDiff($iBegin)<$iDelay
           Switch GUIGetMsg()
               Case $GUI_EVENT_CLOSE
                   Exit
               Case $BtnStart
                   If$pausedThen
                        BtnStart_Click()
                   Else
                        BtnPause_Click()
                   EndIf
           EndSwitch
       WEnd
    EndFunc
    bro nào hướng dẫn đoạn code này để áp dụng vào auto game được ko? tks all !
     

Chia sẻ trang này

Đang tải...