Method code for $world_time.daytime()

[Turn on line numbering]

---

arg zone, dayscale;
var t, t1, t2;

t = (.local_time() / 3600 + zone) % 24;
t1 = 6 - dayscale;
t2 = 18 + dayscale;
switch (t) {
    case 0 .. 2:
        return [t, 'night, 'night];
    case 3 .. t1 - 1:
        return [t, 'predawn, 'night];
    case t1:
        return [t, 'dawn, 'day];
    case t1 + 1 .. 11:
        return [t, 'morning, 'day];
    case 12:
        return [t, 'noon, 'day];
    case 13 .. t2 - 1:
        return [t, 'afternoon, 'day];
    case t2:
        return [t, 'sunset, 'day];
    case t2 + 1 .. 22:
        return [t, 'evening, 'night];
    case 23:
        return [t, 'night, 'night];
}

---

["// Created 19-Nov-1996 as a part of ColdCore, see: @help Credit"]