*NOSEQ 
.PROC,SMF.
OFFSW(6)
WHILE,.NOT.SW6,SMFEX.
SMFEX.
DMB.
SMFEX,RECOVER.
ENDW,SMFEX.
EXIT.
DMB.
DMD.
DMD,377777.
SMFEX,RECOVER.