Function cEndSequenceFrame

scripts/Merc3.cpp:2213–2284

$$ACTION Custom End Sequence Update for Player Object [o:PlayerObject] cEndSequenceFrame Custom scripting for the killer end sequence. Parameters: PlayerObject: This must be the playerobject experiencing the end sequence $$END */

$$END
*/
void cEndSequenceFrame(int playerobj) {
  int room_number, r, r2;
  vector player_pos;

  Obj_Value(playerobj, VF_GET, OBJV_I_ROOMNUM, &room_number);
  Obj_Value(playerobj, VF_GET, OBJV_V_POS, &player_pos);

  //	lookup starting r;
  for (r = 0; (r < N_END_ROOMS) && exit_room_info[r].room_number != room_number; r++) {
  }

  if (r == N_END_ROOMS)
    return;

  //	okay, we know where the player is
  //	now look for spew,clutter objects in player room and next room.
  char fx_type = -1;
  char name[32];
  int handle;

  for (r2 = r; r2 <= (r + 2); r2++) {
    char *cmds = &exit_room_info[r].cmdstr[0];
    int cmdlen = (int)strlen(cmds);
    int c;
    if (r2 == N_END_ROOMS) {
      break;
    }
    for (c = 0; c < cmdlen; c++) {
      if (cmds[c] == '.')
        fx_type = -1;
      else if (cmds[c] == '!')
        fx_type = 0;
      else if (cmds[c] == '$')
        fx_type = 1;
      else if (cmds[c] == '#')
        fx_type = 2;
      else if (cmds[c] == '%')
        fx_type = 3;
      else if (cmds[c] == '*')
        fx_type = 4;
      else {
        //	a spewer,clutter kill, sparker...
        //	get handle of object
        switch (fx_type) {
        case 0:
          snprintf(name, sizeof(name), "X%d %c", exit_room_info[r].room_number, cmds[c]);
          break;
        case 1:
        case 2:
        case 3:
          snprintf(name, sizeof(name), "X%d Spew %c", exit_room_info[r].room_number, cmds[c]);
          break;
        case 4:
          snprintf(name, sizeof(name), "X%d Sparks%c", exit_room_info[r].room_number, cmds[c]);
          break;
        default:
          name[0] = 0;
        }