Timer function problem - GameCreators Forum

Author

Message

Tattered brush

15

Years of Service

User Offline

Joined: 1st Dec 2008

Location:

Posted: 4th Mar 2009 13:11

Link

Hi Guys

I've been reading the excellent timer() tutorial on here and have been experimenting with it.

+ Code Snippet

T=Timer()
Do
Elapsed=(Timer()-T)/1000
  If Elapsed=2
    hello()
    Elapsed=0
    T=Timer()
  endif
Loop
endscreen()
end

function hello()
   print "hello"
endfunction
function endscreen()
   cls
   print "The end"
   wait key
endfunction

The above code works as expected. Every 2 seconds the program will print hello.
However if I want to add this into a function (see below), the code no longer functions as expected, can anyone tell me why and if there is a solution please?

+ Code Snippet

T=Timer()

Do
timed(T)
Loop
endscreen()
end
function timed(T)
   Elapsed=(Timer()-T)/1000
   If Elapsed=2
   hello()
   Elapsed=0
   T=Timer()
  endif
endfunction
function hello()
   print "hello"
endfunction
function endscreen()
   cls
   print "The end"
   wait key
endfunction

Also, is it possible in this case to make T a global, I've tried and it seems to break the program.
Any help would be greatly appreciated.

Back to top

Profile PM

IanM

Retired Moderator

22

Years of Service

User Offline

Joined: 11th Sep 2002

Location: In my moon base

Posted: 4th Mar 2009 18:52

Link

Where you have the line 'T=Timer()' - you need to remember that T is a temporary copy of the original variable. When the function completes, that temporary copy is thrown away.

In addition, the variable 'Elapsed' is temporary within the timed function, so it's results are also thrown away when the function ends - not really a problem because you don't need to keep its value around, but you also don't need to reset it to zero in the function after you've used it.

+ Code Snippet

T=Timer()

Do
   ` Call the function and put the possibly-amended value back into T
   T = timed(T)
Loop
endscreen()
end

function timed(T)
   Elapsed=(Timer()-T)/1000
   If Elapsed=2
      hello()
      T=Timer()
   endif
   ` Return the possibly-amended version of T
endfunction T

function hello()
   print "hello"
endfunction

function endscreen()
   cls
   print "The end"
   wait key
endfunction

Utility plug-ins collection (updated 29/12/08) and
http://www.matrix1.demon.co.uk

Back to top

Profile PM Email Website

Tattered brush

15

Years of Service

User Offline

Joined: 1st Dec 2008

Location:

Posted: 4th Mar 2009 20:06

Link

Thanks for your quick response. I have tried your example and it works, I can see alot of uses for this timer based script.
How would I go about breaking the loop so the endscreen() function is executed, say after the screen has printed 10 hellos?

Back to top

Profile PM

Sorry your browser is not supported!

Newcomers DBPro Corner / Timer function problem