#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.14.2
 Author:         DarkwarlorD

 Script Function:
	Example DBUG script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

#include <_DBUG.au3> ;CONSOLE DBUG

HotKeySet("{ESC}", "Close")

Main()

Func Main()
    ProgressOn("DBUG Test", "Testing the AutoIt DBUG", "Counting")
	Local $progr_cons
	Local $progr_cons_clr
	For $i = 0 To 23
		$progr_cons_clr&=ChrW(8)
	Next
	Local $progr_cons_trail="::::::::::"
        For $i = 0 To 10
            $prog = $i * 10
            $last = 10 - $i
            ProgressSet($prog, $last & " to 10")
			ConsoleWrite($progr_cons_clr&"["&$progr_cons&$progr_cons_trail&"] "&$last& " to 10   ")
			$progr_cons &= ">"
			$progr_cons_clr &= ChrW(8)
			$progr_cons_trail = StringTrimLeft($progr_cons_trail,1)
            Sleep(500)
        Next
    #Region STOP DBUG
        ProgressSet(100, "DONE", "Test Finished")
		ConsoleWrite($progr_cons_clr&"["&StringTrimLeft($progr_cons,1)&"] DONE    "&@CRLF&"Test Finished")
        Sleep(200)
        ProgressOff()
    #Region START DBUG
EndFunc

Func Close()
    Exit 0
EndFunc   ;==>Close