If your referring to the coordinated universal time (UTC), then try this.
remstart
typedef struct _SYSTEMTIME {
WORD wYear;
WORD wMonth;
WORD wDayOfWeek;
WORD wDay;
WORD wHour;
WORD wMinute;
WORD wSecond;
WORD wMilliseconds;
} SYSTEMTIME;
remend
#constant KERNEL32 1
SystemTime as dword
SystemTime = make memory(16)
load dll "kernel32.dll", KERNEL32
call dll KERNEL32, "GetSystemTime", SystemTime
delete dll KERNEL32
sync on
sync rate 60
backdrop on
color backdrop 0
do
set cursor 0, 0
print PeekWord(SystemTime, 4); ":"; PeekWord(SystemTime, 5); ":"; PeekWord(SystemTime, 6)
sync
loop
end
function PeekWord(addr as dword, index as integer)
result as word
addr = addr+index*2
result = *addr
endfunction result