Помогите с игрухой.

[Kopova]

Имеется игруха на паскале. Подскажите, пожалуйста, как сделать так, чтобы пушка двигалась не вправо-влево, а по окружности двигалось дуло пушки. То есть, при нажатии клавиши (допустим, стрелки) дуло поворачивалось в одну сторону, при нажатии другой клавиши - в другую. Помогите, пожалуйста, или обьясните принцип создания. Надеюсь на вашу поддержку Заранее спасибо

[raxp]

по вращению почитайте тут http://www.programmersforum.ru/showt...EE%F0%E5%EC%F3

[Kopova]

Там какбэ центр вращения в центре линии. Нужно чтобы дуло поворачивалось... ммм... ну какбэ по типу стрелки часов что-ли... А я даже не знаю с какого края подойти

[raxp]

уже говорил, повторюсь- вы рисуйте одну линию (половину) от вашего центра, а вторую тоже от центра но со сдвигом фазы на 180гр

[Kopova]

uses crt,graph;
var a,b,gd,gm: integer;
     x0,x1,x2,x3,x4,y0,y1,y2,y3,y4: integer;
     alpha, beta, koef: real;
     ch: char;
 
begin
 clrscr;
 initgraph(gd, gm, ' ');
 alpha:= 0;
 koef:= 1;
 x0:= 300;
 y0:= 300;
 a:= 100;
 b:= 20;
 beta:= arctan(b/a);
 setcolor (15);
  repeat
   x1:= x0;
   y1:= y0;
   x2:= x0+round(a*cos(alpha));
   y2:= y0-round(a*sin(alpha));
   x3:= x0+round(sqrt(sqr(a)+sqr(b))*cos(alpha-beta));
   y3:= y0-round(sqrt(sqr(a)+sqr(b))*sin(alpha-beta));
   x4:= x0+round(b*cos(alpha-pi/2));
   y4:= y0-round(b*sin(alpha-pi/2));
   line (x1, y1, x2, y2);
   line (x2, y2, x3, y3);
   line (x3, y3, x4, y4);
   line (x4, y4, x1, y1);
    ch:= readkey;
    cleardevice;
      case ch of
      #75: begin
            koef:= 1;
            alpha:= alpha+0.1;
            if abs(alpha)>=pi then alpha :=pi;
            delay(10);
           end;
      #77: begin
            koef:= -1;
            alpha:= alpha+koef*0.1;
            if alpha<=0 then alpha :=0;
            delay(10);
           end;
      #27: break;
     end;
  until ch= #27;
closegraph;
end.

Вот именно то, что мне нужно Помогите теперь это вписать в игру.

[Stilet]

ТАк для этого нужно знать что за игра, чем дышит, как построена...

[Kopova]

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

ТАк для этого нужно знать что за игра, чем дышит, как построена...

Первый пост темы, архив

[Stilet]

Kopova

Не пойму вообще как твоя программа только работает...
В PVO нет вообще никаких координат? Зачем ты связался(лась) с спрайтами?
Почему в PVO не передавать координату машинки и от нее все отрисовывать?

[Kopova]

О каких координатах идёт речь? PVO - название процедуры, в которой прорисована машинка.

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

Почему в PVO не передавать координату машинки и от нее все отрисовывать?

Эту фразу вообще не понял
З.Ы.: Основа не моя, я только немного доработал и подстроил под себя.

[Stilet]

Эту фразу вообще не понял

Я имел ввиду что PVO это процедура отрисовки
Я бы в эту процедуру передавал координаты машины. А в процедуре рисовать относительно этих координат...
Я не знаю как обьяснить...
Твоя программа насколько я понял действует так:
однажды нарисовав где то образ машинки фоторгафирует его в некий массив, а потом просто в неких координатах выводит эту фотографию.
Тебе же нужно другое - тебе нужно в процедуру PVO передать координаты машины и угол пушки, и пусть процедура эта в этих переданных координатах рисует все.