Deltarune (Chapter 4) script viewer

if (global.encounterno == 92)

    funny = 1;

if (active == 1)

{

    spelltimer += 1;

    if (spelltimer >= global.spelldelay && i_ex(spellwriter) == false)

    {

        if (char >= 3 || spelltotal == 1)

        {

            
scr_attackphase
scr_attackphase

function 
scr_attackphase()
{
    with (obj_battlecontroller)
    {
        techwon = 0;
        if (
scr_monsterpop() == 0)
            techwon = 1;
        if (techwon == 1)
            
scr_wincombat();
        if (techwon == 0)
        {
            for (__hiti = 0; __hiti < 3; __hiti++)
                global.hittarget[__hiti] = 0;
            fightphase = 1;
            global.charturn = 3;
            if (global.charaction[0] == 4 || global.charaction[0] == 2)
                fightphase = 0;
            if (global.charaction[1] == 4 || global.charaction[1] == 2)
                fightphase = 0;
            if (global.charaction[2] == 4 || global.charaction[2] == 2)
                fightphase = 0;
            if (global.myfight == 4)
                fightphase = 1;
            if (i_ex(obj_sound_of_justice_enemy) && obj_sound_of_justice_enemy.phase == 2)
            {
                if (global.charaction[0] == 1 && global.charaction[1] != 1)
                {
                    if (obj_sound_of_justice_enemy.krisattackcount > 0)
                    {
                        global.myfight = -1;
                        global.mnfight = 1;
                        exit;
                    }
                }
                if (global.charaction[0] == 1 && global.charaction[1] == 1)
                {
                    if (obj_sound_of_justice_enemy.krisattackcount > 1)
                    {
                        global.myfight = -1;
                        global.mnfight = 1;
                        exit;
                    }
                    global.charaction[1] = 0;
                }
                if (global.charaction[0] != 1 && global.charaction[1] == 1)
                {
                    global.myfight = -1;
                    global.mnfight = 1;
                    exit;
                }
            }
            if (fightphase == 1)
            {
                global.myfight = 1;
                instance_create(xx + 2, yy + 365, obj_attackpress);
            }
            else
            {
                global.myfight = 4;
                instance_create(0, 0, obj_spellphase);
            }
        }
    }
}
();

            with (spellwriter)

                instance_destroy();

            instance_destroy();

        }

        else if (
scr_monsterpop
scr_monsterpop

function 
scr_monsterpop()
{
    return global.monster[0] + global.monster[1] + global.monster[2];
}
() > 0)

        {

            if (gotitem[char] == 1)

            {

                re_castyet = 1;

                with (global.charinstance[char])

                    state = 4;

                with (spellwriter)

                    instance_destroy();

                
scr_spelltext
scr_spelltext

function 
scr_spelltext(arg0, arg1)
{
    spell = arg0;
    caster = arg1;
    star = global.chartarget[arg1];
    spelltext = " ";
    switch (spell)
    {
        case 0:
            break;
        case 1:
            global.msg[0] = stringsetsubloc("* ~1 cast RUDE BUSTER!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_14_0");
            break;
        case 2:
            global.msg[0] = stringsetsubloc("* ~1 cast HEAL PRAYER!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_18_0");
            break;
        case 3:
            global.msg[0] = stringsetsubloc("* ~1 cast PACIFY!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_23_0");
            
scr_retarget_spell();
            if (global.monster[star] == 1)
            {
                if (global.monsterstatus[star] == 1)
                {
                }
                else
                {
                    global.msg[0] = stringsetsubloc("* ~1 cast PACIFY^1!&* But the enemy wasn't \\cBTIRED\\cW.../%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_33_0");
                    if (global.mercymod[star] >= 100)
                        global.msg[0] = stringsetsubloc("* ~1 cast PACIFY^1!&* But the foe wasn't \\cBTIRED\\cW... try \\cYSPARING\\cW!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_36_0");
                }
            }
            break;
        case 4:
            global.msg[0] = stringsetsubloc("* ~1 used RUDE BUSTER!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_43_0");
            break;
        case 5:
            global.msg[0] = stringsetsubloc("* ~1 used RED BUSTER!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_47_0");
            break;
        case 6:
            global.msg[0] = stringsetsubloc("* ~1 and Susie cast DUAL HEAL!/%", global.charname[2], "scr_spelltext_slash_scr_spelltext_gml_51_0");
            if ((i_ex(obj_titan_enemy) && obj_titan_enemy.dualhealcount < 4) || (i_ex(obj_titan_spawn_enemy) && obj_titan_spawn_enemy.dualhealcount < 4))
                global.msg[0] = stringsetsubloc("* ~1 and Susie cast DUAL HEAL! Effectiveness of DUAL HEAL has lowered!/%", global.charname[2], "scr_spelltext_slash_scr_spelltext_gml_58_0_b");
            break;
        case 8:
            global.msg[0] = stringsetsubloc("* ~1 cast SLEEPMIST!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_55_0");
            break;
        case 9:
            global.msg[0] = stringsetsubloc("* ~1 cast ICESHOCK!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_59_0");
            break;
        case 10:
            global.msg[0] = stringsetsubloc("* ~1 cast SNOWGRAVE!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_63_0");
            break;
        case 11:
            global.msg[0] = stringsetsubloc("* ~1 cast OKHEAL!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_76_0");
            if (global.flag[1569] == 1)
                global.msg[0] = stringsetsubloc("* ~1 cast BetterHeal!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_77_0");
            break;
        case 100:
            cancelattack = 0;
            global.msg[0] = stringsetsubloc("* ~1 spared ~2!/%", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_58_0");
            
scr_retarget_spell();
            if (global.chapter == 4 && (i_ex(obj_titan_spawn_enemy) || i_ex(obj_titan_enemy)))
            {
                global.msg[0] = stringsetsubloc(
* But, it was not something that can understand MERCY.Wait for inputClose Message
"* But, it was not something that can understand MERCY./%", "scr_spelltext_slash_scr_spelltext_gml_91_0"
);
            }
            else if (global.mercymod[star] >= 100)
            {
                global.msg[0] = stringsetsubloc("* ~1 spared ~2!/%", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_62_0");
            }
            else
            {
                global.msg[0] = stringsetsubloc("* ~1 spared ~2^2!&* But its name wasn't \\cYYELLOW\\cW.../%", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_66_0");
                if (global.monsterstatus[star] == 1)
                {
                    if (
scr_havechar(3))
                    {
                        global.msg[0] = stringsetsubloc("* ~1 spared ~2^2!&* But its name wasn't \\cYYELLOW\\cW.../", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_69_0");
                        global.msg[1] = stringsetloc(
* (Try using Ralsei's PACIFY!)Wait for inputClose Message
"* (Try using Ralsei's \\cBPACIFY\\cW!)/%", "scr_spelltext_slash_scr_spelltext_gml_70_0"
);
                    }
                    else if (
scr_havechar(4))
                    {
                        msgsetsubloc(0, "* ~1 spared ~2^2!&* But its name wasn't \\cYYELLOW\\cW.../", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_94_0");
                        msgnextloc(
* (Try using Noelle's SLEEPMIST!)Wait for inputClose Message
"* (Try using Noelle's \\cBSLEEPMIST\\cW!)/%", "scr_spelltext_slash_scr_spelltext_gml_95_0"
);
                    }
                    else
                    {
                        msgsetsubloc(0, "* ~1 spared ~2^2!&* But its name wasn't \\cYYELLOW\\cW.../", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_99_0");
                        msgnextloc(
* (Try using ACTs!)Wait for inputClose Message
"* (Try using \\cBACTs\\cW!)/%", "scr_spelltext_slash_scr_spelltext_gml_100_0_b"
);
                    }
                }
                if (global.chapter == 4 && i_ex(obj_holywatercooler_enemy) && global.lang == "ja")
                    global.msg[0] = stringsetsub("＊ ~1は　敵を　にがそうとした^2！&＊ しかし名前が　\\cYきいろ\\cWくない…/%", global.charname[global.char[caster]]);
            }
            if (cancelattack == 1)
                global.msg[0] = stringsetsubloc("* ~1 spared!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_73_0");
            break;
        case 201:
            global.msg[0] = stringsetsubloc("* ~1 used the DARKER CANDY!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_118_0");
            break;
        case 202:
            global.msg[0] = stringsetsubloc("* ~1 used the REVIVEMINT!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_100_0");
...
(global.charspecial[char], char);

                spellwriter = 
scr_battletext_default
scr_battletext_default

function 
scr_battletext_default()
{
    global.fc = 0;
    global.typer = 4;
    
scr_battletext();
    return battlewriter;
}
();

            }

            if (gotspell[char] == 1)

            {

                re_castyet = 1;

                with (global.charinstance[char])

                    state = 2;

                with (spellwriter)

                    instance_destroy();

                
scr_spelltext
scr_spelltext

function 
scr_spelltext(arg0, arg1)
{
    spell = arg0;
    caster = arg1;
    star = global.chartarget[arg1];
    spelltext = " ";
    switch (spell)
    {
        case 0:
            break;
        case 1:
            global.msg[0] = stringsetsubloc("* ~1 cast RUDE BUSTER!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_14_0");
            break;
        case 2:
            global.msg[0] = stringsetsubloc("* ~1 cast HEAL PRAYER!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_18_0");
            break;
        case 3:
            global.msg[0] = stringsetsubloc("* ~1 cast PACIFY!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_23_0");
            
scr_retarget_spell();
            if (global.monster[star] == 1)
            {
                if (global.monsterstatus[star] == 1)
                {
                }
                else
                {
                    global.msg[0] = stringsetsubloc("* ~1 cast PACIFY^1!&* But the enemy wasn't \\cBTIRED\\cW.../%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_33_0");
                    if (global.mercymod[star] >= 100)
                        global.msg[0] = stringsetsubloc("* ~1 cast PACIFY^1!&* But the foe wasn't \\cBTIRED\\cW... try \\cYSPARING\\cW!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_36_0");
                }
            }
            break;
        case 4:
            global.msg[0] = stringsetsubloc("* ~1 used RUDE BUSTER!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_43_0");
            break;
        case 5:
            global.msg[0] = stringsetsubloc("* ~1 used RED BUSTER!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_47_0");
            break;
        case 6:
            global.msg[0] = stringsetsubloc("* ~1 and Susie cast DUAL HEAL!/%", global.charname[2], "scr_spelltext_slash_scr_spelltext_gml_51_0");
            if ((i_ex(obj_titan_enemy) && obj_titan_enemy.dualhealcount < 4) || (i_ex(obj_titan_spawn_enemy) && obj_titan_spawn_enemy.dualhealcount < 4))
                global.msg[0] = stringsetsubloc("* ~1 and Susie cast DUAL HEAL! Effectiveness of DUAL HEAL has lowered!/%", global.charname[2], "scr_spelltext_slash_scr_spelltext_gml_58_0_b");
            break;
        case 8:
            global.msg[0] = stringsetsubloc("* ~1 cast SLEEPMIST!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_55_0");
            break;
        case 9:
            global.msg[0] = stringsetsubloc("* ~1 cast ICESHOCK!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_59_0");
            break;
        case 10:
            global.msg[0] = stringsetsubloc("* ~1 cast SNOWGRAVE!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_63_0");
            break;
        case 11:
            global.msg[0] = stringsetsubloc("* ~1 cast OKHEAL!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_76_0");
            if (global.flag[1569] == 1)
                global.msg[0] = stringsetsubloc("* ~1 cast BetterHeal!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_77_0");
            break;
        case 100:
            cancelattack = 0;
            global.msg[0] = stringsetsubloc("* ~1 spared ~2!/%", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_58_0");
            
scr_retarget_spell();
            if (global.chapter == 4 && (i_ex(obj_titan_spawn_enemy) || i_ex(obj_titan_enemy)))
            {
                global.msg[0] = stringsetsubloc(
* But, it was not something that can understand MERCY.Wait for inputClose Message
"* But, it was not something that can understand MERCY./%", "scr_spelltext_slash_scr_spelltext_gml_91_0"
);
            }
            else if (global.mercymod[star] >= 100)
            {
                global.msg[0] = stringsetsubloc("* ~1 spared ~2!/%", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_62_0");
            }
            else
            {
                global.msg[0] = stringsetsubloc("* ~1 spared ~2^2!&* But its name wasn't \\cYYELLOW\\cW.../%", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_66_0");
                if (global.monsterstatus[star] == 1)
                {
                    if (
scr_havechar(3))
                    {
                        global.msg[0] = stringsetsubloc("* ~1 spared ~2^2!&* But its name wasn't \\cYYELLOW\\cW.../", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_69_0");
                        global.msg[1] = stringsetloc(
* (Try using Ralsei's PACIFY!)Wait for inputClose Message
"* (Try using Ralsei's \\cBPACIFY\\cW!)/%", "scr_spelltext_slash_scr_spelltext_gml_70_0"
);
                    }
                    else if (
scr_havechar(4))
                    {
                        msgsetsubloc(0, "* ~1 spared ~2^2!&* But its name wasn't \\cYYELLOW\\cW.../", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_94_0");
                        msgnextloc(
* (Try using Noelle's SLEEPMIST!)Wait for inputClose Message
"* (Try using Noelle's \\cBSLEEPMIST\\cW!)/%", "scr_spelltext_slash_scr_spelltext_gml_95_0"
);
                    }
                    else
                    {
                        msgsetsubloc(0, "* ~1 spared ~2^2!&* But its name wasn't \\cYYELLOW\\cW.../", global.charname[global.char[caster]], global.monstername[star], "scr_spelltext_slash_scr_spelltext_gml_99_0");
                        msgnextloc(
* (Try using ACTs!)Wait for inputClose Message
"* (Try using \\cBACTs\\cW!)/%", "scr_spelltext_slash_scr_spelltext_gml_100_0_b"
);
                    }
                }
                if (global.chapter == 4 && i_ex(obj_holywatercooler_enemy) && global.lang == "ja")
                    global.msg[0] = stringsetsub("＊ ~1は　敵を　にがそうとした^2！&＊ しかし名前が　\\cYきいろ\\cWくない…/%", global.charname[global.char[caster]]);
            }
            if (cancelattack == 1)
                global.msg[0] = stringsetsubloc("* ~1 spared!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_73_0");
            break;
        case 201:
            global.msg[0] = stringsetsubloc("* ~1 used the DARKER CANDY!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_118_0");
            break;
        case 202:
            global.msg[0] = stringsetsubloc("* ~1 used the REVIVEMINT!/%", global.charname[global.char[caster]], "scr_spelltext_slash_scr_spelltext_gml_100_0");
...
(global.charspecial[char], char);

                spellwriter = 
scr_battletext_default
scr_battletext_default

function 
scr_battletext_default()
{
    global.fc = 0;
    global.typer = 4;
    
scr_battletext();
    return battlewriter;
}
();

            }

            global.spelldelay = 90;

            if (re_castyet == 0)

                global.spelldelay = 1;

            char += 1;

            repeat (2)

            {

                if (char < 3)

                {

                    if (using[char] == 0)

                        char += 1;

                }

            }

            spelltimer = 0;

            re_castyet = 0;

        }

        else

        {

            
scr_attackphase
scr_attackphase

function 
scr_attackphase()
{
    with (obj_battlecontroller)
    {
        techwon = 0;
        if (
scr_monsterpop() == 0)
            techwon = 1;
        if (techwon == 1)
            
scr_wincombat();
        if (techwon == 0)
        {
            for (__hiti = 0; __hiti < 3; __hiti++)
                global.hittarget[__hiti] = 0;
            fightphase = 1;
            global.charturn = 3;
            if (global.charaction[0] == 4 || global.charaction[0] == 2)
                fightphase = 0;
            if (global.charaction[1] == 4 || global.charaction[1] == 2)
                fightphase = 0;
            if (global.charaction[2] == 4 || global.charaction[2] == 2)
                fightphase = 0;
            if (global.myfight == 4)
                fightphase = 1;
            if (i_ex(obj_sound_of_justice_enemy) && obj_sound_of_justice_enemy.phase == 2)
            {
                if (global.charaction[0] == 1 && global.charaction[1] != 1)
                {
                    if (obj_sound_of_justice_enemy.krisattackcount > 0)
                    {
                        global.myfight = -1;
                        global.mnfight = 1;
                        exit;
                    }
                }
                if (global.charaction[0] == 1 && global.charaction[1] == 1)
                {
                    if (obj_sound_of_justice_enemy.krisattackcount > 1)
                    {
                        global.myfight = -1;
                        global.mnfight = 1;
                        exit;
                    }
                    global.charaction[1] = 0;
                }
                if (global.charaction[0] != 1 && global.charaction[1] == 1)
                {
                    global.myfight = -1;
                    global.mnfight = 1;
                    exit;
                }
            }
            if (fightphase == 1)
            {
                global.myfight = 1;
                instance_create(xx + 2, yy + 365, obj_attackpress);
            }
            else
            {
                global.myfight = 4;
                instance_create(0, 0, obj_spellphase);
            }
        }
    }
}
();

            with (spellwriter)

                instance_destroy();

            instance_destroy();

        }

    }

}