@echo off
setlocal enabledelayedexpansion

set a[0]=arici
set b[0]=4
set a[1]=pom
set b[1]=3
set a[2]=tezaur
set b[2]=6

set /p user=Numele utilizatorului:
echo Hello %user%

set /a i=(%random%*3/32768)
set /a nr=!b[%i%]!
set cuvant=!a[%i%]!
echo trebuie sa ghicim cuvantul %cuvant% care are %nr% litere distincte

set /a incercari=0
set /a nrCorecte=0
:loop
	set /p litera=Introduceti o litera 
	
	call set cuvantNou=%%cuvant:%litera%=%%
	::set cuvantNou=!cuvant:%litera%=!
	if "%cuvantNou%" == "%cuvant%" (
		echo Litera nu este continuta in cuvant
		set /a incercari+=1 
	) else (
		echo Litera este continuta in cuvant
		set /a nrCorecte+=1) 
	
	if %nrCorecte% equ %nr% goto castigat 

	if %incercari% equ 5 goto spanzurat
	
	set /a ramase=5-%incercari%
	echo mai ai inca %ramase% incercari
	echo.
goto loop

:spanzurat
	echo ai pierdut
	echo.
	goto final

:castigat
	echo ai castigat cu %incercari% incercari gresite
	echo.
	echo %incercari% %user% >> spanzuratoare.txt 

:final
	echo afisam top 3 al utilizatorilor:
	sort spanzuratoare.txt > spanzuratoareSortat.txt
	set /a counter=0

	for /f "delims=*" %%l in (spanzuratoareSortat.txt) do (		
		echo %%l
		set /a counter+=1
		if !counter! equ 3 goto end
		)
:end