2440 IF KNCX THEN KE=5 : B$=">=1 y <="+STR$(NCX) :