BASIC-16A

* NAME: BASIC-16A DOC 70181826000 REV A PAGE 19

0669 00056 000000 ILT1 BSZ 1 INPUT EDITOR 0670 00057 000000 ILT2 BSZ 1 DITTO 0671 00060 000000 ILT3 BSZ 1 DITTO 0672 00061 000000 ADT1 BSZ 1 ASSIGN DIMENSIONED VARIABLE 0673 00062 000000 ADT2 BSZ 1 DITTO 0674 00063 000000 ADT3 BSZ 1 DITTO 0675 00064 000000 ADT4 BSZ 1 DITTO 0676 00065 000000 ADT5 BSZ 1 DITTO 0677 00066 000000 ADT6 BSZ 1 DITTO 0678 00067 000000 ADT7 BSZ 1 DITTO 0679 00070 000000 ADT8 BSZ 1 DITTO 0680 00071 000000 DPTR BSZ 1 LOCATE DIMENSIONED VARIABLE 0681 00072 000000 DCT1 BSZ 1 DITTO 0682 00073 000000 DCT2 BSZ 1 DITTO 0683 00074 000000 CHAR BSZ 1 LAST CHARACTER FETCHED 0684 00075 000000 LCHR BSZ 1 LAST CHARACTER STORED 0685 00076 000000 TMP1 BSZ 1 MISCELLANEOUS 0686 00077 000000 TMP2 BSZ 1 MISCELLANEOUS 0687 00100 000000 TMP3 BSZ 1 MISCELLANEOUS 0688 00101 000000 CON1 BSZ 1 PROGRAM BREAK POINT SAVE 0689 00102 000000 CON2 BSZ 1 PROGRAM BREAK POINT SAVE 0690 00103 000000 BRKF BSZ 1 PROGRAM BREAK FLAG 0691 00104 000000 DIMF BSZ 1 DIMENSION STATEMENT FLAG 0692 00105 000001 LODF OCT 1 MUST BE INITIALLY NONZERO OR ELSE!!!! 0693 00106 000000 LSTF BSZ 1 LIST MODE FLAG 0694 00107 VARN BSS 1 VARIABLE NAME STORAGE 0698 * 0699 * BUFFERS 0700 * 0701 00110 000000 SBUF BSZ 80 COMMAND INPUT BUFFER 0702 00230 000000 IBUF BSZ 80 DATA INPUT BUFFER 0703 000231 WORK EQU IBUF+1 OUTPUT EDITOR SCRATCH AREA 0704 00350 000000 RSTK BSZ 16 RETURN STACK 0705 * 0706 * 0707 * 0708 EJCT