1685 IF FPX=1 THEN KE=5: B$=">0 y <1": GOSUB 900 : KE=1 :