Date,time digital clock

Date, Time
Digital Clock

========
Main
========

AddLabel("lbl1",0,0,100%x,15%y,"")
SetColor("lbl1",20,ccyan)
SetTextSize("lbl1",24)
Setgravity("lbl1",17)

dateformat("dd/MM/yyyy")
timeformat("hh:mm:ss a")

dim days(8)
days(1)="Sunday"
days(2)="Monday"
days(3)="Tuesday"
days(4)="Wednesday"
days(5)="Thursday"
days(6)="Friday"
days(7)="Saturday"

SetTimerInterval(1000)
SetTimerenabled(true)

=======
Events
=======
Sub Activity_Pause(UserClosed)
End Sub

Sub Activity_Resume
SetTimerenabled(true)
End Sub

Sub Timer_Tick
SetText("lbl1",date(now) & "  " &  days(datedayofweek(now))  & crlf & time(now))
End Sub

=======