//input:  MONTH,YEAR
MaxDay = 31
If MyMonth = 4 or MyMonth = 6 or MyMonth = 9 or MyMonth = 11 Then
   MaxDay = 30
Endif
If MyMonth = 2 then
   x = CALL "IsLeapYear"[MyYear]
   MaxDay = 28 + x
Endif
RETURN MaxDay