path: root/npc/annuals/fathertime.txt

017-9,26,28,0	script	#HolidayConfig	NPC32767,{
    end;

OnInit:
    if (debug >= 2) end;
    donpcevent strnpcinfo(0) + "::OnTimer20000";
    end;

OnClock0000:
OnTimer20000:
    donpcevent "#XmasConfig::OnCommandRestartQuest";
    donpcevent "#HalloweenConfig::OnCommandRestartQuest";
    donpcevent "Easter Eggs::OnCheckEaster";
    //initnpctimer;
    end;
}

function	script	TMWBirthday	{
    if (gettime(GETTIME_MONTH) != APRIL) return;
    if (gettime(GETTIME_DAYOFMONTH) != 11) return;
    .@age=gettime(GETTIME_YEAR)-2004;
    .@end=(.@age % 10);
    .@mo$=(.@end == 1 ? "st" : (.@end == 2 ? "nd" : (.@end == 3 ? "rd" : "th")));
    dispbottom l("It is TMW's %d%s birthday!", .@age, .@mo$);
    // Handle gifts
    if (#TMWBDAY < .@age) {
        #TMWBDAY=.@age;
        getitem TMWBirthdayGift, 1;
    }
    return;
}