Left 4 Dead 2 c7m2_barge by Tonblader V1

//Squirrel

Convars.SetValue("mp_gamemode", "coop");
Convars.SetValue("z_difficulty", "Easy");
Convars.SetValue("director_no_bosses", 0);
Convars.SetValue("director_no_mobs", 0);
Convars.SetValue("director_no_specials", 0);
Convars.SetValue("z_common_limit", 5);
Convars.SetValue("sb_stop", 0);

Convars.SetValue("nb_blind", 0);        // set 1 if you gonna save and script SI via triggers
SendToServerConsole("nb_delete_all survivor");
// DirectorStop();
// EntFire("info_changelevel", "Disable");

// Total time: 42.367 seconds

function Inventory2()
{
    Convars.SetValue("host_timescale", 0.5);

    local hPlayer = Ent(1);
    hPlayer.GiveItem("hunting_rifle");
    hPlayer.GiveItem("vomitjar");
    hPlayer.GiveItem("pistol_magnum");
    hPlayer.GiveUpgrade(UPGRADE_INCENDIARY_AMMO);
    SetAmmo(hPlayer, 0, 10, 165, 10);
    SetAmmo(hPlayer, 1, 4);
    hPlayer.SetHealth(85);
    TeleportEntity(hPlayer, Vector(10717.046, 2431.286, 220.231), Vector(0, -140.465698, 0));
    // ST_MR(hPlayer, 0, "c7m2_replay");

    //
    // Custom script
    //

    Convars.SetValue("st_mr_force_file", "c7m2_zoey");
    Convars.SetValue("st_mr_play", Ent("!zoey").GetEntityIndex());
}

::OnEntityOutput <- function()
{
    if (g_ST.restart || activator == null || !activator.IsSurvivor()) return;
    local client = activator.GetEntityIndex();
    if (caller.GetName() == "trigger_area1")
    {

    }
    else if (caller.GetName() == "trigger_area2")
    {

    }
}

//
// Custom script
//

OnGameEvent_player_first_spawn <- function(params)
{
    local hPlayer = GetPlayerFromUserID(params.userid);

    // https://developer.valvesoftware.com/wiki/Left_4_Dead_2/Script_Functions
    if (hPlayer.GetZombieType() == 3) //Hunter
    {
        ST_MR(hPlayer, 1, "c7m2_hunter");
    }
    else if (hPlayer.GetZombieType() ==  8) //Tank
    {
        ST_MR(hPlayer, 1, "c7m2_tank");
    }
}
__CollectEventCallbacks(this, "OnGameEvent_", "GameEventCallbacks", RegisterScriptGameEventListener);

//
// Custom script
//

::OnPlayLine <- function(hPlayer, sFileName, tick, buttons)
{
    if (sFileName == "c7m2_zoey" || sFileName == "default")
    {
        if (tick == 4)
        {
            Convars.SetValue("host_timescale", 1.0);
            SendToServerConsole("impulse 100"); // Turn off flashlight
            SendToServerConsole("nb_delete_all");
            // EntFire("worldspawn", "RunScriptCode", format("ClientCommand(Ent(\"!zoey\"), \"st_mr_goto 1200\")"), 0.0);
        }
        if (tick == 20) SendToServerConsole("nb_delete_all");
        if (tick == 50)
        {
            //Zombies :D
            SpawnZombieEx("infected", Vector(10031.709, 1824.562, 176.031), Vector(0.000, 13.261, 0.000));
            SpawnZombieEx("infected", Vector(10470.717, 2022.176, 176.031), Vector(0.000, 69.566, 0.000));
            SpawnZombieEx("infected", Vector(10340.195, 2001.499, 176.031), Vector(0.000, 140.410, 0.000));
            SpawnZombieEx("infected", Vector(10183.955, 1915.068, 176.031), Vector(0.000, 329.962, 0.000));
        }
        if (tick == 125)
        {
            SpawnZombieForCB(Vector(10091.949219 1417.829224 128.031250), Vector(0.126890 92.824638 0.000000));
        }
        if (tick == 260)
        {
            //Zombies :D
            SpawnZombieEx("infected", Vector(7359.504, 1018.708, 51.713), Vector(0.000, 250.837, 0.000));
            SpawnZombieEx("infected", Vector(7317.910, 837.570, 88.968), Vector(0.000, 239.096, 0.000));
            SpawnZombieEx("infected", Vector(7639.129, 928.688, 52.257), Vector(0.000, 112.070, 0.000));
            SpawnZombieEx("infected", Vector(7797.947, 499.808, 152.995), Vector(0.000, 38.836, 0.000));

        }
        if (tick == 330)
        {
            SpawnZombieForCB(Vector(7518.713379 861.338257 69.788116), Vector(-3.133837 -16.284899 0.000000));

        }
        if (tick == 700)
        {
            //Zombies to common jump with vomitjar
            SpawnZombieEx("infected", Vector(-399.041138 869.940369 -4.760391), Vector());
            SpawnZombieEx("infected", Vector(-318.061676 889.227783 4.950500), Vector());
            SpawnZombieEx("infected", Vector(-423.322083 963.873901 -40.855385), Vector());
            SpawnZombieEx("infected", Vector(-284.430420 986.857788 -30.631241), Vector());
        }
        if (tick == 844) SendToServerConsole("nb_delete_all");
        if (tick == 845)
        {
            SpawnZombie("tank", Vector(-945.932 1273.235 161.331), true);
        }
        if (tick == 913)
        {
            SendToServerConsole("jointeam 1");
        }
        if (tick == 925)
        {
            SendToServerConsole("jointeam 2");
        }
        if (tick >= 940 && tick <= 950)
        {
            SendToServerConsole("sb_takecontrol");
        }
        if (tick == 951)
        {
            SendToServerConsole("impulse 100"); // Turn off flashlight
        }
        if (tick == 943)
        {
            SpawnZombie("hunter", Vector(-4016.928 -49.128 0.031), true);
        }
        if (tick == 1135)
        {
            SendToServerConsole("jointeam 1");
        }
        if (tick == 1147)
        {
            SendToServerConsole("jointeam 2");
        }
        if (tick >= 1147 && tick <= 1155)
        {
            SendToServerConsole("sb_takecontrol");
        }
        if (tick == 1156)
        {
            SendToServerConsole("impulse 100"); // Turn off flashlight
        }
        if (tick == 1215)
        {
            SpawnCommon("common_male_ceda",Vector(-10677.051758 2875.645264 176.031250),Vector(7.160011 -53.440674 0.000000),1);
            //Zombis :D
            SpawnZombieEx("infected", Vector(-10945.836, 2860.620, 176.031), Vector(0.000, 163.392, 0.000));
            SpawnZombieEx("infected", Vector(-10523.620, 2991.813, 176.031), Vector(0.000, 137.626, 0.000));
            SpawnZombieEx("infected", Vector(-10181.203, 2750.344, 136.031), Vector(0.000, 211.795, 0.000));
            SpawnZombieEx("infected", Vector(-10272.180, 2907.811, 176.031), Vector(0.000, 104.198, 0.000));
        }
    }
}

if (Convars.GetFloat("nb_blind"))
{
    function OnGameEvent_tank_spawn(event)
    {
        local hPlayer = Ent(event.tankid);
        CPTime(g_ST.tick + " >> Tank"); ppos(hPlayer.GetOrigin()); ZDump();
    }

    function OnGameEvent_witch_spawn(event)
    {
        local hPlayer = Ent(event.witchid);
        CPTime(g_ST.tick + " >> Witch"); ppos(hPlayer.GetOrigin()); ZDump();
    }

    function OnGameEvent_player_spawn(event)
    {
        local hPlayer = GetPlayerFromUserID(event.userid);
        if (!hPlayer.IsSurvivor() && hPlayer.GetHealth() > 1)
        {
            CPTime(g_ST.tick + " >> SPECIALS " + hPlayer.GetHealth()); ppos(hPlayer.GetOrigin()); ZDump();
        }
    }
}

::OnRestart <- function()
{
    SendToServerConsole("stop; record demo");
}

//========================================================================================================================
//ScMp
//========================================================================================================================

Timer();

if (Ent(1) != Ent("!zoey"))
{
    SendToServerConsole("sb_add; sb_add; sb_add; sb_takecontrol zoey; nb_delete_all survivor");
    SpeedrunRestart();
}

SpawnItem("item0", Vector(10708.531, 2336.500, 208.281), Vector(0.000, 91.494, 0.000), 1, null, 250);
SpawnItem("item14", Vector(10820.438, 2341.656, 208.719), Vector(0.000, 30.498, 90.000), 5);
SpawnItem("item4", Vector(10807.156, 2349.000, 208.938), Vector(0.000, 18.018, 90.000), 5);
SpawnItem("item17", Vector(10794.063, 2348.875, 209.031), Vector(0.000, 215.991, 270.000), 5);
SpawnItem("item12", Vector(10759.125, 2349.531, 210.469), Vector(87.627, 202.148, 272.988), 1);
SpawnItem("item12", Vector(10753.063, 2335.781, 208.094), Vector(0.000, 251.543, 0.396), 1);
SpawnItem("item12", Vector(10737.625, 2339.438, 210.563), Vector(87.012, 19.512, 0.000), 1);
SpawnItem("item12", Vector(10726.938, 2347.688, 210.563), Vector(87.012, 326.997, 0.000), 1);
SpawnItem("item35", Vector(10671.000, 2517.000, 209.000), Vector(0.000, 300.015, 270.000), 1);

//
// Custom script
//

// SpawnTrigger("trigger_area1", Vector(10316.313, 1864.025, 230.637));

RemoveItem("item25");
SpawnItem("item25", Vector(5588.000, 769.875, 256.094), Vector(0.000, 58.491, 270.000), 1);
RemoveItemEx(Vector(3056.000, 1237.000, 137.178),3);
SpawnItem("item6", Vector(3056.000, 1237.000, 137.178), Vector(0.000, 181.494, 0.000), 1);