NXHDR.MAC;4/au/-bf=[13,10]NXHDR.MAC;1 -11,11,/;DLE001/ $VERSION x0204 -56,65,/;DLE001/ ; ASSUME M.ESQN,0 ; ASSUME M.EFNU,M.ESQN+2 ; ASSUME M.EFSQ,M.EFNU+2 .NXHDR:: mov #.hdbuf,r1 ; Point to header area MOV h.segn(R1),-(SP) ; PUSH EXTENSION SEGMENT NUMBER MOV h.efnu(R1),R0 ; GET EXTENSION FILE NUMBER BEQ 30$ ; BRANCH IF NONE MOV h.efsq(R1),-(SP) ; SAVE EXTENSION FILE SEQUENCE NUMBER -108,108,/;DLE001/ CMPB (SP)+,m.esqn(R1) ; CHECK THE SEGMENT NUMBER /