You can replace your if-else with printf:

   printf "You %s have %s off\n",
          ($present ? "DO" : "DID") . ($week % 2 ? "" : "N'T"),
          Date_to_Text(@friday);
[download]