Merge remote-tracking branch 'origin/master' into samual/mutator_ctf
authorSamual Lenks <samual@xonotic.org>
Thu, 6 Sep 2012 18:39:04 +0000 (14:39 -0400)
committerSamual Lenks <samual@xonotic.org>
Thu, 6 Sep 2012 18:39:04 +0000 (14:39 -0400)
Conflicts:
qcsrc/warpzonelib/common.qh

1  2 
qcsrc/server/mutators/gamemode_ctf.qc

index 86795ff,0000000..866c1c8
mode 100644,000000..100644
--- /dev/null
@@@ -1,1417 -1,0 +1,1417 @@@
-                       WarpZone_RefSys_MakeSameRefSys(flag, player);
 +// ================================================================
 +//  Official capture the flag game mode coding, reworked by Samual
 +//  Last updated: March 30th, 2012
 +// ================================================================
 +
 +void ctf_FakeTimeLimit(entity e, float t)
 +{
 +      msg_entity = e;
 +      WriteByte(MSG_ONE, 3); // svc_updatestat
 +      WriteByte(MSG_ONE, 236); // STAT_TIMELIMIT
 +      if(t < 0)
 +              WriteCoord(MSG_ONE, autocvar_timelimit);
 +      else
 +              WriteCoord(MSG_ONE, (t + 1) / 60);
 +}
 +
 +void ctf_EventLog(string mode, float flagteam, entity actor) // use an alias for easy changing and quick editing later
 +{
 +      if(autocvar_sv_eventlog)
 +              GameLogEcho(strcat(":ctf:", mode, ":", ftos(flagteam), ((actor != world) ? (strcat(":", ftos(actor.playerid))) : "")));
 +}
 +
 +string ctf_CaptureRecord(entity flag, entity player)
 +{
 +      float cap_time, cap_record, success;
 +      string cap_message, refername;
 +      
 +      if((autocvar_g_ctf_captimerecord_always) || (player_count - currentbots)) 
 +      {
 +              cap_record = ctf_captimerecord;
 +              cap_time = (time - flag.ctf_pickuptime);
 +
 +              refername = db_get(ServerProgsDB, strcat(GetMapname(), "/captimerecord/netname"));
 +              refername = ((refername == player.netname) ? "their" : strcat(refername, "^7's"));
 +
 +              if(!ctf_captimerecord) 
 +                      { cap_message = strcat(" in ", ftos_decimals(cap_time, 2), " seconds"); success = TRUE; }
 +              else if(cap_time < cap_record) 
 +                      { cap_message = strcat(" in ", ftos_decimals(cap_time, 2), " seconds, breaking ", refername, " previous record of ", ftos_decimals(cap_record, 2), " seconds"); success = TRUE; }
 +              else
 +                      { cap_message = strcat(" in ", ftos_decimals(cap_time, 2), " seconds, failing to break ", refername, " record of ", ftos_decimals(cap_record, 2), " seconds"); success = FALSE; }
 +
 +              if(success) 
 +              {
 +                      ctf_captimerecord = cap_time;
 +                      db_put(ServerProgsDB, strcat(GetMapname(), "/captimerecord/time"), ftos(cap_time));
 +                      db_put(ServerProgsDB, strcat(GetMapname(), "/captimerecord/netname"), player.netname);
 +                      write_recordmarker(player, (time - cap_time), cap_time); 
 +              } 
 +      }
 +      
 +      return cap_message;
 +}
 +
 +void ctf_FlagcarrierWaypoints(entity player)
 +{
 +      WaypointSprite_Spawn("flagcarrier", 0, 0, player, FLAG_WAYPOINT_OFFSET, world, player.team, player, wps_flagcarrier, TRUE, RADARICON_FLAG, WPCOLOR_FLAGCARRIER(player.team));
 +      WaypointSprite_UpdateMaxHealth(player.wps_flagcarrier, '1 0 0' * healtharmor_maxdamage(start_health, start_armorvalue, autocvar_g_balance_armor_blockpercent) * 2);
 +      WaypointSprite_UpdateHealth(player.wps_flagcarrier, '1 0 0' * healtharmor_maxdamage(player.health, player.armorvalue, autocvar_g_balance_armor_blockpercent));
 +      WaypointSprite_UpdateTeamRadar(player.wps_flagcarrier, RADARICON_FLAGCARRIER, WPCOLOR_FLAGCARRIER(player.team));
 +}
 +
 +
 +// =======================
 +// CaptureShield Functions 
 +// =======================
 +
 +float ctf_CaptureShield_CheckStatus(entity p) 
 +{
 +      float s, se;
 +      entity e;
 +      float players_worseeq, players_total;
 +
 +      if(ctf_captureshield_max_ratio <= 0)
 +              return FALSE;
 +
 +      s = PlayerScore_Add(p, SP_SCORE, 0);
 +      if(s >= -ctf_captureshield_min_negscore)
 +              return FALSE;
 +
 +      players_total = players_worseeq = 0;
 +      FOR_EACH_PLAYER(e)
 +      {
 +              if(IsDifferentTeam(e, p))
 +                      continue;
 +              se = PlayerScore_Add(e, SP_SCORE, 0);
 +              if(se <= s)
 +                      ++players_worseeq;
 +              ++players_total;
 +      }
 +
 +      // player is in the worse half, if >= half the players are better than him, or consequently, if < half of the players are worse
 +      // use this rule here
 +      
 +      if(players_worseeq >= players_total * ctf_captureshield_max_ratio)
 +              return FALSE;
 +
 +      return TRUE;
 +}
 +
 +void ctf_CaptureShield_Update(entity player, float wanted_status)
 +{
 +      float updated_status = ctf_CaptureShield_CheckStatus(player);
 +      if((wanted_status == player.ctf_captureshielded) && (updated_status != wanted_status)) // 0: shield only, 1: unshield only
 +      {
 +              if(updated_status) // TODO csqc notifier for this // Samual: How?
 +                      Send_CSQC_Centerprint_Generic(player, CPID_CTF_CAPTURESHIELD, "^3You are now ^4shielded^3 from the flag\n^3for ^1too many unsuccessful attempts^3 to capture.\n\n^3Make some defensive scores before trying again.", 5, 0);
 +              else
 +                      Send_CSQC_Centerprint_Generic(player, CPID_CTF_CAPTURESHIELD, "^3You are now free.\n\n^3Feel free to ^1try to capture^3 the flag again\n^3if you think you will succeed.", 5, 0);
 +                      
 +              player.ctf_captureshielded = updated_status;
 +      }
 +}
 +
 +float ctf_CaptureShield_Customize()
 +{
 +      if(!other.ctf_captureshielded) { return FALSE; }
 +      if(!IsDifferentTeam(self, other)) { return FALSE; }
 +      
 +      return TRUE;
 +}
 +
 +void ctf_CaptureShield_Touch()
 +{
 +      if(!other.ctf_captureshielded) { return; }
 +      if(!IsDifferentTeam(self, other)) { return; }
 +      
 +      vector mymid = (self.absmin + self.absmax) * 0.5;
 +      vector othermid = (other.absmin + other.absmax) * 0.5;
 +
 +      Damage(other, self, self, 0, DEATH_HURTTRIGGER, mymid, normalize(othermid - mymid) * ctf_captureshield_force);
 +      Send_CSQC_Centerprint_Generic(other, CPID_CTF_CAPTURESHIELD, "^3You are ^4shielded^3 from the flag\n^3for ^1too many unsuccessful attempts^3 to capture.\n\n^3Get some defensive scores before trying again.", 5, 0);
 +}
 +
 +void ctf_CaptureShield_Spawn(entity flag)
 +{
 +      entity shield = spawn();
 +      
 +      shield.enemy = self;
 +      shield.team = self.team;
 +      shield.touch = ctf_CaptureShield_Touch;
 +      shield.customizeentityforclient = ctf_CaptureShield_Customize;
 +      shield.classname = "ctf_captureshield";
 +      shield.effects = EF_ADDITIVE;
 +      shield.movetype = MOVETYPE_NOCLIP;
 +      shield.solid = SOLID_TRIGGER;
 +      shield.avelocity = '7 0 11';
 +      shield.scale = 0.5;
 +      
 +      setorigin(shield, self.origin);
 +      setmodel(shield, "models/ctf/shield.md3");
 +      setsize(shield, shield.scale * shield.mins, shield.scale * shield.maxs);
 +}
 +
 +
 +// ====================
 +// Drop/Pass/Throw Code
 +// ====================
 +
 +void ctf_Handle_Drop(entity flag, entity player, float droptype)
 +{
 +      // declarations
 +      player = (player ? player : flag.pass_sender);
 +
 +      // main
 +      flag.movetype = MOVETYPE_TOSS;
 +      flag.takedamage = DAMAGE_YES;
 +      flag.health = flag.max_flag_health;
 +      flag.ctf_droptime = time;
 +      flag.ctf_dropper = player;
 +      flag.ctf_status = FLAG_DROPPED;
 +      
 +      // messages and sounds
 +      Send_KillNotification(player.netname, flag.netname, "", INFO_LOSTFLAG, MSG_INFO);
 +      sound(flag, CH_TRIGGER, flag.snd_flag_dropped, VOL_BASE, ATTN_NONE);
 +      ctf_EventLog("dropped", player.team, player);
 +
 +      // scoring
 +      PlayerTeamScore_AddScore(player, -autocvar_g_ctf_score_penalty_drop);   
 +      PlayerScore_Add(player, SP_CTF_DROPS, 1);
 +      
 +      // waypoints
 +      if(autocvar_g_ctf_flag_dropped_waypoint)
 +              WaypointSprite_Spawn("flagdropped", 0, 0, flag, FLAG_WAYPOINT_OFFSET, world, ((autocvar_g_ctf_flag_dropped_waypoint == 2) ? 0 : player.team), flag, wps_flagdropped, TRUE, RADARICON_FLAG, WPCOLOR_DROPPEDFLAG(flag.team));
 +
 +      if(autocvar_g_ctf_flag_return_time || (autocvar_g_ctf_flag_return_damage && autocvar_g_ctf_flag_health))
 +      {
 +              WaypointSprite_UpdateMaxHealth(flag.wps_flagdropped, flag.max_flag_health);
 +              WaypointSprite_UpdateHealth(flag.wps_flagdropped, flag.health);
 +      }
 +      
 +      player.throw_antispam = time + autocvar_g_ctf_pass_wait;
 +      
 +      if(droptype == DROP_PASS)
 +      {
 +              flag.pass_sender = world;
 +              flag.pass_target = world;
 +      }
 +}
 +
 +void ctf_Handle_Retrieve(entity flag, entity player)
 +{
 +      entity tmp_player; // temporary entity which the FOR_EACH_PLAYER loop uses to scan players
 +      entity sender = flag.pass_sender;
 +      
 +      // transfer flag to player
 +      flag.owner = player;
 +      flag.owner.flagcarried = flag;
 +      
 +      // reset flag
 +      setattachment(flag, player, "");
 +      setorigin(flag, FLAG_CARRY_OFFSET);
 +      flag.movetype = MOVETYPE_NONE;
 +      flag.takedamage = DAMAGE_NO;
 +      flag.solid = SOLID_NOT;
 +      flag.ctf_carrier = player;
 +      flag.ctf_status = FLAG_CARRY;
 +
 +      // messages and sounds
 +      sound(player, CH_TRIGGER, flag.snd_flag_pass, VOL_BASE, ATTN_NORM);
 +      ctf_EventLog("recieve", flag.team, player);
 +      
 +      FOR_EACH_REALPLAYER(tmp_player)
 +      {
 +              if(tmp_player == sender)
 +                      centerprint(tmp_player, strcat("You passed the ", flag.netname, " to ", player.netname));
 +              else if(tmp_player == player)
 +                      centerprint(tmp_player, strcat("You recieved the ", flag.netname, " from ", sender.netname));
 +              else if(!IsDifferentTeam(tmp_player, sender))
 +                      centerprint(tmp_player, strcat(sender.netname, " passed the ", flag.netname, " to ", player.netname));
 +      }
 +      
 +      // create new waypoint
 +      ctf_FlagcarrierWaypoints(player);
 +      
 +      sender.throw_antispam = time + autocvar_g_ctf_pass_wait;
 +      player.throw_antispam = sender.throw_antispam;
 +
 +      flag.pass_sender = world;
 +      flag.pass_target = world;
 +}
 +
 +void ctf_Handle_Throw(entity player, entity reciever, float droptype)
 +{
 +      entity flag = player.flagcarried;
 +      vector targ_origin;
 +      
 +      if(!flag) { return; }
 +      if((droptype == DROP_PASS) && !reciever) { return; }
 +      
 +      if(flag.speedrunning) { ctf_RespawnFlag(flag); return; }
 +      
 +      // reset the flag
 +      setattachment(flag, world, "");
 +      setorigin(flag, player.origin + FLAG_DROP_OFFSET);
 +      flag.owner.flagcarried = world;
 +      flag.owner = world;
 +      flag.solid = SOLID_TRIGGER;
 +      flag.ctf_dropper = player;
 +      flag.ctf_droptime = time;
 +      
 +      flag.flags = FL_ITEM | FL_NOTARGET; // clear FL_ONGROUND for MOVETYPE_TOSS
 +      
 +      switch(droptype)
 +      {
 +              case DROP_PASS:
 +              {
++                      WarpZone_RefSys_Copy(flag, reciever);
 +                      targ_origin = WarpZone_RefSys_TransformOrigin(reciever, flag, (0.5 * (reciever.absmin + reciever.absmax)));
 +                      flag.velocity = (normalize(targ_origin - player.origin) * autocvar_g_ctf_pass_velocity);
 +                      break;
 +              }
 +              
 +              case DROP_THROW:
 +              {
 +                      makevectors((player.v_angle_y * '0 1 0') + (player.v_angle_x * '0.5 0 0'));
 +                      flag.velocity = W_CalculateProjectileVelocity(player.velocity, ('0 0 200' + (v_forward * autocvar_g_ctf_drop_velocity)), FALSE);
 +                      break;
 +              }
 +              
 +              case DROP_RESET:
 +              {
 +                      flag.velocity = '0 0 0'; // do nothing
 +                      break;
 +              }
 +              
 +              default:
 +              case DROP_NORMAL:
 +              {
 +                      flag.velocity = W_CalculateProjectileVelocity(player.velocity, ('0 0 200' + ('0 100 0' * crandom()) + ('100 0 0' * crandom())), FALSE);
 +                      break;
 +              }
 +      }
 +      
 +      switch(droptype)
 +      {
 +              case DROP_PASS:
 +              {
 +                      // main
 +                      flag.movetype = MOVETYPE_FLY;
 +                      flag.takedamage = DAMAGE_NO;
 +                      flag.pass_sender = player;
 +                      flag.pass_target = reciever;
 +                      flag.ctf_status = FLAG_PASSING;
 +                      
 +                      // other
 +                      sound(player, CH_TRIGGER, flag.snd_flag_touch, VOL_BASE, ATTN_NORM);
 +                      WarpZone_TrailParticles(world, particleeffectnum(flag.passeffect), targ_origin, player.origin);
 +                      ctf_EventLog("pass", flag.team, player);
 +                      break;
 +              }
 +
 +              case DROP_RESET: 
 +              {
 +                      // do nothing
 +                      break;
 +              }
 +              
 +              default:
 +              case DROP_THROW:
 +              case DROP_NORMAL:
 +              {
 +                      ctf_Handle_Drop(flag, player, droptype);
 +                      break;
 +              }
 +      }
 +
 +      // kill old waypointsprite
 +      WaypointSprite_Ping(player.wps_flagcarrier);
 +      WaypointSprite_Kill(player.wps_flagcarrier);
 +      
 +      if(player.wps_enemyflagcarrier)
 +              WaypointSprite_Kill(player.wps_enemyflagcarrier);
 +      
 +      // captureshield
 +      ctf_CaptureShield_Update(player, 0); // shield player from picking up flag
 +}
 +
 +
 +// ==============
 +// Event Handlers
 +// ==============
 +
 +void ctf_Handle_Capture(entity flag, entity toucher, float capturetype)
 +{
 +      entity enemy_flag = ((capturetype == CAPTURE_NORMAL) ? toucher.flagcarried : toucher);
 +      entity player = ((capturetype == CAPTURE_NORMAL) ? toucher : enemy_flag.ctf_dropper);
 +      float old_time, new_time; 
 +      
 +      if not(player) { return; } // without someone to give the reward to, we can't possibly cap
 +      
 +      // messages and sounds
 +      Send_KillNotification(player.netname, enemy_flag.netname, ctf_CaptureRecord(enemy_flag, player), INFO_CAPTUREFLAG, MSG_INFO);
 +      sound(player, CH_TRIGGER, flag.snd_flag_capture, VOL_BASE, ATTN_NONE);
 +      
 +      switch(capturetype)
 +      {
 +              case CAPTURE_NORMAL: ctf_EventLog("capture", enemy_flag.team, player); break;
 +              case CAPTURE_DROPPED: ctf_EventLog("droppedcapture", enemy_flag.team, player); break;
 +              default: break;
 +      }
 +      
 +      // scoring
 +      PlayerTeamScore_AddScore(player, autocvar_g_ctf_score_capture);
 +      PlayerTeamScore_Add(player, SP_CTF_CAPS, ST_CTF_CAPS, 1);
 +
 +      old_time = PlayerScore_Add(player, SP_CTF_CAPTIME, 0);
 +      new_time = TIME_ENCODE(time - enemy_flag.ctf_pickuptime);
 +      if(!old_time || new_time < old_time)
 +              PlayerScore_Add(player, SP_CTF_CAPTIME, new_time - old_time);
 +
 +      // effects
 +      if(autocvar_g_ctf_flag_capture_effects) 
 +      {
 +              pointparticles(particleeffectnum((player.team == COLOR_TEAM1) ? "red_ground_quake" : "blue_ground_quake"), flag.origin, '0 0 0', 1);
 +              shockwave_spawn("models/ctf/shockwavetransring.md3", flag.origin - '0 0 15', -0.8, 0, 1);
 +      }
 +
 +      // other
 +      if(capturetype == CAPTURE_NORMAL)
 +      {
 +              WaypointSprite_Kill(player.wps_flagcarrier);
 +              if(flag.speedrunning) { ctf_FakeTimeLimit(player, -1); }
 +              
 +              if((enemy_flag.ctf_dropper) && (player != enemy_flag.ctf_dropper))
 +                      { PlayerTeamScore_AddScore(enemy_flag.ctf_dropper, autocvar_g_ctf_score_capture_assist); }
 +      }
 +      
 +      // reset the flag
 +      player.next_take_time = time + autocvar_g_ctf_flag_collect_delay;
 +      ctf_RespawnFlag(enemy_flag);
 +}
 +
 +void ctf_Handle_Return(entity flag, entity player)
 +{
 +      // messages and sounds
 +      //centerprint(player, strcat("You returned the ", flag.netname));
 +      Send_KillNotification(player.netname, flag.netname, "", INFO_RETURNFLAG, MSG_INFO);
 +      sound(player, CH_TRIGGER, flag.snd_flag_returned, VOL_BASE, ATTN_NONE);
 +      ctf_EventLog("return", flag.team, player);
 +
 +      // scoring
 +      PlayerTeamScore_AddScore(player, autocvar_g_ctf_score_return); // reward for return
 +      PlayerScore_Add(player, SP_CTF_RETURNS, 1); // add to count of returns
 +
 +      TeamScore_AddToTeam(flag.team, ST_SCORE, -autocvar_g_ctf_score_penalty_returned); // punish the team who was last carrying it
 +      
 +      if(flag.ctf_dropper) 
 +      {
 +              PlayerScore_Add(flag.ctf_dropper, SP_SCORE, -autocvar_g_ctf_score_penalty_returned); // punish the player who dropped the flag
 +              ctf_CaptureShield_Update(flag.ctf_dropper, 0); // shield player from picking up flag 
 +              flag.ctf_dropper.next_take_time = time + autocvar_g_ctf_flag_collect_delay; // set next take time
 +      }
 +      
 +      // reset the flag
 +      ctf_RespawnFlag(flag);
 +}
 +
 +void ctf_Handle_Pickup(entity flag, entity player, float pickuptype)
 +{
 +      // declarations
 +      entity tmp_player; // temporary entity which the FOR_EACH_PLAYER loop uses to scan players
 +      string verbosename; // holds the name of the player OR no name at all for printing in the centerprints
 +      float pickup_dropped_score; // used to calculate dropped pickup score
 +      
 +      // attach the flag to the player
 +      flag.owner = player;
 +      player.flagcarried = flag;
 +      setattachment(flag, player, "");
 +      setorigin(flag, FLAG_CARRY_OFFSET);
 +      
 +      // flag setup
 +      flag.movetype = MOVETYPE_NONE;
 +      flag.takedamage = DAMAGE_NO;
 +      flag.solid = SOLID_NOT;
 +      flag.angles = '0 0 0';
 +      flag.ctf_carrier = player;
 +      flag.ctf_status = FLAG_CARRY;
 +      
 +      switch(pickuptype)
 +      {
 +              case PICKUP_BASE: flag.ctf_pickuptime = time; break; // used for timing runs
 +              case PICKUP_DROPPED: flag.health = flag.max_flag_health; break; // reset health/return timelimit
 +              default: break;
 +      }
 +
 +      // messages and sounds
 +      Send_KillNotification (player.netname, flag.netname, "", INFO_GOTFLAG, MSG_INFO);
 +      sound(player, CH_TRIGGER, flag.snd_flag_taken, VOL_BASE, ATTN_NONE);
 +      verbosename = ((autocvar_g_ctf_flag_pickup_verbosename) ? strcat(Team_ColorCode(player.team), "(^7", player.netname, Team_ColorCode(player.team), ") ") : "");
 +      
 +      FOR_EACH_REALPLAYER(tmp_player)
 +      {
 +              if(tmp_player == player)
 +                      centerprint(tmp_player, strcat("You got the ", flag.netname, "!"));
 +              else if(!IsDifferentTeam(tmp_player, player))
 +                      centerprint(tmp_player, strcat("Your ", Team_ColorCode(player.team), "team mate ", verbosename, "^7got the flag! Protect them!"));
 +              else if(!IsDifferentTeam(tmp_player, flag))
 +                      centerprint(tmp_player, strcat("The ", Team_ColorCode(player.team), "enemy ", verbosename, "^7got your flag! Retrieve it!"));
 +      }
 +              
 +      switch(pickuptype)
 +      {
 +              case PICKUP_BASE: ctf_EventLog("steal", flag.team, player); break;
 +              case PICKUP_DROPPED: ctf_EventLog("pickup", flag.team, player); break;
 +              default: break;
 +      }
 +      
 +      // scoring
 +      PlayerScore_Add(player, SP_CTF_PICKUPS, 1);
 +      switch(pickuptype)
 +      {               
 +              case PICKUP_BASE:
 +              {
 +                      PlayerTeamScore_AddScore(player, autocvar_g_ctf_score_pickup_base);
 +                      break;
 +              }
 +              
 +              case PICKUP_DROPPED:
 +              {
 +                      pickup_dropped_score = (autocvar_g_ctf_flag_return_time ? bound(0, ((flag.ctf_droptime + autocvar_g_ctf_flag_return_time) - time) / autocvar_g_ctf_flag_return_time, 1) : 1);
 +                      pickup_dropped_score = floor((autocvar_g_ctf_score_pickup_dropped_late * (1 - pickup_dropped_score) + autocvar_g_ctf_score_pickup_dropped_early * pickup_dropped_score) + 0.5);
 +                      print("pickup_dropped_score is ", ftos(pickup_dropped_score), "\n");
 +                      PlayerTeamScore_AddScore(player, pickup_dropped_score);
 +                      break;
 +              }
 +              
 +              default: break;
 +      }
 +      
 +      // speedrunning
 +      if(pickuptype == PICKUP_BASE)
 +      {
 +              flag.speedrunning = player.speedrunning; // if speedrunning, flag will flag-return and teleport the owner back after the record
 +              if((player.speedrunning) && (ctf_captimerecord))
 +                      ctf_FakeTimeLimit(player, time + ctf_captimerecord);
 +      }
 +              
 +      // effects
 +      if(autocvar_g_ctf_flag_pickup_effects)
 +              pointparticles(particleeffectnum("smoke_ring"), 0.5 * (flag.absmin + flag.absmax), '0 0 0', 1);
 +      
 +      // waypoints 
 +      if(pickuptype == PICKUP_DROPPED) { WaypointSprite_Kill(flag.wps_flagdropped); }
 +      ctf_FlagcarrierWaypoints(player);
 +      WaypointSprite_Ping(player.wps_flagcarrier);
 +}
 +
 +
 +// ===================
 +// Main Flag Functions
 +// ===================
 +
 +void ctf_CheckFlagReturn(entity flag, float returntype)
 +{
 +      if(flag.wps_flagdropped) { WaypointSprite_UpdateHealth(flag.wps_flagdropped, flag.health); }
 +      
 +      if((flag.health <= 0) || (time >= flag.ctf_droptime + autocvar_g_ctf_flag_return_time))
 +      {
 +              switch(returntype)
 +              {
 +                      case RETURN_DROPPED: bprint("The ", flag.netname, " was dropped in the base and returned itself\n"); break;
 +                      case RETURN_DAMAGE: bprint("The ", flag.netname, " was destroyed and returned to base\n"); break;
 +                      case RETURN_SPEEDRUN: bprint("The ", flag.netname, " became impatient after ", ftos_decimals(ctf_captimerecord, 2), " seconds and returned itself\n"); break;
 +                      case RETURN_NEEDKILL: bprint("The ", flag.netname, " fell somewhere it couldn't be reached and returned to base\n"); break;
 +                      
 +                      default:
 +                      case RETURN_TIMEOUT:
 +                              { bprint("The ", flag.netname, " has returned to base\n"); break; }
 +              }
 +              sound(flag, CH_TRIGGER, flag.snd_flag_respawn, VOL_BASE, ATTN_NONE);
 +              ctf_EventLog("returned", flag.team, world);
 +              ctf_RespawnFlag(flag);
 +      }
 +}
 +
 +void ctf_CheckStalemate(void)
 +{
 +      // declarations
 +      float stale_red_flags, stale_blue_flags;
 +      entity tmp_entity;
 +
 +      entity ctf_staleflaglist; // reset the list, we need to build the list each time this function runs
 +
 +      // build list of stale flags
 +      for(tmp_entity = ctf_worldflaglist; tmp_entity; tmp_entity = tmp_entity.ctf_worldflagnext)
 +      {
 +              if(autocvar_g_ctf_flagcarrier_waypointforenemy_stalemate)
 +              if(tmp_entity.ctf_status != FLAG_BASE)
 +              if(time >= tmp_entity.ctf_pickuptime + autocvar_g_ctf_flagcarrier_waypointforenemy_stalemate)
 +              {
 +                      tmp_entity.ctf_staleflagnext = ctf_staleflaglist; // link flag into staleflaglist
 +                      ctf_staleflaglist = tmp_entity;
 +                      
 +                      switch(tmp_entity.team)
 +                      {
 +                              case COLOR_TEAM1: ++stale_red_flags; break;
 +                              case COLOR_TEAM2: ++stale_blue_flags; break;
 +                      }
 +              }
 +      }
 +
 +      if(stale_red_flags && stale_blue_flags)
 +              ctf_stalemate = TRUE;
 +      else if(!stale_red_flags && !stale_blue_flags)
 +              ctf_stalemate = FALSE;
 +      
 +      // if sufficient stalemate, then set up the waypointsprite and announce the stalemate if necessary
 +      if(ctf_stalemate)
 +      {
 +              for(tmp_entity = ctf_staleflaglist; tmp_entity; tmp_entity = tmp_entity.ctf_staleflagnext)
 +              {
 +                      if((tmp_entity.owner) && (!tmp_entity.owner.wps_enemyflagcarrier))
 +                              WaypointSprite_Spawn("enemyflagcarrier", 0, 0, tmp_entity.owner, FLAG_WAYPOINT_OFFSET, world, tmp_entity.team, tmp_entity.owner, wps_enemyflagcarrier, TRUE, RADARICON_FLAG, WPCOLOR_ENEMYFC(tmp_entity.owner.team));
 +              }
 +              
 +              if not(wpforenemy_announced)
 +              {
 +                      FOR_EACH_REALPLAYER(tmp_entity)
 +                              if(tmp_entity.flagcarried)
 +                                      centerprint(tmp_entity, "Stalemate! Enemies can now see you on radar!");
 +                              else
 +                                      centerprint(tmp_entity, "Stalemate! Flag carriers can now be seen by enemies on radar!");
 +                      
 +                      wpforenemy_announced = TRUE;
 +              }
 +      }
 +}
 +
 +void ctf_FlagDamage(entity inflictor, entity attacker, float damage, float deathtype, vector hitloc, vector force)
 +{
 +      if(ITEM_DAMAGE_NEEDKILL(deathtype))
 +      {
 +              // automatically kill the flag and return it
 +              self.health = 0;
 +              ctf_CheckFlagReturn(self, RETURN_NEEDKILL);
 +              return;
 +      }
 +      if(autocvar_g_ctf_flag_return_damage) 
 +      {
 +              // reduce health and check if it should be returned
 +              self.health = self.health - damage;
 +              ctf_CheckFlagReturn(self, RETURN_DAMAGE);
 +              return;
 +      }
 +}
 +
 +void ctf_FlagThink()
 +{
 +      // declarations
 +      entity tmp_entity;
 +
 +      self.nextthink = time + FLAG_THINKRATE; // only 5 fps, more is unnecessary.
 +
 +      // captureshield
 +      if(self == ctf_worldflaglist) // only for the first flag
 +              FOR_EACH_CLIENT(tmp_entity)
 +                      ctf_CaptureShield_Update(tmp_entity, 1); // release shield only
 +
 +      // sanity checks
 +      if(self.mins != FLAG_MIN || self.maxs != FLAG_MAX) { // reset the flag boundaries in case it got squished
 +              dprint("wtf the flag got squashed?\n");
 +              tracebox(self.origin, FLAG_MIN, FLAG_MAX, self.origin, MOVE_NOMONSTERS, self);
 +              if(!trace_startsolid) // can we resize it without getting stuck?
 +                      setsize(self, FLAG_MIN, FLAG_MAX); }
 +                      
 +      switch(self.ctf_status) // reset flag angles in case warpzones adjust it
 +      {
 +              case FLAG_DROPPED:
 +              case FLAG_PASSING:
 +              {
 +                      self.angles = '0 0 0';
 +                      break;
 +              }
 +              
 +              default: break;
 +      }
 +
 +      // main think method
 +      switch(self.ctf_status)
 +      {       
 +              case FLAG_BASE:
 +              {
 +                      if(autocvar_g_ctf_dropped_capture_radius)
 +                      {
 +                              for(tmp_entity = ctf_worldflaglist; tmp_entity; tmp_entity = tmp_entity.ctf_worldflagnext)
 +                                      if(tmp_entity.ctf_status == FLAG_DROPPED)
 +                                              if(vlen(self.origin - tmp_entity.origin) < autocvar_g_ctf_dropped_capture_radius)
 +                                                      ctf_Handle_Capture(self, tmp_entity, CAPTURE_DROPPED);
 +                      }
 +                      return;
 +              }
 +              
 +              case FLAG_DROPPED:
 +              {
 +                      if(autocvar_g_ctf_flag_dropped_floatinwater)
 +                      {
 +                              vector midpoint = ((self.absmin + self.absmax) * 0.5);
 +                              if(pointcontents(midpoint) == CONTENT_WATER)
 +                              {
 +                                      self.velocity = self.velocity * 0.5;
 +                                      
 +                                      if(pointcontents(midpoint + FLAG_FLOAT_OFFSET) == CONTENT_WATER)
 +                                              { self.velocity_z = autocvar_g_ctf_flag_dropped_floatinwater; }
 +                                      else
 +                                              { self.movetype = MOVETYPE_FLY; }
 +                              }
 +                              else if(self.movetype == MOVETYPE_FLY) { self.movetype = MOVETYPE_TOSS; }
 +                      }
 +                      if(autocvar_g_ctf_flag_return_dropped)
 +                      {
 +                              if((vlen(self.origin - self.ctf_spawnorigin) <= autocvar_g_ctf_flag_return_dropped) || (autocvar_g_ctf_flag_return_dropped == -1))
 +                              {
 +                                      self.health = 0;
 +                                      ctf_CheckFlagReturn(self, RETURN_DROPPED);
 +                                      return;
 +                              }
 +                      }
 +                      if(autocvar_g_ctf_flag_return_time)
 +                      {
 +                              self.health -= ((self.max_flag_health / autocvar_g_ctf_flag_return_time) * FLAG_THINKRATE);
 +                              ctf_CheckFlagReturn(self, RETURN_TIMEOUT);
 +                              return;
 +                      } 
 +                      return;
 +              }
 +                      
 +              case FLAG_CARRY:
 +              {
 +                      if(self.speedrunning && ctf_captimerecord && (time >= self.ctf_pickuptime + ctf_captimerecord)) 
 +                      {
 +                              self.health = 0;
 +                              ctf_CheckFlagReturn(self, RETURN_SPEEDRUN);
 +
 +                              tmp_entity = self;
 +                              self = self.owner;
 +                              self.impulse = CHIMPULSE_SPEEDRUN; // move the player back to the waypoint they set
 +                              ImpulseCommands();
 +                              self = tmp_entity;
 +                      }
 +                      if(autocvar_g_ctf_flagcarrier_waypointforenemy_stalemate)
 +                      {
 +                              if(time >= wpforenemy_nextthink)
 +                              {
 +                                      ctf_CheckStalemate();
 +                                      wpforenemy_nextthink = time + WPFE_THINKRATE; // waypoint for enemy think rate (to reduce unnecessary spam of this check)
 +                              }
 +                      }
 +                      return;
 +              }
 +              
 +              case FLAG_PASSING: // todo make work with warpzones
 +              {
 +                      vector targ_origin = ((self.pass_target.absmin + self.pass_target.absmax) * 0.5);
 +                      vector old_targ_origin = targ_origin;
 +                      targ_origin = WarpZone_RefSys_TransformOrigin(self.pass_target, self, targ_origin);
 +                      WarpZone_TraceLine(self.origin, targ_origin, MOVE_NOMONSTERS, self);
 +
 +                      print(strcat("self: ", vtos(self.origin), ", old: ", vtos(old_targ_origin), " (", ftos(vlen(self.origin - old_targ_origin)), "qu)"), ", transformed: ", vtos(targ_origin), " (", ftos(vlen(self.origin - targ_origin)), "qu)", ".\n");
 +                      
 +                      if((self.pass_target.deadflag != DEAD_NO)
 +                              || (vlen(self.origin - targ_origin) > autocvar_g_ctf_pass_radius)
 +                              || ((trace_fraction < 1) && (trace_ent != self.pass_target))
 +                              || (time > self.ctf_droptime + autocvar_g_ctf_pass_timelimit))
 +                      {
 +                              ctf_Handle_Drop(self, world, DROP_PASS);
 +                      }
 +                      else // still a viable target, go for it
 +                      {
 +                              vector desired_direction = normalize(targ_origin - self.origin);
 +                              vector current_direction = normalize(self.velocity);
 +
 +                              self.velocity = (normalize(current_direction + (desired_direction * autocvar_g_ctf_pass_turnrate)) * autocvar_g_ctf_pass_velocity); 
 +                      }
 +                      return;
 +              }
 +
 +              default: // this should never happen
 +              {
 +                      dprint("ctf_FlagThink(): Flag exists with no status?\n");
 +                      return;
 +              }
 +      }
 +}
 +
 +void ctf_FlagTouch()
 +{
 +      if(gameover) { return; }
 +      
 +      entity toucher = other;
 +      
 +      // automatically kill the flag and return it if it touched lava/slime/nodrop surfaces
 +      if(ITEM_TOUCH_NEEDKILL())
 +      {
 +              self.health = 0;
 +              ctf_CheckFlagReturn(self, RETURN_NEEDKILL);
 +              return;
 +      }
 +      
 +      // special touch behaviors
 +      if(toucher.vehicle_flags & VHF_ISVEHICLE)
 +      {
 +              if(autocvar_g_ctf_allow_vehicle_touch)
 +                      toucher = toucher.owner; // the player is actually the vehicle owner, not other
 +              else
 +                      return; // do nothing
 +      }
 +      else if(toucher.classname != "player") // The flag just touched an object, most likely the world
 +      {
 +              if(time > self.wait) // if we haven't in a while, play a sound/effect
 +              {
 +                      pointparticles(particleeffectnum(self.toucheffect), self.origin, '0 0 0', 1);
 +                      sound(self, CH_TRIGGER, self.snd_flag_touch, VOL_BASE, ATTN_NORM);
 +                      self.wait = time + FLAG_TOUCHRATE;
 +              }
 +              return;
 +      }
 +      else if(toucher.deadflag != DEAD_NO) { return; }
 +
 +      switch(self.ctf_status) 
 +      {       
 +              case FLAG_BASE:
 +              {
 +                      if(!IsDifferentTeam(toucher, self) && (toucher.flagcarried) && IsDifferentTeam(toucher.flagcarried, self))
 +                              ctf_Handle_Capture(self, toucher, CAPTURE_NORMAL); // toucher just captured the enemies flag to his base
 +                      else if(IsDifferentTeam(toucher, self) && (!toucher.flagcarried) && (!toucher.ctf_captureshielded) && (time > toucher.next_take_time))
 +                              ctf_Handle_Pickup(self, toucher, PICKUP_BASE); // toucher just stole the enemies flag
 +                      break;
 +              }
 +              
 +              case FLAG_DROPPED:
 +              {
 +                      if(!IsDifferentTeam(toucher, self))
 +                              ctf_Handle_Return(self, toucher); // toucher just returned his own flag
 +                      else if((!toucher.flagcarried) && ((toucher != self.ctf_dropper) || (time > self.ctf_droptime + autocvar_g_ctf_flag_collect_delay)))
 +                              ctf_Handle_Pickup(self, toucher, PICKUP_DROPPED); // toucher just picked up a dropped enemy flag
 +                      break;
 +              }
 +                      
 +              case FLAG_CARRY:
 +              {
 +                      dprint("Someone touched a flag even though it was being carried?\n");
 +                      break;
 +              }
 +              
 +              case FLAG_PASSING:
 +              {
 +                      if((toucher.classname == "player") && (toucher.deadflag == DEAD_NO) && (toucher != self.pass_sender))
 +                      {
 +                              if(IsDifferentTeam(toucher, self.pass_sender))
 +                                      ctf_Handle_Return(self, toucher);
 +                              else
 +                                      ctf_Handle_Retrieve(self, toucher);
 +                      }
 +                      break;
 +              }
 +      }
 +}
 +
 +void ctf_RespawnFlag(entity flag)
 +{
 +      // reset the player (if there is one)
 +      if((flag.owner) && (flag.owner.flagcarried == flag))
 +      {
 +              if(flag.owner.wps_enemyflagcarrier)
 +                      WaypointSprite_Kill(flag.owner.wps_enemyflagcarrier);
 +                      
 +              WaypointSprite_Kill(flag.wps_flagcarrier);
 +              
 +              flag.owner.flagcarried = world;
 +
 +              if(flag.speedrunning)
 +                      ctf_FakeTimeLimit(flag.owner, -1);
 +      }
 +
 +      if((flag.ctf_status == FLAG_DROPPED) && (flag.wps_flagdropped))
 +              { WaypointSprite_Kill(flag.wps_flagdropped); }
 +
 +      // reset the flag
 +      setattachment(flag, world, "");
 +      setorigin(flag, flag.ctf_spawnorigin);
 +      
 +      flag.movetype = ((flag.noalign) ? MOVETYPE_NONE : MOVETYPE_TOSS);
 +      flag.takedamage = DAMAGE_NO;
 +      flag.health = flag.max_flag_health;
 +      flag.solid = SOLID_TRIGGER;
 +      flag.velocity = '0 0 0';
 +      flag.angles = flag.mangle;
 +      flag.flags = FL_ITEM | FL_NOTARGET;
 +      
 +      flag.ctf_status = FLAG_BASE;
 +      flag.owner = world;
 +      flag.pass_sender = world;
 +      flag.pass_target = world;
 +      flag.ctf_carrier = world;
 +      flag.ctf_dropper = world;
 +      flag.ctf_pickuptime = 0;
 +      flag.ctf_droptime = 0;
 +
 +      wpforenemy_announced = FALSE;
 +}
 +
 +void ctf_Reset()
 +{
 +      if(self.owner)
 +              if(self.owner.classname == "player")
 +                      ctf_Handle_Throw(self.owner, world, DROP_RESET);
 +                      
 +      ctf_RespawnFlag(self);
 +}
 +
 +void ctf_DelayedFlagSetup(void) // called after a flag is placed on a map by ctf_FlagSetup()
 +{
 +      // bot waypoints
 +      waypoint_spawnforitem_force(self, self.origin);
 +      self.nearestwaypointtimeout = 0; // activate waypointing again
 +      self.bot_basewaypoint = self.nearestwaypoint;
 +
 +      // waypointsprites
 +      WaypointSprite_SpawnFixed(((self.team == COLOR_TEAM1) ? "redbase" : "bluebase"), self.origin + FLAG_WAYPOINT_OFFSET, self, wps_flagbase, RADARICON_FLAG, colormapPaletteColor(self.team - 1, FALSE));
 +      WaypointSprite_UpdateTeamRadar(self.wps_flagbase, RADARICON_FLAG, colormapPaletteColor(self.team - 1, FALSE));
 +
 +      // captureshield setup
 +      ctf_CaptureShield_Spawn(self);
 +}
 +
 +void ctf_FlagSetup(float teamnumber, entity flag) // called when spawning a flag entity on the map as a spawnfunc 
 +{     
 +      // declarations
 +      teamnumber = fabs(teamnumber - bound(0, autocvar_g_ctf_reverse, 1)); // if we were originally 1, this will become 0. If we were originally 0, this will become 1. 
 +      self = flag; // for later usage with droptofloor()
 +      
 +      // main setup
 +      flag.ctf_worldflagnext = ctf_worldflaglist; // link flag into ctf_worldflaglist
 +      ctf_worldflaglist = flag;
 +
 +      setattachment(flag, world, ""); 
 +
 +      flag.netname = ((teamnumber) ? "^1RED^7 flag" : "^4BLUE^7 flag");
 +      flag.team = ((teamnumber) ? COLOR_TEAM1 : COLOR_TEAM2); // COLOR_TEAM1: color 4 team (red) - COLOR_TEAM2: color 13 team (blue)
 +      flag.items = ((teamnumber) ? IT_KEY2 : IT_KEY1); // IT_KEY2: gold key (redish enough) - IT_KEY1: silver key (bluish enough)
 +      flag.classname = "item_flag_team";
 +      flag.target = "###item###"; // wut?
 +      flag.flags = FL_ITEM | FL_NOTARGET;
 +      flag.solid = SOLID_TRIGGER;
 +      flag.takedamage = DAMAGE_NO;
 +      flag.damageforcescale = autocvar_g_ctf_flag_damageforcescale;   
 +      flag.max_flag_health = ((autocvar_g_ctf_flag_return_damage && autocvar_g_ctf_flag_health) ? autocvar_g_ctf_flag_health : 100);
 +      flag.health = flag.max_flag_health;
 +      flag.event_damage = ctf_FlagDamage;
 +      flag.pushable = TRUE;
 +      flag.teleportable = TELEPORT_NORMAL;
 +      flag.damagedbytriggers = autocvar_g_ctf_flag_return_when_unreachable;
 +      flag.damagedbycontents = autocvar_g_ctf_flag_return_when_unreachable;
 +      flag.velocity = '0 0 0';
 +      flag.mangle = flag.angles;
 +      flag.reset = ctf_Reset;
 +      flag.touch = ctf_FlagTouch;
 +      flag.think = ctf_FlagThink;
 +      flag.nextthink = time + FLAG_THINKRATE;
 +      flag.ctf_status = FLAG_BASE;
 +      
 +      if(!flag.model) { flag.model = ((teamnumber) ? autocvar_g_ctf_flag_red_model : autocvar_g_ctf_flag_blue_model); }
 +      if(!flag.scale) { flag.scale = FLAG_SCALE; }
 +      if(!flag.skin) { flag.skin = ((teamnumber) ? autocvar_g_ctf_flag_red_skin : autocvar_g_ctf_flag_blue_skin); }
 +      if(!flag.toucheffect) { flag.toucheffect = ((teamnumber) ? "redflag_touch" : "blueflag_touch"); }
 +      if(!flag.passeffect) { flag.passeffect = ((!teamnumber) ? "red_pass" : "blue_pass"); } // invert the team number of the flag to pass as enemy team color
 +      
 +      // sound 
 +      if(!flag.snd_flag_taken) { flag.snd_flag_taken  = ((teamnumber) ? "ctf/red_taken.wav" : "ctf/blue_taken.wav"); }
 +      if(!flag.snd_flag_returned) { flag.snd_flag_returned = ((teamnumber) ? "ctf/red_returned.wav" : "ctf/blue_returned.wav"); }
 +      if(!flag.snd_flag_capture) { flag.snd_flag_capture = ((teamnumber) ? "ctf/red_capture.wav" : "ctf/blue_capture.wav"); } // blue team scores by capturing the red flag
 +      if(!flag.snd_flag_respawn) { flag.snd_flag_respawn = "ctf/flag_respawn.wav"; } // if there is ever a team-based sound for this, update the code to match.
 +      if(!flag.snd_flag_dropped) { flag.snd_flag_dropped = ((teamnumber) ? "ctf/red_dropped.wav" : "ctf/blue_dropped.wav"); }
 +      if(!flag.snd_flag_touch) { flag.snd_flag_touch = "ctf/touch.wav"; } // again has no team-based sound
 +      if(!flag.snd_flag_pass) { flag.snd_flag_pass = "ctf/pass.wav"; } // same story here
 +      
 +      // precache
 +      precache_sound(flag.snd_flag_taken);
 +      precache_sound(flag.snd_flag_returned);
 +      precache_sound(flag.snd_flag_capture);
 +      precache_sound(flag.snd_flag_respawn);
 +      precache_sound(flag.snd_flag_dropped);
 +      precache_sound(flag.snd_flag_touch);
 +      precache_sound(flag.snd_flag_pass);
 +      precache_model(flag.model);
 +      precache_model("models/ctf/shield.md3");
 +      precache_model("models/ctf/shockwavetransring.md3");
 +
 +      // appearence
 +      setmodel(flag, flag.model); // precision set below
 +      setsize(flag, FLAG_MIN, FLAG_MAX);
 +      setorigin(flag, (flag.origin + FLAG_SPAWN_OFFSET));
 +      
 +      if(autocvar_g_ctf_flag_glowtrails)
 +      {
 +              flag.glow_color = ((teamnumber) ? 251 : 210); // 251: red - 210: blue
 +              flag.glow_size = 25;
 +              flag.glow_trail = 1;
 +      }
 +      
 +      flag.effects |= EF_LOWPRECISION;
 +      if(autocvar_g_ctf_fullbrightflags) { flag.effects |= EF_FULLBRIGHT; }
 +      if(autocvar_g_ctf_dynamiclights)   { flag.effects |= ((teamnumber) ? EF_RED : EF_BLUE); }
 +      
 +      // flag placement
 +      if((flag.spawnflags & 1) || flag.noalign) // don't drop to floor, just stay at fixed location
 +      {       
 +              flag.dropped_origin = flag.origin; 
 +              flag.noalign = TRUE;
 +              flag.movetype = MOVETYPE_NONE;
 +      }
 +      else // drop to floor, automatically find a platform and set that as spawn origin
 +      { 
 +              flag.noalign = FALSE;
 +              self = flag;
 +              droptofloor();
 +              flag.movetype = MOVETYPE_TOSS; 
 +      }       
 +      
 +      InitializeEntity(flag, ctf_DelayedFlagSetup, INITPRIO_SETLOCATION);
 +}
 +
 +
 +// ==============
 +// Hook Functions
 +// ==============
 +
 +MUTATOR_HOOKFUNCTION(ctf_PlayerPreThink)
 +{
 +      entity flag;
 +      
 +      // initially clear items so they can be set as necessary later.
 +      self.items &~= (IT_RED_FLAG_CARRYING | IT_RED_FLAG_TAKEN | IT_RED_FLAG_LOST 
 +              | IT_BLUE_FLAG_CARRYING | IT_BLUE_FLAG_TAKEN | IT_BLUE_FLAG_LOST | IT_CTF_SHIELDED);
 +
 +      // scan through all the flags and notify the client about them 
 +      for(flag = ctf_worldflaglist; flag; flag = flag.ctf_worldflagnext)
 +      {
 +              switch(flag.ctf_status)
 +              {
 +                      case FLAG_PASSING:
 +                      case FLAG_CARRY:
 +                      {
 +                              if((flag.owner == self) || (flag.pass_sender == self))
 +                                      self.items |= ((flag.items & IT_KEY2) ? IT_RED_FLAG_CARRYING : IT_BLUE_FLAG_CARRYING); // carrying: self is currently carrying the flag
 +                              else 
 +                                      self.items |= ((flag.items & IT_KEY2) ? IT_RED_FLAG_TAKEN : IT_BLUE_FLAG_TAKEN); // taken: someone on self's team is carrying the flag
 +                              break;
 +                      }
 +                      case FLAG_DROPPED:
 +                      {
 +                              self.items |= ((flag.items & IT_KEY2) ? IT_RED_FLAG_LOST : IT_BLUE_FLAG_LOST); // lost: the flag is dropped somewhere on the map
 +                              break;
 +                      }
 +              }
 +      }
 +      
 +      // item for stopping players from capturing the flag too often
 +      if(self.ctf_captureshielded)
 +              self.items |= IT_CTF_SHIELDED;
 +      
 +      // update the health of the flag carrier waypointsprite
 +      if(self.wps_flagcarrier) 
 +              WaypointSprite_UpdateHealth(self.wps_flagcarrier, '1 0 0' * healtharmor_maxdamage(self.health, self.armorvalue, autocvar_g_balance_armor_blockpercent));
 +      
 +      return 0;
 +}
 +
 +MUTATOR_HOOKFUNCTION(ctf_PlayerDamage) // for changing damage and force values that are applied to players in g_damage.qc
 +{
 +      if(frag_attacker.flagcarried) // if the attacker is a flagcarrier
 +      {
 +              if(frag_target == frag_attacker) // damage done to yourself
 +              {
 +                      frag_damage *= autocvar_g_ctf_flagcarrier_selfdamagefactor;
 +                      frag_force *= autocvar_g_ctf_flagcarrier_selfforcefactor;
 +              }
 +              else // damage done to everyone else
 +              {
 +                      frag_damage *= autocvar_g_ctf_flagcarrier_damagefactor;
 +                      frag_force *= autocvar_g_ctf_flagcarrier_forcefactor;
 +              }
 +      }
 +      else if(frag_target.flagcarried && (frag_target.deadflag == DEAD_NO) && IsDifferentTeam(frag_target, frag_attacker)) // if the target is a flagcarrier
 +      {
 +              if(autocvar_g_ctf_flagcarrier_auto_helpme_when_damaged > ('1 0 0' * healtharmor_maxdamage(frag_target.health, frag_target.armorvalue, autocvar_g_balance_armor_blockpercent)))
 +                      WaypointSprite_HelpMePing(frag_target.wps_flagcarrier); // TODO: only do this if there is a significant loss of health?
 +      }
 +      return 0;
 +}
 +
 +MUTATOR_HOOKFUNCTION(ctf_PlayerDies)
 +{
 +      if((frag_attacker != frag_target) && (frag_attacker.classname == "player") && (frag_target.flagcarried))
 +      {
 +              PlayerTeamScore_AddScore(frag_attacker, autocvar_g_ctf_score_kill);
 +              PlayerScore_Add(frag_attacker, SP_CTF_FCKILLS, 1);
 +      }
 +                              
 +      if(frag_target.flagcarried)
 +              { ctf_Handle_Throw(frag_target, world, DROP_NORMAL); }
 +              
 +      return 0;
 +}
 +
 +MUTATOR_HOOKFUNCTION(ctf_GiveFragsForKill)
 +{
 +      frag_score = 0;
 +      return (autocvar_g_ctf_ignore_frags); // no frags counted in ctf if this is true
 +}
 +
 +MUTATOR_HOOKFUNCTION(ctf_RemovePlayer)
 +{
 +      if(self.flagcarried)
 +              { ctf_Handle_Throw(self, world, DROP_NORMAL); }
 +              
 +      return 0;
 +}
 +
 +MUTATOR_HOOKFUNCTION(ctf_PortalTeleport)
 +{
 +      if(self.flagcarried) 
 +      if(!autocvar_g_ctf_portalteleport)
 +              { ctf_Handle_Throw(self, world, DROP_NORMAL); }
 +
 +      return 0;
 +}
 +
 +MUTATOR_HOOKFUNCTION(ctf_PlayerUseKey)
 +{
 +      entity player = self;
 +
 +      if((time > player.throw_antispam) && (player.deadflag == DEAD_NO) && !player.speedrunning && (!player.vehicle || autocvar_g_ctf_allow_vehicle_touch))
 +      {
 +              // pass the flag to a team mate
 +              if(autocvar_g_ctf_pass)
 +              {
 +                      entity head, closest_target;
 +                      head = WarpZone_FindRadius(player.origin, autocvar_g_ctf_pass_radius, TRUE);
 +                      
 +                      while(head) // find the closest acceptable target to pass to
 +                      {
 +                              if(head.classname == "player" && head.deadflag == DEAD_NO)
 +                              if(head != player && !IsDifferentTeam(head, player))
 +                              if(!head.speedrunning && (!head.vehicle || autocvar_g_ctf_allow_vehicle_touch))
 +                              {
 +                                      if(autocvar_g_ctf_pass_request && !player.flagcarried && head.flagcarried) 
 +                                      { 
 +                                              if(clienttype(head) == CLIENTTYPE_BOT)
 +                                              {
 +                                                      centerprint(player, strcat("Requesting ", head.netname, " to pass you the ", head.flagcarried.netname)); 
 +                                                      ctf_Handle_Throw(head, player, DROP_PASS);
 +                                              }
 +                                              else
 +                                              {
 +                                                      centerprint(head, strcat(player.netname, " requests you to pass the ", head.flagcarried.netname)); 
 +                                                      centerprint(player, strcat("Requesting ", head.netname, " to pass you the ", head.flagcarried.netname)); 
 +                                              }
 +                                              player.throw_antispam = time + autocvar_g_ctf_pass_wait; 
 +                                              return 0; 
 +                                      }
 +                                      else if(player.flagcarried)
 +                                      {
 +                                              if(closest_target)
 +                                              {
 +                                                      if(vlen(player.origin - WarpZone_UnTransformOrigin(head, head.origin)) < vlen(player.origin - WarpZone_UnTransformOrigin(closest_target, closest_target.origin)))
 +                                                              { closest_target = head; }
 +                                              }
 +                                              else { closest_target = head; }
 +                                      }
 +                              }
 +                              head = head.chain;
 +                      }
 +                      
 +                      if(closest_target) { ctf_Handle_Throw(player, closest_target, DROP_PASS); return 0; }
 +              }
 +              
 +              // throw the flag in front of you
 +              if(autocvar_g_ctf_drop && player.flagcarried)
 +                      { ctf_Handle_Throw(player, world, DROP_THROW); }
 +      }
 +              
 +      return 0;
 +}
 +
 +MUTATOR_HOOKFUNCTION(ctf_HelpMePing)
 +{
 +      if(self.wps_flagcarrier) // update the flagcarrier waypointsprite with "NEEDING HELP" notification
 +      {
 +              WaypointSprite_HelpMePing(self.wps_flagcarrier);
 +      } 
 +      else // create a normal help me waypointsprite
 +      {
 +              WaypointSprite_Spawn("helpme", waypointsprite_deployed_lifetime, waypointsprite_limitedrange, self, FLAG_WAYPOINT_OFFSET, world, self.team, self, wps_helpme, FALSE, RADARICON_HELPME, '1 0.5 0');
 +              WaypointSprite_Ping(self.wps_helpme);
 +      }
 +
 +      return 1;
 +}
 +
 +MUTATOR_HOOKFUNCTION(ctf_VehicleEnter)
 +{
 +      if(vh_player.flagcarried)
 +      {
 +              if(!autocvar_g_ctf_flagcarrier_allow_vehicle_carry)
 +              {
 +                      ctf_Handle_Throw(vh_player, world, DROP_NORMAL);
 +              }
 +              else
 +              {            
 +                      setattachment(vh_player.flagcarried, vh_vehicle, ""); 
 +                      setorigin(vh_player.flagcarried, VEHICLE_FLAG_OFFSET);
 +                      vh_player.flagcarried.scale = VEHICLE_FLAG_SCALE;
 +                      //vh_player.flagcarried.angles = '0 0 0';       
 +              }
 +      }
 +              
 +      return 0;
 +}
 +
 +MUTATOR_HOOKFUNCTION(ctf_VehicleExit)
 +{
 +      if(vh_player.flagcarried)
 +      {
 +              setattachment(vh_player.flagcarried, vh_player, ""); 
 +              setorigin(vh_player.flagcarried, FLAG_CARRY_OFFSET);
 +              vh_player.flagcarried.scale = FLAG_SCALE;
 +              vh_player.flagcarried.angles = '0 0 0'; 
 +      }
 +
 +      return 0;
 +}
 +
 +MUTATOR_HOOKFUNCTION(ctf_AbortSpeedrun)
 +{
 +      if(self.flagcarried)
 +      {
 +              bprint("The ", self.flagcarried.netname, " was returned to base by its carrier\n");
 +              ctf_RespawnFlag(self);
 +      }
 +      
 +      return 0;
 +}
 +
 +MUTATOR_HOOKFUNCTION(ctf_MatchEnd)
 +{
 +      entity flag; // temporary entity for the search method
 +      
 +      for(flag = ctf_worldflaglist; flag; flag = flag.ctf_worldflagnext)
 +      {
 +              switch(flag.ctf_status)
 +              {
 +                      case FLAG_DROPPED:
 +                      case FLAG_PASSING:
 +                      {
 +                              // lock the flag, game is over
 +                              flag.movetype = MOVETYPE_NONE;
 +                              flag.takedamage = DAMAGE_NO;
 +                              flag.solid = SOLID_NOT;
 +                              flag.nextthink = 0; // stop thinking
 +                              
 +                              print("stopping the ", flag.netname, " from moving.\n");
 +                              break;
 +                      }
 +                      
 +                      default:
 +                      case FLAG_BASE:
 +                      case FLAG_CARRY:
 +                      {
 +                              // do nothing for these flags
 +                              break;
 +                      }
 +              }
 +      }
 +      
 +      return 0;
 +}
 +
 +
 +// ==========
 +// Spawnfuncs
 +// ==========
 +
 +/*QUAKED spawnfunc_info_player_team1 (1 0 0) (-16 -16 -24) (16 16 24)
 +CTF Starting point for a player in team one (Red).
 +Keys: "angle" viewing angle when spawning. */
 +void spawnfunc_info_player_team1()
 +{
 +      if(g_assault) { remove(self); return; }
 +      
 +      self.team = COLOR_TEAM1; // red
 +      spawnfunc_info_player_deathmatch();
 +}
 +
 +
 +/*QUAKED spawnfunc_info_player_team2 (1 0 0) (-16 -16 -24) (16 16 24)
 +CTF Starting point for a player in team two (Blue).
 +Keys: "angle" viewing angle when spawning. */
 +void spawnfunc_info_player_team2()
 +{
 +      if(g_assault) { remove(self); return; }
 +      
 +      self.team = COLOR_TEAM2; // blue
 +      spawnfunc_info_player_deathmatch();
 +}
 +
 +/*QUAKED spawnfunc_info_player_team3 (1 0 0) (-16 -16 -24) (16 16 24)
 +CTF Starting point for a player in team three (Yellow).
 +Keys: "angle" viewing angle when spawning. */
 +void spawnfunc_info_player_team3()
 +{
 +      if(g_assault) { remove(self); return; }
 +      
 +      self.team = COLOR_TEAM3; // yellow
 +      spawnfunc_info_player_deathmatch();
 +}
 +
 +
 +/*QUAKED spawnfunc_info_player_team4 (1 0 0) (-16 -16 -24) (16 16 24)
 +CTF Starting point for a player in team four (Purple).
 +Keys: "angle" viewing angle when spawning. */
 +void spawnfunc_info_player_team4()
 +{
 +      if(g_assault) { remove(self); return; }
 +      
 +      self.team = COLOR_TEAM4; // purple
 +      spawnfunc_info_player_deathmatch();
 +}
 +
 +/*QUAKED spawnfunc_item_flag_team1 (0 0.5 0.8) (-48 -48 -37) (48 48 37)
 +CTF flag for team one (Red).
 +Keys: 
 +"angle" Angle the flag will point (minus 90 degrees)... 
 +"model" model to use, note this needs red and blue as skins 0 and 1...
 +"noise" sound played when flag is picked up...
 +"noise1" sound played when flag is returned by a teammate...
 +"noise2" sound played when flag is captured...
 +"noise3" sound played when flag is lost in the field and respawns itself... 
 +"noise4" sound played when flag is dropped by a player...
 +"noise5" sound played when flag touches the ground... */
 +void spawnfunc_item_flag_team1()
 +{
 +      if(!g_ctf) { remove(self); return; }
 +
 +      ctf_FlagSetup(1, self); // 1 = red
 +}
 +
 +/*QUAKED spawnfunc_item_flag_team2 (0 0.5 0.8) (-48 -48 -37) (48 48 37)
 +CTF flag for team two (Blue).
 +Keys: 
 +"angle" Angle the flag will point (minus 90 degrees)... 
 +"model" model to use, note this needs red and blue as skins 0 and 1...
 +"noise" sound played when flag is picked up...
 +"noise1" sound played when flag is returned by a teammate...
 +"noise2" sound played when flag is captured...
 +"noise3" sound played when flag is lost in the field and respawns itself... 
 +"noise4" sound played when flag is dropped by a player...
 +"noise5" sound played when flag touches the ground... */
 +void spawnfunc_item_flag_team2()
 +{
 +      if(!g_ctf) { remove(self); return; }
 +
 +      ctf_FlagSetup(0, self); // the 0 is misleading, but -- 0 = blue.
 +}
 +
 +/*QUAKED spawnfunc_ctf_team (0 .5 .8) (-16 -16 -24) (16 16 32)
 +Team declaration for CTF gameplay, this allows you to decide what team names and control point models are used in your map.
 +Note: If you use spawnfunc_ctf_team entities you must define at least 2!  However, unlike domination, you don't need to make a blank one too.
 +Keys:
 +"netname" Name of the team (for example Red, Blue, Green, Yellow, Life, Death, Offense, Defense, etc)...
 +"cnt" Scoreboard color of the team (for example 4 is red and 13 is blue)... */
 +void spawnfunc_ctf_team()
 +{
 +      if(!g_ctf) { remove(self); return; }
 +      
 +      self.classname = "ctf_team";
 +      self.team = self.cnt + 1;
 +}
 +
 +
 +// ==============
 +// Initialization
 +// ==============
 +
 +// code from here on is just to support maps that don't have flag and team entities
 +void ctf_SpawnTeam (string teamname, float teamcolor)
 +{
 +      entity oldself;
 +      oldself = self;
 +      self = spawn();
 +      self.classname = "ctf_team";
 +      self.netname = teamname;
 +      self.cnt = teamcolor;
 +
 +      spawnfunc_ctf_team();
 +
 +      self = oldself;
 +}
 +
 +void ctf_DelayedInit() // Do this check with a delay so we can wait for teams to be set up.
 +{
 +      // if no teams are found, spawn defaults
 +      if(find(world, classname, "ctf_team") == world)
 +      {
 +              print("No ""ctf_team"" entities found on this map, creating them anyway.\n");
 +              ctf_SpawnTeam("Red", COLOR_TEAM1 - 1);
 +              ctf_SpawnTeam("Blue", COLOR_TEAM2 - 1);
 +      }
 +      
 +      ScoreRules_ctf();
 +}
 +
 +void ctf_Initialize()
 +{
 +      ctf_captimerecord = stof(db_get(ServerProgsDB, strcat(GetMapname(), "/captimerecord/time")));
 +
 +      ctf_captureshield_min_negscore = autocvar_g_ctf_shield_min_negscore;
 +      ctf_captureshield_max_ratio = autocvar_g_ctf_shield_max_ratio;
 +      ctf_captureshield_force = autocvar_g_ctf_shield_force;
 +      
 +      InitializeEntity(world, ctf_DelayedInit, INITPRIO_GAMETYPE);
 +}
 +
 +
 +MUTATOR_DEFINITION(gamemode_ctf)
 +{
 +      MUTATOR_HOOK(MakePlayerObserver, ctf_RemovePlayer, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(ClientDisconnect, ctf_RemovePlayer, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(PlayerDies, ctf_PlayerDies, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(MatchEnd, ctf_MatchEnd, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(PortalTeleport, ctf_PortalTeleport, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(GiveFragsForKill, ctf_GiveFragsForKill, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(PlayerPreThink, ctf_PlayerPreThink, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(PlayerDamage_Calculate, ctf_PlayerDamage, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(PlayerUseKey, ctf_PlayerUseKey, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(HelpMePing, ctf_HelpMePing, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(VehicleEnter, ctf_VehicleEnter, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(VehicleExit, ctf_VehicleExit, CBC_ORDER_ANY);
 +      MUTATOR_HOOK(AbortSpeedrun, ctf_AbortSpeedrun, CBC_ORDER_ANY);
 +      
 +      MUTATOR_ONADD
 +      {
 +              if(time > 1) // game loads at time 1
 +                      error("This is a game type and it cannot be added at runtime.");
 +              g_ctf = 1;
 +              ctf_Initialize();
 +      }
 +
 +      MUTATOR_ONREMOVE
 +      {
 +              g_ctf = 0;
 +              error("This is a game type and it cannot be removed at runtime.");
 +      }
 +
 +      return 0;
 +}