RSX-llM/S - RSX-1lM-PLUS Software Dispatch, January 1981 RSX-11IM V3.2 UTILITIES BRU 8 3,BLK,4111252 NOP CALL e3.BLK, »PSECT $5PATs, SMAPOF MOV ADD RETURN PAT4% » IDENT »PSECT »BLK.2, o Z,BLK,4632 o WORD »Z,BLK, » IDENT »PSECT »BLK,z, XSGNUMz,BLK,4103 Z, BLK,41120 CALL o Z,BLK,41564 MOV MCV eo 3.BLK, $SPATz, MCV MOV , CLRB RFETURM PAT5; Seg 5.1.17.14 M 4 of 5 3 CALL PATCH TO SET UP MAP AREA POINTER PAT4 $SPAT z 134 7 MAP AREA WORD OFFSET RO,MAPPTR 7 RESET THE POINTER TO THE RP MAP AREA % SMAPOF4YM,RTRVeM,ESON,MAPPTR 3 401.7/ 0 7 SHOW FIRST RITMAP BLOCK IN BUFFER /01,8/ PATS5 1 CALL PATCH TO SAVE TOTAL FILE SIZE ja, TOTSIZ,$ALLSZ 3 GET ALLOCATION SIZE FROM 1ST HEADER TOTSIZ42,$ALLS2%2 ; THIS PEPRESENTS THE ENTIRE FILE SIZE $SPAT ; zadiši, H,UFAT4F,HIRK(RO),TOTSI7 s SAVE TOTAL SIZE OF FILF H,UFATeF,HIAKs2(R0),TOTSIZ42 s FOR POSSIBLE USE LATER | XSGNUM 1 RESET EXTENSION SEGMENT NUMRER z JIB ES! hoče, 5I9,5sST9gAM.. |