Or even:
Code:
$iLeapYear=Not(@YEAR MOD 400) OR (@YEAR MOD 100) AND Not(@YEAR MOD 4)