COMPUTE II ISSUE 2 / JUNE/JULY 1980
Some Routines From Microsoft Basic
Jim Butterfield, Toronto
Routines were identified by examining specific machines. There may well be other versions of Basic on these machines; the user is urged to exercise caution.
OSI is from a C2-4 machine. KIM is a cassette tape version. SYM and AIM are the ROM versions.
The addresses given identify the start of the area in which the described routine lies. This may not be the proper program entry point or calling address.
©Copyright 1980, Jim Butterfield
KIM SYM AIM OSI Description 2000 C003 B00A A000 Action addresses for primary keywords 203A C03D B044 A038 Action addresses for functions 2068 C06B B072 A066 Hierarchy and action addresses for operators 2086 C089 B090 A084 Table of Basic keywords 2169 C16E B175 A164 Basic messages, mostly error messages 2274 C1AB B1AC A1A1 Search the stack for FOR or GOSUB activity 22A2 C1D9 B1DA A1CF Open up space in memory 22E5 C21C B21D A212 Test: stack too deep? 22F2 C229 B22A A21F Check available memory 231F C256 B257 A24C Send canned error message, then: 2348 C27E B27F A274 Warm start; wait for Basic command 236A C2A0 B29D A295 Handle new Basic line input 23F1 C32C B329 A32E Rebuild chaining of Basic lines 2420 C359 B356 A34B Receive line from keyboard 2466 C39F B3AE A3A6 Crunch keywords into Basic tokens 24F2 C427 B436 A432 Search Basic for given line number 2521 C456 B465 A461 Perform NEW 253C C472 B481 A68C Perform CLEAR 256B C49F B4AE A4A7 Reset Basic execution to start 2579 C4AC B4BC A4B5 Perform LIST 2608 C535 B55C A556 Perform FOR 26AA C5DA B601 A5FF Execute Basic statement 26CB C60A B631 A61A Perform RESTORE 26DA C619 B640 A62C Check stop key 26E8 C622 B65C A638 Perform STOP or END 2711 C64B B685 A661 Perform CONT 272B C665 A67B Perform NULL 273C C676 B69F FFF7 Perform SAVE 278C C6B7 FFF4 Perform LOAD B6AB Special AIM input routines 27CA C707 B6EC A691 Perform RUN 27D5 C712 B6F7 A69C Perform GOSUB 27F2 C72F B714 A6B9 Perform GOTO 281F C75C B741 A6E6 Perform RETURN, then: 2845 C782 B767 A70C Perform DATA: skip statement 2853 C790 B775 A71A Scan for next Basic statement 2857 C793 B778 A71D Scan for next Basic line 2875 C7B2 B797 A73C Perform IF, and perhaps: 2888 C7C5 B7AA A74F Perform REM: skip line 2898 C7D5 B7BA A75F Perform ON 28B8 C7F5 B7DA A77F Input fixed-point number 28F2 C82F B814 A7B9 Perform LET B89D Enable printer 297B C8B8 B8A9 A829 Perform PRINT 2A13 C94F B94A A8C3 Print string from memory 2A35 C971 B967 A8E0 Print single format character 2A59 C991 B988 A904 Handle bad input data 2A7E B9AD Perform GET 2A8D C9B0 B9BC A923 Perform INPUT 2AB0 C9DC B9E7 A946 Prompt and receive input 2AB9 C9E5 B9F0 A94F Perform READ 2BA2 CAB4 BADC AA1C Canned Input error messages 2BC6 CAD8 BB00 AA40 Perform NEXT 2C34 CB43 BB59 AAAD Check type mismatch 2C48 CB57 BB7F AAC1 Evaluate expression 2D82 CC9F BCB9 ABF5 Evaluate expression within parentheses 2D88 CCA5 BCBF ABFB Check parenthesis, comma 2D99 CCB6 BCD0 AC0C Syntax error exit 2D9E CCBB BCD5 AC11 Setup for functions 2DA5 CCC2 BCDC AC18 Variable name setup 2DC5 CCE6 BD00 AC27 Set up function references 2E04 CD25 BD3F AC66 Perform OR, AND 2E34 CD55 BD6F AC96 Perform comparisons 2E9F CE11 BDDA AD01 Perform DIM 2EA9 CE5F BDE4 AD0B Search for variable 2F3D CEF3 BE78 AD8B Create new variable 2FA3 CF57 BEDC ADE6 Setup array pointer 2FB4 CF68 BEED ADF7 Evaluate integer expression 2FD4 CF8B BF10 AE17 Find or make array 3181 D138 COBD AFAD Perform FRE, and: 3195 D14C C0D1 AFC1 Convert fixed-to-floating 31A2 D159 CODE AFCE Perform POS 31A8 D15F C0E4 AFD4 Check not Direct 31B2 D16C C0F1 AFDE Perform DEF 31E0 D19A C11F B00B Check FNx syntax 31F3 D1AD C132 B01E Evaluate FNx 3266 D21E C1A3 B08C Perform STR$ 3276 D22E C1B3 B09C Do string vector 3288 D240 C1C5 B0AE Scan, set up string 32EF D2A9 C232 B115 Build descriptor 3321 D2DB C264 B147 Garbage collection 3434 D3F2 C37B B24D Concatenate 3471 D42F C3B8 B28A Store string 349A D458 C3E1 B2B3 Discard unwanted string 34D2 D490 C419 B2EB Clean descriptor stack 34E3 D4A1 C42A B2FC Perform CHR$ 34F7 D4B5 C43E B310 Perform LEFT$ 3523 D4E1 C46A B33C Perform RIGHT$ 352E D4EC C475 B347 Perform MID$ 3556 D516 C49F B36F Pull string data 3573 D531 C4BA B38C Perform LEN 3579 D537 C4C0 B392 Switch string to numeric 3582 D540 C4C9 B39B Perform ASC 3592 D550 C4D9 B3AB Get byte parameter 35A4 D562 C4EB B3BD Perform VAL 35E3 D5A1 C52A B3FC Get two parameters for POKE or WAIT 35EF D5AD C536 B408 Convert floating-to-fixed 3605 D5C3 C54C B41E Perform PEEK 3610 D5DA C563 B429 Perform POKE 3619 D5E3 C56C B432 Perform WAIT 3635 D5FF C588 B44E Add 0.5 363C D606 C58F B455 Perform subtraction 364E D618 C5A6 B467 Perform addition 3765 D6FD C686 B537 Complement accum#1 379C D734 C6BD B564 Overflow exit 37A1 D739 C6C2 B569 Multiply-a-byte 3802 D772 C6FB B59C Constants 3830 D7A0 C729 B5BD Perform LOG 386E D7DE C76A B5FB Perform multiplication 3904 D842 C7CB B64D Unpack memory into accum#2 392F D86D C7F6 B673 Test & adjust accumulators 394C D88A C813 B690 Handle overflow and underflow 395A D898 C821 B69E Multiply by 10 3971 D8AF C838 B6B5 10 in floating binary 3976 D8B4 C83D B6B9 Divide by 10 3987 D8C5 C846 B6CA Perform divide-by 398C D8CA C851 B6CF Perform divide-into 3A1A D958 C8E1 B74B Unpack memory into accum#1 3A3F D97D C906 B76B Pack accum#1 into memory 3A74 D9B2 C93B B79B Move accum#2 to #1 3A84 D9C2 C94B B7AB Move accum#1 to #2 3A93 D9D1 C95A B7BA Round accum#1 3AA3 D9E1 C96A B7CA Get accum#1 sign 3AB1 D9EF C978 B7D8 Perform SGN 3AD0 DA0E C997 B7F5 Perform ABS 3AD3 DA11 C99A B7F8 Compare accum#1 to memory 3B13 DA51 C9DA B831 Floating-to-fixed 3B44 DA82 CA0B B862 Perform INT 3B6B DAA9 CA32 B887 Convert string to floating-point 3C0A DB3B CABD B912 Get new ASCII digit 3C3F DB70 CAF2 B947 Constants 3C4E DB7F CB01 B953 Print IN, then: 3C55 DB86 CB0C B95A Print Basic line # 3C69 DB9A CB1C B96E Convert floating-point to ASCII 3D99 DCCA CC4C BA96 Constants 3DC2 DCF3 CC75 BAAC Perform SQR 3DCC DCFD CC7F BAB6 Perform power function 3E05 DD36 CCB8 BAEF Perform negation 3E10 DD41 CCC3 BAFA Constants 3E3E DD6F CCF1 BB1B Perform EXP 3E91 DDC2 CD44 BB6E Series evaluation 3EDB DE0C CD8E BBB8 RND constants 3EE3 DE14 CD96 BBC0 Perform RND 3F1F CDD2 BBFC Perform COS 3F26 CDD9 BC03 Perform SIN 3F6F CE22 BC4C Perform TAN 3F9B CE86 BC78 Constants 3FD3 BC99 Perform ATN 4003 BCC9 Constants 4041 DE50 CE86 BCEE CHRGET sub for zero page Remaining routines are Basic startup.