#include <lib.h>
#include <daemons.h>
inherit LIB_ITEM;
int eventReadClock();
static void create(){
item::create();
SetKeyName("clock tower");
SetId( ({"great clock tower rising majestically into the sky", "great clock of the town", "clock", "tower", "structure", "architecture", "clocktower"}) );
SetAdjectives( ({"large", "great", "majestic", "impressive", "proud"}) );
SetShort("a great clock tower rising majestically into the sky");
SetLong("This is a large clock tower, rising magestically into "+
"the sky. Some forty feet up you can see the great clock of "+
"the town, which can be read to know the local time. The "+
"intricate details of its architecture are deeply impressive, "+
"and there is little doubt that this great structure is the "+
"pride of this little town.");
SetMass(10);
SetBaseCost("silver",40);
SetDefaultRead( (: eventReadClock :) );
}
void init(){
::init();
}
mixed CanGet(object ob) { return "This is a clock tower. It's not gettable.";}
int eventReadClock(){
int hour, minutes;
int *time_of_day;
string hour_string, minute_string;
time_of_day = SEASONS_D->GetMudTime();
hour = time_of_day[0];
minutes = time_of_day[1];
if(hour > 12) hour -= 12;
hour_string = cardinal(hour);
switch(minutes){
case 0 : minute_string ="o'clock"; break;
case 1 : minute_string = hour_string;hour_string ="one minute past"; break;
case 2 : minute_string = hour_string;hour_string ="two minutes past"; break;
case 3 : minute_string = hour_string;hour_string ="three minutes past"; break;
case 4 : minute_string = hour_string;hour_string ="four minutes past"; break;
case 5 : minute_string = hour_string;hour_string ="five past"; break;
case 6 : minute_string = hour_string;hour_string ="six minutes past"; break;
case 7 : minute_string = hour_string;hour_string ="seven minutes past"; break;
case 8 : minute_string = hour_string;hour_string ="eight minutes past"; break;
case 9 : minute_string = hour_string;hour_string ="nine minutes past"; break;
case 10 : minute_string = hour_string;hour_string ="ten past"; break;
case 15 : minute_string = hour_string;hour_string ="quarter past"; break;
case 45 : minute_string = cardinal(hour+1);hour_string ="quarter of"; break;
case 50 : minute_string = cardinal(hour+1);;hour_string ="ten of"; break;
case 55 : minute_string = cardinal(hour+1);hour_string ="five of"; break;
default : minute_string = cardinal(minutes);break;
}
if(minute_string == "thirteen") minute_string = "one";
write("According to the clock, it is "+hour_string+" "+minute_string+".");
return 1;
}
