Routines
Prev: B1AA Up: Map Next: B1D1
B1B2: evaluate integer expression
Used by the routine at B1D1.
B1B2 20 73 00 JSR $0073 increment and scan memory
B1B5 20 9E AD JSR $AD9E evaluate expression
This entry point is used by the routine at B7A1.
evaluate integer expression, sign check
B1B8 20 8D AD JSR $AD8D check if source is numeric, else do type mismatch
B1BB A5 66 LDA $66 get FAC1 sign (b7)
B1BD 30 0D BMI $B1CC do illegal quantity error if -ve
This entry point is used by the routines at A9A5, AE86, AFE9 and B1AA.
evaluate integer expression, no sign check
B1BF A5 61 LDA $61 get FAC1 exponent
B1C1 C9 90 CMP #$90 compare with exponent = 2^16 (n>2^15)
B1C3 90 09 BCC $B1CE if n<2^16 go convert FAC1 floating to fixed and return
B1C5 A9 A5 LDA #$A5 set pointer low byte to -32768
B1C7 A0 B1 LDY #$B1 set pointer high byte to -32768
B1C9 20 5B BC JSR $BC5B compare FAC1 with (AY)
B1CC D0 7A BNE $B248 if <> do illegal quantity error then warm start
B1CE 4C 9B BC JMP $BC9B convert FAC1 floating to fixed and return
Prev: B1AA Up: Map Next: B1D1