$FOR/LI:(DB0:CSMP5) DB0:CSMP5.FOR