NOSUP:: MOV @2(R5),R1 MOV 4(R5),R0 MOV #1,R2 CALL $CBDMG RETURN .END