Christmas 2008 Holiday Message:

PROGRAM Holidays_2009;
BEGIN { Holidays }
  REPEAT
    CASE HowIFeel of
      Tired: Sleep (Body, Bed);
      Hungry: Eat (Meals);
      Bored: Read (Books);
      Energetic: Garden (Outside)
      Social: Visit (Friends);
    END;
  UNTIL DATE = "02/02/09"
END { Holidays }

(bonus marks for guessing my favourite, albeit antedeluvian, programming language...)