Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.11.2012, 21:05   #1
xxxSEREGAxxx
 
Аватар для xxxSEREGAxxx
 
Регистрация: 26.11.2012
Сообщений: 9
Вопрос сделать игру в Паскале

Помогите сделать задание. Его нужно выполнить в Pascal.
Вот задание:
Игра в кости "КРЕПС" предлагает, что игрок бросает две кости. Каждая кость имеет шесть граней. Эти грани помечены как 1,2,3,4,5и 6. После бросания вычисляется сумма цифр двух верхних граней. Если сумма после первого броска 7 или 11, игрок выиграл. Если после первого броска сумма броска 2,3 или 12, (это называется "КРЭПС"), игрок проиграл (выиграл банк). Если после первого броска сумма равна 4,5,6,8,9 или 10 эта сумма становится "очками" игрока. Чтобы выиграть, игрок должен продолжать бросать кости до тех пор, пока не выпадет сумма, равна его очкам. Игрок проигрывает, если во время этих бросков выпадает сумма 7.
Заранее спасибо!
xxxSEREGAxxx вне форума Ответить с цитированием
Старый 26.11.2012, 21:30   #2
Poma][a
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 3,882
По умолчанию

Еще раз.
Я бросил кубик, у меня 7 или 11 - я выйграл

Играем 2 раз, у меня выпало 2, 3 или 12 - я проиграл

Играем 3 раз, у меня 9. И так у меня 9 очков.
Я бросаю снова, дотех пор пока не выподет 9 или 7 так? Если 9 - то я выйграл, если 7 я проиграл.
Poma][a вне форума Ответить с цитированием
Старый 26.11.2012, 21:40   #3
xxxSEREGAxxx
 
Аватар для xxxSEREGAxxx
 
Регистрация: 26.11.2012
Сообщений: 9
По умолчанию

Цитата:
Сообщение от Poma][a Посмотреть сообщение
Еще раз.
Я бросил кубик, у меня 7 или 11 - я выйграл

Играем 2 раз, у меня выпало 2, 3 или 12 - я проиграл

Играем 3 раз, у меня 9. И так у меня 9 очков.
Я бросаю снова, дотех пор пока не выподет 9 или 7 так? Если 9 - то я выйграл, если 7 я проиграл.
Выходит что так!
Если честно я сам не понял нечего я списал задание просто которое мне дали!

Последний раз редактировалось xxxSEREGAxxx; 26.11.2012 в 21:47.
xxxSEREGAxxx вне форума Ответить с цитированием
Старый 26.11.2012, 21:55   #4
Poma][a
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 3,882
По умолчанию

Цитата:
После бросания вычисляется сумма цифр двух верхних граней.
А это как?
Poma][a вне форума Ответить с цитированием
Старый 27.11.2012, 00:30   #5
isqoff
Пользователь
 
Регистрация: 31.05.2010
Сообщений: 12
По умолчанию

реализация костей графически?
isqoff вне форума Ответить с цитированием
Старый 27.11.2012, 00:37   #6
isqoff
Пользователь
 
Регистрация: 31.05.2010
Сообщений: 12
По умолчанию

прочитал правила дааа... проще покер на костях написать
isqoff вне форума Ответить с цитированием
Старый 27.11.2012, 07:09   #7
Poma][a
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 3,882
По умолчанию

Нет. В целом-то всё супер просто, Но
Цитата:
после бросания вычисляется сумма цифр двух верхних граней.
Вот это фиг поймешь
Вот на рисунке, что будет являться верхними гранями
Изображения
Тип файла: jpg Безымянный.jpg (15.5 Кб, 144 просмотров)
Poma][a вне форума Ответить с цитированием
Старый 27.11.2012, 07:45   #8
xxxSEREGAxxx
 
Аватар для xxxSEREGAxxx
 
Регистрация: 26.11.2012
Сообщений: 9
По умолчанию

Цитата:
Сообщение от isqoff Посмотреть сообщение
реализация костей графически?
Я сегодня уточню в каком режиме делать. Но скорей всего не в графическом!
xxxSEREGAxxx вне форума Ответить с цитированием
Старый 27.11.2012, 11:06   #9
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Poma][a, неужели Вы никогда не играли в нарды или ЛЮБУЮ настольную игру, где очки определяются по выпавшему кубику (ту же Монополию, например) ?!
Если бросить кубик на стол, не кажется очень вероятным, что кубик остановится на одной из своих граней? Так вот, та грань, которая лежит на поверхности, является нижней, а очки смотрим на противоположной грани, той, которая находится вверху.

Всё ещё не понятно? Тогда смотрите Dice1.exe: Dice1_exe.rar


написано на Delphi с использованием JEDI (конкретно, TJvDice (наследник RxDice)...)

Последний раз редактировалось Serge_Bliznykov; 27.11.2012 в 11:09.
Serge_Bliznykov вне форума Ответить с цитированием
Старый 27.11.2012, 11:57   #10
TinMan
Форумчанин
 
Аватар для TinMan
 
Регистрация: 05.09.2011
Сообщений: 869
По умолчанию

Ром, обрати внимание на жирное слово (цитирую заглавный пост темы)
Цитата:
Сообщение от xxxSEREGAxxx Посмотреть сообщение
игрок бросает две кости.
))

addenium:
В этой игре абсолютно НИЧЕГО не зависит от игрока (если, конечно, он не умеет выбрасывать нужную комбинацию). Интересно просчитать вероятность: кто выигрывает чаще - игрок или банк?
Предпочитаю на "ты".

Последний раз редактировалось TinMan; 27.11.2012 в 12:28.
TinMan вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Хочется сделать игру =( lux16 Gamedev - cоздание игр: Unity, OpenGL, DirectX 13 01.08.2012 09:45
Я создал игру типо марио и хочу сделать её по сети как это сделать? rbkmz Работа с сетью в Delphi 7 14.05.2012 15:58
Пишу игру на паскале. Deniska_777 Помощь студентам 3 01.03.2011 19:59
Хочу сделать online игру superyo Gamedev - cоздание игр: Unity, OpenGL, DirectX 80 31.12.2010 21:02
написать игру LINES в паскале Настёна Фриланс 7 23.06.2008 23:40