@echo off
setlocal enabledelayedexpansion
set /A rednibroj=1
set /A rbr=1
:meni
echo Odaberite opciju
echo 1. Kreiraj direktorijum
echo 2. Kreiraj fajl
echo 3. Unesi podatke o programu u fajlu o formatu redni broj, datum, naziv
echo 4. Provjeri duplikate i upisi u drugi fajl
echo 5. Ispisi tako da preskocis cetiri i u obrnutom redoslijedu redne brojeve
echo 6. Upisi brojeve dok ne uneses kraj i nadji maksimalni
set /P opcija=

if !opcija!== 1 (
if exist "D:\ARIOS\DIREKTORIJUM\" (
echo Direktorijum vec postoji
goto :meni
) else (
echo Kreiranje direktorijuma...
mkdir "D:\ARIOS\DIREKTORIJUM\"
echo Direktorijum kreiran..
goto :meni
)
)

if !opcija!== 2 (
if exist ListaPrograma.txt (
echo Fajl vec postoji!
goto :meni
) else (
echo Kreiranje fajla...
type nul > ListaPrograma.txt
echo Fajl je kreiran!
goto :meni
)
)
if !opcija!== 3 (
if exist ListaPrograma.txt (
echo Unesite naziv programa
set /P naziv=

echo !rbr! !date! !naziv! >> ListaPrograma.txt
set /A rbr=rbr+1
echo Program !naziv! je upisan u fajl!
goto :meni
) else (
echo Fajl ne postoji. Kreirajte fajl!
goto :meni
)
)
if !opcija!== 4 (
if exist ListaPrograma.txt (
echo Unesite naziv programa za pretragu
set /P pretraga=

echo Broj ponavljanja programa !pretraga! je
findstr !pretraga! "ListaPrograma.txt" | find /c "!pretraga!"
if errorlevel 1 (
echo Program se !pretraga! ne nalazi u fajlu
goto :meni
) else (
echo !rednibroj! !pretraga! !date! >> PronadjeniProgrami.txt
set /A rednibroj=rednibroj+1
goto :meni
)
) else (
echo Fajl ne postoji. Kreirajte fajl!
goto :meni
)
)

if !opcija!== 5 (
if exist PronadjeniProgrami.txt (
find /f "tokens=2 " %%i in (PronadjeniProgrami.txt) do (
set/A brojredova=brojreova+1
)
find /F "skip=3 tokens=4 " %%k in (PronadjeniProgrami.txt) do (
echo !brojreova! %%k
set/A brojredova=brojredova-1
)
) else (
echo Fajl ne postoji!
goto :meni
)
)

endlocal

pause >nul