@set ufos=0
:art
@cls
@type artifact.txt
@echo            Wellcome INTERGALLACTIC INFORMATION CHANNEL !
@echo Your status: the Earth, human, american, Pentagon.
@echo Available commands: send information stream, receive information stream,
@echo routing, help, quit.
@echo Please, enter command.
@echo _
@echo Что будем делать?
@echo r - прочитать что-нибудь из межгаллактической сети
@echo s - послать на весь космос сообщение, что американцы - лохи
@echo o - выбрать ретранслятор
@echo h - читать хелп
@echo q - выключить программу
@choice /c:hqsor /n
@if errorlevel 5 goto red
@if errorlevel 4 goto opt
@if errorlevel 3 goto sent
@if errorlevel 2 computer
@echo Help files not found. Please, reinstall program.
@pause
@goto art
:sent
@if %ufos%==1 goto sent_2
@echo Sorry, currently selected retranslator is not available. Try another.
@pause
@goto art
:opt
@cls
@type artifact.txt
@if %ufos%==1 goto retr1
@echo Current retranslator: X9A6FT34#4EL-13OP$A64XVM (not available)
@goto retr2
:retr1
@echo Current retranslator: X9A6FT34#4EL-13OP$A65HGM
:retr2
@echo Available retranslators:
@echo 1 - X9A6FT34#4EL-13OP$A65HGM (human, the earth, pentagon)
@echo Total: 1 retranslator(s)
@echo Select your retranslator.
@echo Ну, типа, нажми цифру "1".
@choice /c:1 /n
@if %ufos%==1 goto art
@choice Are you sure you want change current routnig?_
@if errorlevel 2 goto art
@set ufos=1
@echo Selected new retranslator: X9A6FT34#4EL-13OP$A65HGM
@pause
@goto art
:red
@type swap.txt
@choice /n /ty,1
@type swap.txt
@choice /n /ty,1
@type swap.txt
@choice /n /ty,1
@type swap.txt
@choice /n /ty,1
@type swap.txt
@echo Диск почти переполнился, так что пришлось все скаченное поудалять,
@echo все равно ничего не понятно.
@pause
@goto art
:sent_2
@cls
@echo Вы послали сообщение во все галлактики, что американцы - лохи.
@echo Вам пришел всего один ответ, в котором говорилось, что за спам
@echo в межгаллактическую сеть ваш ретранслятор будет взорван, а вместе
@echo с ним будет взорвано все в радиусе 5 километров.
@pause
@cls
@echo Поздравляем!
@echo Вы остановили коварные замыслы янки (взорвали их пентагон)
@echo и остановили пришельцев (их корабль тоже взорвали). Россия спасена.
@echo Да и остальные страны тоже (с них пиво).
@echo Вы прошли игру!
@echo .
@echo               ╔══╦══╗ ╦   ╦  ╔═══╗
@echo                  ║    ╠═══╣  ╠══
@echo                  ║    ║   ║  ║
@echo                  ╩    ╩   ╩  ╚═══╝
@echo        ═╗  ╔═   ╔══╗  ╦    ╦  ╔════╗ ╦    ╦
@echo         ║ ╔╝   ╔╝  ╚╗ ║    ║  ║      ║    ║
@echo         ╠═╣    ║    ║ ╠════╣  ╠═══╣  ║    ║
@echo         ║ ╚╗   ║    ║ ║    ║  ║      ║    ║
@echo         ║  ╚╗  ╚╗  ╔╝ ║    ║  ║      ║    ║
@echo        ═╝   ╚   ╚══╝  ╩    ╩  ╚════╝ ╚════╩╗
@echo .
@pause
@end
