Deltarune (Chapter 5) script viewer

image_alpha = 0.3;

scr_darksize
scr_darksize

function 
scr_darksize()
{
    var inst = id;
    if (argument_count)
        inst = argument0;
    inst.image_xscale = 2;
    inst.image_yscale = 2;
}
();

depth = 100000;

con = 0;

if (global.flag[1895] > 0)

    instance_destroy();

on_act = function()

{

    snd_stop(snd_plat_act_select);

    var dmg = 1;

    var total_hp = 0;

    for (var i = 0; i < 3; i++)

    {

        if (global.char[i] != 0)

            total_hp += global.hp[global.char[i]];

    }

    
scr_iteminfo
scr_iteminfo

function 
scr_iteminfo(arg0)
{
    usable = 0;
    replaceable = 0;
    value = 0;
    itemtarget = 0;
    itemnameb = " ";
    itemdescb = " ";
    switch (arg0)
    {
        case 0:
            itemnameb = " ";
            itemdescb = "---";
            break;
        case 1:
            itemnameb = stringsetloc(
Darker Candy
"Darker Candy", "scr_iteminfo_slash_scr_iteminfo_gml_16_0"
);
            itemdescb = stringsetloc(
Heals#120HP
"Heals#120HP", "scr_iteminfo_slash_scr_iteminfo_gml_17_0_b"
);
            itemtarget = 1;
            value = 120;
            usable = 1;
            break;
        case 2:
            itemnameb = stringsetloc(
ReviveMint
"ReviveMint", "scr_iteminfo_slash_scr_iteminfo_gml_22_0"
);
            itemdescb = stringsetloc(
Heal#Downed#Ally
"Heal#Downed#Ally", "scr_iteminfo_slash_scr_iteminfo_gml_23_0"
);
            itemtarget = 1;
            value = 400;
            usable = 1;
            break;
        case 3:
            itemnameb = stringsetloc(
Glowshard
"Glowshard", "scr_iteminfo_slash_scr_iteminfo_gml_29_0"
);
            itemdescb = stringsetloc(
Sell#at#shops
"Sell#at#shops", "scr_iteminfo_slash_scr_iteminfo_gml_30_0"
);
            itemtarget = 0;
            value = 200 + (global.chapter * 100);
            usable = 0;
            if (i_ex(obj_battlecontroller) && obj_battlecontroller.shareitemcon == 1)
                usable = 1;
            break;
        case 4:
            itemnameb = stringsetloc(
Manual
"Manual", "scr_iteminfo_slash_scr_iteminfo_gml_36_0"
);
            itemdescb = stringsetloc(
Read#out of#battle
"Read#out of#battle", "scr_iteminfo_slash_scr_iteminfo_gml_37_0"
);
            itemtarget = 2;
            value = 1;
            usable = 0;
            if (i_ex(obj_battlecontroller) && obj_battlecontroller.shareitemcon == 1)
                usable = 1;
            break;
        case 5:
            itemnameb = stringsetloc(
BrokenCake
"BrokenCake", "scr_iteminfo_slash_scr_iteminfo_gml_43_0"
);
            itemdescb = stringsetloc(
Heals#20HP
"Heals#20HP", "scr_iteminfo_slash_scr_iteminfo_gml_44_0"
);
            itemtarget = 1;
            value = 5;
            usable = 1;
            break;
        case 6:
            itemnameb = stringsetloc(
Top Cake
"Top Cake", "scr_iteminfo_slash_scr_iteminfo_gml_50_0"
);
            itemdescb = stringsetloc(
Heals#team#160HP
"Heals#team#160HP", "scr_iteminfo_slash_scr_iteminfo_gml_51_0"
);
            itemtarget = 2;
            value = 150;
            usable = 1;
            break;
        case 7:
            var healamount = (global.chapter == 1) ? 80 : 140;
            if (global.chapter == 5)
                healamount = 180;
            itemnameb = stringsetloc(
Spincake
"Spincake", "scr_iteminfo_slash_scr_iteminfo_gml_58_0"
);
            itemdescb = stringsetsubloc(
Heals#team#Argument №11HP
"Heals#team#~1HP", string(healamount), "scr_iteminfo_slash_scr_iteminfo_gml_59_0"
);
            itemtarget = 2;
            value = 5;
            usable = 1;
            break;
        case 8:
            itemnameb = stringsetloc(
Darkburger
"Darkburger", "scr_iteminfo_slash_scr_iteminfo_gml_65_0"
);
            itemdescb = stringsetloc(
Heals#70HP
"Heals#70HP", "scr_iteminfo_slash_scr_iteminfo_gml_66_0"
);
            itemtarget = 1;
            value = 70;
            usable = 1;
            break;
        case 9:
            itemnameb = stringsetloc(
LancerCookie
"LancerCookie", "scr_iteminfo_slash_scr_iteminfo_gml_72_0"
);
            itemdescb = stringsetloc(
Heals#50HP
"Heals#50HP", "scr_iteminfo_slash_scr_iteminfo_gml_73_0"
);
            itemtarget = 1;
            value = 10;
            usable = 1;
            break;
        case 10:
            itemnameb = stringsetloc(
GigaSalad
"GigaSalad", "scr_iteminfo_slash_scr_iteminfo_gml_79_0"
);
            itemdescb = stringsetloc(
Heals#4HP
"Heals#4HP", "scr_iteminfo_slash_scr_iteminfo_gml_80_0"
);
            itemtarget = 1;
            value = 10;
            usable = 1;
            break;
        case 11:
            itemnameb = stringsetloc(
ClubsSandwich
"ClubsSandwich", "scr_iteminfo_slash_scr_iteminfo_gml_86_0"
);
            itemdescb = stringsetloc(
Heals#team#70HP
"Heals#team#70HP", "scr_iteminfo_slash_scr_iteminfo_gml_87_0"
);
            itemtarget = 2;
            value = 70;
            usable = 1;
            break;
        case 12:
            itemnameb = stringsetloc(
HeartsDonut
"HeartsDonut", "scr_iteminfo_slash_scr_iteminfo_gml_93_0"
);
            itemdescb = stringsetloc(
Healing#varies
"Healing#varies", "scr_iteminfo_slash_scr_iteminfo_gml_94_0"
);
...
(global.item[0]);

    if (value > 0)

        dmg = ceil(value / 2);

    if (total_hp <= 3)

        dmg = 0;

    with (obj_plat_player)

        get_hurt(4, 0, 0, dmg, true);

    scr_destroy_platmode_act();

    con = 1;

    sprite_index = IMAGE_FRIEND;

    image_xscale = -2;

    image_blend = c_red;

    x += 30;

    y -= 20;

    global.flag[1895] = 1;

};

scr_configure_platmode_act
scr_configure_platmode_act

function 
scr_configure_platmode_act(arg0, arg1, arg2, arg3)
{
    var helper = instance_create(x, y, obj_plat_targethelper);
    helper.owner = self;
    helper.effect = arg0;
    helper.char = arg1;
    helper.objectname = arg2;
    helper.description = arg3;
    if (!variable_instance_exists(id, "__plat_acts"))
        __plat_acts = [];
    array_push(__plat_acts, helper);
    return helper;
}

function scr_set_platmode_act_active(arg0, arg1 = "*")
{
    if (variable_instance_exists(id, "__plat_acts"))
    {
        for (var i = 0; i < array_length(__plat_acts); i++)
        {
            if (arg1 == "*" || __plat_acts.char == arg1)
                active = arg0;
        }
    }
}

function scr_destroy_platmode_act()
{
    if (variable_instance_exists(id, "__plat_acts"))
    {
        for (var i = 0; i < array_length(__plat_acts); i++)
        {
            with (__plat_acts[i])
                instance_destroy();
        }
    }
}
(on_act, "none", "", "");