OpenEuphoria

Re: Davids ee.ex editor and ex.exe(pd version)

• Posted by Daniel Berstein <daber at PAIR.COM> Dec 26, 1998
• 402 views

At 10:23 a.m. 26-12-98 , you wrote:
>Is Euphoria 2000 oked I mean that it wont explode in the year 2000 will
>it.Would anyone like to make a spell checker for ee.ex because I cant spell
>very good and it would make it easyer to stop some bugs like typeos.

Yes it's Y2K OK! Euphoria date() function returns the number of years since
1900. So 2000 would be 100 and 2001 101. To display the date use
something like:

constant
    YEAR = 1,
    MONTH = 2,
    DAY = 3,
    HOUR = 4,
    MINUTE = 5,
    SECOND = 6,
    WEEKDAY = 7,
    YEARDAY = 8,

    month = {"January","February","March","April","May","June","July","Agust",
      "September","October","November","December"},
    day = {"Sunday","Monday","Tuesday","Wednesday","Thursday","Friday",
      "Saturday"}

procedure PrintDate()
        sequence now
        now = date()
        printf(1, "Now is " & day[now[WEEKDAY]] & " " & month[now[MONTH]] &
          " %d, %d at %d:%d:%d\n",
          {now[DAY], now[YEAR]+1900, now[HOUR], now[MINUTE], now[SECOND]})
end procedure

PrintDate()


Regards,
        Daniel   Berstein
        daber at pair.com