BASIC-16A

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

2948 * ......RETURN IF NOT TERMINAL DELIMITER (: OR C/R) 2949 * ......RETURN IF TERMINAL DELIMITER (: OR C/R) 2950 * 2951 * 2952 03173 0 000000 DLCK DAC ** 2953 03174 0 11 00422 CAS C272 TEST FOR COLON 2954 03175 -0 01 03173 JMP* DLCK NO....TAKE FIRST RETURN 2955 03176 0 12 03173 IRS DLCK YES...INCREMENT TO TAKE SECOND RETURN 2956 03177 0 11 00401 CAS C215 TEST FOR CARRIAGE RETURN 2957 03200 -0 01 03173 JMP* DLCK NO....RETURN 2958 03201 0 12 03173 IRS DLCK YES...INCRENENT FOR SECOND RETURN 2959 03202 -0 01 03173 JMP* DLCK RETURN 2960 * 2961 * 2962 EJCT