Undertale script viewer

← back to main script listing

gml_Object_obj_memoryhead_Step_0

(view raw script w/o annotations or w/e)
1 
if (global.mnfight == 3)
2 
{
3 
    with (object_index)
4 
    {
5 
        attacked = 0;
6 
        with (mypart1)
7 
        {
8 
            if (mega == 4)
9 
                mega = 2;
10 
        }
11 
    }
12 
}
13 
if (alarm[5] > 0)
14 
{
15 
    if (global.monster[0] == 1)
16 
    {
17 
        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);
18 
            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);
19 
    }
20 
    if (global.monster[1] == 1)
21 
    {
22 
        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);
23 
            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);
24 
    }
25 
    if (global.monster[2] == 1)
26 
    {
27 
        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);
28 
            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);
29 
    }
30 
}
31 
if (global.mnfight == 1)
32 
{
33 
    if (talked == 0)
34 
    {
35 
        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);
36 
        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;
37 
        talked = 1;
38 
        global.heard = 0;
39 
    }
40 
}
41 
if (control_check_pressed(0))
42 
{
43 
    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;
44 
        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);
45 
}
46 
if (global.hurtanim[myself] == 1)
47 
{
48 
    shudder = 8;
49 
    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;
50 
    global.hurtanim[myself] = 3;
51 
}
52 
if (global.hurtanim[myself] == 2)
53 
{
54 
    global.monsterhp[myself] -= takedamage;
55 
    with (dmgwriter)
56 
alarm[2]
57 
    if (global.monsterhp[myself] >= 1)
58 
    {
59 
        global.hurtanim[myself] = 0;
60 
        mypart1.pause = 0;
61 
        global.myfight = 0;
62 
        global.mnfight = 1;
63 
    }
64 
    else
65 
    {
66 
        global.myfight = 0;
67 
        global.mnfight = 1;
68 
        killed = 1;
69 
        instance_destroy();
70 
    }
71 
}
72 
if (global.hurtanim[myself] == 5)
73 
{
74 
    global.damage = 0;
75 
    instance_create((x + (sprite_width / 2)) - 48, y - 24, obj_dmgwriter);
76 
    with (obj_dmgwriter)
77 
alarm[2]
78 
    global.myfight = 0;
79 
    global.mnfight = 1;
80 
    global.hurtanim[myself] = 0;
81 
}
82 
if (global.mnfight == 2)
83 
{
84 
    if (attacked == 0)
85 
    {
86 
        pop = scr_monstersum
scr_monstersum

return global.monster[0] + global.monster[1] + global.monster[2];
();
87 
        global.turntimer = 200;
88 
        global.firingrate = 10;
89 
        if (pop == 3)
90 
            global.firingrate = global.firingrate * 2.5;
91 
        if (pop == 2)
92 
            global.firingrate = global.firingrate * 1.8;
93 
        if (mycommand >= 0)
94 
        {
95 
            with (obj_freakbulletgen)
96 
                instance_destroy();
97 
            gen = instance_create(x, y, obj_freakbulletgen);
98 
            gen.dmg = global.monsteratk[myself];
99 
        }
100 
        else
101 
        {
102 
            gen = instance_create(((global.idealborder[0] + global.idealborder[1]) / 2) - 30, global.idealborder[2] + 2, obj_vulkincloudbul);
103 
        }
104 
        if (mycommand >= 0)
105 
            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")
;
106 
        if (mycommand >= 25)
107 
            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")
;
108 
        if (mycommand >= 50)
109 
            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")
;
110 
        if (mycommand >= 75)
111 
            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")
;
112 
        if (mycommand >= 95)
113 
            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")
;
114 
        if (mercymod > 100)
115 
            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")
;
116 
        if (global.monsterhp[myself] <= (global.monstermaxhp[myself] / 4))
117 
            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")
;
118 
        attacked = 1;
119 
    }
120 
    if (mercymod == 999999)
121 
    {
122 
        global.turntimer = -1;
123 
        global.mnfight = 3;
124 
    }
125 
    whatiheard = -1;
126 
}
127 
if (global.myfight == 2)
128 
{
129 
    if (whatiheard != -1)
130 
    {
131 
        if (global.heard == 0)
132 
        {
133 
            if (coherent == 0)
134 
            {
135 
                if (whatiheard == 0)
136 
                {
137 
                    global.msc = 0;
138 
                    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")
;
139 
                    OBJ_WRITER.halt = 3;
140 
                    iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);
141 
                    with (iii)
142 
                        halt = 0;
143 
                    whatiheard = 9;
144 
                }
145 
                if (whatiheard == 3)
146 
                {
147 
                    global.msc = 0;
148 
                    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);
149 
                    if (noroom == 0)
150 
                        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")
;
151 
                    if (noroom == 1)
152 
                        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")
;
153 
                    OBJ_WRITER.halt = 3;
154 
                    iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);
155 
                    with (iii)
156 
                        halt = 0;
157 
                }
158 
                if (whatiheard == 1)
159 
                {
160 
                    global.msc = 0;
161 
                    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));
162 
                    OBJ_WRITER.halt = 3;
163 
                    iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);
164 
                    with (iii)
165 
                        halt = 0;
166 
                }
167 
                if (whatiheard == 4)
168 
                {
169 
                    global.msc = 0;
170 
                    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")
;
171 
                    with (object_index)
172 
                    {
173 
                        coherent = 1;
174 
                        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")
;
175 
                    }
176 
                    OBJ_WRITER.halt = 3;
177 
                    iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);
178 
                    with (iii)
179 
                        halt = 0;
180 
                }
181 
            }
182 
            else
183 
            {
184 
                if (whatiheard == 0)
185 
                {
186 
                    global.msc = 0;
187 
                    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")
;
188 
                    OBJ_WRITER.halt = 3;
189 
                    iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);
190 
                    with (iii)
191 
                        halt = 0;
192 
                    whatiheard = 9;
193 
                }
194 
                if (whatiheard == 3)
195 
                {
196 
                    global.myfight = 0;
197 
                    global.mnfight = 1;
198 
                }
199 
                if (whatiheard == 1)
200 
                {
201 
                    global.myfight = 0;
202 
                    global.mnfight = 1;
203 
                    object_index.mercymod = 999998;
204 
                }
205 
            }
206 
            global.heard = 1;
207 
        }
208 
    }
209 
}
210 
if (global.myfight == 4)
211 
{
212 
    if (global.mercyuse == 0)
213 
    {
214 
        script_execute(scr_mercystandard);
215 
        if (mercy < 0)
216 
            instance_destroy();
217 
    }
218 
}
219 
if (mercymod == 222 && instance_exists(OBJ_WRITER) == 0)
220 
{
221 
    script_execute(scr_mercystandard);
222 
    if (mercy < 0)
223 
        instance_destroy();
224 
}