MAP30 BEHAVIOR

//               domingo, 16 de agosto de 2015  16:23:44

// D:\ZDoom\HEXEN.WAD
// **************************************************************
// ACC script decompiler (c) 1995 Luc Cluitmans                 *
// DeePsea Port 9-16-2004 by Jack Vermeulen (v1.15)             *
// ZDOOM Support for compressed format not done, nor new stuff:)*
// **************************************************************
#include "zcommon.acs"

// BEHAVIOR 14 scripts, 13 strings

// ==================================================

// List of MAP variables:

int mapvar0;
int mapvar1;
int mapvar2;


//====================  script 1  ====================

script 1 (void)
{
    if(++mapvar0 == 4)
    {
        mapvar1 = 1;
    }
}

//====================  script 2  ====================

script 2 (void)
{
    if(mapvar1 == 0)
    {
        Ceiling_CrushRaiseAndStay(const:20, 24, 50);
    }
}

//====================  script 3  ====================

script 3 (void)
{
    if(gametype() != GAME_NET_DEATHMATCH)
    {
        mapvar2 = 1;
        sectorsound("SwitchOtherLevel", 127);
        delay(const:2);
        sectorsound("Switch1", 127);
        setlinetexture(2, SIDE_FRONT, TEXTURE_MIDDLE, "SW_OL2");
        delay(const:2);
        setlinetexture(2, SIDE_FRONT, TEXTURE_MIDDLE, "SW_OL3");
        delay(const:2);
        setlinetexture(2, SIDE_FRONT, TEXTURE_MIDDLE, "SW_OL4");
        delay(const:2);
        setlinetexture(2, SIDE_FRONT, TEXTURE_MIDDLE, "SW_OL5");
        delay(const:2);
        printbold(s:"Se ha resuelto una novena parte del puzle");
        delay(const:96);
        printbold(s:"del monasterio");
        ACS_Execute(const:38, 27, 0, 0, 0);
        Door_Raise(const:11, 16, 0);
    }
}

//====================  script 4  ====================

script 4 (void)
{
    until(mapvar2 == 1)
    {
        Polyobj_DoorSlide(3, random(const:4, 16), 0, 192, random(const:25, 125));
        Polyobj_DoorSlide(4, random(const:4, 16), 0, 224, random(const:15, 105));
        Polyobj_DoorSlide(5, random(const:8, 20), 0, 224, random(const:5, 15));
        Polyobj_DoorSlide(6, random(const:12, 24), 128, 224, random(const:5, 70));
        Polyobj_DoorSlide(7, random(const:16, 32), 0, 224, random(const:10, 15));
        Polyobj_DoorSlide(8, random(const:20, 36), 128, 224, random(const:15, 175));
        Polyobj_DoorSlide(9, random(const:24, 40), 128, 224, random(const:15, 105));
        Polyobj_DoorSlide(10, random(const:2, 8), 192, 224, random(const:30, 105));
        Polyobj_DoorSlide(11, random(const:16, 32), 64, 224, random(const:10, 15));
        Polyobj_DoorSlide(12, random(const:4, 16), 192, 160, random(const:25, 75));
        Polyobj_DoorSlide(13, random(const:32, 64), 64, 160, random(const:35, 175));
        Polyobj_DoorSlide(14, random(const:8, 32), 64, 160, random(const:15, 105));
        delay(const:35);
    }
}

//====================  script 5  ====================

script 5 (void)
{
    Door_Raise(const:7, 16, 0);
    terminate;
}

//====================  script 6  ====================

script 6 (void)
{
    Door_Raise(const:3, 16, 0);
    terminate;
}

//====================  script 7  ====================

script 7 (void)
{
    if(gametype() != GAME_NET_DEATHMATCH)
    {
        Door_Raise(const:14, 16, 0);
        sectorsound("SwitchOtherLevel", 127);
        printbold(s:"Se ha resuelto una novena parte del puzle");
        delay(const:96);
        printbold(s:"del monasterio");
        ACS_Execute(const:39, 27, 0, 0, 0);
    }
}

//====================  script 8  ====================

script 8 (void)
{
    if(gametype() != GAME_NET_DEATHMATCH)
    {
        Door_Raise(const:1, 16, 0);
        sectorsound("SwitchOtherLevel", 127);
        delay(const:2);
        sectorsound("Switch1", 127);
        setlinetexture(1, SIDE_FRONT, TEXTURE_MIDDLE, "SW_OL2");
        delay(const:2);
        setlinetexture(1, SIDE_FRONT, TEXTURE_MIDDLE, "SW_OL3");
        delay(const:2);
        setlinetexture(1, SIDE_FRONT, TEXTURE_MIDDLE, "SW_OL4");
        delay(const:2);
        setlinetexture(1, SIDE_FRONT, TEXTURE_MIDDLE, "SW_OL5");
        delay(const:2);
        printbold(s:"Se ha resuelto una novena parte del puzle");
        delay(const:96);
        printbold(s:"del monasterio");
        ACS_Execute(const:37, 27, 0, 0, 0);
        ACS_Execute(const:2, 28, 0, 0, 0);
        ACS_Execute(const:7, 34, 0, 0, 0);
    }
}

//====================  script 9  ====================

script 9 (void)
{
    Thing_Spawn(const:1, T_BRIDGE, 0);
}

//====================  script 10  ====================

script 10 (void)
{
    Floor_LowerToNearest(const:5, 8);
    setlinetexture(3, SIDE_FRONT, TEXTURE_MIDDLE, "GLASS07");
    sectorsound("GlassShatter", 127);
}

//====================  script 10  ====================

script 10 OPEN
{
    setlinespecial(1, 80 /*ACS_Execute*/, 8, 0, 0, 0, 0);
    setlinespecial(2, 80 /*ACS_Execute*/, 3, 0, 0, 0, 0);
    setlinespecial(3, 80 /*ACS_Execute*/, 10, 0, 0, 0, 0);
}

//====================  script 200  ====================

script 200 OPEN
{
    if(gametype() != GAME_NET_DEATHMATCH)
    {
        terminate;
    }
    delay(random(128, 255));
    Door_Raise(const:1, 16, 0);
    delay(random(128, 255));
    Door_Raise(const:3, 16, 0);
    delay(random(128, 255));
    Door_Raise(const:7, 16, 0);
    delay(random(128, 255));
    Door_Raise(const:14, 16, 0);
    delay(random(128, 255));
    Door_Raise(const:11, 16, 0);
}

//====================  script 254  ====================

script 254 OPEN
{
    int var0;

    delay(random(3, 7)*100);
    var0 = random(1, 5);
    switch(var0)
    {
    case 1:
        ambientsound("Ambient10", random(const:50, 110));
        break;
    case 2:
        ambientsound("Ambient12", random(const:50, 80));
        break;
    case 3:
        ambientsound("Ambient13", random(const:50, 80));
        break;
    case 4:
        ambientsound("Ambient13", random(const:60, 90));
        break;
    case 5:
        ambientsound("Ambient13", random(const:30, 70));
        break;
    }
    restart;
}

//====================  script 255  ====================

script 255 OPEN
{
    int var0;

    delay(const:8400);
    var0 = random(const:0, 1);
    if(var0 == 1)
    {
        Thing_Spawn(255, T_ZOMBIE, 64);
    }
    var0 = random(const:0, 1);
    if(var0 == 1)
    {
        Thing_Spawn(254, T_ZOMBIE, 64);
    }
    var0 = random(const:0, 1);
    if(var0 == 1)
    {
        Thing_Spawn(253, T_ZOMBIE, 64);
    }
    var0 = random(const:0, 1);
    if(var0 == 1)
    {
        Thing_Spawn(252, T_ZOMBIE, 64);
    }
    var0 = random(const:0, 1);
    if(var0 == 1)
    {
        Thing_Spawn(251, T_ZOMBIE, 64);
    }
    restart;
}


// ==================================================
// Strings:

// [  0] 'SwitchOtherLevel'
// [  1] 'Switch1'
// [  2] 'SW_OL2'
// [  3] 'SW_OL3'
// [  4] 'SW_OL4'
// [  5] 'SW_OL5'
// [  6] 'Se ha resuelto una novena parte del puzle'
// [  7] 'del monasterio'
// [  8] 'GLASS07'
// [  9] 'GlassShatter'
// [ 10] 'Ambient10'
// [ 11] 'Ambient12'
// [ 12] 'Ambient13'