Script Function: Q4C4
From Ultima Online: The Second Age
function int Q4C4(obj this, obj speaker, string arg) { list args; split(args, arg); if (isInList(args, "time")) { string Q613; int Q60B; string Q4WP; int Q60I; string Q57B; int Q45A = 0x00; Q60I = getMinute(); Q60B = getHour(); Q60I = Q60I / 0x05; switch (Q60I) { case 0x00 Q57B = ""; Q45A = 0x01; break; case 0x01 Q57B = "a few minutes past"; break; case 0x02 Q57B = "ten past"; break; case 0x03 Q57B = "quarter past"; break; case 0x04 Q57B = "twenty minutes past"; break; case 0x05 Q57B = "a few minutes shy of half-past"; break; case 0x06 Q57B = "half-past"; break; case 0x07 Q57B = "just over half-past"; break; case 0x08 Q57B = "lacking twenty minutes until"; Q60B = Q60B + 0x01; break; case 0x09 Q57B = "quarter of"; Q60B = Q60B + 0x01; break; case 0x0A Q57B = "ten of"; Q60B = Q60B + 0x01; break; case 0x0B Q57B = "almost"; Q60B = Q60B + 0x01; Q45A = 0x01; break; case 0x0C Q57B = ""; Q45A = 0x01; break; default Q57B = "no known minutes!"; break; } if (Q60B > 0x17) { Q60B = 0x00; } switch (Q60B) { default Q4WP = "no known hour!"; break; case 0x00 Q4WP = "midnight"; Q45A = 0x00; break; case 0x0C Q4WP = "noon"; Q45A = 0x00; break; case 0x01 case 0x0D Q4WP = "one"; break; case 0x02 case 0x0E Q4WP = "two"; break; case 0x03 case 0x0F Q4WP = "three"; break; case 0x04 case 0x10 Q4WP = "four"; break; case 0x05 case 0x11 Q4WP = "five"; break; case 0x06 case 0x12 Q4WP = "six"; break; case 0x07 case 0x13 Q4WP = "seven"; break; case 0x08 case 0x14 Q4WP = "eight"; break; case 0x09 case 0x15 Q4WP = "nine"; break; case 0x0A case 0x16 Q4WP = "ten"; break; case 0x0B case 0x17 Q4WP = "eleven"; break; } if (Q45A) { Q4WP = Q4WP + " o'clock"; } if ((Q60B > 0x00) && (Q60B < 0x0B)) { Q4WP = Q4WP + " in the morning"; } if ((Q60B > 0x0C) && (Q60B < 0x15)) { Q4WP = Q4WP + " in the afternoon"; } if (Q60B > 0x14) { Q4WP = Q4WP + " at night"; } Q613 = "It is " + Q57B + " " + Q4WP + "."; bark(this, Q613); Q4J9(this); return (0x00); } return (0x01); }
function int Q4C4(obj this, obj speaker, string arg) { list args; split(args, arg); if (isInList(args, "time")) { string Q613; int Q60B; string Q4WP; int Q60I; string Q57B; int Q45A = 0x00; Q60I = getMinute(); Q60B = getHour(); Q60I = Q60I / 0x05; switch (Q60I) { case 0x00 Q57B = ""; Q45A = 0x01; break; case 0x01 Q57B = "a few minutes past"; break; case 0x02 Q57B = "ten past"; break; case 0x03 Q57B = "quarter past"; break; case 0x04 Q57B = "twenty minutes past"; break; case 0x05 Q57B = "a few minutes shy of half-past"; break; case 0x06 Q57B = "half-past"; break; case 0x07 Q57B = "just over half-past"; break; case 0x08 Q57B = "lacking twenty minutes until"; Q60B = Q60B + 0x01; break; case 0x09 Q57B = "quarter of"; Q60B = Q60B + 0x01; break; case 0x0A Q57B = "ten of"; Q60B = Q60B + 0x01; break; case 0x0B Q57B = "almost"; Q60B = Q60B + 0x01; Q45A = 0x01; break; case 0x0C Q57B = ""; Q45A = 0x01; break; default Q57B = "no known minutes!"; break; } if (Q60B > 0x17) { Q60B = 0x00; } switch (Q60B) { default Q4WP = "no known hour!"; break; case 0x00 Q4WP = "midnight"; Q45A = 0x00; break; case 0x0C Q4WP = "noon"; Q45A = 0x00; break; case 0x01 case 0x0D Q4WP = "one"; break; case 0x02 case 0x0E Q4WP = "two"; break; case 0x03 case 0x0F Q4WP = "three"; break; case 0x04 case 0x10 Q4WP = "four"; break; case 0x05 case 0x11 Q4WP = "five"; break; case 0x06 case 0x12 Q4WP = "six"; break; case 0x07 case 0x13 Q4WP = "seven"; break; case 0x08 case 0x14 Q4WP = "eight"; break; case 0x09 case 0x15 Q4WP = "nine"; break; case 0x0A case 0x16 Q4WP = "ten"; break; case 0x0B case 0x17 Q4WP = "eleven"; break; } if (Q45A) { Q4WP = Q4WP + " o'clock"; } if ((Q60B > 0x00) && (Q60B < 0x0B)) { Q4WP = Q4WP + " in the morning"; } if ((Q60B > 0x0C) && (Q60B < 0x15)) { Q4WP = Q4WP + " in the afternoon"; } if (Q60B > 0x14) { Q4WP = Q4WP + " at night"; } Q613 = "It is " + Q57B + " " + Q4WP + "."; bark(this, Q613); Q4J9(this); return (0x00); } return (0x01); }