Calculate remain time of randomness possible?

[Brunoire]

I would like to know if it would be possible to calculate 75 minutes minus the total minutes from randsleep and swap 3600000 with the result and keep doing it on every loop?

This is the script, I am using.

Code: Select all

seg := [2, "e", "f", "g", "h"]
ter := [3, "i", "j", "k", "l"]

Loop,

!Numpad1::

Sleep, 3600000

;1
randsleep(60000, 90000)
for Index, Type in [seg] {
    SendInput % Type[rand(1, 5)]
}
    randsleep(3700,3900)
	for Index, Type in [ter] {
    SendInput % Type[rand(1, 5)]
}
;2
randsleep(210000, 300000)
for Index, Type in [seg] {
    SendInput % Type[rand(1, 5)]
}
    randsleep(3700,3900)
	for Index, Type in [ter] {
    SendInput % Type[rand(1, 5)]
}
;3
randsleep(210000, 300000)
for Index, Type in [seg] {
    SendInput % Type[rand(1, 5)]
}
    randsleep(3700,3900)
	for Index, Type in [ter] {
    SendInput % Type[rand(1, 5)]
}
;4
randsleep(210000, 300000)
for Index, Type in [seg] {
    SendInput % Type[rand(1, 5)]
}
    randsleep(3700,3900)
	for Index, Type in [ter] {
    SendInput % Type[rand(1, 5)]
}
;5
randsleep(210000, 300000)
for Index, Type in [seg] {
    SendInput % Type[rand(1, 5)]
}
    randsleep(3700,3900)
	for Index, Type in [ter] {
    SendInput % Type[rand(1, 5)]
}
return


randsleep(min, max) {
    sleep % rand(min, max)
}

rand(min, max) {
    Random, rand, % min, % max
    return rand
}