TPD P7ù+¾Ȳ ¾ÈÚ¸@>********************************************************** >. * TAPE EXTENSION TO PDT(TPD) 06/02/80 .>********************************************************** > DORG PDTSIZTPDPRB BYTE 0  *FM PRBTPDERR BYTE 0 € *ERROR CODETPDPOP BYTE 0  *OPCODETPDLUN BYTE 0  *LUNO$TPDSFG BYTE 0  *SYSTEM FLAGS$"TPDUFG BYTE 0  *USER FLAGS"&TPDBUF DATA 0  *BUFFER ADDRESS&&TPDRCL DATA 0  *RECORD LENGTH &T *@(TPDCCT DATA 0  *CHARACTER COUNT (TPDADU DATA 0  *ADU # &TPDSCT DATA 0  *SECTOR OFFSET & TPDSVS DATA 0 SAVED STATUS (TPDMAJ DATA 0  MAJOR ERROR COUNTER ((TPDMIN DATA 0  MINOR ERROR COUNTER (TPDSÀ"RD BYTE 0  *SECTORS / RECORD"&TPDRTK BYTE 0  *RECORDS / TRACK &$TPDWRD DATA 0  *WORDS / RECORD$"TPDTIL BSS8*2 TILINE IMAGE"*TPDCNT EQUTPDTIL+8CHARACTER COUNT *.TPDCMD EQUTPDTIL+12  UNIT SELECT / COMMAN.À D WORD .TPDIBF BSS3*2  *INITIALIZATION BUFFER ..TPDFCB DATA 0  *POINTER TO VCATALOG FCB ."TPDVNM BSS8  *VOLUME NAME ".TPDFMT DATA 0  *FILE MANAGER TSB ADDRESS .0TPDFMW DATA 0  *FILE MANAGER TASK AREA ADDR 0À 4TPDPBM DATA 0  *DISC MANAGER TABLE/BUFFER ADDR 4(*  *(NON-ZERO = DISC INSTALLED) (,TPDMAD DATA 0  *MAX # OF ADU'S ON DISC,$TPDSAD DATA 0  *SECTORS / ADU $2TPDDRS DATA 0  *DEFAULT PHYSICAL RECORD SIZE 2À,TPDECT DATA 0  *DISC UNIT ERROR COUNT ,,TPDTFL BSS8  *TEMP FILE NAME SEED ,2TPDSLG BSS16 *TILINE IMAGE FOR SYSTEM LOG 2TPDFLG DATA 0  *FLAGS 0TPDSIZ EQU$  *DISC PDT + EXTENSION SIZE 0* ' ROR€G "  PAGE "  R10 - DSR SCRATCH &&PDTR11 BSS2  R11 - DSR SCRATCH &0PDTCRU BSS2 R12 - CRU OR TILINE ADDRESS 0$PDTR13 DATA $-$ R13 - SAVED WP$$PDTR14 DATA $-$ R14 - SAVED PC$PDTR15 DATA $-$ R15