61170 REM 61170REST        UZ,UT/UZ/
61171 UZ=UZ-INT(UZ/UT)*UT:RETURN