Routines 
Prev: 30A9  Up: Map 
This subroutine prepares a floatingpoint number for multiplication or division, returning with carry set if the number is zero, getting the sign of the result into the A register, and replacing the sign bit in the number by the true numeric bit, 1.


PREP_M_D  30C0  CALL TEST_ZERO  If the number is zero, return with the carry flag set.  
30C3  RET C  
30C4  INC HL  Point to the sign byte.  
30C5  XOR (HL)  Get sign for result into A (like signs give plus, unlike give minus); also reset the carry flag.  
30C6  SET 7,(HL)  Set the true numeric bit.  
30C8  DEC HL  Point to the exponent again.  
30C9  RET  Return with carry flag reset. 
Prev: 30A9  Up: Map 