Analyze the deferred load action on the Simon script

Dim Lasttime, StopTime, I

Stoptime= now+delaytime/24/3600//delaytime for the time delay can be set to the number of seconds, 1/24/3600 for a second unit, 0.1/24/3600 for 100 milliseconds units, a number of modulo remainder must be in this number Changes within the range.

Showsystemalarm "Script would be waiting for" & Delaytime & "seconds."
Do
If Now>lasttime + 0.1/24/3600 Then
i = i+1
Showsystemalarm "Script is Waiting" & Left ("...", (I Mod 4) + 1)
Lasttime= now
End If
Loop Until Now>=stoptime

Showsystemalarm "Script resumes working."

Analyze the deferred load action on the Simon script