Zandronum

Spoiler: with this code. (Open)

Code: Select all

#include "zcommon.acs"

#define C_TID		1000	//Default camera tid
#define MAX_R		128	//Maximum radius (or distance from the player)
#define ADJUST_R	8	//Amount to adjust the camera by
#define VIEW_HEIGHT	41.0	//The approximate hight of the player's view

bool cam_mode[8];		//Variable for turning the camera on or off.
	
Script 1 ENTER
{
	cam_mode[PlayerNumber ()] = ON;
	ACS_ExecuteAlways (3, 0, PlayerNumber ());
}

Script 2 RESPAWN
{
	cam_mode[PlayerNumber ()] = ON;
	ACS_ExecuteAlways (3, 0, PlayerNumber ());
}

Script 3 (int p_num)
{
	int r = MAX_R;
	
	while (cam_mode[p_num] == ON)
	{	
		int a = GetActorAngle (0);
		int p = GetActorPitch (0);
		int x = GetActorX (0);
		int y = GetActorY (0);
		int z = GetActorZ (0) + VIEW_HEIGHT;
		int xyr = r * cos (p) >> 16;
		
		if (!ThingCountName ("ChaseCam", C_TID+p_num))
		{
			while (!Spawn ("ChaseCam", x-cos(a)*xyr, y-sin(a)*xyr, z+sin(p)*r, C_TID+p_num, a >> 8) && r > 0)
			{
				r -= ADJUST_R;
				xyr = cos (p) * r >> 16;
			}
			
			if (ThingCountName ("ChaseCam", C_TID + p_num))
				ChangeCamera (C_TID + p_num, 0, 0);
			else
			{
				cam_mode[p_num] = OFF;
				print (s:"Camera script failed to initialize.");
			}
		}
    else
		{
			while (!SetActorPosition (C_TID+p_num, x-cos(a)*xyr, y-sin(a)*xyr, z+sin(p)*r, 0) && r > 0)
			{
				r -= ADJUST_R;
				xyr = cos (p) * r >> 16;
			}
			
			SetActorAngle (C_TID + p_num, a);
			SetActorPitch (C_TID + p_num, p);
			
			if (r < MAX_R) 
                              r += ADJUST_R;
		}
		
		delay (1);
	}
}     
       

Zeberpal wrote: Camera's Y = Cam's height; X = is probably Cam's angle, but what is Z here? Same question about Player's

script 1 ( int player_tid, int camera_tid )
{
int x,y,z,a,b,c,u1;
//Assuming camera has fixed position
x = GetActorX(camera_tid);
y = GetActorY(camera_tid);
z = GetActorZ(camera_tid);
While(1){
a=GetActorX(player_tid)-x;
b=GetActorY(player_tid)-y;
c=GetActorZ(player_tid)-z;
u1=FixedSqrt(FixedMul(a,a)+FixedMul(b,b));
SetActorAngle(camera_tid,VectorAngle(a,b));
SetActorPitch(camera_tid,VectorAngle(u,c));
Delay(1);
}}

Zeberpal wrote: Square roots might not work in zan? I define FixedSqrt, but even so he says missing semicolon.

function int sqrt(int number) 
{
  if (number == 1.0) return 1.0; 
  if (number <= 0) return 0;
  int val = 150.0;
  for (int i=0; i<15; i++) 
    val = (val + FixedDiv(number, val)) >> 1;

  return val; 
}

#include "zcommon.acs"

function int FixedSqrt(int number)
{
  if (number == 1.0) return 1.0;
  if (number <= 0) return 0;
  int val = 150.0;
  for (int i=0; i<15; i++)
    val = (val + FixedDiv(number, val)) >> 1;

  return val;
}
       
script 1 ( int player_tid, int camera_tid )
{
int x,y,z,a,b,c,u1,u;
//Assuming camera has fixed position
x = GetActorX(camera_tid); //I tried 1000 here too
y = GetActorY(camera_tid);//I tried 1000 here too
z = GetActorZ(camera_tid);//I tried 1000 here too
While(1){
a=GetActorX(player_tid)-x;
b=GetActorY(player_tid)-y;
c=GetActorZ(player_tid)-z;
u1=FixedSqrt(FixedMul(a,a)+FixedMul(b,b));
SetActorAngle(camera_tid,VectorAngle(a,b));
SetActorPitch(camera_tid,VectorAngle(u,c));
Delay(1);
}}

ibm5155 wrote: for the camera that aim you, wouldn´t be easy to force a target by acs to an invisible monster, than do it enter on a chase loop and finaly set him as a camera?

Zeberpal wrote: It's executable now, but nothing ingame happens. Is it just because I haven't gave Player a TID? (I didnt because I barelly remember how, gotta check it later) Or there is more of a core reason?

Klofkac wrote: Erm, looks like you used camera's TID as player...