Dokumentera skapare i batch (1 / 2 steg)
Steg 1: kod
SETLOCAL enableextensions enabledelayedexpansion
titeln dokumentskapare
färg f0
: Intro
CLS
ECHO Välkommen till Prof. Pickle "dokumentskapare".
ECHO.
ECHO här är dina alternativ:
ECHO 1) skapa ett nytt dokument
Upprepa 2) fortsätta med ett befintligt dokument
Upprepa 3) Visa ett befintligt dokument
ECHO 4) ta bort ett befintligt dokument
Upprepa 5) byta namn på ett befintligt dokument
Upprepa 6) Exit
Val/c 1234/n
CLS
om % errorlevel % equ 1 goto titel
om % errorlevel % equ 2 goto fortsätter
om % errorlevel % equ 3 goto finns
om % errorlevel % equ 4 gå till tar bort
om % errorlevel % equ 5 goto byter namn på
om % errorlevel % equ 6 goto avslutar
rem sätta rubriken på dokumentet.
: titel
ställa in /p titel = Title (inte kan ha blanksteg):
rem kontrollera om en förlängning har lagts till (och lägga till ".txt" om det inte).
ställa in check1 =! titel: ~-4,1!
Ange check2 =! titel: ~-3,1!
om % check1% neq. om % check2% neq. ställa in title=%title%.txt
ställa in num = 0
rem kontrollera om en fil som redan titeln exisits.
om finns % title % goto ogiltig
rem att göra innehållet i dokumentet.
: linjer
CLS
Ange/a num = % num % + 1
CLS
om % num % gtr 1 ()
ECHO arbete hittills:
ECHO.
om % num % gtr 1 typ titeln %
ECHO.
ECHO.
ECHO.
)
som /p linje = innehållet i raden % num %:
gå till skapa
rem-dokumentet.
: skapa
ECHO % raden till % >> "% title %"
Ange raden =
CLS
ECHO alternativ:
ECHO 1) Fortsätt
Upprepa 2) Discontinue (ta bort fil och gå tillbaka till menyn)
Upprepa 3) gå tillbaka till main
ECHO 4) Exit
Val/c 123 /n
om % errorlevel % equ 1 goto linjer
om % errorlevel % equ 2 gå till Kent
om % errorlevel % equ 3 goto intro
om % errorlevel % equ 4 goto avslutar
rem informerar dig om att det redan finns en fil för din titel.
: ogiltig
CLS
ECHO A dokument med titeln "% title %" redan finns, plocka en ny.
gå till titel
: apparaten
del % title %
Exit
: avsluta
Exit
: fortsätta
CLS
ECHO Obs: filen måste vara i samma katalog.
Ställ in /p namn = filnamn (och tillägg):
om inte finns % namn % goto invalid2
: linjer2
CLS
typen % name %
ECHO.
ECHO.
som /p linje = nästa rad:
ECHO % raden till % >> "% namn %"
CLS
ECHO 1) Fortsätt
Upprepa 2) Discontinue (avsluta och ta bort filen)
Upprepa 3) gå tillbaka till main
ECHO 4) Exit (spara och avsluta)
Val/c 123 /n
om % errorlevel % equ 1 goto linjer2
om % errorlevel % equ 2 goto discon2
om % errorlevel % equ 3 goto intro
om % errorlevel % equ 4 goto avslutar
: discon2
del % name %
Exit
: finns
CLS
Ange /p = ange namnet (och förlängning) av filen du vill visa:
om inte finns % Visa % goto invalid3
CLS
Visa typ %
ECHO.
ECHO.
ECHO tryck på valfri tangent för att gå till menyn
Pausa > nul
goto Intro
: invalid3
CLS
ECHO finns ingen fil med samma namn
ECHO.
ECHO tryck på valfri tangent för att gå tillbaka
Pausa > nul
goto Intro
: ta bort
CLS
ställa in /p del = namnet på den fil du vill att borttagna (och förlängning):
om inte finns % del % goto invalid3
CLS
del del %
ECHO dokumentet har tagits bort
ECHO.
ECHO.
ECHO tryck på en knapp för att gå tillbaka
Pausa > nul
gå till intro
: byta namn
CLS
Ange /p rename = Välj namnet på dokumentet vars namn du vill ändra (och förlängning):
om inte finns % Byt namn % goto invalid3
CLS
ställa in /p newname = Skriv det nya namnet dokument (och förlängning):
om finns % newname % goto invalid4
ställa in check1 =! newname: ~-4,1!
Ange check2 =! newname: ~ 3, 1!
om % check1% neq. om % check2% neq. ställa in newname=%newname%.txt
ren % Byt namn % % newname %
CLS
ECHO tryck på valfri tangent för att återgå till main
Pausa > nul
goto Intro
: invalid4
CLS
ECHO finns redan en fil namn % newname %.
ECHO.
ECHO tryck på valfri tangent för att gå tillbaka
Pausa > nul
gå till namnbyte
Det var allt. Än en gång berätta för mig om du behöver något (tonvikt på något).