:room
@cls
@type room.txt
@echo Вы в своей комнате.
@echo Ваш ход:
@echo с - включить компьютер
@if %plog%==2 goto room_0
@if %plog%==5 goto room_0
@goto room_1
:room_0
@echo r - разобраться в распечатках
:room_1
@if not %unfsb%==2 goto room_2
@echo u - рассмотреть обломки НЛО
:room_2
@echo z - звонить знакомому кул-хацкеру
@echo k - идти на кухню
@echo s - идти на улицу
@echo q - выйти из игры USERCRAFT
@choice /c:cqrkszu /n
@if errorlevel 7 goto ufo
@if errorlevel 6 coolhack
@if errorlevel 5 street
@if errorlevel 4 kitchen
@if errorlevel 3 goto print
@if errorlevel 2 goto end
@if errorlevel 1 computer
:print
@if %plog%==2 goto print_0
@if %plog%==5 goto print_0
@goto room
:print_0
@if %potato%==1 goto print_1
@cls
@echo Лениво мне разбираться во всем этом на пустой желудок.
@pause
@goto room
:print_1
@if %drink%==1 goto print_2
@cls
@echo А у меня во рту пересохло. Может стоит что-нибудь выпить?
@pause
@goto room
:print_2
@if %plog%==5 goto look
@echo Жуть какая-то. С этим лучше позвонить знакомому кул-хацкеру
@pause
@goto room
:look
@cls
@set plog=6
@echo Вы прочли логи и обрадовались. Среди прочей дребедени там есть
@echo пароль для доступа к пентагоновскому серверу из интерета,
@echo и говорится, что на том сервере хранится какая-то жутко
@echo секретная информация. Вот как.
@pause
@goto room
:ufo
@if not %unfsb%==2 goto room
@cls
@echo Вы нашли крутой артифакт: PCI плата непонятного назначения и компашка
@echo видимо с драйверами и программами для нее, а так же какая-то коробочка,
@echo которая подсоединяется к выходу карты. Вы установили ее себе на компьютер
@echo и запустили компашкин autorun.
@pause
@artifact
:end
@choice Вы действительно хотите выйти из игры
@if errorlevel 2 goto room
@end