Convert seconds to compound duration: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,521: / Line 1,521: @@
 =={{header|EasyLang}}==
-<syntaxhighlight lang="text">func split sec . s$ .
+<syntaxhighlight lang="text">
+func split sec . s$ .
   divs[] = [ 60 60 24 7 ]
   n$[] = [ "sec" "min" "hr" "d" "wk" ]
   len r[] 5
-  for i range 4
+  for i = 1 to 4
     r[i] = sec mod divs[i]
     sec = sec div divs[i]
   .
-  r[4] = sec
+  r[5] = sec
   s$ = ""
-  for i = 4 downto 0
+  for i = 5 downto 1
     if r[i] <> 0
       if s$ <> ""
@@ Line 1,545: / Line 1,546: @@
 print s$
 call split 6000000 s$
-print s$</syntaxhighlight>
+print s$
+</syntaxhighlight>
 {{out}}