Calculate ADFS checksum for sector 0 and sector 1

DEFFNadfs_sum(mem%):LOCAL sum%:sum%=255
FOR A%=254 TO 0 STEP -1:sum%=(sum%+sum%DIV256)AND255
sum%=sum%+mem%?A%:NEXT:=sum%AND255