Уроки по созданию игр для новичков...

[Kostia]

А вообще запомните такую формулу:

if (x>=objx) and (y>=objy) and (x<=objx+objwidth) and (y<=objy+objheight) then

Проверка попадания точки (x,y) в прямоугольник (objx, objy, objx+objwidth,objy+objheight);
А попадание точки в окружность определяется так:

if sqrt(sqr(x-objx)+sqr(y-objy))<=r then

Проверка попадания точки (x,y) в окружность с центром (objx, objy) и радиусом r

[Алекс Ялта]

Спасибо. Пригодится

[Shadow_1329]

У меня один вопрос. Игра-стрелялка. Мне нужро сделать чтобы пуль вылетало бесконечно много. Рисую на Canvas. У пули есть координаты x и y, и таймер её прорисовывает туда, куда показывает x или y. Но пуля тока одна, а мне нужно много. Как это осуществить? Ставить бесконечно много обработчиков событий для пуль??

[Алекс Ялта]

Сообщение от Shadow_1329

У меня один вопрос. Игра-стрелялка. Мне нужро сделать чтобы пуль вылетало бесконечно много. Рисую на Canvas. У пули есть координаты x и y, и таймер её прорисовывает туда, куда показывает x или y. Но пуля тока одна, а мне нужно много. Как это осуществить? Ставить бесконечно много обработчиков событий для пуль??

Насколько я помню, в постах 150-160 этого раздела рассматривается пример создания собственного типа. Можно попробовать создать тип Bullet и массив

MasBullet: array [1..255] of Tbullet;

И вопрос такого плана нужно задать в той теме для получения более эффективного ответа

[ROD]

У меня один вопрос. Игра-стрелялка. Мне нужро сделать чтобы пуль вылетало бесконечно много. Рисую на Canvas. У пули есть координаты x и y, и таймер её прорисовывает туда, куда показывает x или y. Но пуля тока одна, а мне нужно много. Как это осуществить? Ставить бесконечно много обработчиков событий для пуль??

Можно сделать их с помощью списка ( в этом случае количество выпущеных пуль ограничивается лишь памятью компьютера)
При выпускании пули она добавляется в конец списка, при попадании, она удаляется их списка. (т.е. функци-обработчик пуль работает не с каждой отдельной пулей, а со списком пуль).

К стати, таким же способом можно сделать бесконечное число простивников. (хотя противников я бы делал классами, что бы каждому можно было сделаь индивидуальное поведение (ну что бы они не по прямой летели, а зигзагами, стреляли и т.п (впрочем если делатьк акие-то специфические патроны (типа самонаводящихся ракет или осколочных гранат), тот тут тоже классами делать нужно)).)

[Shadow_1329]

А как это списками? Чо то я не вкупил.

[Boris96_2007]

А в какой программе это всё прописывать?

[Pyton]

В данном разделе все делается на Делфи.

[Kostia]

У меня один вопрос. Игра-стрелялка. Мне нужро сделать чтобы пуль вылетало бесконечно много. Рисую на Canvas. У пули есть координаты x и y, и таймер её прорисовывает туда, куда показывает x или y. Но пуля тока одна, а мне нужно много. Как это осуществить? Ставить бесконечно много обработчиков событий для пуль??

Изучаем данный код и становимся гуру: http://pblog.ru/lab/?p=106
________
А это упрощенный TList:

[Алекс Ялта]

Никак не могу осилить. Как задать универсальную проходимость на карте? Изучил все примеры, которые находятся в этой теме. Неужели нужно делать ДВА массива карты? Один под проходимость, а другой под текстуру. Имееется ввиду карта с большим колличеством текстур и с разной проходимостью. Я понимаю как задать проходимость и текстуру на один индекс. То есть, если из файла считал индекс "1", то: ходить нельзя, текстура 1.bmp. В то же время прописывать под дополнительные обозначения свою проходимость мне кажется неправильным. К примеру, если карта имеет такой вид в текстовом файле:
11111111111111111
10000000000000001
10244300000000001
10000050000000001
10000005000000001
11111111111111111

Места под номерами 2,3,4,5 будут НЕ ПРОХОДИМЫМИ и все будут иметь разные тестуры. Как в таком случае будет выглядить код?
Если создать тип карты:

type
  TGameMap = packed record
    p:       byte;       // Проходимость
    Tex:    TBitmap;     // Текстура клетки
  end;

Сам массив карты будет таким

var
map: array [1..20,1..15] of TGameMap;

В такой процедуре загрузки уровня индекс проходимости будет
сответствовать индексу текстуры:

//...............................
 for j:=1 to 20 do
        for i:=1 to 15 do begin
            Read(Map[j,i].p); // р - проходимость
            Map[j,i].Tex:=TBitmap.Create;   // Tex - текстура клетки
            Map[j,i].Tex.LoadFromFile('img\'+IntToStr(Map[j,i].p)+'.bmp'); 
            BackBuf.Canvas.Draw(j*32-32, i*32-32, Map[j,i].Tex);
//.................................

Как в таком случае быть? Прописывать проходимость дополнительно наподобии:

if p=1 or if p=2 or if p=3.....  then

ходить нельзя?