2185 IF Y>=VC(1,M) AND Y<VC(2,M) THEN NXV(M)=NXV(M)+ND:PM(M)=PM(M)+ND*X :