C64 ROM | Routines |
Prev: BC0C | Up: Map | Next: BC2B |
BC1B | A5 61 | LDA $61 | get FAC1 exponent | |
BC1D | F0 FB | BEQ $BC1A | exit if zero | |
BC1F | 06 70 | ASL $70 | shift FAC1 rounding byte | |
BC21 | 90 F7 | BCC $BC1A | exit if no overflow | |
This entry point is used by the routine at BFED.
round FAC1 (no check)
|
||||
BC23 | 20 6F B9 | JSR $B96F | increment FAC1 mantissa | |
BC26 | D0 F2 | BNE $BC1A | branch if no overflow | |
BC28 | 4C 38 B9 | JMP $B938 | nornalise FAC1 for C=1 and return |
Prev: BC0C | Up: Map | Next: BC2B |