"Домино" на Turbo Pascal'е. Очень нужно!

[DruiD88]

Прошу помочь написать игру "Домино" на Turbo Pascal'е!!!
Через неделю курсач сдавать!! Плиииз!!

[Stilet]

Помочь в чем? Полностью готовый код или подсказать?
Если подсказать - то для начала научись отрисовывать доминошки.
Тут кто-то правильную мысль толкнул - рисовать псевдографикой, это для тебя ну очень удобно будет.

[DruiD88]

Если можно, то готовый. Со своей программой я уже месяц мучаюсь..

Доминошки у меня отрисовываются из готовых BMP-файлов, так как желательно быть в графическом режиме.

Описываются они у меня следующим образом:

type deck = record
      left: byte;  
      right: byte;
      status: byte; { 0 - на базаре, 1 - у него, 2 - у меня, 3 - выкинута}
    end;
var gd,gm: integer;
    ishodn: array[1..28] of deck;   {Исходный массив}
    ego, moi: array[1..7] of deck;  {Его и мои доминошки после раздачи}
    bazar: array [1..14] of deck;    {Базар}

С раздачей я разобрался.
Застрял я на процедуре, где доминошки выкидываются в центр на стол.
При этом всё осложняется тем, что при достижении края экрана нужно повернуть конец ленты.

З.Ы. Кроме того, необходима поддержка мыши.

[Stilet]

Ну с мышью тут все просто - ищи литератуту по прерыванию 33h. Если что подскажу.
А по поводу выкидывания поточнее обьясни

[DruiD88]

С прерываниями незачем мучиться - есть готовый TPU-модуль для мыши.

Насчёт выкидывания: Нужно верно выложить фишку на поле. Не горизонтально и вертикально а в соответствии с предыдущей выкладкой т.е. с рассмотрением координат. Например после дубля следующая фишка ложиться ровно по центру от дубля. Или же при достиждении одного из хвостов фишек на столе к краю экрана необходимо завернуть их вверх или вниз. А затем в обратную сторону от привычной выкладки, что исключает возможность «выпадения» фишки из экрана.

Вот что у меня есть на данный момент:

[Olympian]

Так сделай такую вещь -
Доминошек всего 36 кажется...
Создаешь массив из 36 * 2 - 1 элементов - где указаны
1)Есть ли домино тут
2)координаты домино(заранее просчитанные - это для решения проблемы с поворотом ленты)
3)Какое домино можно класть слева(и можно ли)
4)Какое домино можно класть справа(и можно ли)
5)Какая тут доминошка лежит - для картинки

Хм..Вроде всё. И тогда при выбрасывании 1й домино - информация о ней пишется в центральный элемент. При выкладывании каждой следующей - определяем справа/слева и пишем соответсвующе в массив. И рисуем его

[DruiD88]

Ну, во-первых доминошек 28..
А можно эти пукнкты поподробнее объяснить?

[Olympian]

ой, да..Забыл что 1-2 и 2-1 одно и тоже=)Но это не важно)

Можно - а что именно требует пояснения?

[DruiD88]

Ну хотя бы - почему 28 * 2 - 1?

[Olympian]

у нас всего 28 домино.
первую - мы "кладем" в центр массива. Остается еще 27 домино, которые можно положить в каждую сторону. Итого 2 * 27 + 1 = 28 * 2 - 1