:Run_1
cls
echo ви вижили, щоб битися іншим разом.
pause
goto Start_1
:Fight_1
echo приготуйтеся до сутички.
Echo вороги раптово атакували вас.
set / panswer= натисніть 1, а потім натисніть Enter.
if %answer%==1 goto Fight_1_Loop
:Fight_1_Loop
set /a num=%random%
if %num% gtr 4 goto Fight_1_Loop
if %num% lss 1 goto Fight_1_Loop
if %num%==1 goto Lose_Fight_1
if %num%==2 goto Win_Fight_1
if %num%==3 goto Win_Fight_1
if %num%==4 goto Win_Fight_1
:Lose_Fight_1
cls
echo ви програли. Зіграти ще раз?
pause
goto Menu
:Win_Fight_1
cls
echo ви перемогли!
set / p answer=хочете зберегти гру? [д / н]
if %answer%== ' д 'goto 'Save'
if %answer%== 'н' goto 'Start_2'
:Save
goto Start_2