[REBOL] Re: AM / PM time for the blind
From: john:thousand-hills at: 31-Aug-2001 23:34
Andrew: I got it..! nicetime: func [time [time!] /local am] [ time/3: 0 am: pick [" AM" " PM"] time < 12:00 if time >= 13:00 [time: time - 12:00] if time = 0:00 [time: "*"] if time/1 <= 0 [time/1: 0] either time = "*" [rejoin [time time]][rejoin [time am]] ] This returns a <TD>cell</TD> with " * * " for a time value of " 0:00 " John At 10:04 PM 8/31/2001 -0500, you wrote: