# SG-fan
#
# This is a flying ship cog which allows 
# the player to pilot a ship in all 
# directions. Foward/backward keys are for 
# up/down. Left/right keys are for 
# left/right.
#
# Bugs: Does not support upside down flying.
#       Cannot hold passengers.
#
# THIS COG IS NOT SUPPORTED BY LEC.

flags=0x40

symbols

thing		console0

thing		shuttle                          nolink

thing		cam                              local

int		messagebase=-1

int		player                           local
int		on=0                             local
flex		temp                             local
int		canpointnow=0                    local

int		startHealth=0                    local
int		mode                             local
vector		startPosition                    local
vector		oldlookvec                       local
vector		vec0                             local
vector		vec1                             local

sound		SwitchOffSound=deactivate02.wav  local
sound		camChangeSnd=beep2.wav           local

vector		max_foward
vector		max_backward

thing		ghost                            nolink

message	activated
message	playeraction
message	pulse
message	timer
message	startup

end

# ========================================================================================

code
startup:
   SetTimerEx(1, 321, 321, 321);
   Return;
activated:
   player = GetSourceRef();

   // Do not allow to activate the camera with the scope on...
   if(GetCurWeapon(player) == 13) Return;

   if(on) Return;

   on = 1;

   SetActorFlags(player, 0x80800000);

   SetTimerEx(0.0000001, 54321, 54321, 54321);

   Return;

# ........................................................................................

playeraction:
   if (GetParam(0) == 0.0)             // Jump
   {
      ReturnEx(0.0);
   }
   else
   if (GetParam(0) == 1.0)             // Crouch
   {
	SetThingThrust(shuttle, max_backward);
	Print("RETREAT");
      ReturnEx(0.0);
   }
   else
   if (GetParam(0) == 2.0)             // Activated
   {

      call stop_cam;

      ReturnEx(0.0);
   }
   else
   if (GetParam(0) == 3.0)             // Fire
   {
	      SetThingThrust(shuttle, max_foward);
		Print("foward march");
      ReturnEx(0.0);
   }
   else
   if (GetParam(0) == 4.0)             // Strafe
   {
      ReturnEx(0.0);
   }
   else
   if (GetParam(0) == 5.0)             // Turn
   {
      if(canpointnow)
      {
         canpointnow = 0;
         vec0 = GetThingLVecPYR(cam);
         temp = VectorY(vec0) + (GetParam(2) / 100);
         if(temp > 360) temp = temp - 360;
         if(temp < 0) temp = temp + 360;
         vec0 = VectorSet(VectorX(vec0), temp, VectorZ(vec0));
         SetThingLookPYR(cam, vec0);
         SetThingLookPYR(player, vec0);
         SetThingLookPYR(console0, vec0);
         canpointnow = 1;
         ReturnEx(0.0);
      }
   }
   else
   if (GetParam(0) == 6.0)             // Fwd / Bkwd Motion
   {
      if(canpointnow)
      {
         canpointnow = 0;
         vec0 = GetThingLVecPYR(cam);
         temp = VectorX(vec0) + (GetParam(2) * -1);
         if(temp > 80) temp = 80;
         if(temp < -80) temp = -80;
         vec0 = VectorSet(temp, VectorY(vec0), VectorZ(vec0));
         SetThingLookPYR(cam, vec0);
         SetThingLookPYR(player, vec0);
         SetThingLookPYR(console0, vec0);
         canpointnow = 1;
         ReturnEx(0.0);
      }
   }
   else
   if (GetParam(0) == 14.0)         // Other Actions
   {
      if (GetParam(2) == 0.0)    // Cycle Camera
      {
         if (GetCurrentCamera() == 0)
         {
            // We're in first person mode.
         }
         else
         {
            // We're in third person mode.
         }
      }
      ReturnEx(1.0);
   }
   else
   {
      ReturnEx(0.0);
   }

   Return;

# ........................................................................................

pulse:
   SetPulse(0.5);
   // check that the player didn't die
   if(GetThingHealth(player) < 1)
   {
      call stop_cam;
      Return;
   }

   Return;

# ........................................................................................

timer:
   if (GetSenderID() == 12)
   {
	allowChangeCam = 1;
   }
   if (GetSenderID() == 12345)
   {
	TeleportThing(player, ghost);
	SetTimerEx(.0000001, 123, 123, 123);
   }
   if (GetSenderID() == 123)
   {
	// This is here for nothing really, just to hold a place for .0000001 of a second.
   }
   if (GetSenderID() == 54321)
   {
	TeleportThing(player, ghost);
	SetTimerEx(.0000001, 1234, 1234, 1234);

   }
   if (GetSenderID() == 1234)
   {
  	StopThing(player);
  	SetActionCog(GetSelfCog(), 0x7FFFFFFF);
	DetachThing(player);
	AttachThingToThingEx(player, shuttle, 0x8);

   	startHealth = GetThingHealth(player);

   	SetPulse(0.5);

   	SetCurrentCamera(0);

   	canpointnow = 1;

   	call switch_cam;
   }
   if (GetSenderID() == 321)
   {
	AttachThingToThingEx(ghost, shuttle, 0x8);
	AttachThingToThingEx(console0, shuttle, 0x8);
   }
   Return;

# ........................................................................................

switch_cam:
   Print(" ");
   Print(" ");
   Print(" ");
   Print(" ");
   Print(" ");
   if(messagebase > -1) jkPrintUNIString(player, (messagebase + activeCam));
   if(messagebase < 0)
   {
      jkStringClear();
      jkStringConcatAsciiString("Camera ");
      jkStringConcatInt(activeCam);
      jkStringOutput(-1, -1);
   }

   dummy = PlaySoundLocal(camChangeSnd, 1.0, 0.0, 0);

   cam = shuttle;
   SetCameraZoom(0, 1, 150.0);
   zoom = 1.0;
   oldlookvec = GetThingLVecPYR(cam);
   allowChangeCam = 0;
   SetTimerEx(minChangeRate, 12, 12, 12);
   Return;

stop_cam:
	StopThing(shuttle);
	DetachThing(player);
   SetTimerEx(0.0000001, 12345, 12345, 12345);
	StopThing(player);
   SetCameraFocus(0, player);
   SetCameraZoom(0, 1, 150.0);
   SetCurrentCamera(old_camera);

   SetPulse(0);
   on = 0;
   canpointnow = 0;
   canzoomnow = 0;

   dummy = PlaySoundLocal(SwitchOffSound, 1.0, 0.0, 0);

   // Turn off control capture.
   SetActionCog(-1, 0);

   ClearActorFlags(player, 0x80800000);

   Print(" ");
   Print(" ");
   Print(" ");
   Print(" ");
   Print(" ");

   Return;

end