Timer Creation

I'm trying to create a timer that counts down from 60 seconds, then when it reaches zero the game ends.

Function UpdateTimer()

Timer = MilliSecs()

If MilliSecs() > Timer + counter Then
	seconds = seconds - 1
	counter = counter + 1000
End If

If seconds = 0 Then Stop

End Function

counter is self-explanitory and seconds is used as the variable to print on-screen. When tested the seconds meter does not desend. If anyone can help me fix this code or suggest a better formula please do so.

Is this what you mean?

Graphics 800,600,32,2
SetBuffer BackBuffer()

Global timer,count=1000,seconds=60

Function CreateTimer_()
	timer=MilliSecs()
End Function

Function UpdateTimer_()
	If MilliSecs() > timer+count
		seconds=seconds-1
		timer=MilliSecs()
	EndIf
	
	If seconds=0 Then Notify "COMPLETE!":End
End Function

CreateTimer_()

Repeat
	If KeyHit(1)
		End
	EndIf
	
	Cls
	
	Text 10,10,seconds
	
	Flip
	
	UpdateTimer_()
Forever

Not exactly what I wanted, but in the right direction, I can fix it from here. Thanks!