4790 PRINT: INPUT "Nombre del Archivo a Grabar (.EST) = ",A$