Undertale script viewer

if (global.mnfight == 3)

{

    with (object_index)

    {

        attacked = 0;

        with (mypart1)

        {

            if (mega == 4)

                mega = 2;

        }

    }

}

if (alarm[5] > 0)

{

    if (global.monster[0] == 1)

    {

        if (global.monsterinstance[0].alarm[5] > alarm[5]
)
gml_Object_obj_memoryhead_Alarm_5.gml

with (OBJ_WRITER)
    instance_destroy();
with (obj_insanesq)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
if (coherent == 0)
    caster_stop(dnoise);
global.mnfight = 2;
with (mypart1)
    event_user(0);

            alarm[5]
 = global.monsterinstance[0].alarm[5];
gml_Object_obj_memoryhead_Alarm_5.gml

with (OBJ_WRITER)
    instance_destroy();
with (obj_insanesq)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
if (coherent == 0)
    caster_stop(dnoise);
global.mnfight = 2;
with (mypart1)
    event_user(0);

    }

    if (global.monster[1] == 1)

    {

        if (global.monsterinstance[1].alarm[5] > alarm[5]
)
gml_Object_obj_memoryhead_Alarm_5.gml

with (OBJ_WRITER)
    instance_destroy();
with (obj_insanesq)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
if (coherent == 0)
    caster_stop(dnoise);
global.mnfight = 2;
with (mypart1)
    event_user(0);

            alarm[5]
 = global.monsterinstance[1].alarm[5];
gml_Object_obj_memoryhead_Alarm_5.gml

with (OBJ_WRITER)
    instance_destroy();
with (obj_insanesq)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
if (coherent == 0)
    caster_stop(dnoise);
global.mnfight = 2;
with (mypart1)
    event_user(0);

    }

    if (global.monster[2] == 1)

    {

        if (global.monsterinstance[2].alarm[5] > alarm[5]
)
gml_Object_obj_memoryhead_Alarm_5.gml

with (OBJ_WRITER)
    instance_destroy();
with (obj_insanesq)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
if (coherent == 0)
    caster_stop(dnoise);
global.mnfight = 2;
with (mypart1)
    event_user(0);

            alarm[5]
 = global.monsterinstance[2].alarm[5];
gml_Object_obj_memoryhead_Alarm_5.gml

with (OBJ_WRITER)
    instance_destroy();
with (obj_insanesq)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
if (coherent == 0)
    caster_stop(dnoise);
global.mnfight = 2;
with (mypart1)
    event_user(0);

    }

}

if (global.mnfight == 1)

{

    if (talked == 0)

    {

        alarm[5]
 = 110;
gml_Object_obj_memoryhead_Alarm_5.gml

with (OBJ_WRITER)
    instance_destroy();
with (obj_insanesq)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
if (coherent == 0)
    caster_stop(dnoise);
global.mnfight = 2;
with (mypart1)
    event_user(0);

        alarm[6]
 = 1;
gml_Object_obj_memoryhead_Alarm_6.gml

blcon = instance_create(x + 95, y - 10, obj_blconsm);
gg = floor(random(3));
mycommand = round(random(100));
if (coherent == 1)
{
    global.msg[0] = 
Come
join
the
fun.
scr_gettext("obj_memoryhead_166")
;
    if (mycommand < 75)
        global.msg[0] = 
It's a
real
get
together
scr_gettext("obj_memoryhead_167")
;
    if (mycommand < 50)
        global.msg[0] = 
Lorem
ipsum
docet
scr_gettext("obj_memoryhead_168")
;
    if (mycommand < 25)
        global.msg[0] = 
Become
one of
us!
scr_gettext("obj_memoryhead_169")
;
    if (turns == 0)
        global.msg[0] = 
Come
join
the
fun.
scr_gettext("obj_memoryhead_171")
;
    turns += 1;
}
if (whatiheard == 1)
{
    global.msg[0] = 
That's
a
shame.
scr_gettext("obj_memoryhead_181")
;
    if (mycommand > 33)
        global.msg[0] = 
Oh
well.
scr_gettext("obj_memoryhead_182")
;
    if (mycommand > 66)
        global.msg[0] = 
Be
seeing
you.
scr_gettext("obj_memoryhead_183")
;
}
if (whatiheard == 3)
{
    global.msg[0] = 
Then,
hold
still.
scr_gettext("obj_memoryhead_188")
;
    if (mycommand > 33)
        global.msg[0] = 
Just
a
moment.
scr_gettext("obj_memoryhead_189")
;
    if (mycommand > 66)
        global.msg[0] = 
You'll
be with
us
shortly.
scr_gettext("obj_memoryhead_190")
;
}
global.msg[1] = 
Close MessageClose MessageClose Message
scr_gettext("obj_memoryhead_195")
;
global.typer = 2;
if (coherent == 1)
{
    blconwd = instance_create(blcon.x + 15, blcon.y + 10, OBJ_NOMSCWRITER);
}
else
{
    sq = instance_create(blcon.x + 15, blcon.y + 10, obj_insanesq);
    dd = floor(random(6));
    dnoise = caster_loop(ds[dd], 0.3, 0.9 + random(0.2));
    caster_set_panning(dnoise, 0.1 + random(0.8));
}
global.border = 5;
obj_heart.x = round((global.idealborder[0] + global.idealborder[1]) / 2) - 8;
obj_heart.y = round((global.idealborder[2] + global.idealborder[3]) / 2) - 8;

        talked = 1;

        global.heard = 0;

    }

}

if (control_check_pressed(0))

{

    if (alarm[5] > 5 && obj_lborder.x == global.idealborder[0] && alarm[6]
 < 0)
gml_Object_obj_memoryhead_Alarm_6.gml

blcon = instance_create(x + 95, y - 10, obj_blconsm);
gg = floor(random(3));
mycommand = round(random(100));
if (coherent == 1)
{
    global.msg[0] = 
Come
join
the
fun.
scr_gettext("obj_memoryhead_166")
;
    if (mycommand < 75)
        global.msg[0] = 
It's a
real
get
together
scr_gettext("obj_memoryhead_167")
;
    if (mycommand < 50)
        global.msg[0] = 
Lorem
ipsum
docet
scr_gettext("obj_memoryhead_168")
;
    if (mycommand < 25)
        global.msg[0] = 
Become
one of
us!
scr_gettext("obj_memoryhead_169")
;
    if (turns == 0)
        global.msg[0] = 
Come
join
the
fun.
scr_gettext("obj_memoryhead_171")
;
    turns += 1;
}
if (whatiheard == 1)
{
    global.msg[0] = 
That's
a
shame.
scr_gettext("obj_memoryhead_181")
;
    if (mycommand > 33)
        global.msg[0] = 
Oh
well.
scr_gettext("obj_memoryhead_182")
;
    if (mycommand > 66)
        global.msg[0] = 
Be
seeing
you.
scr_gettext("obj_memoryhead_183")
;
}
if (whatiheard == 3)
{
    global.msg[0] = 
Then,
hold
still.
scr_gettext("obj_memoryhead_188")
;
    if (mycommand > 33)
        global.msg[0] = 
Just
a
moment.
scr_gettext("obj_memoryhead_189")
;
    if (mycommand > 66)
        global.msg[0] = 
You'll
be with
us
shortly.
scr_gettext("obj_memoryhead_190")
;
}
global.msg[1] = 
Close MessageClose MessageClose Message
scr_gettext("obj_memoryhead_195")
;
global.typer = 2;
if (coherent == 1)
{
    blconwd = instance_create(blcon.x + 15, blcon.y + 10, OBJ_NOMSCWRITER);
}
else
{
    sq = instance_create(blcon.x + 15, blcon.y + 10, obj_insanesq);
    dd = floor(random(6));
    dnoise = caster_loop(ds[dd], 0.3, 0.9 + random(0.2));
    caster_set_panning(dnoise, 0.1 + random(0.8));
}
global.border = 5;
obj_heart.x = round((global.idealborder[0] + global.idealborder[1]) / 2) - 8;
obj_heart.y = round((global.idealborder[2] + global.idealborder[3]) / 2) - 8;

        alarm[5]
 = 2;
gml_Object_obj_memoryhead_Alarm_5.gml

with (OBJ_WRITER)
    instance_destroy();
with (obj_insanesq)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
if (coherent == 0)
    caster_stop(dnoise);
global.mnfight = 2;
with (mypart1)
    event_user(0);

}

if (global.hurtanim[myself] == 1)

{

    shudder = 8;

    alarm[3]
 = global.damagetimer;
gml_Object_obj_memoryhead_Alarm_3.gml

if (mypart1.pause != 1)
{
    dmgwriter = instance_create((x + (sprite_width / 2)) - 48, y - 24, obj_dmgwriter);
    global.damage = 0;
    with (dmgwriter)
        dmg = 0;
    dmgwriter.special = 1;
    mypart1.pause = 1;
    snd_play(snd_damage);
    alarm[8]
 = 11;
}
if (sha == 0)
    sha = x;
x = sha + shudder;
if (shudder < 0)
    shudder = -(shudder + 1);
else
    shudder = -shudder;
if (shudder == 0)
{
    sha = 0;
    global.hurtanim[myself] = 2;
    exit;
}
alarm[3]
 = 2;

    global.hurtanim[myself] = 3;

}

if (global.hurtanim[myself] == 2)

{

    global.monsterhp[myself] -= takedamage;

    with (dmgwriter)

alarm[2]

    if (global.monsterhp[myself] >= 1)

    {

        global.hurtanim[myself] = 0;

        mypart1.pause = 0;

        global.myfight = 0;

        global.mnfight = 1;

    }

    else

    {

        global.myfight = 0;

        global.mnfight = 1;

        killed = 1;

        instance_destroy();

    }

}

if (global.hurtanim[myself] == 5)

{

    global.damage = 0;

    instance_create((x + (sprite_width / 2)) - 48, y - 24, obj_dmgwriter);

    with (obj_dmgwriter)

alarm[2]

    global.myfight = 0;

    global.mnfight = 1;

    global.hurtanim[myself] = 0;

}

if (global.mnfight == 2)

{

    if (attacked == 0)

    {

        pop = 
scr_monstersum
scr_monstersum

return global.monster[0] + global.monster[1] + global.monster[2];
();

        global.turntimer = 200;

        global.firingrate = 10;

        if (pop == 3)

            global.firingrate = global.firingrate * 2.5;

        if (pop == 2)

            global.firingrate = global.firingrate * 1.8;

        if (mycommand >= 0)

        {

            with (obj_freakbulletgen)

                instance_destroy();

            gen = instance_create(x, y, obj_freakbulletgen);

            gen.dmg = global.monsteratk[myself];

        }

        else

        {

            gen = instance_create(((global.idealborder[0] + global.idealborder[1]) / 2) - 30, global.idealborder[2] + 2, obj_vulkincloudbul);

        }

        if (mycommand >= 0)

            global.msg[0] = 
* But nobody came.
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_420")
;

        if (mycommand >= 25)

            global.msg[0] = 
* But nobody came.
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_421")
;

        if (mycommand >= 50)

            global.msg[0] = 
* But nobody came.
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_422")
;

        if (mycommand >= 75)

            global.msg[0] = 
* But nobody came.
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_423")
;

        if (mycommand >= 95)

            global.msg[0] = 
* Smells like batteries.
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_424")
;

        if (mercymod > 100)

            global.msg[0] = 
* Seems like it doesn't
care anymore.
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_425")
;

        if (global.monsterhp[myself] <= (global.monstermaxhp[myself] / 4))

            global.msg[0] = 
* Monster has low HP.
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_426")
;

        attacked = 1;

    }

    if (mercymod == 999999)

    {

        global.turntimer = -1;

        global.mnfight = 3;

    }

    whatiheard = -1;

}

if (global.myfight == 2)

{

    if (whatiheard != -1)

    {

        if (global.heard == 0)

        {

            if (coherent == 0)

            {

                if (whatiheard == 0)

                {

                    global.msc = 0;

                    global.msg[0] = 
* No data available.Wait for input^
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_461")
;

                    OBJ_WRITER.halt = 3;

                    iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);

                    with (iii)

                        halt = 0;

                    whatiheard = 9;

                }

                if (whatiheard == 3)

                {

                    global.msc = 0;

                    
scr_itemget
scr_itemget

i = 0;
loop = 1;
noroom = 0;
global.item[8] = 999;
while (loop == 1)
{
    if (global.item[i] == 0)
    {
        global.item[i] = argument0;
        break;
    }
    if (i == 8)
    {
        script_execute(scr_itemnospace);
        break;
    }
    i += 1;
}
ossafe_ini_open("undertale.ini");
var bc = ini_read_real("General", "BC", 0);
if (bc < 4)
{
    bc++;
    ini_write_real("General", "BC", bc);
    ossafe_ini_close();
    ossafe_savedata_save();
}
else
{
    ossafe_ini_close();
}
if (bc >= 1)
    trophy_unlock("item_1");
if (bc >= 2)
    trophy_unlock("item_2");
if (bc >= 3)
    trophy_unlock("item_3");
if (bc >= 4)
    trophy_unlock("item_4");
script_execute(scr_itemnameb);
script_execute(scr_itemname);
(54);

                    if (noroom == 0)

                        global.msg[0] = 
* The enemy put a piece of
itself in your inventory.Wait for input^
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_472")
;

                    if (noroom == 1)

                        global.msg[0] = 
* But your inventory was full.Wait for input^
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_474")
;

                    OBJ_WRITER.halt = 3;

                    iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);

                    with (iii)

                        halt = 0;

                }

                if (whatiheard == 1)

                {

                    global.msc = 0;

                    global.msg[0] = 
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_484", string(global.at + global.wstrength), string(global.df + global.adef));

                    OBJ_WRITER.halt = 3;

                    iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);

                    with (iii)

                        halt = 0;

                }

                if (whatiheard == 4)

                {

                    global.msc = 0;

                    global.msg[0] = 
* You take out your CELL PHONE.Delay 11
* You can hear voices through
the receiver...!Wait for input^
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_493")
;

                    with (object_index)

                    {

                        coherent = 1;

                        global.monstername[myself] = 
Memoryhead
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("monstername_56b")
;

                    }

                    OBJ_WRITER.halt = 3;

                    iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);

                    with (iii)

                        halt = 0;

                }

            }

            else

            {

                if (whatiheard == 0)

                {

                    global.msc = 0;

                    global.msg[0] = 
* MEMORYHEADWait for input^
scr_gettext
scr_gettext

var text_id = argument[0];
var text = ds_map_find_value(global.text_data_en, text_id);
if (is_undefined(text))
    text = "";
if (global.language == "ja")
{
    var loc_text = ds_map_find_value(global.text_data_ja, text_id);
    if (!is_undefined(loc_text))
        text = loc_text;
}
for (var i = 1; i <= (string_length(text) - 3); i++)
{
    if (string_copy(text, i, 2) == "\[" && string_char_at(text, i + 3) == "]")
    {
        var sel = string_char_at(text, i + 2);
        var replace;
        if (sel == "C")
            replace = global.charname;
        else if (sel == "G")
            replace = string(global.gold);
        else if (sel == "I")
            replace = global.itemname[global.menucoord[1]];
        else if (sel == "1" && argument_count > 1)
            replace = argument[1];
        else if (sel == "2" && argument_count > 2)
            replace = argument[2];
        else if (sel == "3" && argument_count > 3)
            replace = argument[3];
        else if (sel == "4" && argument_count > 4)
            replace = argument[4];
        else if (sel == "5" && argument_count > 5)
            replace = argument[5];
        else if (sel == "6" && argument_count > 6)
            replace = argument[6];
        else if (sel == "7" && argument_count > 7)
            replace = argument[7];
        else if (sel == "8" && argument_count > 8)
            replace = argument[8];
        else if (sel == "9" && argument_count > 9)
            replace = argument[9];
        else
            replace = "";
        var before = string_copy(text, 1, i - 1);
        var after = string_copy(text, i + 4, string_length(text));
        text = before + replace + after;
        i += (string_length(replace) - 1);
    }
}
return text;
("obj_memoryhead_511")
;

                    OBJ_WRITER.halt = 3;

                    iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);

                    with (iii)

                        halt = 0;

                    whatiheard = 9;

                }

                if (whatiheard == 3)

                {

                    global.myfight = 0;

                    global.mnfight = 1;

                }

                if (whatiheard == 1)

                {

                    global.myfight = 0;

                    global.mnfight = 1;

                    object_index.mercymod = 999998;

                }

            }

            global.heard = 1;

        }

    }

}

if (global.myfight == 4)

{

    if (global.mercyuse == 0)

    {

        script_execute(scr_mercystandard);

        if (mercy < 0)

            instance_destroy();

    }

}

if (mercymod == 222 && instance_exists(OBJ_WRITER) == 0)

{

    script_execute(scr_mercystandard);

    if (mercy < 0)

        instance_destroy();

}