Jump to content
hampkade

Infinite loop problem

Recommended Posts

hampkade

I am writing a script that backs up my Teamspeak.

So far everything else works, except this:

While 1=1
$Date = @MDAY & '_' & @MON & '_' & @YEAR
Backup()
FileChangeDir("C:/")
$Yday = @YDAY
Do
    $Tday = @YDAY
    Sleep(6000)
Until $Tday <> $Yday
WEnd

It runs through the loop once then exits. I can't seem to fix this.

Any suggestions?

Edited by hampkade

Share this post


Link to post
Share on other sites
Bowmore

I see no reason why this should ever exit, unless you have an EXIT statement in your Backup() function or some other code that causes your script to terminate.


"Programming today is a race between software engineers striving to build bigger and better idiot-proof programs, and the universe trying to build bigger and better idiots. So far, the universe is winning."- Rick Cook

Share this post


Link to post
Share on other sites
Melba23

hampkade,

There appears to be nothing wrong with the basic logic as you can see in this rather faster reproducer:

While 1 = 1
    $Yday = @SEC
    ConsoleWrite($Yday & @CRLF)
    Do
        $Tday = @SEC
        ConsoleWrite($Tday & @CRLF)
        Sleep(100)
    Until $Tday <> $Yday

    ConsoleWrite("Here" & @CRLF)
WEnd

Could the Backup function be causing the exit - there is nothing in the snippet itself which would cause it.

M23


Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______My UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Share this post


Link to post
Share on other sites
hampkade

This is the full code to the program.

#include <MsgBoxConstants.au3>
#include <FileConstants.au3>
#include <Process.au3>
#RequireAdmin

Global $TSDIR = "C:/Teamspeak"
Global $Date = "Default"
Local $Yday = ""
Local $Tday = ""

While 1=1
$Date = @MDAY & '_' & @MON & '_' & @YEAR
Backup()
FileChangeDir("C:/")
$Yday = @YDAY
Do
    $Tday = @YDAY
    Sleep(6000)
Until $Tday <> $Yday
WEnd

Func Backup()
If ProcessExists("ts3server_win64.exe") Then
ProcessClose ("ts3server_win64.exe")
DirCopy($TSDIR, "C:/Teamspeakbackup/" & $Date)
FileChangeDir($TSDIR)
ShellExecute("ts3server_win64.exe")
Else
   MsgBox($MB_SYSTEMMODAL,"TS", "Teamspeak server isn't running")
EndIf

I don't see anything that would cause the loop to exit

Edited by hampkade

Share this post


Link to post
Share on other sites
hampkade

I hope there is an EndFunc at the end as well. ;)

Jos

 

​Oh god I can't believe I missed that >.< :'(:>

Share this post


Link to post
Share on other sites
hampkade

Upon adding the EndFunc, the script works perfectly :)
Thanks for pointing out my idiocracy

Share this post


Link to post
Share on other sites
Jos

Just install the separate Full SciTE4AutoIt3 installer which would have avoided this issue since it runs au3check before running it.

Also tidying your source would have helped here.  :)

Jos

Edited by Jos

Visit the SciTE4AutoIt3 Download page for the latest versions  - Beta files                                How to post scriptsource        Forum Rules
 
Live for the present,
Dream of the future,
Learn from the past.
  :)

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×