Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

BlackJack [Delphi, Windows]

Страницы: 1 2 >
kblc © (2005-12-08 12:46:00)
Уважаемые мастера, может у кого уже есть наработки по игре BlackJack? Не могли бы вы мне скинуть их? А то я уже ну просто устал :(
Только не предлагайте пример " http://delphigfx.mastak.ru/game/bj.rar" - очень нехороший пример.
Заранее большое спасибо.

П7 (2005-12-12 11:18:00) [1]

> kblc © (12.12.05 07:24) [23]

Я не Shastox, но предельно просто. Ты наверняка не юзаешь классы на все 100.
Уверен, что у тебя класс - это по сути "рЕкорд со встроенными функциями"! (:
Вот ты эти функции вынеси - и получится без классов. (:

kblc (2005-12-12 07:24:00) [2]
Показал то что успел, недовольны... - не всё работает. Доделывать надо...

Shastox, ну так расскажи как это можно сделать БЕЗ КЛАССОВ!

Shastox (2005-12-10 13:45:00) [3]

> kblc © (09.12.05 07:23) [12]

> П7, так видимо я чел который хочет быстро срубить бабла?
>

Если ты делешь кому-то, то да

Shastox (2005-12-10 13:04:00) [4]

> TCard, TDeck(array of TCard), TDeckLeft(TDeck) {угол}, TImageEx
> {добавил CM_MOUSEENTER, CM_MOUSELEAVE и ещё много чего},
> TImageBox(TImageEx) {Отрисовка картинки бокса, количества
> очков бокса, карт и фишек на боксе(карты и фишки ещё не
> сделал)}, TBox(TBoxImage) {сам бокс. на нём и застрял}..
> . и ещё много чего... осталось это всё связать... а на это
> у меня как раз нету времени...

Ну ты даешь...
Повторюсь, все это можно за пару часов сделать и без твоих классов.

kblc (2005-12-10 09:18:00) [5]
на данный момент не могу достаточно точно задать вопрос... там есть маленькая сложность... когда я с ней разберусь - тогда спрошу "правильно" ;)

Фео (2005-12-09 18:45:00) [6]
П7, :)

П7 (2005-12-09 16:00:00) [7]

> Фео (09.12.05 14:57) [17]

Балин, харошь умничать, классовый расист, блин, нашёлся! (:

> kblc © (09.12.05 13:44) [16]

Что значит "правильно"?
Грузишь всю графику в TBitmap'ы. Далее рисуешь эти битмэпа на своём TImageEx в том порядке, в котором тебе это нужно.

Разделение одного бокса на 2. Не совсем понятно, что имеется в виду. Но предположим, что я понял. (:
Есть массив карт (бокс - b), скажем от 0 до 35. Нужно разделить его на 2 массива разной длинны.

размер первого бокса (b1) = 36/2+random(10)-5
размер второго бокса (b2) = 36-b1

далее имеем 2 массива b1a и b2a

for i := 0 to b1-1 do
b1a[i] := b[i];

for i := 0 to b2-1 do
b2a[i] := b[i+b2];

Что-то в этом роде.

Фео (2005-12-09 14:57:00) [8]
смысл в том, что твои ацкие классы только усложняют работу... а если руки не из того места растут, то помочь тебе никто не сможет...

kblc (2005-12-09 13:44:00) [9]
мне нужно сделать следующее:
1. как правильно отрисовывать все карты (фишки) на TImageEx?
2. как правильно делать split (разделение одного бокса на 2)? я имею ввиду реализацию на делфи.

П7 (2005-12-09 13:15:00) [10]

> П7, так видимо я чел который хочет быстро срубить бабла?

Ну если и не бабла, то по учёбе возможно нужно.
Интересно, сколько ты писал эти 5 классов? Неделю? Месяц? Тут работы на несколько часов. Не больше.
В чём у тебя проблема-то? Что у тебя не получается сделать?

kblc (2005-12-09 12:36:00) [11]
Удалено модератором

Фео (2005-12-09 10:50:00) [12]
канечно за пару часов :D даже на апи, хотя на апи пбольше... и без твоих ацких классов :D к чему они?

kblc (2005-12-09 07:23:00) [13]
Shastox, ты до сих пор уверен что можно сделать за пару часов?
П7, так видимо я чел который хочет быстро срубить бабла?

kblc (2005-12-09 07:22:00) [14]
так... я не объяснил суть проблемы. Я не пишу ПРОСТО блэкджек. Я пишу его казино-вариант. т.е. 7 боксов, диллер, "сапажок", "угол", и т.д. Написал уже больше половины всех классов: TCard, TDeck(array of TCard), TDeckLeft(TDeck) {угол}, TImageEx {добавил CM_MOUSEENTER, CM_MOUSELEAVE и ещё много чего}, TImageBox(TImageEx) {Отрисовка картинки бокса, количества очков бокса, карт и фишек на боксе(карты и фишки ещё не сделал)}, TBox(TBoxImage) {сам бокс. на нём и застрял}...и ещё много чего... осталось это всё связать... а на это у меня как раз нету времени... :(( поэтому и просил наработки, поэтому и писал что тот самый ВАРИАНТ не подходит.
Вот так вот... быстро хочу срубить бабла:) и всё то вы знаете!

boalse (2005-12-09 05:01:00) [15]
http://delphigfx.mastak.ru/game/bj.rar

Скачал. А какие там правила? Не могу понять, тыкаю на кнопки, ничего не происходит. Хоть бы хелп написали.

Shastox (2005-12-08 19:49:00) [16]

> Shastox, stepan@bsoft.tomsk.ru | kbica@mail.ru

Программу - пожалуйста, но не исходники же...

> Так, видимо чел решил срубить по быстрому бабла. Ибо вопросов
> не имеет. Ему только готовенькое подавай. До понедельника
> блек-джек можно 5 раз сделать. А с учётом имеющихся наработок
> - 10.
> Смотрите сами. Я бы не дал такому товарищу исходники.

Полностью согласен.

2 kblc:
Садись и делай. Можно сделать за пару часов. Есть вопросы в алгоритме-спрашивай.

П7 (2005-12-08 19:12:00) [17]
Так, видимо чел решил срубить по быстрому бабла. Ибо вопросов не имеет. Ему только готовенькое подавай. До понедельника блек-джек можно 5 раз сделать. А с учётом имеющихся наработок - 10.
Смотрите сами. Я бы не дал такому товарищу исходники.

kblc (2005-12-08 17:56:00) [18]
Shastox, stepan@bsoft.tomsk.ru | kbica@mail.ru

kblc (2005-12-08 17:56:00) [19]
Shastox, плз вышли... буду оч. благодарен...

П7 (2005-12-08 17:48:00) [20]
Во, я же говорю, будут конкретные вопросы - помогут. Главное следить за веткой.

Страницы: 1 2 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »