-53,54 ACCOUNT=1 ;GENERATE USER NAME ACCOUNTING INFO IAS=1 ;GENERATE IAS VERSION -56,57 ;RSX11M= 1 ;GENERATE RSX11M VERSION QIOW=1 ;USE THE QIOW DIRECTIVE -157,157 DEFUIC= 10 ;BNMMOD POSITION IN PROFILE RECORD OF -302,302 .ASCII /,/ -308,308 .ASCII / / ;MBK002 -310,310 .ASCII / / ;MBK002 -558 MOV MAX+INBUF,R1 ;IS THERE AN ALLOCATION LIMIT ? BEQ S0 ;NO - CONTINUE MOV NODPTR,R0 ;YES - POINT TO INFO NODE CMP R1,N.AL+2(R0) ;IS USER OVER ALLOCATION LIMIT ? BGE S0 ;NO - CONTINUE MOV #GREEDY,NOTPTR ;YES - LET 'EM HAVE IT S0: -944,944 -945 JSR PC,$CBDMG -977,977 MOV #1200.,MAX+OUTBUF ;SET MAXIMUM # OF BLOCKS TO 1200 /