if (hpyyyy mod 4 = 0 and (hpyyyy mod 100 <> 0 or hpyyyy mod 400 = 0)) then
   setvar _days_per_month ".312931303130313130313031"
else
   setvar _days_per_month ".312831303130313130313031"
endif
if "!hpdate" = STR(_days_per_month,(hpmonth LSL 1),2) then
  echo Today (!hpdate) is the last day of ![word(hpdatef,,2)]
endif
deletevar _days_per_month