SRDDBF.MAC;2/AU=SRDDBF.MAC;1 \ -/.IDENT/,. .IDENT -6.3- ; 01-JUN-83 .ENABL LC -/VERIFIED:/ ; ; MODIFIED: RBD001: Bob Denny - Lower case messages (13-Jul-82) ; ; CEF001: Carl E. Friedberg - PSECTS for /MU (01-June-83) ; % -/.SBTTL LOCAL DATA/,,/;CEF001/ .PSECT SRDATA,RW,D,CON,REL,LCL -/MSG01:/,.+5,/;RBD001/ MSG01: .ASCII <15><12>"SRD -- Total blocks available = " BLKS: .BLKB 6 .ASCII ".*512. Byte blocks" .IF DF R$$11M&D$$CAL .ASCII <15><12>"NOTE: on RSX-11M systems, this is only the" .ASCII <15><12>"initial buffer size before memory expansion." -/.SBTTL START MAINLINE CODE/,,/;CEF001/ .PSECT SRDCOD,RO,LCL,I,REL,CON /