24 hour clock by McBusLuck

read$a a
IFS=: read b c d&&printf %02d:%02d:%02d\\n $[23-10#$b] $[59-10#$c+!10#$d] $[(60-10#$d)%60]&&. *

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page