Roku Developer Program

[hugetv]

as I can show a message every 20 seconds

[Komag]

In your main loop, have a timer that, when over 20 seconds (or 20000 milliseconds), calls the text function and resets itself to 0.

clock = CreateObject("roTimespan")
clock.Mark()

(WITHIN LOOP)
IF clock.TotalSeconds() >= 20
showMyText()
clock.Mark()
END IF

[hugetv]

the code within Main() but does not work

sub Main()
timer = CreateObject("roTimespan")
timer.Mark()
print timer.TotalSeconds()
m.RegistryCache = CreateObject("roAssociativeArray")
categories = LoadConfig()
ShowPosterScreen(categories, "Menu", "", 0, 0)
if timer.TotalSeconds() >= 20
showMyText()
timer.Mark()
end if
end sub

[Komag]

It has to be within a repeating loop, such as :

sub Main()
   timer = CreateObject("roTimespan")
	timer.Mark()
	print timer.TotalSeconds()
   m.RegistryCache = CreateObject("roAssociativeArray")
	categories = LoadConfig()
	ShowPosterScreen(categories, "Menu", "", 0, 0)
WHILE TRUE
    if timer.TotalSeconds() >= 20
       showMyText()
	    timer.Mark()
    end if
END WHILE
end sub[/quote]

[hugetv]

but it looks like I have not run me showExpirationScreen ()

sub Main()
    timer = CreateObject("roTimespan")
	timer.Mark()
    m.RegistryCache = CreateObject("roAssociativeArray")
	
	'checks if the account exists
    if ValidateLinkingDevice(GetDeviceESN()) = true
	
	categories = LoadConfig()
       ShowPosterScreen(categories, "Menu", "", 0, 0)

	  while true
          if timer.TotalSeconds() >= 20
            showExpirationScreen()
            timer.mark()
          end if
	  end while
    else
       ShowLinkScreen()
    endif
end sub

[Komag]

I'm not sure how you will specifically work it in, only the general concept. I'm not familiar with most of the regular video channel stuff like ShowPosterScreen() or showExpirationScreen()

[hugetv]

ok thank you very much achieved already solve

[hugetv]

I use this code to disable the other

while true
if timer.TotalSeconds() >= 20
showExpirationScreen()
timer.mark()
end if
end while

me de

[hugetv]

To put this script works but I disables all other functions

while true
if timer.TotalSeconds() >= 20
showExpirationScreen()
timer.mark()
end if
end while