#!/home/euphoria4.0b2/bin/eui
integer curr_year, curr_day, curr_day_of_year, curr_hour,
curr_minute, curr_second
sequence system_date, word_week, word_month, notation,
curr_day_of_week, curr_month
word_week = {"Sunday",
"Monday",
"Tuesday",
"Wednesday",
"Thursday",
"Friday",
"Saturday"}
word_month = {"January", "February",
"March", "April", "May",
"June", "July", "August",
"September", "October",
"November", "December"}
 Get current system date.
system_date = date()
 Now take individual elements
curr_year = system_date[1] + 1900
curr_month = word_month[system_date[2]]
curr_day = system_date[3]
curr_hour = system_date[4]
curr_minute = system_date[5]
curr_second = system_date[6]
curr_day_of_week = word_week[system_date[7]]
curr_day_of_year = system_date[8]
if curr_hour >= 12 then
notation = "p.m."
else
notation = "a.m."
end if
if curr_hour > 12 then
curr_hour = curr_hour  12
end if
if curr_hour = 0 then
curr_hour = 12
end if
puts(1, "\nHello Euphoria!\n\n")
printf(1, "Today is %s, %s %d, %d.\n",
{curr_day_of_week, curr_month,
curr_day, curr_year})
printf(1, "The time is %.2d:%.2d:%.2d %s\n",
{curr_hour, curr_minute,
curr_second, notation})
printf(1, "It is %3d days into the current year.\n",
{curr_day_of_year})
