Curriculum
This System Software program demonstrates a sequence of instructions in SIC/XE that will read a record into a buffer.
| Line Number | Code | Comments |
|---|---|---|
| 1 | JSUB RDREC | |
| 2 | RDREC LDX #0 | |
| 3 | LDT #100 | |
| 4 | LDS #0 | |
| 5 | RLOOP TD INDEV | |
| 6 | JEQ RLOOP | |
| 7 | RD INDEV | |
| 8 | COMPR A, S | |
| 9 | JEQ EXIT | |
| 10 | STCH BUFFER, X | |
| 11 | TIXR T | |
| 12 | JLT RLOOP | |
| 13 | EXIR STX LENGTH | |
| 14 | RSUB | |
| 15 | INDEV BYTE X ‘F1’ | |
| 16 | LENGTH RESW 1 | |
| 17 | BUFFER RESB 100 |