2915 IF LNCM THEN KE=5 : B$=">=1 Y <="+STR$(NCM) :