Function DoPlayerFrameForOne

Descent3/Player.cpp:1793–1966

Does actions for the given player slot

// Does actions for the given player slot
void DoPlayerFrameForOne(int slot) {
  ASSERT(slot >= 0 && slot < MAX_PLAYERS);
  object *obj = &Objects[Players[slot].objnum];
  static int napalm_id = -1;

  Players[slot].time_level = Gametime;

  if (napalm_id == -1) {
    napalm_id = FindWeaponName("Napalm");
  }

  // If piggy backing observer, then set position relative to observed object
  if (obj->type == OBJ_OBSERVER && Players[slot].piggy_objnum != -1) {
    object *observed = &Objects[Players[slot].piggy_objnum];
    ObjSetPos(obj, &observed->pos, observed->roomnum, &observed->orient, false);

    obj->mtype.phys_info = observed->mtype.phys_info;
  }

  if (obj->type == OBJ_PLAYER || obj->type == OBJ_OBSERVER && obj->id == Player_num) {
    // Do camera stuff if needed
    SetupPlayerCamera();
  }

  if (Demo_flags != DF_PLAYBACK) {
    if ((Players[slot].flags & PLAYER_FLAGS_DYING) || (Players[slot].flags & PLAYER_FLAGS_DEAD))
      DoNewPlayerDeathFrame(slot);
  }

  //	do invulnerable stuff
  if (Players[slot].flags & PLAYER_FLAGS_INVULNERABLE) {
    Players[slot].invulnerable_time -= Frametime;
    if (Players[slot].invulnerable_time <= 0.0f) {
      //	deinvulnerablize the player!!
      MakePlayerVulnerable(slot);
    }
  }

  // Do terrain damage stuff
  if (Terrain_sky.damage_per_second > 0 && !(Players[slot].flags & (PLAYER_FLAGS_DYING | PLAYER_FLAGS_DEAD))) {
    if (OBJECT_OUTSIDE(obj)) {
      float scalar = GetTerrainDynamicScalar(&obj->pos, CELLNUM(obj->roomnum));

      // White out the screen
      if (scalar > 0 && slot == Player_num) {
        float vals[4];

        vals[0] = 1.0;
        vals[1] = 1.0;
        vals[2] = .8f;
        vals[3] = scalar / 4;

        CreateNewEvent(RENDER_EVENT, 0, 0, &vals, sizeof(float) * 4, DrawAlphaEvent);
      }

      if (scalar > .7) {
        SetNapalmDamageEffect(obj, NULL, napalm_id);
        obj->effect_info->damage_time = 1;