1300 IF GRNX-1 THEN KE=5 : B$=">=1 y <="+STR$(NXX-1) :