×   Main Menu ALL The 8BS News Manuals (New menu) Links Worth a Look Tools Disc and Basic Webring Site Map 8BS Guestbook Old Guest Book Me The Barnsley Rovers   
8-Bit Software

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

 


 Back to 8BS
Or