[Turn off line numbering]
1: arg secs, @long;
2: var ret_str, x;
3:
4: if (long)
5: long = 1;
6: if (secs > 86400) {
7: x = secs / 86400;
8: ret_str = x + (long ? " day" + (x < 2 ? "" : "s") : "d");
9: } else if (secs > 3600) {
10: x = secs / 3600;
11: ret_str = x + (long ? " hr" + (x < 2 ? "" : "s") : "h");
12: } else if (secs > 60) {
13: x = secs / 60;
14: ret_str = x + (long ? " min" + (x < 2 ? "" : "s") : "m");
15: } else {
16: ret_str = secs + (long ? " sec" + (secs < 2 ? "" : "s") : "s");
17: }
18: return ret_str;
["// Created 26-Mar-1995 as a part of ColdCore, see: @help Credit"]