PDA

Показать полную графическую версию : RussianRoulette


q2w3
14-01-2015, 23:11
Помогите доделать программу
она должна симулировать русскую рулетку.
При запуске должна запрашивать число(оно будет размером барабана от 1 и до скольки угодно, то есть мин=1, а мах- произволен)
допустим создаем массив, и в начале игры одному из чисел(из заданного промежутка) дается единичка(это пуля), всем остальным нули, и давим энтер пока кто то не попадает на число с 1.

как заставить программу запрашивать размер барабана
как создать массив для барабана
и как фиксировать пулю?

Знаю как должно быть, но программировать на этом языке почти не умею вот и нужно помощь с этим :dont-know

@echo off

:hra



set valec=%random%

set naboj=%random%

echo %valec%
echo Zaciname!
pause>nul
cls
set n=
for %%i in (%valec%) do set/a n+=1

:vystrel

set/a n-=1
if %n% equ 0 (
echo valec je prazdny.
echo %valec% -- naboj!
pause>nul
cls
goto hra
)
for /f %%i in ('
"powershell get-random %valec%"
') do set náhoda=%%i
title %
call set válec=%%valec:, %nahoda%=%%
call set válec=%%valec:%nahoda%, =%%
echo %valec%
if %nahoda% equ %naboj% (
echo %nahoda% -- naboj!
pause>nul
cls
goto hra
) else (
echo %nahoda%
pause>nul
cls
goto vystrel
)
nahoda-случай
valec-барабан револьвера
naboj-пуля
hra-игра

Iska
14-01-2015, 23:35
но программировать на этом языке почти не умею »
Тогда бросьте это и начинайте сразу изучать PowerShell:
powershell get-random »




© OSzone.net 2001-2012