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 / prg16.zip / HXKEEP.ACS next >
Text File  |  1995-11-09  |  5KB  |  276 lines
  1. #include "common.acs"
  2.  
  3. int TorchOn;
  4.  
  5. script 1 OPEN
  6. {
  7.     switch(gametype())
  8.     {
  9.         case GAME_NET_COOPERATIVE:
  10.             print(s:"NOW YOU'VE ANGERED ME!");
  11.             delay(32);
  12.             print(s:"LET THE GODS RAIN DOWN UPON THEE!")
  13.             delay(9);
  14.             Thing_Destroy(255);
  15.             Thing_Destroy(254);
  16.             Thing_Destroy(253);
  17.             Thing_Destroy(252);
  18.             break;
  19.         case GAME_NET_DEATHMATCH:
  20.             print(s:"GREETINGS MORTALS, GREETINGS!");
  21.             delay(32);
  22.             print(s:"WELCOME TO MY FUNHOUSE...");
  23.             delay(32);
  24.             print(s:"ER, WELCOME TO MY KEEP!");
  25.             break;
  26.         case GAME_SINGLE_PLAYER:
  27.             print(s:"LOOSER!");
  28.             delay(32);
  29.             print(s:"THIS IS A DM LEVEL...");
  30.             break;
  31.     }
  32.     Light_Strobe(7,200,0,2,2);     // INIT Strobe Effect
  33.     ACS_Execute(5,1,13,180,0);     // INIT Torch Lighting
  34.     ACS_Execute(10,1,0,0,0);       // INIT FunRoom  1/10 
  35.     ACS_Execute(11,1,0,0,0);       // INIT FunRoom  2/10
  36.     ACS_Execute(12,1,0,0,0);       // INIT FunRoom  3/10
  37.     ACS_Execute(14,1,0,0,0);       // INIT FunRoom  4/10
  38.     ACS_Execute(15,1,0,0,0);       // INIT FunRoom  5/10
  39.     ACS_Execute(13,1,0,0,0);       // INIT FunRoom  6/10
  40.     ACS_Execute(16,1,0,0,0);       // INIT FunRoom  7/10
  41.     ACS_Execute(17,1,0,0,0);       // INIT FunRoom  8/10
  42.     ACS_Execute(18,1,0,0,0);       // INIT FunRoom  9/10
  43.     ACS_Execute(19,1,0,0,0);       // INIT FunRoom 10/10
  44.  
  45. }
  46.  
  47.  
  48. script 2 (int Mode, int STID, int ETID)
  49. {
  50.     switch(Mode)
  51.     {
  52.         case 1:
  53.             until(STID > ETID)
  54.             {
  55.                 Thing_Spawn(STID, T_BRIDGE, 0); // Another way?? I want to keep the TID!
  56.                 STID += 1;
  57.             } 
  58.             print(s: "THY SEA HATH PARTED!");
  59.             terminate;
  60.             break;
  61.         case 2:
  62.             until(STID > ETID)
  63.             {
  64.                 Thing_Remove(STID);
  65.                 STID += 1;
  66.             } 
  67.             print(s: "THY BRIDGE NEEDITH REPAIRS!");
  68.             terminate;
  69.             break;
  70.     }
  71.     
  72. }
  73.  
  74. Script 3 (int tag, int bright)
  75. {
  76.     int x;
  77.     int i;
  78.     x = random(1,5);
  79.     i = random(5,8);
  80.     switch (random(1,3))
  81.     {
  82.         case 1:
  83.             until (x == 0)
  84.             {
  85.                 Light_Fade (tag, bright + random(10,20), i);
  86.                 x -= 1;
  87.                 delay(i);
  88.                 i = random(5,8);
  89.             }
  90.             break;
  91.         case 2:
  92.             until (x == 0)
  93.             {
  94.                 switch(random(1,2))
  95.                 {
  96.                     case 1:
  97.                         Light_Fade (tag, bright - random(0,9), i);
  98.                         break;
  99.                     case 2:
  100.                         Light_Fade (tag, bright + random(0,9), i);
  101.                         break;
  102.                 }
  103.                 x -= 1;
  104.                 delay(i);
  105.                 i = random(5,8);
  106.             }
  107.             break;
  108.         case 3:
  109.             until (x == 0)
  110.             {
  111.                 Light_Fade (tag, bright - random(10,20), i);
  112.                 x -= 1;
  113.                 delay(i);
  114.                 i = random(5,8);
  115.             }
  116.             break;
  117.     }
  118.     if(TorchOn == 1) restart;
  119. }
  120.  
  121. Script 4 (int tag)
  122. {
  123.     int bright;
  124.     bright=180;
  125.     Switch(TorchOn)
  126.     {
  127.     case 1:
  128.         print(s:"Goodnight!");
  129.         Thing_Deactivate(tag);
  130.         TorchOn = 0;
  131.         scriptwait(3);
  132.         delay(8);
  133.         Light_Fade(tag,100,16);
  134.         break;
  135.     default:
  136.         Thing_Activate(tag);
  137.         delay(8);
  138.         Light_Fade(tag,bright,16);
  139.         delay(16);
  140.         TorchOn = 1;
  141.         ACS_Execute(3,1,tag,bright,0);
  142.         break;
  143.     }
  144. }
  145.  
  146. Script 5 (void)
  147. {
  148.     ACS_Execute(4,1,13,180,0);     // INIT Torch Lighting
  149.     delay(9600);
  150.     ACS_Execute(4,1,13,180,0);
  151.     delay(960);
  152.     restart;
  153. }
  154. /* 
  155. **************************************************************************
  156. ** From here down is the moving pillars!                                **
  157. ** Is there a way to create functions? Or a script that act's like one? **   
  158. ** It sucks wasting these script slots on something this dumb!          **
  159. **************************************************************************
  160. */
  161.  
  162. // special
  163. //        6:Polyobj_MoveTimes8(4);
  164.  
  165.  
  166. Script 10 (void)
  167. {
  168.     int poid;
  169.     poid = 10;
  170.     Polyobj_MoveTimes8(poid,32,64,64);
  171.     polywait(poid);
  172.     Polyobj_MoveTimes8(poid,32,192,64);
  173.     polywait(poid);
  174.     restart;
  175. }
  176.  
  177. Script 11 (void)
  178. {
  179.     int poid;
  180.     poid = 11;
  181.     Polyobj_MoveTimes8(poid,32,64,64);
  182.     polywait(poid);
  183.     Polyobj_MoveTimes8(poid,32,192,64);
  184.     polywait(poid);
  185.     restart;
  186. }
  187.  
  188. Script 12 (void)
  189. {
  190.     int poid;
  191.     poid = 12;
  192.     Polyobj_MoveTimes8(poid,32,64,64);
  193.     polywait(poid);
  194.     Polyobj_MoveTimes8(poid,32,192,64);
  195.     polywait(poid);
  196.     restart;
  197. }
  198.  
  199. Script 14 (void)
  200. {
  201.     int poid;
  202.     poid = 14;
  203.     Polyobj_MoveTimes8(poid,32,64,64);
  204.     polywait(poid);
  205.     Polyobj_MoveTimes8(poid,32,192,64);
  206.     polywait(poid);
  207.     restart;
  208. }
  209.  
  210. Script 15 (void)
  211. {
  212.     int poid;
  213.     poid = 15;
  214.     Polyobj_MoveTimes8(poid,32,64,64);
  215.     polywait(poid);
  216.     Polyobj_MoveTimes8(poid,32,192,64);
  217.     polywait(poid);
  218.     restart;
  219. }
  220.  
  221.  
  222. Script 13 (void)
  223. {
  224.     int poid;
  225.     poid = 13;
  226.     Polyobj_MoveTimes8(poid,32,192,64);
  227.     polywait(poid);
  228.     Polyobj_MoveTimes8(poid,32,64,64);
  229.     polywait(poid);
  230.     restart;
  231. }
  232.  
  233. Script 16 (void)
  234. {
  235.     int poid;
  236.     poid = 16;
  237.     Polyobj_MoveTimes8(poid,32,192,64);
  238.     polywait(poid);
  239.     Polyobj_MoveTimes8(poid,32,64,64);
  240.     polywait(poid);
  241.     restart;
  242. }
  243.  
  244. Script 17 (void)
  245. {
  246.     int poid;
  247.     poid = 17;
  248.     Polyobj_MoveTimes8(poid,32,192,64);
  249.     polywait(poid);
  250.     Polyobj_MoveTimes8(poid,32,64,64);
  251.     polywait(poid);
  252.     restart;
  253. }
  254.  
  255. Script 18 (void)
  256. {
  257.     int poid;
  258.     poid = 18;
  259.     Polyobj_MoveTimes8(poid,32,192,64);
  260.     polywait(poid);
  261.     Polyobj_MoveTimes8(poid,32,64,64);
  262.     polywait(poid);
  263.     restart;
  264. }
  265.  
  266. Script 19 (void)
  267. {
  268.     int poid;
  269.     poid = 19;
  270.     Polyobj_MoveTimes8(poid,32,192,64);
  271.     polywait(poid);
  272.     Polyobj_MoveTimes8(poid,32,64,64);
  273.     polywait(poid);
  274.     restart;
  275. }
  276.