Convert seconds to compound duration: Difference between revisions
Convert seconds to compound duration (view source)
Revision as of 12:09, 21 November 2015
, 8 years ago→{{header|uBasic/4tH}}
(Added uBasic/4tH version) |
|||
Line 1,046:
_Compound Param(3)
Local(
d@ = a@/b@ ' Get main
a@ = a@%b@ ' Leave the rest
If d@ > 0 Then ' Print the
Print d@;
Proc c@
Line 1,072:
0 OK, 0:94</pre>
=={{header|VBScript}}==
<lang vb>
| |||