:hk
@cls
@type phone.txt
@echo Кул-хацкер на проводе. Говорите.
@echo k - как жизнь, как дела?
@if not %plog%==2 goto hk_1
@echo p - помоги разобраться в пентагоновских логах
:hk_1
@if not %plog%==6 goto hk_2
@if not %icw%==1 goto hk_2
@echo h - помоги залезть пентагон
:hk_2
@echo n - было приятно с тобой по болтать
@choice /c:npkh /n
@if errorlevel 4 goto hak
@if errorlevel 3 goto kak
@if errorlevel 2 goto helpme
@if errorlevel 1 room
:helpme
@set plog=3
@echo - Ну приезжай ко мне, разберемся.
@pause
@goto hk
:kak
@echo - Да все нормально. У тебя, надеюсь, тоже?
@echo - Угу.
@pause
@goto hk
:hak
@if %plog%==6 if %icw%==1 goto hak_2
@goto hk
:hak_2
@set icw=2
@set plog=6
@echo О, ну конечно. Я сейчас как раз свежий крякер инета написал.
@echo Куда хоть лезть?
@echo - Вы сообщили ему все необходимые подробности.
@echo - Тогда полезли прямо сейчас! Жду тебя там.
@pause
@goto hk