9728 IF IX>0 THEN CB=CB*IX