home *** CD-ROM | disk | FTP | other *** search
/ Ultra Collection Level Ad…e, Duke, Warcraft 2, C&C / ULTRA_Collection_Level_AddOn_-_Quake_Duke.iso / hexenlev / prg67.zip / AGILIT01.ACS next >
Text File  |  1996-04-27  |  9KB  |  385 lines
  1.  
  2. #include "common.acs"
  3.  
  4. #define CURRENT_MAP 1
  5.  
  6.  
  7. #include "pllrdoor.acs"
  8.  
  9.  
  10. // PILLAR DROP ROOM
  11. script 11 ( void )
  12. {
  13.     // DROP SMALL PILLARS ONE AT A TIME
  14.     Floor_MoveToValueTimes8(const: 11, 255, 192, TRUE);
  15.     tagwait(const: 11);
  16.     Floor_MoveToValueTimes8(const: 12, 255, 192, TRUE);
  17.     tagwait(const: 12);
  18.     Floor_MoveToValueTimes8(const: 13, 255, 192, TRUE);
  19.     tagwait(const: 13);
  20.     Floor_MoveToValueTimes8(const: 14, 255, 192, TRUE);
  21.     tagwait(const: 14);
  22.     Floor_MoveToValueTimes8(const: 15, 255, 192, TRUE);
  23.     tagwait(const: 15);
  24.     Floor_MoveToValueTimes8(const: 16, 255, 192, TRUE);
  25.     tagwait(const: 16);
  26.     Floor_MoveToValueTimes8(const: 17, 255, 192, TRUE);
  27.     tagwait(const: 17);
  28.     Floor_MoveToValueTimes8(const: 18, 255, 192, TRUE);
  29.     tagwait(const: 18);
  30.     Floor_MoveToValueTimes8(const: 19, 255, 192, TRUE);
  31.     tagwait(const: 19);
  32.     Floor_MoveToValueTimes8(const: 20, 255, 192, TRUE);
  33.     tagwait(const: 20);
  34.     Floor_MoveToValueTimes8(const: 21, 255, 192, TRUE);
  35.     tagwait(const: 21);
  36.     Floor_MoveToValueTimes8(const: 22, 255, 192, TRUE);
  37.     tagwait(const: 22);
  38.  
  39.     // DROP LARGE PILLAR
  40.     Floor_MoveToValueTimes8(const: 23, 255, 192, TRUE);
  41.     tagwait(const: 23);
  42.  
  43.     // MOVE POLY OBJECTS OUT OF THE WAY
  44.     Polyobj_Move(const: 1, 32, 64, 64);
  45.     Polyobj_Move(const: 3, 32, 64, 64);
  46.     polywait(const: 4);
  47.  
  48.     delay(const: 1);
  49.  
  50.     // DROP CEILING
  51.     Ceiling_LowerAndCrush(const: 24, 255, 255);
  52.     tagwait(const: 24);
  53.  
  54.     // WAIT 3 SECONDS
  55.     delay ( const: 105 );
  56.  
  57.     // OPEN OUTER HALLWAYS
  58.     Polyobj_Move(const: 5, 32, 64, 128);
  59.     polywait(const: 6);
  60.  
  61.     // RAISE PILLAR FLOORS TO ROOM FLOOR/CEILING LEVEL
  62.     Floor_MoveToValueTimes8(const: 11, 128, 129, FALSE);
  63.     Floor_MoveToValueTimes8(const: 12, 128, 129, FALSE);
  64.     Floor_MoveToValueTimes8(const: 13, 128, 129, FALSE);
  65.     Floor_MoveToValueTimes8(const: 14, 128, 129, FALSE);
  66.     Floor_MoveToValueTimes8(const: 15, 128, 129, FALSE);
  67.     Floor_MoveToValueTimes8(const: 16, 128, 129, FALSE);
  68.     Floor_MoveToValueTimes8(const: 17, 128, 129, FALSE);
  69.     Floor_MoveToValueTimes8(const: 18, 128, 129, FALSE);
  70.     Floor_MoveToValueTimes8(const: 19, 128, 129, FALSE);
  71.     Floor_MoveToValueTimes8(const: 20, 128, 129, FALSE);
  72.     Floor_MoveToValueTimes8(const: 21, 128, 129, FALSE);
  73.     Floor_MoveToValueTimes8(const: 22, 128, 129, FALSE);
  74.     Floor_MoveToValueTimes8(const: 23, 128, 129, FALSE);
  75.     tagwait(const: 23);
  76.  
  77.     delay(const: 175);
  78.  
  79.     // CLOSE OUTER HALLWAYS
  80.     Polyobj_Move(const: 5, 32, 192, 128);
  81.     polywait(const: 6);
  82.  
  83.  
  84.     // RAISE PILLAR FLOORS AND CRUSH
  85.     Floor_RaiseAndCrush(const: 11, 16, 50);
  86.     Floor_RaiseAndCrush(const: 12, 16, 50);
  87.     Floor_RaiseAndCrush(const: 13, 16, 50);
  88.     Floor_RaiseAndCrush(const: 14, 16, 50);
  89.     Floor_RaiseAndCrush(const: 15, 16, 50);
  90.     Floor_RaiseAndCrush(const: 16, 16, 50);
  91.     Floor_RaiseAndCrush(const: 17, 16, 50);
  92.     Floor_RaiseAndCrush(const: 18, 16, 50);
  93.     Floor_RaiseAndCrush(const: 19, 16, 50);
  94.     Floor_RaiseAndCrush(const: 20, 16, 50);
  95.     Floor_RaiseAndCrush(const: 21, 16, 50);
  96.     Floor_RaiseAndCrush(const: 22, 16, 50);
  97.     Floor_RaiseAndCrush(const: 23, 16, 50);
  98.  
  99.  
  100.     // RAISE ROOM CEILING WITH PILLARS
  101.     Ceiling_MoveToValueTimes8(const: 24, 16, 160, FALSE);
  102.     tagwait(const: 24);
  103.  
  104.     delay(const: 35);
  105.  
  106.     // MOVE POLY OBJECTS INTO PLACE
  107.     Polyobj_Move(const: 1, 32, 192, 64);
  108.     Polyobj_Move(const: 3, 32, 192, 64);
  109.     polywait(const: 4);
  110.  
  111.  
  112.     // OPEN DOOR
  113.     ACS_Execute(5, CURRENT_MAP, 25, 128, 10);
  114.     scriptwait(const: 5);
  115.  
  116. }  // END SCRIPT 11
  117.  
  118.  
  119. // ICON TRAP START MOVING WALLS
  120. script 30 ( void )
  121. {
  122.     // START NORTH WALL MOVING
  123.     ACS_Execute(const: 31, CURRENT_MAP, 0, 0, 0);
  124.  
  125.     // START SOUTH WALL MOVING
  126.     ACS_Execute(const: 32, CURRENT_MAP, 0, 0, 0);
  127.  
  128.     // START EAST WALL MOVING
  129.     ACS_Execute(const: 33, CURRENT_MAP, 0, 0, 0);
  130.  
  131.     // START CRUSHING CEILINGS
  132.     ACS_Execute(const: 34, CURRENT_MAP, 0, 0, 0);
  133.  
  134. }  // END SCRIPT 30 (ICON TRAP MOVING WALLS)
  135.  
  136.  
  137. // ICON TRAP NORTH WALL
  138. script 31 ( void )
  139. {
  140.     int i;
  141.  
  142.  
  143.     while ( i++ < 8 )
  144.     {
  145.         // MOVE NORTH WALL SOUTH
  146.         Polyobj_Move(const: 7, 16, 192, 64);
  147.         polywait(const: 7);
  148.  
  149.         // MOVE NORTH WALL NORTH
  150.         Polyobj_Move(const: 7, 16, 64, 64);
  151.         polywait(const: 7);
  152.     }
  153.  
  154. }  // END SCRIPT 31
  155.  
  156.  
  157. // ICON TRAP SOUTH WALL
  158. script 32 ( void )
  159. {
  160.     int i;
  161.  
  162.     while ( i++ < 8 )
  163.     {
  164.         // MOVE SOUTH WALL NORTH
  165.         Polyobj_Move(const: 8, 16, 64, 64);
  166.         polywait(const: 8);
  167.  
  168.         // MOVE SOUTH WALL SOUTH
  169.         Polyobj_Move(const: 8, 16, 192, 64);
  170.         polywait(const: 8);
  171.     }
  172.  
  173. }  // END SCRIPT 32 (ICON TRAP MOVING WALLS)
  174.  
  175.  
  176.  
  177. script 33 ( void )
  178. {
  179.     int i;
  180.  
  181.  
  182.     while ( i++ < 8 )
  183.     {
  184.         // CRUSH STANDING SECTOR
  185.         Ceiling_CrushRaiseAndStay(const: 32, 64, 20);
  186.         delay ( const: 15 );
  187.  
  188.         // CRUSH STANDING SECTOR
  189.         Ceiling_CrushRaiseAndStay(const: 33, 64, 20);
  190.         tagwait(const: 33);
  191.     }
  192.  
  193. }  // END SCRIPT 33
  194.  
  195.  
  196. // ICON TRAP EAST WALL
  197. script 34 ( void )
  198. {
  199.     int i;
  200.  
  201.  
  202.     while ( i++ < 2 )
  203.     {
  204.         // MOVE 
  205.         Polyobj_Move(const: 9, 16, 128, 128);
  206.         polywait(const: 9);
  207.  
  208.         // MOVE 
  209.         Polyobj_Move(const: 9, 16, 0, 128);
  210.         polywait(const: 9);
  211.  
  212.         // MOVE 
  213.         Polyobj_Move(const: 9, 16, 128, 128);
  214.         polywait(const: 9);
  215.  
  216.         // MOVE 
  217.         Polyobj_Move(const: 9, 16, 0, 128);
  218.         polywait(const: 9);
  219.  
  220.         // MOVE 
  221.         Polyobj_Move(const: 9, 16, 0, 128);
  222.         polywait(const: 9);
  223.  
  224.         // MOVE 
  225.         Polyobj_Move(const: 9, 16, 128, 128);
  226.         polywait(const: 9);
  227.     }
  228.  
  229. }  // END SCRIPT 34 (ICON TRAP EAST WALL)
  230.  
  231.  
  232. // OCTAGON ROOM FLOOR RAISE/LOWER)
  233. int miFloorUpFlag;
  234. script 16 ( int iToggle )
  235. {
  236.     if ( iToggle == 1 && miFloorUpFlag == FALSE )
  237.     {
  238.         // RAISE OCTAGON FLOOR
  239.         Floor_MoveToValueTimes8(const: 35, 64, 125, FALSE);
  240.         tagwait(const: 35);
  241.  
  242.         // SET FLOOR UP FLAG
  243.         miFloorUpFlag = TRUE;
  244.     }
  245.     else if ( iToggle == 0 && miFloorUpFlag == TRUE )
  246.     {
  247.         // LOWER OCTAGON FLOOR
  248.         Floor_MoveToValueTimes8(const: 35, 64, 240, TRUE);
  249.         tagwait(const: 35);
  250.  
  251.         // CLEAR FLOOR UP FLAG
  252.         miFloorUpFlag = FALSE;
  253.     }
  254.  
  255. }  // END SCRIPT 16 (OCTAGON ROOM FLOOR RAISE/LOWER)
  256.  
  257.  
  258. // CRUSHING BOOTH
  259. int miBooth;
  260. script 18 ( int iDirection )
  261. {
  262.     if ( miBooth == 0 ) miBooth = 2;
  263.  
  264.  
  265.     if ( iDirection == 1 && miBooth < 3 )
  266.     {
  267.         Polyobj_Move(const: 10, 64, 64, 128);
  268.         polywait(const: 10);
  269.  
  270.         miBooth++;
  271.     }
  272.  
  273.     if ( iDirection == 0 && miBooth > 1 )
  274.     {
  275.         Polyobj_Move(const: 10, 64, 192, 128);
  276.         polywait(const: 10);
  277.  
  278.         miBooth--;
  279.     }
  280.  
  281.     // CRUSH BOOTH 
  282.     Ceiling_CrushRaiseAndStay( 50 + miBooth, 32, 10);
  283.  
  284. }  // END SCRIPT 18 (CRUSHING BOOTH)
  285.  
  286.  
  287. // FIREBALL ROOM
  288. script 19 OPEN
  289. {
  290.     // SOUTH + NORTH
  291.     setlinetexture(1, SIDE_FRONT, TEXTURE_MIDDLE, "spawn09");
  292.     delay(const: 3);
  293.     setlinetexture(1, SIDE_FRONT, TEXTURE_MIDDLE, "spawn10");
  294.     delay(const: 3);
  295.  
  296.     thingsound(170, "FireDemonAttack", 127);
  297.     delay(const: 1);
  298.     thingsound(171, "FireDemonAttack", 127);
  299.     delay(const: 1);
  300.     Thing_Projectile(const: 170, T_FIREBALL1, 192, 128, 0);
  301.     Thing_Projectile(const: 171, T_FIREBALL1, 64, 128, 0);
  302.  
  303.     delay(const: 3);
  304.     setlinetexture(1, SIDE_FRONT, TEXTURE_MIDDLE, "spawn08");
  305.     delay(const: 16);
  306.  
  307.  
  308.     // WEST
  309.     setlinetexture(3, SIDE_FRONT, TEXTURE_MIDDLE, "spawn09");
  310.     delay(const: 3);
  311.     setlinetexture(3, SIDE_FRONT, TEXTURE_MIDDLE, "spawn10");
  312.     delay(const: 3);
  313.  
  314.     thingsound(174, "FireDemonAttack", 127);
  315.     delay(const: 1);
  316.     Thing_Projectile(const: 174, T_FIREBALL1, 128, 128, 0);
  317.  
  318.     delay(const: 3);
  319.     setlinetexture(3, SIDE_FRONT, TEXTURE_MIDDLE, "spawn08");
  320.     delay(const: 16);
  321.  
  322.  
  323.     // NORTH + SOUTH
  324.     setlinetexture(2, SIDE_FRONT, TEXTURE_MIDDLE, "spawn09");
  325.     delay(const: 3);
  326.     setlinetexture(2, SIDE_FRONT, TEXTURE_MIDDLE, "spawn10");
  327.     delay(const: 3);
  328.  
  329.     thingsound(172, "FireDemonAttack", 127);
  330.     delay(const: 1);
  331.     thingsound(173, "FireDemonAttack", 127);
  332.     delay(const: 1);
  333.     Thing_Projectile(const: 172, T_FIREBALL1, 192, 128, 0);
  334.     Thing_Projectile(const: 173, T_FIREBALL1, 64, 128, 0);
  335.  
  336.     delay(const: 3);
  337.     setlinetexture(2, SIDE_FRONT, TEXTURE_MIDDLE, "spawn08");
  338.     delay(const: 16);
  339.  
  340.  
  341.     // EAST + WEST
  342.     setlinetexture(4, SIDE_FRONT, TEXTURE_MIDDLE, "spawn09");
  343.     delay(const: 3);
  344.     setlinetexture(4, SIDE_FRONT, TEXTURE_MIDDLE, "spawn10");
  345.     delay(const: 3);
  346.  
  347.     thingsound(175, "FireDemonAttack", 127);
  348.     delay(const: 1);
  349.     thingsound(176, "FireDemonAttack", 127);
  350.     delay(const: 1);
  351.     Thing_Projectile(const: 175, T_FIREBALL1, 0, 128, 0);
  352.     Thing_Projectile(const: 176, T_FIREBALL1, 128, 128, 0);
  353.  
  354.     delay(const: 3);
  355.     setlinetexture(4, SIDE_FRONT, TEXTURE_MIDDLE, "spawn08");
  356.     delay(const: 16);
  357.  
  358.     restart;
  359.  
  360. }  // END SCRIPT 19 (FIREBALL ROOM)
  361.  
  362.  
  363. // SOUTH CRUSHER TRIP WIRE
  364. script 22 ( void )
  365. {
  366.     delay(const: 35);
  367.     Ceiling_LowerAndCrush(const: 10, 128, 10);
  368.     tagwait(const: 10);
  369.     Ceiling_MoveToValueTimes8(const: 10, 128, 128, FALSE);
  370.     tagwait(const: 10);
  371.  
  372.     delay(const: 70);
  373.  
  374.     Ceiling_MoveToValueTimes8(const: 10, 64, 142, FALSE);
  375.     tagwait(const: 10);
  376.  
  377. }  // END SCRIPT 22 (SOUTH CRUSHER TRIP WIRE)
  378.  
  379.  
  380. script 23 OPEN
  381. {
  382.     ambientsound("Ambient13", 127);
  383.     printbold(s: "MAP CREATED BY JOHN FRENCH");
  384. }
  385.