Código:
0 Hola como estas?
1 Como te llamas?
2 Que interestante!
3 en serio!
4 Que dices????
Script.bat
Código:
@Echo OFF & Setlocal EnableDelayedExpansion
Set "Answers=.\Respuestas.txt"
Call :GetAnswer
Echo !Answer!
Pause&Exit /B 0
:GetAnswer
For /F %%# In (
'Type "%Answers%" ^| Find /V /C ""'
) Do (
Set /A "MaxValue=%%#"
set /A "RandomAnswer=!RANDOM! %%!MaxValue!"
)
Set /A "Count=0"
For /F "UseBackQ Tokens=1,* Delims= " %%a In (
"%Answers%"
) Do (
If !Count! EQU !RandomAnswer! (
Set "Answer=%%~b"
)
Set /A "Count+=1"
)
GOTO:EOF
Saludos.