API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Jun 30th, 2012
49
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 15.83 KB | None | 0 0
raw download clone embed print report
  1. //               Wednesday, February 20, 2002  3:47:06 PM
  2.  
  3. // C:\Hexen\Jhexen\HEXDD.WAD
  4. // **************************************************************
  5. // ACC script decompiler (c) 1995 Luc Cluitmans                 *
  6. // DeePsea Port 11-16-2001 by Jack Vermeulen (v1.14)            *
  7. // **************************************************************
  8. #include "common.acs"
  9.  
  10. // BEHAVIOR 21 scripts, 15 strings
  11.  
  12. // ==================================================
  13.  
  14. // List of MAP variables:
  15.  
  16. int mapvar0;
  17. int mapvar1;
  18. int mapvar2;
  19. int mapvar3;
  20. int mapvar4;
  21. int mapvar5;
  22. int mapvar6;
  23. int mapvar7;
  24. int mapvar8;
  25. int mapvar9;
  26. int mapvar10;
  27. int mapvar11;
  28.  
  29.  
  30. //====================  script 1  ====================
  31.  
  32. script 1 (void)  
  33. {
  34.     int var0;
  35.  
  36.     if(mapvar0 == 4)
  37.     {
  38.         clearlinespecial();
  39.         delay(const:70);
  40.         if(gametype() != GAME_NET_DEATHMATCH)
  41.         {
  42.             print(s:"IT IS DONE...");
  43.         }
  44.         Thing_Activate(const:1);
  45.         delay(const:70);
  46.         Thing_Remove(const:2);
  47.         delay(const:15);
  48.         Thing_Spawn(const:3, T_ITEMSUMMON, 0);
  49.         delay(const:15);
  50.         Thing_Spawn(const:4, T_DEMON, 270);
  51.         delay(const:35);
  52.         Door_Open(const:1, 16);
  53.         Floor_LowerByValue(const:14, 16, 120);
  54.         mapvar0 = 5;
  55.         var0 = 0;
  56.         until(var0 == 10)
  57.         {
  58.             delay(const:35);
  59.             Thing_Spawn(const:5, T_BRIDGE, 0);
  60.             var0++;
  61.         }
  62.     }
  63.     else
  64.     {
  65.         if(gametype() == GAME_NET_DEATHMATCH)
  66.         {
  67.             terminate;
  68.         }
  69.         if((mapvar2 == 0) || (mapvar2 == 1))
  70.         {
  71.             print(s:"YOU HAVE NOT COMPLETED THE PUZZLE");
  72.             mapvar2++;
  73.         }
  74.         else if(mapvar2 == 2)
  75.         {
  76.             print(s:"I'M WARNING YOU...");
  77.             mapvar2++;
  78.         }
  79.         else if(mapvar2 == 3)
  80.         {
  81.             print(s:"STUBBORN, AREN'T YOU?");
  82.             delay(const:10);
  83.             DamageThing(const:20);
  84.             mapvar2++;
  85.         }
  86.         else if(mapvar2 == 4)
  87.         {
  88.             print(s:"AND STUPID, TOO");
  89.             delay(const:10);
  90.             ThrustThing(const:0, 128);
  91.             delay(const:10);
  92.             ThrustThing(const:90, 128);
  93.         }
  94.     }
  95. }
  96.  
  97. //====================  script 2  ====================
  98.  
  99. script 2 (void)  
  100. {
  101.     if(mapvar1 == 0)
  102.     {
  103.         Floor_MoveToValueTimes8(const:7, 8, 2, TRUE);
  104.         mapvar1 = 1;
  105.     }
  106. }
  107.  
  108. //====================  script 3  ====================
  109.  
  110. script 3 (void)  
  111. {
  112.     int var0;
  113.     int var1;
  114.  
  115.     if(gametype() == GAME_NET_DEATHMATCH)
  116.     {
  117.         terminate;
  118.     }
  119.     if(mapvar0 != 4)
  120.     {
  121.         mapvar3 = random(const:1, 3);
  122.         if(mapvar3 == 1)
  123.         {
  124.             setlinetexture(1, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE1");
  125.         }
  126.         else if(mapvar3 == 2)
  127.         {
  128.             setlinetexture(1, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE2");
  129.         }
  130.         else if(mapvar3 == 3)
  131.         {
  132.             setlinetexture(1, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE3");
  133.         }
  134.         var0 = 0;
  135.         do
  136.         {
  137.             var1 = random(const:1, 4);
  138.             switch(var1)
  139.             {
  140.             case 1:
  141.                 if(mapvar8 == 0)
  142.                 {
  143.                     var0 = 1;
  144.                     mapvar8 = 1;
  145.                 }
  146.                 break;
  147.             case 2:
  148.                 if(mapvar9 == 0)
  149.                 {
  150.                     var0 = 1;
  151.                     mapvar9 = 1;
  152.                 }
  153.                 break;
  154.             case 3:
  155.                 if(mapvar10 == 0)
  156.                 {
  157.                     var0 = 1;
  158.                     mapvar10 = 1;
  159.                 }
  160.                 break;
  161.             case 4:
  162.                 if(mapvar11 == 0)
  163.                 {
  164.                     var0 = 1;
  165.                     mapvar11 = 1;
  166.                 }
  167.                 break;
  168.             }
  169.         } while(var0 == 0);
  170.         ACS_Execute(3+var1, 0, 0, 0, 0);
  171.     }
  172.     else
  173.     {
  174.         Floor_LowerByValue(const:12, 16, 32);
  175.     }
  176. }
  177.  
  178. //====================  script 4  ====================
  179.  
  180. script 4 (void)  
  181. {
  182.     if(gametype() != GAME_NET_DEATHMATCH)
  183.     {
  184.         Floor_RaiseByValue(const:8, 16, 32);
  185.         setlinespecial(2, 80 /*ACS_Execute*/, 8, 0, 0, 0, 0);
  186.         setlinespecial(3, 80 /*ACS_Execute*/, 9, 0, 0, 0, 0);
  187.     }
  188. }
  189.  
  190. //====================  script 5  ====================
  191.  
  192. script 5 (void)  
  193. {
  194.     if(gametype() != GAME_NET_DEATHMATCH)
  195.     {
  196.         Floor_RaiseByValue(const:9, 16, 32);
  197.         setlinespecial(4, 80 /*ACS_Execute*/, 10, 0, 0, 0, 0);
  198.         setlinespecial(5, 80 /*ACS_Execute*/, 11, 0, 0, 0, 0);
  199.     }
  200. }
  201.  
  202. //====================  script 6  ====================
  203.  
  204. script 6 (void)  
  205. {
  206.     if(gametype() != GAME_NET_DEATHMATCH)
  207.     {
  208.         Floor_RaiseByValue(const:10, 16, 32);
  209.         setlinespecial(6, 80 /*ACS_Execute*/, 12, 0, 0, 0, 0);
  210.         setlinespecial(7, 80 /*ACS_Execute*/, 13, 0, 0, 0, 0);
  211.     }
  212. }
  213.  
  214. //====================  script 7  ====================
  215.  
  216. script 7 (void)  
  217. {
  218.     if(gametype() != GAME_NET_DEATHMATCH)
  219.     {
  220.         Floor_RaiseByValue(const:11, 16, 32);
  221.         setlinespecial(8, 80 /*ACS_Execute*/, 14, 0, 0, 0, 0);
  222.         setlinespecial(9, 80 /*ACS_Execute*/, 15, 0, 0, 0, 0);
  223.     }
  224. }
  225.  
  226. //====================  script 8  ====================
  227.  
  228. script 8 (void)  
  229. {
  230.     if(gametype() != GAME_NET_DEATHMATCH)
  231.     {
  232.         Floor_LowerByValue(const:8, 16, 32);
  233.         tagwait(const:8);
  234.         if(++mapvar4 > 3)
  235.         {
  236.             mapvar4 = 1;
  237.         }
  238.         switch(mapvar4)
  239.         {
  240.         case 1:
  241.             setlinetexture(2, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE1");
  242.             break;
  243.         case 2:
  244.             setlinetexture(2, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE2");
  245.             break;
  246.         case 3:
  247.             setlinetexture(2, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE3");
  248.             break;
  249.         }
  250.         Floor_RaiseByValue(const:8, 16, 32);
  251.         tagwait(const:8);
  252.     }
  253. }
  254.  
  255. //====================  script 9  ====================
  256.  
  257. script 9 (void)  
  258. {
  259.     if(gametype() != GAME_NET_DEATHMATCH)
  260.     {
  261.         if(mapvar3 == mapvar4)
  262.         {
  263.             print(s:"ONE FOURTH OF THIS PUZZLE IS COMPLETE");
  264.             setlinespecial(2, 0 /*No_Op*/, 0, 0, 0, 0, 0);
  265.             setlinespecial(3, 0 /*No_Op*/, 0, 0, 0, 0, 0);
  266.             delay(const:15);
  267.             Thing_Remove(const:29);
  268.             delay(const:15);
  269.             Thing_Spawn(const:28, T_ITEMHEALTHFLASK, 0);
  270.             mapvar0++;
  271.             mapvar2 = 0;
  272.             ACS_Execute(const:3, 0, 0, 0, 0);
  273.         }
  274.         else
  275.         {
  276.             print(s:"BAD CHOICE...");
  277.             delay(const:15);
  278.             Thing_Spawn(const:28, T_ETTIN, 180);
  279.             delay(const:15);
  280.         }
  281.     }
  282. }
  283.  
  284. //====================  script 10  ====================
  285.  
  286. script 10 (void)  
  287. {
  288.     if(gametype() != GAME_NET_DEATHMATCH)
  289.     {
  290.         Floor_LowerByValue(const:9, 16, 32);
  291.         tagwait(const:9);
  292.         if(++mapvar5 > 3)
  293.         {
  294.             mapvar5 = 1;
  295.         }
  296.         switch(mapvar5)
  297.         {
  298.         case 1:
  299.             setlinetexture(4, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE1");
  300.             break;
  301.         case 2:
  302.             setlinetexture(4, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE2");
  303.             break;
  304.         case 3:
  305.             setlinetexture(4, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE3");
  306.             break;
  307.         }
  308.         Floor_RaiseByValue(const:9, 16, 32);
  309.         tagwait(const:9);
  310.     }
  311. }
  312.  
  313. //====================  script 11  ====================
  314.  
  315. script 11 (void)  
  316. {
  317.     if(gametype() != GAME_NET_DEATHMATCH)
  318.     {
  319.         if(mapvar3 == mapvar5)
  320.         {
  321.             print(s:"ONE FOURTH OF THIS PUZZLE IS COMPLETE");
  322.             setlinespecial(4, 0 /*No_Op*/, 0, 0, 0, 0, 0);
  323.             setlinespecial(5, 0 /*No_Op*/, 0, 0, 0, 0, 0);
  324.             delay(const:15);
  325.             Thing_Remove(const:27);
  326.             delay(const:15);
  327.             Thing_Spawn(const:26, T_ITEMHEALTHFLASK, 0);
  328.             mapvar0++;
  329.             mapvar2 = 0;
  330.             ACS_Execute(const:3, 0, 0, 0, 0);
  331.         }
  332.         else
  333.         {
  334.             print(s:"BAD CHOICE...");
  335.             delay(const:15);
  336.             Thing_Spawn(const:26, T_ETTIN, 270);
  337.             delay(const:15);
  338.         }
  339.     }
  340. }
  341.  
  342. //====================  script 12  ====================
  343.  
  344. script 12 (void)  
  345. {
  346.     if(gametype() != GAME_NET_DEATHMATCH)
  347.     {
  348.         Floor_LowerByValue(const:10, 16, 32);
  349.         tagwait(const:10);
  350.         if(++mapvar6 > 3)
  351.         {
  352.             mapvar6 = 1;
  353.         }
  354.         switch(mapvar6)
  355.         {
  356.         case 1:
  357.             setlinetexture(6, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE1");
  358.             break;
  359.         case 2:
  360.             setlinetexture(6, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE2");
  361.             break;
  362.         case 3:
  363.             setlinetexture(6, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE3");
  364.             break;
  365.         }
  366.         Floor_RaiseByValue(const:10, 16, 32);
  367.         tagwait(const:10);
  368.     }
  369. }
  370.  
  371. //====================  script 13  ====================
  372.  
  373. script 13 (void)  
  374. {
  375.     if(gametype() != GAME_NET_DEATHMATCH)
  376.     {
  377.         if(mapvar3 == mapvar6)
  378.         {
  379.             print(s:"ONE FOURTH OF THIS PUZZLE IS COMPLETE");
  380.             setlinespecial(6, 0 /*No_Op*/, 0, 0, 0, 0, 0);
  381.             setlinespecial(7, 0 /*No_Op*/, 0, 0, 0, 0, 0);
  382.             delay(const:15);
  383.             Thing_Remove(const:23);
  384.             delay(const:15);
  385.             Thing_Spawn(const:22, T_ITEMHEALTHFLASK, 0);
  386.             mapvar0++;
  387.             mapvar2 = 0;
  388.             ACS_Execute(const:3, 0, 0, 0, 0);
  389.         }
  390.         else
  391.         {
  392.             print(s:"BAD CHOICE...");
  393.             delay(const:15);
  394.             Thing_Spawn(const:22, T_ETTIN, 90);
  395.             delay(const:15);
  396.         }
  397.     }
  398. }
  399.  
  400. //====================  script 14  ====================
  401.  
  402. script 14 (void)  
  403. {
  404.     if(gametype() != GAME_NET_DEATHMATCH)
  405.     {
  406.         Floor_LowerByValue(const:11, 16, 32);
  407.         tagwait(const:11);
  408.         if(++mapvar7 > 3)
  409.         {
  410.             mapvar7 = 1;
  411.         }
  412.         switch(mapvar7)
  413.         {
  414.         case 1:
  415.             setlinetexture(8, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE1");
  416.             break;
  417.         case 2:
  418.             setlinetexture(8, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE2");
  419.             break;
  420.         case 3:
  421.             setlinetexture(8, SIDE_FRONT, TEXTURE_BOTTOM, "PUZZLE3");
  422.             break;
  423.         }
  424.         Floor_RaiseByValue(const:11, 16, 32);
  425.         tagwait(const:11);
  426.     }
  427. }
  428.  
  429. //====================  script 15  ====================
  430.  
  431. script 15 (void)  
  432. {
  433.     if(gametype() != GAME_NET_DEATHMATCH)
  434.     {
  435.         if(mapvar3 == mapvar7)
  436.         {
  437.             print(s:"ONE FOURTH OF THIS PUZZLE IS COMPLETE");
  438.             setlinespecial(8, 0 /*No_Op*/, 0, 0, 0, 0, 0);
  439.             setlinespecial(9, 0 /*No_Op*/, 0, 0, 0, 0, 0);
  440.             delay(const:15);
  441.             Thing_Remove(const:25);
  442.             delay(const:15);
  443.             Thing_Spawn(const:24, T_ITEMHEALTHFLASK, 0);
  444.             mapvar0++;
  445.             mapvar2 = 0;
  446.             ACS_Execute(const:3, 0, 0, 0, 0);
  447.         }
  448.         else
  449.         {
  450.             print(s:"BAD CHOICE...");
  451.             delay(const:15);
  452.             Thing_Spawn(const:24, T_ETTIN, 90);
  453.             delay(const:15);
  454.         }
  455.     }
  456. }
  457.  
  458. //====================  script 16  ====================
  459.  
  460. script 16 (void)  
  461. {
  462.     if(gametype() != GAME_NET_DEATHMATCH)
  463.     {
  464.         Stairs_BuildDown(const:13, 16, 16, 35, 0);
  465.         Floor_RaiseByValue(const:12, 16, 32);
  466.         ACS_Execute(const:3, 0, 0, 0, 0);
  467.     }
  468. }
  469.  
  470. //====================  script 17  ====================
  471.  
  472. script 17 (void)  
  473. {
  474.     int var0;
  475.  
  476.     if(var0 == 0)
  477.     {
  478.         var0 = 1;
  479.         Pillar_Open(27, random(8, 16), 56, 48);
  480.         Pillar_Open(28, random(4, 8), 40, 32);
  481.         delay(random(const:5, 25));
  482.         Pillar_Open(26, random(16, 32), 48, 56);
  483.         Pillar_Open(29, random(8, 16), 56, 40);
  484.         delay(random(const:5, 25));
  485.         Pillar_Open(25, random(16, 32), 32, 40);
  486.         Pillar_Open(30, random(4, 8), 40, 32);
  487.         delay(random(const:5, 25));
  488.         Pillar_Open(24, random(8, 16), 24, 48);
  489.         Pillar_Open(31, random(16, 32), 56, 16);
  490.     }
  491.     delay(const:200);
  492.     Pillar_BuildAndCrush(27, random(8, 16), 56, 50);
  493.     Pillar_BuildAndCrush(28, random(4, 8), 40, 50);
  494.     delay(random(const:5, 25));
  495.     Pillar_BuildAndCrush(26, random(16, 32), 48, 50);
  496.     Pillar_BuildAndCrush(29, random(8, 16), 56, 50);
  497.     delay(random(const:5, 25));
  498.     Pillar_BuildAndCrush(25, random(16, 32), 32, 50);
  499.     Pillar_BuildAndCrush(30, random(4, 8), 40, 50);
  500.     delay(random(const:5, 25));
  501.     Pillar_BuildAndCrush(24, random(8, 16), 24, 50);
  502.     Pillar_BuildAndCrush(31, random(16, 32), 56, 50);
  503.     var0 = 0;
  504. }
  505.  
  506. //====================  script 100  ====================
  507.  
  508. script 100 OPEN
  509. {
  510.     Light_Glow(const:2, 160, 144, 35);
  511. }
  512.  
  513. //====================  script 200  ====================
  514.  
  515. script 200 OPEN
  516. {
  517.     if(gametype() != GAME_NET_DEATHMATCH)
  518.     {
  519.         terminate;
  520.     }
  521.     delay(random(128, 255));
  522.     mapvar0 = 4;
  523.     ACS_Execute(const:1, 0, 0, 0, 0);
  524.     delay(random(128, 255));
  525.     Stairs_BuildDown(const:13, 16, 16, 35, 0);
  526.     delay(random(128, 255));
  527.     Door_Open(const:20, 16);
  528.     delay(random(128, 255));
  529.     Door_Open(const:21, 16);
  530.     delay(random(128, 255));
  531.     Door_Open(const:22, 16);
  532.     terminate;
  533. }
  534.  
  535. //====================  script 254  ====================
  536.  
  537. script 254 OPEN
  538. {
  539.     int var0;
  540.  
  541.     delay(random(4, 7)*100);
  542.     var0 = random(1, 6);
  543.     switch(var0)
  544.     {
  545.     case 1:
  546.         ambientsound("Ambient1", random(const:30, 90));
  547.         break;
  548.     case 2:
  549.         ambientsound("Ambient2", random(const:80, 100));
  550.         break;
  551.     case 3:
  552.         ambientsound("Ambient3", random(const:50, 90));
  553.         break;
  554.     case 4:
  555.         ambientsound("Ambient7", random(const:50, 80));
  556.         break;
  557.     case 5:
  558.         ambientsound("Ambient4", random(const:50, 70));
  559.         break;
  560.     case 6:
  561.         ambientsound("Ambient1", random(const:50, 100));
  562.         break;
  563.     }
  564.     restart;
  565. }
  566.  
  567. //====================  script 255  ====================
  568.  
  569. script 255 OPEN
  570. {
  571.     int var0;
  572.     int var1;
  573.     int var2;
  574.  
  575.     if(gametype() != GAME_NET_COOPERATIVE)
  576.     {
  577.         delay(const:4200);
  578.     }
  579.     delay(const:4200);
  580.     var1 = random(const:1, 10);
  581.     if(var1 < 8)
  582.     {
  583.         var2 = 4;
  584.     }
  585.     else if((var1 == 8) || (var1 == 9))
  586.     {
  587.         var2 = 19;
  588.     }
  589.     else if(var1 == 10)
  590.     {
  591.         var2 = 3;
  592.     }
  593.     var0 = random(const:0, 1);
  594.     if(var0 == 1)
  595.     {
  596.         Thing_Spawn(255, var2, 0);
  597.     }
  598.     var0 = random(const:0, 1);
  599.     if(var0 == 1)
  600.     {
  601.         Thing_Spawn(254, var2, 0);
  602.     }
  603.     var0 = random(const:0, 1);
  604.     if(var0 == 1)
  605.     {
  606.         Thing_Spawn(253, var2, 0);
  607.     }
  608.     var0 = random(const:0, 1);
  609.     if(var0 == 1)
  610.     {
  611.         Thing_Spawn(252, var2, 0);
  612.     }
  613.     var0 = random(const:0, 1);
  614.     if(var0 == 1)
  615.     {
  616.         Thing_Spawn(251, var2, 0);
  617.     }
  618.     var0 = random(const:0, 1);
  619.     if(var0 == 1)
  620.     {
  621.         Thing_Spawn(250, var2, 0);
  622.     }
  623.     var0 = random(const:0, 1);
  624.     if(var0 == 1)
  625.     {
  626.         Thing_Spawn(241, T_WATERLURKER, 0);
  627.     }
  628.     restart;
  629. }
  630.  
  631.  
  632. // ==================================================
  633. // Strings:
  634.  
  635. // [  0] 'IT IS DONE...'
  636. // [  1] 'YOU HAVE NOT COMPLETED THE PUZZLE'
  637. // [  2] 'I'M WARNING YOU...'
  638. // [  3] 'STUBBORN, AREN'T YOU?'
  639. // [  4] 'AND STUPID, TOO'
  640. // [  5] 'PUZZLE1'
  641. // [  6] 'PUZZLE2'
  642. // [  7] 'PUZZLE3'
  643. // [  8] 'ONE FOURTH OF THIS PUZZLE IS COMPLETE'
  644. // [  9] 'BAD CHOICE...'
  645. // [ 10] 'Ambient1'
  646. // [ 11] 'Ambient2'
  647. // [ 12] 'Ambient3'
  648. // [ 13] 'Ambient7'
  649. // [ 14] 'Ambient4'
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!