_ProgressGUI.au3 1.0.0

   (0 reviews)

BrewManNH

About This File

I have created a UDF that will allow you to easily create a customizable GUI with either a standard progress bar or a marquee style progress bar. You can change the size and back ground color of the GUI, as well as the font, font size, and color of the text. The function doesn't require any parameters to operate, but the default text is very generic so you probably would want to set that at the very least.


What's New in Version 1.0.0

Released


1 person likes this


User Feedback

You may only provide a review once you have downloaded the file.

There are no reviews to display.

  • Similar Content

    • Skeletor
      By Skeletor
      MS Splash Screens
      The office 2016/17 office suite has made many people turn heads with its functions and especially their splash screen.
      I now present to you, the MS Style Splash Screen. For Rookies, Novices and anyone who wants a ready made splash screen for your gui application.

      You can now download it and also try it out yourself.
      You have three colors to choose from:
      Blue
      Red
      Green
      All three colours are from the famous programs.
      I also included the KODA form to you can have freedom with this splash screen.
      Note: the KODA form does not have the three colours as well as the correct blue. 

      Have fun and enjoy.
      Note:
      I will update the splash to add the automated 3 dots animation at a later stage. 
       
       
    • Skeletor
      By Skeletor
      A gui splash screen. Themed after the famous MS Office Suite.
      Three colours to choose from, Red, Blue and Green.
      You can change the labels to your own application.

      Also bundled with this is the KODA form. So you can open up and see the basic structure of this splash screen.
       
      Splash Screen GUI.zip
    • Skeletor
      By Skeletor
      Hi All,
      I know many newbies search for this feature.
      I decided to share this piece of code with everyone.
      Basically its a "splash screen" that has a transparent image.
      In a nutshell - Gui with a transparent gif.
      Enjoy...
      Download attachment....
       
      Splash Screen GUI.zip
    • CT83
      By CT83
      I am currently working on a script which contains a cpu intensive GUI with too many tabs, and groups and so i would like to add something like a progress bar or a watermark which would load before the GUI  and provide user with the information that the gui is loading and that he needs to wait. I tried adding Progress() function before the GUI Region but that failed to provide any significant improvement in my condition as the progressbar too takes more or less the same time to load.  
      This is my GUI code 
      #Region ### START Koda GUI section ### Form=\\desktop-dvg37gp\primary\sync\megasync\languages\autoit\programs\30second\final - copy\form\form1.kxf $MainMenu = GUICreate("Video Viewing Automator", 496, 592, -1, -1) GUISetIcon("", -1) $LogTab = GUICtrlCreateTab(0, 0, 489, 537, $WS_BORDER, BitOR($TCS_EX_FLATSEPARATORS,$WS_EX_STATICEDGE)) GUICtrlSetFont(-1, 10, 800, 0, "Default") $TabSheet1 = GUICtrlCreateTabItem("Log") $Log = GUICtrlCreateEdit("", 8, 26, 473, 465, BitOR($ES_AUTOVSCROLL,$ES_READONLY,$ES_WANTRETURN,$WS_HSCROLL,$WS_VSCROLL)) GUICtrlSetData(-1, "") GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Open_Log = GUICtrlCreateButton("Open Current Log in NotePad", 69, 501, 153, 25) $Open_LogF = GUICtrlCreateButton("Open Log Folder", 272, 501, 153, 25) $Options = GUICtrlCreateTabItem("Options") $Group1 = GUICtrlCreateGroup("LogIn", 284, 371, 110, 57, BitOR($GUI_SS_DEFAULT_GROUP,$BS_LEFT,$BS_FLAT)) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $LoginID = GUICtrlCreateInput("", 348, 379, 41, 21, BitOR($GUI_SS_DEFAULT_INPUT,$WS_BORDER)) GUICtrlSetCursor (-1, 0) $Password = GUICtrlCreateInput("", 348, 403, 41, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD,$WS_BORDER)) GUICtrlSetCursor (-1, 0) $LogID = GUICtrlCreateLabel("LogInID", 288, 384, 49, 17) $Pass = GUICtrlCreateLabel("Password", 288, 408, 58, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlSetCursor (-1, 0) $Group2 = GUICtrlCreateGroup("Push Updates", 4, 371, 150, 137, BitOR($GUI_SS_DEFAULT_GROUP,$BS_LEFT,$BS_FLAT)) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Psh_Tk1 = GUICtrlCreateInput("", 85, 403, 65, 21, BitOR($GUI_SS_DEFAULT_INPUT,$WS_BORDER)) GUICtrlSetCursor (-1, 0) $Label6 = GUICtrlCreateLabel("Token", 8, 408, 40, 17) $Psh_Chk = GUICtrlCreateCheckbox("Enable", 8, 485, 65, 17) GUICtrlSetCursor (-1, 0) $Label18 = GUICtrlCreateLabel("Send After Cycles", 8, 387, 105, 17) $Psh_AftCyc = GUICtrlCreateInput("", 116, 383, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetCursor (-1, 0) $Label45 = GUICtrlCreateLabel("Token", 8, 425, 40, 17) $Psh_Tk2 = GUICtrlCreateInput("", 85, 422, 65, 21, BitOR($GUI_SS_DEFAULT_INPUT,$WS_BORDER)) GUICtrlSetCursor (-1, 0) $Psh_Tk3 = GUICtrlCreateInput("", 85, 441, 65, 21, BitOR($GUI_SS_DEFAULT_INPUT,$WS_BORDER)) GUICtrlSetCursor (-1, 0) $Psh_Tk4 = GUICtrlCreateInput("", 85, 459, 65, 21, BitOR($GUI_SS_DEFAULT_INPUT,$WS_BORDER)) GUICtrlSetCursor (-1, 0) $Label46 = GUICtrlCreateLabel("Token", 8, 442, 40, 17) $Label47 = GUICtrlCreateLabel("Token", 7, 459, 40, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlSetCursor (-1, 0) $AutoStart = GUICtrlCreateGroup("Misc.", 157, 371, 126, 137) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Label22 = GUICtrlCreateLabel("", 167, 391, 4, 4) $autostartcheck = GUICtrlCreateCheckbox("Enable AutoStart ", 162, 386, 113, 17) GUICtrlSetCursor (-1, 0) $Label28 = GUICtrlCreateLabel("CIAP Limit", 197, 408, 62, 17) $CIAP = GUICtrlCreateInput("", 162, 406, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetCursor (-1, 0) $Label23 = GUICtrlCreateLabel("CustomerID", 197, 430, 69, 17) $NickName_Edit = GUICtrlCreateInput("", 162, 428, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetCursor (-1, 0) $Label8 = GUICtrlCreateLabel(" Zero Limit", 197, 450, 64, 17) $Z_Lim = GUICtrlCreateInput("", 162, 449, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetCursor (-1, 0) $Label14 = GUICtrlCreateLabel("Load Limit", 197, 479, 62, 17) $L_Lim = GUICtrlCreateInput("", 162, 473, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group13 = GUICtrlCreateGroup("", 5, 26, 390, 345, BitOR($GUI_SS_DEFAULT_GROUP,$BS_LEFT,$BS_FLAT)) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Group3 = GUICtrlCreateGroup("Setting Scheme 1", 13, 34, 121, 313) $S1_Chk = GUICtrlCreateCheckbox("Enable", 18, 321, 65, 17) GUICtrlSetCursor (-1, 0) $Group7 = GUICtrlCreateGroup("Hustle", 21, 128, 105, 105) $S1_HusChk = GUICtrlCreateCheckbox("Enable", 28, 212, 65, 17) GUICtrlSetCursor (-1, 0) $Label30 = GUICtrlCreateLabel("Limit", 31, 144, 30, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S1_HusLim = GUICtrlCreateInput("000", 73, 142, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label31 = GUICtrlCreateLabel("Before", 31, 169, 41, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S1_HusBef = GUICtrlCreateInput("000", 73, 166, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label59 = GUICtrlCreateLabel("Thres.", 31, 193, 40, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S1_HusThres = GUICtrlCreateInput("000", 73, 188, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group8 = GUICtrlCreateGroup("Target", 21, 47, 105, 81) $Label19 = GUICtrlCreateLabel("Today", 30, 62, 39, 17) $S1_TarToday = GUICtrlCreateInput("000", 80, 60, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label20 = GUICtrlCreateLabel("In Hours", 30, 87, 52, 17) GUICtrlSetFont(-1, 1, 800, 0, "MS Sans Serif") $S1_TarHours = GUICtrlCreateInput("000", 81, 82, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $S1_TarChk = GUICtrlCreateCheckbox("Enable", 27, 107, 65, 17) GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group9 = GUICtrlCreateGroup("Randomization", 21, 234, 105, 81) $Label24 = GUICtrlCreateLabel("Target", 27, 252, 41, 17) $S1_RandTar = GUICtrlCreateInput("000", 79, 249, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label29 = GUICtrlCreateLabel("Hustle", 27, 277, 40, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S1_RandHus = GUICtrlCreateInput("000", 79, 272, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $S1_RandChk = GUICtrlCreateCheckbox("Enable", 25, 294, 65, 17) GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group15 = GUICtrlCreateGroup("Setting Scheme 1", 138, 40, 121, 305) $S2_Chk = GUICtrlCreateCheckbox("Enable", 143, 327, 65, 17) GUICtrlSetCursor (-1, 0) $Group16 = GUICtrlCreateGroup("Hustle", 146, 134, 105, 105) $S2_HusChk = GUICtrlCreateCheckbox("Enable", 153, 218, 65, 17) GUICtrlSetCursor (-1, 0) $Label33 = GUICtrlCreateLabel("Limit", 156, 150, 30, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S2_HusLim = GUICtrlCreateInput("000", 198, 148, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label34 = GUICtrlCreateLabel("Before", 156, 175, 41, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S2_HusBef = GUICtrlCreateInput("000", 198, 172, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label60 = GUICtrlCreateLabel("Thres.", 156, 199, 40, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S2_HusThres = GUICtrlCreateInput("000", 198, 194, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group17 = GUICtrlCreateGroup("Target", 146, 53, 105, 81) $Label35 = GUICtrlCreateLabel("Today", 155, 68, 39, 17) $S2_TarToday = GUICtrlCreateInput("000", 205, 66, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label36 = GUICtrlCreateLabel("In Hours", 155, 93, 52, 17) GUICtrlSetFont(-1, 1, 800, 0, "MS Sans Serif") $S2_TarHours = GUICtrlCreateInput("000", 206, 88, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $S2_TarChk = GUICtrlCreateCheckbox("Enable", 152, 113, 65, 17) GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group18 = GUICtrlCreateGroup("Randomization", 146, 240, 105, 81) $Label37 = GUICtrlCreateLabel("Target", 152, 258, 41, 17) $S2_RandTar = GUICtrlCreateInput("000", 204, 255, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label38 = GUICtrlCreateLabel("Hustle", 152, 283, 40, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S2_RandHus = GUICtrlCreateInput("000", 204, 278, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $S2_RandChk = GUICtrlCreateCheckbox("Enable", 150, 300, 65, 17) GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group19 = GUICtrlCreateGroup("Setting Scheme 1", 264, 40, 121, 305) $Group20 = GUICtrlCreateGroup("Hustle", 272, 134, 105, 105) $S3_HusChk = GUICtrlCreateCheckbox("Enable", 279, 218, 65, 17) GUICtrlSetCursor (-1, 0) $Label39 = GUICtrlCreateLabel("Limit", 282, 150, 30, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S3_HusLim = GUICtrlCreateInput("000", 324, 148, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label40 = GUICtrlCreateLabel("Before", 282, 175, 41, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S3_HusBef = GUICtrlCreateInput("000", 324, 172, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label61 = GUICtrlCreateLabel("Thres.", 282, 199, 40, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S3_HusThres = GUICtrlCreateInput("000", 324, 194, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group21 = GUICtrlCreateGroup("Target", 272, 53, 105, 81) $Label41 = GUICtrlCreateLabel("Today", 281, 68, 39, 17) $S3_TarToday = GUICtrlCreateInput("000", 331, 66, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label42 = GUICtrlCreateLabel("In Hours", 281, 93, 52, 17) GUICtrlSetFont(-1, 1, 800, 0, "MS Sans Serif") $S3_TarHours = GUICtrlCreateInput("000", 332, 88, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $S3_TarChk = GUICtrlCreateCheckbox("Enable", 278, 113, 65, 17) GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group22 = GUICtrlCreateGroup("Randomization", 272, 240, 105, 81) $Label43 = GUICtrlCreateLabel("Target", 278, 258, 41, 17) $S3_RandTar = GUICtrlCreateInput("000", 330, 255, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label44 = GUICtrlCreateLabel("Hustle", 278, 283, 40, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $S3_RandHus = GUICtrlCreateInput("000", 330, 278, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $S3_RandChk = GUICtrlCreateCheckbox("Enable", 276, 300, 65, 17) GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $S3_Chk = GUICtrlCreateCheckbox("Enable", 269, 327, 65, 17) GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $Chk_SRand = GUICtrlCreateCheckbox("Enable Scheme Randomization", 14, 351, 193, 17) GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlSetCursor (-1, 0) $Group23 = GUICtrlCreateGroup("Screenshots", 397, 31, 81, 108) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $ScrSht_FChk = GUICtrlCreateCheckbox("Fail", 402, 51, 41, 17) GUICtrlSetCursor (-1, 0) $ScrSht_SChk = GUICtrlCreateCheckbox("Success", 402, 74, 65, 17) GUICtrlSetCursor (-1, 0) $ScrSht_OpnFld = GUICtrlCreateButton("Open Folder", 401, 95, 73, 17) $ScrSht_DelAll = GUICtrlCreateButton("Delete All", 401, 115, 73, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group24 = GUICtrlCreateGroup("Log", 397, 140, 81, 65) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Log_OpnFld = GUICtrlCreateButton("Open Folder", 401, 154, 73, 17) $Log_DelAll = GUICtrlCreateButton("Delete All", 401, 180, 73, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group25 = GUICtrlCreateGroup("Coordinates", 397, 206, 81, 65) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Label48 = GUICtrlCreateLabel("X +/-", 407, 228, 33, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $Label49 = GUICtrlCreateLabel("Y +/-", 407, 249, 33, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $Coord_x = GUICtrlCreateInput("00", 444, 221, 25, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Coord_y = GUICtrlCreateInput("00", 443, 242, 25, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $Save_All = GUICtrlCreateButton("Save All", 203, 509, 83, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Group36 = GUICtrlCreateGroup("Calibration", 397, 273, 81, 97) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Button5 = GUICtrlCreateButton("Delete All", 401, 333, 73, 17) $Button6 = GUICtrlCreateButton("Calibrate", 401, 302, 73, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group37 = GUICtrlCreateGroup("Initial Setup", 395, 371, 81, 57) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Button8 = GUICtrlCreateButton("Start", 399, 400, 73, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group38 = GUICtrlCreateGroup("Settings Profile", 285, 428, 193, 41) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Button7 = GUICtrlCreateButton("Save Current", 292, 446, 81, 17) $Button9 = GUICtrlCreateButton("Load New ", 387, 446, 81, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group39 = GUICtrlCreateGroup("Minimum Internet Speed", 285, 469, 193, 41) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Label57 = GUICtrlCreateLabel("Google Ping", 292, 487, 73, 17) $G_Ping = GUICtrlCreateInput("", 426, 484, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$WS_BORDER)) GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet2 = GUICtrlCreateTabItem("Stats") GUICtrlSetState(-1,$GUI_SHOW) $Group4 = GUICtrlCreateGroup("Errors", 5, 397, 473, 57) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $pauses = GUICtrlCreateLabel("Video Auto Pause", 16, 413, 105, 17) $VAPE = GUICtrlCreateEdit("", 128, 408, 33, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) $Label2 = GUICtrlCreateLabel("Private Videos", 16, 432, 86, 17) $ChkZeroErrGUI = GUICtrlCreateEdit("", 278, 430, 33, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) $Label3 = GUICtrlCreateLabel("Restarts", 367, 432, 51, 17) $Rsrt = GUICtrlCreateEdit("", 430, 430, 33, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) $Label9 = GUICtrlCreateLabel("Check Zero", 199, 432, 70, 17) $PrivVideoGUI = GUICtrlCreateEdit("", 128, 430, 33, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) $Label10 = GUICtrlCreateLabel("Session Expired", 335, 408, 94, 17) $Session_Expired_Counter_GUI = GUICtrlCreateEdit("", 430, 408, 33, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) $Label11 = GUICtrlCreateLabel("Video Loading", 527, 388, 85, 17) $videoloaderr = GUICtrlCreateEdit("", 278, 408, 33, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) $Label21 = GUICtrlCreateLabel("", 16, 451, 4, 4) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label13 = GUICtrlCreateLabel("VideoViewer", 203, 408, 74, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $basicstarts = GUICtrlCreateGroup("Time", 126, 30, 230, 145) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $RunTime = GUICtrlCreateLabel("Runtime", 132, 44, 50, 17) $Runtimefrm = GUICtrlCreateEdit("", 182, 42, 57, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "00:00:00") GUICtrlSetCursor (-1, 2) $Group26 = GUICtrlCreateGroup("Cycles", 133, 61, 89, 105) $lstcycle = GUICtrlCreateEdit("", 137, 79, 81, 81, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN,$WS_VSCROLL)) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group27 = GUICtrlCreateGroup("Avg.", 241, 38, 110, 57) $Group28 = GUICtrlCreateGroup("Neces", 297, 50, 49, 41) $Edit6 = GUICtrlCreateEdit("", 301, 63, 41, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "00:00") GUICtrlSetCursor (-1, 2) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group29 = GUICtrlCreateGroup("Curr.", 245, 50, 49, 41) $Cycle_Avg = GUICtrlCreateEdit("", 249, 63, 41, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "00:00") GUICtrlSetCursor (-1, 2) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $dwntime = GUICtrlCreateEdit("", 292, 147, 57, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) $internetdwn = GUICtrlCreateLabel("Downtime", 230, 148, 59, 17) $Label56 = GUICtrlCreateLabel("Uptime", 230, 114, 43, 17) $UPtime = GUICtrlCreateEdit("", 292, 113, 57, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) GUICtrlCreateGroup("", -99, -99, 1, 1) $Mini = GUICtrlCreateGroup("Mini-Log", 5, 453, 473, 73) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $Log2 = GUICtrlCreateEdit("", 9, 471, 465, 49, BitOR($ES_AUTOVSCROLL,$ES_READONLY,$ES_WANTRETURN,$WS_VSCROLL,$WS_BORDER)) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") GUICtrlCreateGroup("", -99, -99, 1, 1) $Group5 = GUICtrlCreateGroup("Economics", 359, 30, 117, 145) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $Label4 = GUICtrlCreateLabel("Total ", 364, 89, 37, 17) $Eco_Total = GUICtrlCreateEdit("", 410, 85, 38, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) $Label5 = GUICtrlCreateLabel("Rate", 364, 57, 31, 17) $Eco_Rate = GUICtrlCreateEdit("", 409, 57, 38, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) $Label16 = GUICtrlCreateLabel("Rs.", 451, 57, 23, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $Label17 = GUICtrlCreateLabel("Rs.", 451, 86, 23, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $Label54 = GUICtrlCreateLabel("Target", 364, 124, 41, 17) $Eco_Tar = GUICtrlCreateEdit("", 410, 121, 38, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) $Label55 = GUICtrlCreateLabel("Rs.", 451, 125, 23, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") GUICtrlCreateGroup("", -99, -99, 1, 1) $Group6 = GUICtrlCreateGroup("Target", 5, 173, 241, 105) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $Group10 = GUICtrlCreateGroup("Hour", 15, 189, 110, 57) $Group30 = GUICtrlCreateGroup("Neces", 71, 201, 49, 41) $Tar_Hr_Nece = GUICtrlCreateEdit("", 83, 219, 25, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "00") GUICtrlSetCursor (-1, 2) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group31 = GUICtrlCreateGroup("Done", 19, 201, 49, 41) $Tar_Hr_Done = GUICtrlCreateEdit("", 31, 219, 25, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "00") GUICtrlSetCursor (-1, 2) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group11 = GUICtrlCreateGroup("Today", 130, 188, 110, 57) $Group32 = GUICtrlCreateGroup("Neces", 186, 200, 49, 41) $Tar_Today_Nece = GUICtrlCreateEdit("", 198, 218, 25, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "00") GUICtrlSetCursor (-1, 2) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group33 = GUICtrlCreateGroup("Done", 134, 200, 49, 41) $Tar_Today_Done = GUICtrlCreateEdit("", 146, 218, 25, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "00") GUICtrlSetCursor (-1, 2) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("", -99, -99, 1, 1) $Label1 = GUICtrlCreateLabel("Achieving Possible Today?", 13, 258, 157, 17) GUICtrlSetFont(-1, 7, 800, 0, "MS Sans Serif") $Tar_AchPos = GUICtrlCreateEdit("", 190, 254, 41, 17, BitOR($ES_CENTER,$ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "Yes") GUICtrlSetCursor (-1, 2) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group14 = GUICtrlCreateGroup("Views", 5, 29, 119, 145) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $Label50 = GUICtrlCreateLabel("Successful", 10, 45, 66, 17) $Label51 = GUICtrlCreateLabel("Attempted", 10, 67, 61, 17) $S_View = GUICtrlCreateEdit("", 85, 44, 33, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "00") GUICtrlSetCursor (-1, 2) $A_View = GUICtrlCreateEdit("", 85, 61, 33, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "00") GUICtrlSetCursor (-1, 2) $Group12 = GUICtrlCreateGroup("S. Rate", 43, 116, 57, 49) $S_Rate = GUICtrlCreateEdit("", 48, 137, 33, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) $Label15 = GUICtrlCreateLabel("%", 85, 137, 13, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") GUICtrlCreateGroup("", -99, -99, 1, 1) $Label7 = GUICtrlCreateLabel("Hustled", 10, 85, 47, 17) $Edit12 = GUICtrlCreateEdit("", 85, 84, 33, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "00") GUICtrlSetCursor (-1, 2) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group35 = GUICtrlCreateGroup("Randomization", 5, 278, 145, 120) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $Label26 = GUICtrlCreateLabel("Target", 11, 296, 41, 17) $Rand_Tar = GUICtrlCreateInput("000", 111, 293, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$ES_READONLY,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label52 = GUICtrlCreateLabel("Hustle", 11, 329, 40, 17) GUICtrlSetFont(-1, 2, 800, 0, "MS Sans Serif") $Rand_Hus = GUICtrlCreateInput("000", 111, 324, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$ES_READONLY,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) $Label53 = GUICtrlCreateLabel("Setting Scheme", 11, 361, 93, 17) $Rand_Setting = GUICtrlCreateInput("000", 112, 355, 33, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_LOWERCASE,$ES_READONLY,$WS_BORDER)) GUICtrlSetFont(-1, 5, 800, 0, "MS Sans Serif") GUICtrlSetCursor (-1, 0) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group40 = GUICtrlCreateGroup("Expiry", 249, 221, 229, 57) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $Label58 = GUICtrlCreateLabel("Days left for License to Expire", 259, 244, 175, 17) GUICtrlSetFont(-1, 9, 800, 0, "MS Sans Serif") $Expirydate_gui = GUICtrlCreateEdit("", 439, 244, 25, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group34 = GUICtrlCreateGroup("Expiry", 249, 175, 229, 47) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $Label12 = GUICtrlCreateLabel("PushBullet Alerts Sent", 267, 198, 130, 17) GUICtrlSetFont(-1, 9, 800, 0, "MS Sans Serif") $Psh_Sent = GUICtrlCreateEdit("", 431, 196, 33, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, "0") GUICtrlSetCursor (-1, 2) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group41 = GUICtrlCreateGroup("Coming Soon!", 154, 285, 325, 111) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $Label62 = GUICtrlCreateLabel("Coming Soon! :)", 269, 344, 94, 17) GUICtrlSetFont(-1, 9, 800, 0, "MS Sans Serif") GUICtrlCreateGroup("", -99, -99, 1, 1) $TabSheet3 = GUICtrlCreateTabItem("About") $Credits = GUICtrlCreateLabel("Developer - Rohan Sawant", 173, 74, 157, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $Contact = GUICtrlCreateLabel("Email- rohansawantct83@gmail.com", 148, 53, 207, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $Label32 = GUICtrlCreateLabel("© 2016 Rohan Sawant All Rights Reserved", 78, 29, 347, 24) GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) GUICtrlCreateTabItem("") GUICtrlSetCursor (-1, 0) $Start = GUICtrlCreateButton("Start ", 0, 560, 97, 25, $BS_PUSHLIKE) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) GUICtrlSetCursor (-1, 0) $Label25 = GUICtrlCreateLabel("© 2016 Rohan Sawant All Rights Reserved", 234, 560, 249, 17) GUICtrlSetFont(-1, 7, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xC0C0C0) $Label27 = GUICtrlCreateLabel("Today", 384, 4, 49, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $TotalViews = GUICtrlCreateEdit("", 440, 4, 41, 17, BitOR($ES_NOHIDESEL,$ES_READONLY,$ES_WANTRETURN)) $N_Name = GUICtrlCreateEdit("", 280, 7, 73, 17, BitOR($ES_NOHIDESEL,$ES_READONLY,$ES_WANTRETURN)) $Edit1 = GUICtrlCreateEdit("", 104, 568, 65, 17, BitOR($ES_READONLY,$ES_WANTRETURN)) GUICtrlSetData(-1, ""&Chr(39)&"Esc"&Chr(39)&" to Stop") GUICtrlSetFont(-1, 2, 400, 0, "MS Sans Serif") $PrgBar1 = GUICtrlCreateProgress(0, 536, 489, 17) Dim $MainMenu_AccelTable[1][2] = [["{INS}", $Start]] GUISetAccelerators($MainMenu_AccelTable) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### I am a newbie to programming, so the only thing i can think of to solve this problem is write another script. and have it ...
      ShellExecute("Script1.exe") ProgressOn("Loading...") ProgressSet(50,"Loading....") WinWait("Script1.exe) ProgressOff() is this the right way? if not what is ?
      Please let me know if my GUI region code is really needed here.   
    • RyukShini
      By RyukShini
      #include <ColorConstants.au3>; Including required files #include <GUIConstantsEx.au3> #include <file.au3> #include <Array.au3> #include <string.au3> Example() Func Example() Local $hash Local $hashes = "hash.txt" _FileReadToArray($hashes, $hash) For $i = 1 To UBound($hash) - 500 $hashcheck = $hash[$i] $PDenc = "hash=" & $hashcheck & "&decrypt=Decrypt" $oHTTP = ObjCreate("winhttp.winhttprequest.5.1") $oHTTP.Open("POST", "http://myurl/", False) ; Post url $oHTTP.SetRequestHeader("Host", "myurl") $oHTTP.SetRequestHeader("Connection", "keep-aliveContent-Length: 29") $oHTTP.SetRequestHeader("Cache-Control", "max-age=0") $oHTTP.SetRequestHeader("Origin", "http://myurl") $oHTTP.SetRequestHeader("Upgrade-Insecure-Requests", "1") $oHTTP.SetRequestHeader("User-Agent", "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/51.0.2704.84 Safari/537.36") $oHTTP.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded") $oHTTP.SetRequestHeader("Accept", "text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8") $oHTTP.SetRequestHeader("Referer", "http://myurl") $oHTTP.SetRequestHeader("Accept-Language", "en-US,en;q=0.8") $oHTTP.Send($PDenc) $oReceived = $oHTTP.ResponseText $oStatusCode = $oHTTP.Status sleep(2000) If $oStatusCode = 503 then MsgBox(4096, "Response code", $oStatusCode) ExitLoop EndIf ; Saves the body response regardless of the Response code $file = FileOpen("Received.html", 2) ; The value of 2 overwrites the file if it already exists FileWrite($file, $oReceived) $read = FileRead("Received.html") ;read file if StringInStr($read, "not found") Then ContinueLoop Else ContinueLoop $Datastring = ('</script></div><br/>') $newreadamount = _StringBetween($read, $Datastring, "</b><br/><br/>") ;read title from file $newreadamount[0] = StringReplace($newreadamount[0], '<b>', "") ; taking out the X makes it easier to compare value If @error Then ContinueLoop EndIf $file = FileOpen("decrypted.txt", 1) FileWrite($file, $newreadamount[0] & @CRLF) EndIf Next sleep(2000) EndFunc ;==>Example As you can read my script loads 500 lines of text, lets say I have a list with 10.000 lines
      Is there a way to show a progressbar GUI to show how long in a text file I am?
      I may not know how long a particular .txt file is always so I am thinking I need some sort of algorythm?
      Thanks in advance.
      ( I just got unclear if I actually read 500 lines each attempt or if I start with 500 and add 1 to it each time? )
       
      For $i = 1 To UBound($hash) - 500 ; LIke that ^ For $i = 500 To UBound($hash) - 500 ; or like this^ Thanks a lot.