p_spec.c

The source code of Doom legacy for windows

      case 8:
        // Build Stairs
        if(EV_BuildStairs(line,gamemode == heretic ? 8*FRACUNIT : build8) || !boomsupport)
          line->special = 0;
        break;

      case 10:
        // PlatDownWaitUp
        if(EV_DoPlat(line,downWaitUpStay,0) || !boomsupport)
          line->special = 0;
        break;

      case 12:
        // Light Turn On - brightest near
        if(EV_LightTurnOn(line,0) || !boomsupport)
          line->special = 0;
        break;

      case 13:
        // Light Turn On 255
        if(EV_LightTurnOn(line,255) || !boomsupport)
          line->special = 0;
        break;

      case 16:
        // Close Door 30
        if(EV_DoDoor(line,close30ThenOpen,VDOORSPEED) || !boomsupport)
          line->special = 0;
        break;

      case 17:
        // Start Light Strobing
        if(EV_StartLightStrobing(line) || !boomsupport)
          line->special = 0;
        break;

      case 19:
        // Lower Floor
        if(EV_DoFloor(line,lowerFloor) || !boomsupport)
          line->special = 0;
        break;

      case 22:
        // Raise floor to nearest height and change texture
        if(EV_DoPlat(line,raiseToNearestAndChange,0) || !boomsupport)
          line->special = 0;
        break;

      case 25:
        // Ceiling Crush and Raise
        if(EV_DoCeiling(line,crushAndRaise) || !boomsupport)
          line->special = 0;
        break;

      case 30:
        // Raise floor to shortest texture height
        //  on either side of lines.
        if(EV_DoFloor(line,raiseToTexture) || !boomsupport)
          line->special = 0;
        break;

      case 35:
        // Lights Very Dark
        if(EV_LightTurnOn(line,35) || !boomsupport)
          line->special = 0;
        break;

      case 36:
        // Lower Floor (TURBO)
        if(EV_DoFloor(line,turboLower) || !boomsupport)
          line->special = 0;
        break;

      case 37:
        // LowerAndChange
        if(EV_DoFloor(line,lowerAndChange) || !boomsupport)
          line->special = 0;
        break;

      case 38:
        // Lower Floor To Lowest
        if(EV_DoFloor( line, lowerFloorToLowest ) || !boomsupport)
          line->special = 0;
        break;

      case 39:
        // TELEPORT!
        if(EV_Teleport( line, side, thing ) || !boomsupport)
          line->special = 0;
        break;

      case 40:
        // RaiseCeilingLowerFloor
        if(EV_DoCeiling( line, raiseToHighest ) || EV_DoFloor( line, lowerFloorToLowest ) ||
           !boomsupport)
          line->special = 0;
        break;

      case 44:
        // Ceiling Crush
        if(EV_DoCeiling( line, lowerAndCrush ) || !boomsupport)
          line->special = 0;
        break;

      case 52:
        // EXIT!
        if( cv_allowexitlevel.value )
        {
            G_ExitLevel ();
            line->special = 0;  // heretic have right
        }
        break;

      case 53:
        // Perpetual Platform Raise
        if(EV_DoPlat(line,perpetualRaise,0) || !boomsupport)
          line->special = 0;
        break;

      case 54:
        // Platform Stop
        if(EV_StopPlat(line) || !boomsupport)
          line->special = 0;
        break;

      case 56:
        // Raise Floor Crush
        if(EV_DoFloor(line,raiseFloorCrush) || !boomsupport)
          line->special = 0;
        break;

      case 57:
        // Ceiling Crush Stop
        if(EV_CeilingCrushStop(line) || !boomsupport)
          line->special = 0;
        break;

      case 58:
        // Raise Floor 24
        if(EV_DoFloor(line,raiseFloor24) || !boomsupport)
          line->special = 0;
        break;

      case 59:
        // Raise Floor 24 And Change
        if(EV_DoFloor(line,raiseFloor24AndChange) || !boomsupport)
          line->special = 0;
        break;

      case 104:
        // Turn lights off in sector(tag)
        if(EV_TurnTagLightsOff(line) || !boomsupport)
          line->special = 0;
        break;

      case 108:
        // Blazing Door Raise (faster than TURBO!)
        if(EV_DoDoor (line,blazeRaise,4*VDOORSPEED) || !boomsupport)
          line->special = 0;
        break;

      case 109:
        // Blazing Door Open (faster than TURBO!)
        if(EV_DoDoor (line,blazeOpen,4*VDOORSPEED) || !boomsupport)
          line->special = 0;
        break;

      case 100:
        if( gamemode == heretic )
          EV_DoDoor (line, normalDoor, VDOORSPEED * 3);
        else
        {
          // Build Stairs Turbo 16
          if(EV_BuildStairs(line,turbo16) || !boomsupport)
            line->special = 0;
        }
        break;

      case 110:
        // Blazing Door Close (faster than TURBO!)
        if(EV_DoDoor (line,blazeClose,4*VDOORSPEED) || !boomsupport)
          line->special = 0;
        break;

      case 119:
        // Raise floor to nearest surr. floor
        if(EV_DoFloor(line,raiseFloorToNearest) || !boomsupport)
          line->special = 0;
        break;

      case 121:
        // Blazing PlatDownWaitUpStay
        if(EV_DoPlat(line,blazeDWUS,0) || !boomsupport)
          line->special = 0;
        break;

      case 124:
        // Secret EXIT
        if( cv_allowexitlevel.value )
            G_SecretExitLevel ();
        break;

      case 125:
        // TELEPORT MonsterONLY
        if (!thing->player)
        {
            if(EV_Teleport( line, side, thing ) || !boomsupport)
              line->special = 0;
        }
        break;

      case 130:
        // Raise Floor Turbo
        if(EV_DoFloor(line,raiseFloorTurbo) || !boomsupport)
          line->special = 0;
        break;

      case 141:
        // Silent Ceiling Crush & Raise
        if(EV_DoCeiling(line,silentCrushAndRaise) || !boomsupport)
          line->special = 0;
        break;

      //SoM: FraggleScript
      case 273: //(1sided)
        if(side) break;

      case 272: //(2sided)
        t_trigger = thing;
        T_RunScript(line->tag);
        break;

      // once-only triggers
      case 275: //(1sided)
        if(side) break;

      case 274: //(2sided)
        t_trigger = thing;
        T_RunScript(line->tag);
        line->special = 0;        // clear trigger
        break;


      // RETRIGGERS.  All from here till end.
      case 72:
        // Ceiling Crush
        EV_DoCeiling( line, lowerAndCrush );
        break;

      case 73:
        // Ceiling Crush and Raise
        EV_DoCeiling(line,crushAndRaise);
        break;

      case 74:
        // Ceiling Crush Stop
        EV_CeilingCrushStop(line);
        break;

      case 75:
        // Close Door
        EV_DoDoor(line,doorclose,VDOORSPEED);
        break;

      case 76:
        // Close Door 30
        EV_DoDoor(line,close30ThenOpen,VDOORSPEED);
        break;

      case 77:
        // Fast Ceiling Crush & Raise
        EV_DoCeiling(line,fastCrushAndRaise);
        break;

      case 79:
        // Lights Very Dark
        EV_LightTurnOn(line,35);
        break;

      case 80:
        // Light Turn On - brightest near
        EV_LightTurnOn(line,0);
        break;

      case 81:
        // Light Turn On 255
        EV_LightTurnOn(line,255);
        break;

      case 82:
        // Lower Floor To Lowest
        EV_DoFloor( line, lowerFloorToLowest );
        break;

      case 83:
        // Lower Floor
        EV_DoFloor(line,lowerFloor);
        break;

      case 84:
        // LowerAndChange
        EV_DoFloor(line,lowerAndChange);
        break;

      case 86:
        // Open Door
        EV_DoDoor(line,dooropen,VDOORSPEED);
        break;

      case 87:
        // Perpetual Platform Raise
        EV_DoPlat(line,perpetualRaise,0);
        break;

      case 88:
        // PlatDownWaitUp
        EV_DoPlat(line,downWaitUpStay,0);
        break;

      case 89:
        // Platform Stop
        EV_StopPlat(line);
        break;

      case 90:
        // Raise Door
        EV_DoDoor(line,normalDoor,VDOORSPEED);
        break;

      case 91:
        // Raise Floor
        EV_DoFloor(line,raiseFloor);
        break;

      case 92:
        // Raise Floor 24
        EV_DoFloor(line,raiseFloor24);
        break;

      case 93:
        // Raise Floor 24 And Change
        EV_DoFloor(line,raiseFloor24AndChange);
        break;

      case 94:
        // Raise Floor Crush
        EV_DoFloor(line,raiseFloorCrush);
        break;

      case 95:
        // Raise floor to nearest height
        // and change texture.
        EV_DoPlat(line,raiseToNearestAndChange,0);
        break;

      case 96:
        // Raise floor to shortest texture height
        // on either side of lines.
        EV_DoFloor(line,raiseToTexture);
        break;

      case 97:
        // TELEPORT!
        EV_Teleport( line, side, thing );
        break;

      case 98:
        // Lower Floor (TURBO)
        EV_DoFloor(line,turboLower);
        break;

      case 105:
        if( gamemode == heretic )
        {
            if( cv_allowexitlevel.value )
            {
                G_SecretExitLevel ();
                line->special = 0;
            }
        }
        else
            // Blazing Door Raise (faster than TURBO!)
            EV_DoDoor (line,blazeRaise,4*VDOORSPEED);
        break;

      case 106:
        if( gamemode == heretic )
        {
          if(EV_BuildStairs (line, 16 * FRACUNIT) || !boomsupport)
             line->special = 0;
        }
        else
            // Blazing Door Open (faster than TURBO!)
            EV_DoDoor (line,blazeOpen,4*VDOORSPEED);
        break;

      case 107:
        if( gamemode != heretic ) // used for a switch !
            // Blazing Door Close (faster than TURBO!)
            EV_DoDoor (line,blazeClose,4*VDOORSPEED);
        break;

      case 120:
        // Blazing PlatDownWaitUpStay.
        EV_DoPlat(line,blazeDWUS,0);
        break;

      case 126:
        // TELEPORT MonsterONLY.
        if (!thing->player)
            EV_Teleport( line, side, thing );
        break;

      case 128:
        // Raise To Nearest Floor
        EV_DoFloor(line,raiseFloorToNearest);
        break;

      case 129:
        // Raise Floor Turbo
        EV_DoFloor(line,raiseFloorTurbo);
        break;

      case 309:
      case 310:
        // SoM: Portals teleport all objects that cross them...
        EV_PortalTeleport(line, thing, side);
        break;

      // SoM:3/4/2000: Extended Boom W* triggers.
      default:
        if(boomsupport) {
          switch(line->special) {
            //SoM: 3/4/2000:Boom Walk once triggers.
            //SoM: 3/4/2000:Yes this is "copied" code! I just cleaned it up. Did you think I was going to retype all this?!
            case 142:
              // Raise Floor 512
              if (EV_DoFloor(line,raiseFloor512))
                line->special = 0;
              break;
  
            case 143:
              // Raise Floor 24 and change
              if (EV_DoPlat(line,raiseAndChange,24))
                line->special = 0;
              break;

            case 144:
              // Raise Floor 32 and change
              if (EV_DoPlat(line,raiseAndChange,32))
                line->special = 0;
              break;

            case 145:
              // Lower Ceiling to Floor
              if (EV_DoCeiling( line, lowerToFloor ))
                line->special = 0;
              break;

            case 146:
              // Lower Pillar, Raise Donut
              if (EV_DoDonut(line))
                line->special = 0;
              break;

            case 199:
              // Lower ceiling to lowest surrounding ceiling
              if (EV_DoCeiling(line,lowerToLowest))
                line->special = 0;
              break;

            case 200:
              // Lower ceiling to highest surrounding floor
              if (EV_DoCeiling(line,lowerToMaxFloor))
                line->special = 0;
              break;

            case 207:
              // W1 silent teleporter (normal kind)
              if (EV_SilentTeleport(line, side, thing))
                line->special = 0;
              break;

            case 153: 
              // Texture/Type Change Only (Trig)
              if (EV_DoChange(line,trigChangeOnly))
                line->special = 0;
              break;
  
            case 239: 
              // Texture/Type Change Only (Numeric)
              if (EV_DoChange(line,numChangeOnly))
                line->special = 0;
              break;
 
            case 219:
              // Lower floor to next lower neighbor
              if (EV_DoFloor(line,lowerFloorToNearest))
                line->special = 0;
              break;

            case 227:
              // Raise elevator next floor
              if (EV_DoElevator(line,elevateUp))
                line->special = 0;
              break;

            case 231: