The BBC and Master Computer Public Domain Library
B317 WIDTH
Submitted by Steve Fewell
Description:
Get the result of the expression at BASIC Text Pointer A and convert the result to Integer (if Float), or issue a
'Type mismatch' error (if String value found).
Call routine &9B96 to check that the Statement terminates correctly (if not, then a 'Syntax' error is issued).
Set location &23 (WIDTH) to the Integer LSB Value (&2A) minus 1.
Jump to &9005 to start processing the next Statement.
Disassembly for the WIDTH routine
| B317 | o | 032 111 146 | 20 6F 92 | JSR &926F Evaluate Expression at BASIC Text pointer A & convert result to integer |
| B31A | 032 150 155 | 20 96 9B | JSR &9B96 Check for end of Statement (PTR B) | |
| B31D | * | 164 042 | A4 2A | LDY &2A |
| B31F | 136 | 88 | DEY | |
| B320 | # | 132 035 | 84 23 | STY &23 |
| B322 | L | 076 005 144 | 4C 05 90 | JMP &9005 Process next Statement |
