diff --git a/gui/m291/src/m291.tal b/gui/m291/src/m291.tal index 9142de3..62d0e5c 100644 --- a/gui/m291/src/m291.tal +++ b/gui/m291/src/m291.tal @@ -587,9 +587,10 @@ ( >> ) @ ( time* -- ) - ( x0:00:00 ) DUP2 #8ca0 DIV2 NIP #06 DIVk MUL SUB - ( 0x:00:00 ) DUP2 #0e10 DIV2 NIP - [ LIT ": ] + DUP2 #0e10 LTH2 ?{ + ( x0:00:00 ) DUP2 #8ca0 DIV2 NIP #06 DIVk MUL SUB + ( 0x:00:00 ) DUP2 #0e10 DIV2 NIP + [ LIT ": ] } ( 00:x0:00 ) DUP2 #0258 DIV2 NIP #06 DIVk MUL SUB ( 00:0x:00 ) DUP2 #003c DIV2 NIP [ LIT ": ]