3d БЕЗУМСТВО, Dark Basic Опции

[Костян]

Народ, срочно нужна ваша помощь. В данный момент создаю трехмерную игрушку на Dark Bаsice все вроде бы работает, да вот только в игре должна быть модель башни(3ds), а ее нет! Я всю локацию облазил но не нашел. Вопрос дня- где она. Если у кого есть желание- качайте архив, и жду ваших советов...  game.zip ( 13.91 килобайт ) Кол-во скачиваний: 549

[Shura]

У тебя как перемещается камера по карте, по оси Y (если ее вверх направить)? Вверх-вниз по ландшафту камера автоматически двигается? Если так, то рассматривать нужно горизонтальную плоскость XZ. Антигерой просто постоянно движется по направлению героя. Приращение к координатам антигероя расчитывается так же, как и к персонажу в твоей первой версии:

X# = Newxvalue(X#,CameraAngleY#,10)
Z# = Newzvalue(Z#,CameraAngleY#,10)

Только вместо CameraAngleY# тебе нужно подставить переменную, которая хранит текущее направление в градусах от антигероя к герою. Я думаю, там есть какая-нибудь функция для расчета угла от одной точке к другой, но на всякий случай вот моя функция, чтобы передать алгоритм. Попробуй переписать ее на Бэйсике:

FUNCTION ugol(x1,y1,x2,y2: Real): Real; 
 VAR							
  x,y,t: Real; 
  c: 1..4; 
 BEGIN
  x:=x2-x1;
  y:=y2-y1;
  if x*y = 0			  
  then if x = 0		   
	   then if y > 0	   
		then t:=PI/2
		else t:=3*PI/2
	   else if x > 0
		then t:=0
		else t:=PI
  else begin
	if x > 0
	then if y > 0
		 then c:=1
		 else c:=4
	else if y > 0	
		 then c:=2  
		 else c:=3; 
	t:=arctan(y/x);
	case c of		 
	 2,3: t:=t + PI;  
	 4:   t:=t + 2*PI
	end 
	   end;
   ugol:=360*(t/2/PI) 
 END;

Но, опять же, эта извращенская функция специально под Турбо-Паскаль - в ДаркБейсике все же должна быть похожая.

P.S. Если скорость антигероя больше скорости героя, то можно применить алгоритм поумнее, благодаря которому антигерой не просто движется в направлении героя, а ищет на прямой, вдоль которой смотрит сейчас герой, точку, придя в которую, он настигнет героя. Так, например, сделаны ядовитые шары в Serious Sam'е.