ZDoom

Code: Select all

	Action Void BoidFlight(
		Class<Actor> BoidActor = "HXA_Boid",	//This is the class type that boid will follow and try to match velocities with
		double MaxVelocity = 20,				//This is the max speed that it will go
		double VelocityAcceleration = .2,		//This is how fast the increases its speed
		double WallDetectionDistance = 6,		//How far away the Boid will detect walls.  WallDetectionDistance * velocity, so the distance increases the faster it goes
		Bool CloseToMaster = FALSE,				//Will remain near master pointer if TRUE
		double DistanceFromMaster = 400,		//Max distance from master pointer
		Bool CloseToTarget = FALSE,				//Will remain near target pointer if TRUE.  Overrides Close to master.
		double DistanceFromTarget = 400,		
		double MinDistanceToBoid = 150,			//Will try to move away from boids within this distance
		double MaxDistanceToBoid = 900,			//Will try to move toward boids if further than this distance
		double BoidCohesion = 3,				//How hard the boid will try to remain with other boids and match their velocities
		double MinDistanceBeacon = 100,			//Creates a beacon to move toward at least this far away
		double MaxDistanceBeacon = 300,			//Creates a beacon to move toward at most this far away
		double MaxAngleBeacon = 100,			//Creates a beacon at an angle at most this far from its current velocity
		double MaxRandomMoveAngle = 120,		//The max angle that the boid will randomly create a vector to move toward
		double HorizonNormalizer = 1,			//Adjusts all vectors in the array to turn toward the horizon.  Higher than 1 moves them to horizontal faster, less than 1 lessens the effect
		Bool UsePropertyValues = TRUE			//If this is true and the default arguments have not changed, then the arguments will use the values of the actor's properties.
												//Otherwise will force the use of the given argument values.

Code: Select all

Class NJBoider : HXA_Boid
{
    Default
    {
         +NOGRAVITY;
        HXA_Boid.FlockID random(0,255);
    }
    ....................
}

Class NJBoid : HXA_Boid
{
    Override void PostBeginPlay()
    {
        if(master)
        {
            FlockID = HXA_Boid(master).FlockID;
        }
    }
    Default
    {
        HXA_Boid.BoidActor NJBoid;
        +NOINTERACTION;
    }
    .........................
}

Code: Select all

Script error, "BoidLib.Pk3:z_hxa/njboid.zsc" line 19:
Invalid global identifier 'NJBoid'

Code: Select all

BoidLib.Pk3:z_hxa/njboid.zsc, line 59: @property@HXA_Boid.FlockID: non-constant parameter

Code: Select all

Class NJBoid : HXA_Boid
{
        Override void PostBeginPlay()
        {
            if(master)
            {
                FlockID = HXA_Boid(master).FlockID;
            }
        }
    
    Default
    {
        HXA_Boid.BoidActor NJBoid;
        +NOINTERACTION;
    }
        
    States
    {
        Spawn:
            TNT1 A 0 A_SetScale (frandom(0.8,1.2));
        Spawn2:    
            BIRB AB 2;
            BIRB DCD 3;
            Loop;
        Death:
            TNT1 A 1;
            Stop;
    }    
}

Class NJBoider : HXA_Boid
{

        Default
        {
             +NOGRAVITY;
            HXA_Boid.FlockID random(0,255);
        }
    
    States
    {
    Spawn:
    POSS A 0;
    POSS A 0 A_JumpIf(args[0] == 0, "BoidsIsNull");
    //
    SpawnBoids:
    POSS A 1 Bright A_SetArg(4, args[0]);
    SpawnBoids2:
    POSS A 0 Bright A_JumpIf(args[4] == 0, "NoMoreBoids");
    POSS A 0 Bright A_SpawnItemEx("NJBoid",20,0,40,0,0,0,0,SXF_SETMASTER|SXF_NOCHECKPOSITION);
    POSS A 0 Bright A_SetArg(4, args[4] - 1);
    Goto SpawnBoids2;
    
    
    BoidsIsNull:
     CPOS A 1 A_SetArg(0, 8);
     goto SpawnBoids;


    NoMoreBoids:
    SPOS A -1;
    Stop;
    }
}

Code: Select all

        Override void PostBeginPlay()
        {
            FlockID = random(0,255);
        }

Code: Select all

Class NJBoid : HXA_Boid
{
        Override void PostBeginPlay()
        {
            if(master)
            {
                FlockID = HXA_Boid(master).FlockID;
            }
        }
    
    Default
    {
        HXA_Boid.BoidActor "NJBoid";
        +NOINTERACTION;
    }
        
    States
    {
        Spawn:
            TNT1 A 0 A_SetScale (frandom(0.8,1.2));
        Spawn2:    
            BIRB AB 2;
            BIRB DCD 3;
            Loop;
        Death:
            TNT1 A 1;
            Stop;
    }    
}

Class NJBoider : HXA_Boid
{

        Override void PostBeginPlay()
        {
            FlockID = random(0,255);
        }

        Default
        {
             +NOGRAVITY;
        }
    
    States
    {
    Spawn:
    POSS A 0;
    POSS A 0 A_JumpIf(args[0] == 0, "BoidsIsNull");
    //
    SpawnBoids:
    POSS A 1 Bright A_SetArg(4, args[0]);
    SpawnBoids2:
    POSS A 0 Bright A_JumpIf(args[4] == 0, "NoMoreBoids");
    POSS A 0 Bright A_SpawnItemEx("NJBoid",20,0,40,0,0,0,0,SXF_SETMASTER|SXF_NOCHECKPOSITION);
    POSS A 0 Bright A_SetArg(4, args[4] - 1);
    Goto SpawnBoids2;
    
    
    BoidsIsNull:
     CPOS A 1 A_SetArg(0, 8);
     goto SpawnBoids;


    NoMoreBoids:
    SPOS A -1;
    Stop;
    }
} 

Code: Select all

BIRB AB 2;
BIRB DCD 3;