1490 INPUT "** TRANSFORMACION INTERRUMPIDA - Valores<=0",A$ : RETURN