Paso 1: código de
setlocal enableextensions enabledelayedexpansion
título documento creador
color f0
: Intro
CLS
echo Bienvenido al «Documento creador» de profesor Pickle.
echo.
echo aquí son sus opciones:
Eco 1) cree un nuevo documento
echo 2) continuar con un documento existente
echo 3) ve un documento existente
echo 4) borrar un documento existente
Eco 5) cambiar el nombre de un documento existente
Eco 6) salida
Choice /c 1234/n
CLS
Si % errorlevel % equ 1 goto título
% errorlevel % equ 2 goto continuar
Si existe % errorlevel % equ 3 goto
Si elimina % errorlevel % equ 4 goto
Si cambiar el nombre de % errorlevel % equ 5 goto
Si % errorlevel % equ 6 goto salir
Rem ajuste el título del documento.
: título
Set /p title = título (no puede tener espacios):
Rem comprobar si se ha añadido una extensión (y añadiendo ".txt" si no lo ha hecho).
establecer check1 =! título: ~-4, 1!
establecer check2 =! título: ~-3,1!
Si % check1% neq. Si % check2% neq. Set title=%title%.txt
conjunto num = 0
Rem comprobar si un archivo de ese título ya existe.
Si existen % title % goto no válido
REM que el contenido del documento.
: líneas
CLS
Set /a num % num % = 1
CLS
Si () % num % gtr 1
echo el trabajo hasta ahora:
echo.
Si % num % gtr tipo 1% título %
echo.
echo.
echo.
)
Set /p línea = contenido de línea % num %:
Goto crear
Rem crear el documento.
: crear
línea de echo % >> «% title %»
línea set =
CLS
Eco de opciones:
Eco 1) continuar
echo 2) deje de (eliminar el archivo y volver a menú)
echo 3) volver a principal
echo 4) salida
Choice /c 123 /n
Si % errorlevel % equ 1 goto líneas
Si % errorlevel % equ 2 goto discon
Si % errorlevel % equ 3 goto intro
Si % errorlevel % equ 4 goto salir
REM que le informa que ya existe un archivo de su título.
: no válido
CLS
documento de echo A con el título "% title %" ya existe, elegir uno nuevo.
título de Goto
: desconectado
del % title %
salida
: salida
salida
: continuar
CLS
echo Nota: archivo debe estar en el mismo directorio.
Set /p nombre = nombre de archivo (y extensión):
Si no existe % nombre % goto invalid2
: lines2
CLS
tipo % nombre %
echo.
echo.
Set /p line = línea siguiente:
línea de echo % >> '% nombre %'
CLS
Eco 1) continuar
echo 2) deje de (salir y eliminar el archivo)
echo 3) volver a principal
echo 4) Exit (guardar y salir)
Choice /c 123 /n
Si % errorlevel % equ 1 goto lines2
Si % errorlevel % equ 2 goto discon2
Si % errorlevel % equ 3 goto intro
Si % errorlevel % equ 4 goto salir
: discon2
del % nombre %
salida
: existen
CLS
Set /p ver = escriba el nombre (y extensión) del archivo que desea ver:
Si no existe % vista % goto invalid3
CLS
vista de tipo %
echo.
echo.
echo Pulse cualquier tecla para volver al menú
PAUSE > nul
Goto Intro
: invalid3
CLS
echo que archivo de ese nombre No existe
echo.
echo presione cualquier tecla para regresar
PAUSE > nul
Goto Intro
: eliminar
CLS
Set /p del = nombre del archivo eliminado (y extensión):
Si no existe % del % goto invalid3
CLS
del % del %
echo que se ha eliminado el documento
echo.
echo.
echo Presione una tecla para regresar
PAUSE > nul
Goto intro
: cambiar el nombre de
CLS
Set /p rename = Seleccione el nombre del documento cuyo nombre desea cambiar (y extensión):
Si no existe % renombrar % goto invalid3
CLS
Set /p newname = escriba el nuevo nombre del documento (y extensión):
Si existen % newname % goto invalid4
establecer check1 =! newname: ~-4, 1!
establecer check2 =! newname: ~ 3, 1.
Si % check1% neq. Si % check2% neq. Set newname=%newname%.txt
cambiar nombre de % s % % newname %
CLS
echo presione cualquier tecla para volver a principal
PAUSE > nul
Goto Intro
: invalid4
CLS
echo que ya existe un archivo de nombre % newname %.
echo.
echo presione cualquier tecla para regresar
PAUSE > nul
cambiar el nombre de Goto
Eso es todo. Una vez más, dime si necesitas algo (énfasis en nada).