Undertale script viewer

← back to main script listing

gml_Object_obj_astigmatism_Step_0

(view raw script w/o annotations or w/e)
1 
if (global.mnfight == 3)
2 
    attacked = 0;
3 
if (alarm[5] > 0)
4 
{
5 
    if (global.monster[0] == 1)
6 
    {
7 
        if (global.monsterinstance[0].alarm[5] > alarm[5])
gml_Object_obj_astigmatism_Alarm_5.gml

with (blconwd)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
global.mnfight = 2;
global.border = 3;
8 
            alarm[5] = global.monsterinstance[0].alarm[5];
gml_Object_obj_astigmatism_Alarm_5.gml

with (blconwd)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
global.mnfight = 2;
global.border = 3;
9 
    }
10 
    if (global.monster[1] == 1)
11 
    {
12 
        if (global.monsterinstance[1].alarm[5] > alarm[5])
gml_Object_obj_astigmatism_Alarm_5.gml

with (blconwd)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
global.mnfight = 2;
global.border = 3;
13 
            alarm[5] = global.monsterinstance[1].alarm[5];
gml_Object_obj_astigmatism_Alarm_5.gml

with (blconwd)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
global.mnfight = 2;
global.border = 3;
14 
    }
15 
    if (global.monster[2] == 1)
16 
    {
17 
        if (global.monsterinstance[2].alarm[5] > alarm[5])
gml_Object_obj_astigmatism_Alarm_5.gml

with (blconwd)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
global.mnfight = 2;
global.border = 3;
18 
            alarm[5] = global.monsterinstance[2].alarm[5];
gml_Object_obj_astigmatism_Alarm_5.gml

with (blconwd)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
global.mnfight = 2;
global.border = 3;
19 
    }
20 
}
21 
if (global.mnfight == 1)
22 
{
23 
    if (talked == 0)
24 
    {
25 
        alarm[5] = 110;
gml_Object_obj_astigmatism_Alarm_5.gml

with (blconwd)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
global.mnfight = 2;
global.border = 3;
26 
        alarm[6] = 1;
gml_Object_obj_astigmatism_Alarm_6.gml

blcon = instance_create(x + 100, y + 20, obj_blconsm);
gg = floor(random(3));
mycommand = round(random(100));
global.msg[0] = 
...
...
scr_gettext("obj_astigmatism_210")
;
if (mycommand < 75)
    global.msg[0] = 
You've
seen
enough.
scr_gettext("obj_astigmatism_211")
;
if (mycommand < 50)
    global.msg[0] = 
Take
your
last
look.
scr_gettext("obj_astigmatism_212")
;
if (mycommand < 25)
    global.msg[0] = 
...
scr_gettext("obj_astigmatism_213")
;
if (whatiheard == 1)
{
    if (mercymod < 0)
        global.msg[0] = 
What are
you so
afraid
of?
scr_gettext("obj_astigmatism_220")
;
    if (mercymod > 80)
        global.msg[0] = 
Finally,
someone
gets it.
scr_gettext("obj_astigmatism_222")
;
}
if (whatiheard == 3)
{
    if (mercymod < 0)
        global.msg[0] = 
How
dare
you.
scr_gettext("obj_astigmatism_228")
;
    if (mercymod > 80)
        global.msg[0] = 
That's
right!
scr_gettext("obj_astigmatism_230")
;
}
if (whatiheard == 4)
{
    if (mercymod < 1)
        global.msg[0] = 
You
dare
defy me?
scr_gettext("obj_astigmatism_236")
;
    if (mercymod > 80)
        global.msg[0] = 
You've
pushed
your
luck.
scr_gettext("obj_astigmatism_238")
;
}
if (impress == 1)
    global.msg[0] = 
That
takes
guts.
scr_gettext("obj_astigmatism_242")
;
impress = 0;
if (turnt == 0)
{
    if (pickon == 0)
        global.msg[0] = 
...
Don't
pick on
me.
scr_gettext("obj_astigmatism_248")
;
    if (pickon == 1)
        global.msg[0] = 
...
Pick on
me.
scr_gettext("obj_astigmatism_249")
;
    turnt = 1;
}
global.msg[1] = 
Close MessageClose MessageClose Message
scr_gettext("obj_astigmatism_254")
;
global.typer = 2;
blconwd = instance_create(blcon.x + 15, blcon.y + 10, OBJ_NOMSCWRITER);
global.border = 3;
obj_heart.x = round((global.idealborder[0] + global.idealborder[1]) / 2) - 8;
obj_heart.y = round((global.idealborder[2] + global.idealborder[3]) / 2) - 8;
27 
        talked = 1;
28 
        global.heard = 0;
29 
    }
30 
}
31 
if (control_check_pressed(0))
32 
{
33 
    if (alarm[5] > 5 && obj_lborder.x == global.idealborder[0] && alarm[6] < 0)
gml_Object_obj_astigmatism_Alarm_6.gml

blcon = instance_create(x + 100, y + 20, obj_blconsm);
gg = floor(random(3));
mycommand = round(random(100));
global.msg[0] = 
...
...
scr_gettext("obj_astigmatism_210")
;
if (mycommand < 75)
    global.msg[0] = 
You've
seen
enough.
scr_gettext("obj_astigmatism_211")
;
if (mycommand < 50)
    global.msg[0] = 
Take
your
last
look.
scr_gettext("obj_astigmatism_212")
;
if (mycommand < 25)
    global.msg[0] = 
...
scr_gettext("obj_astigmatism_213")
;
if (whatiheard == 1)
{
    if (mercymod < 0)
        global.msg[0] = 
What are
you so
afraid
of?
scr_gettext("obj_astigmatism_220")
;
    if (mercymod > 80)
        global.msg[0] = 
Finally,
someone
gets it.
scr_gettext("obj_astigmatism_222")
;
}
if (whatiheard == 3)
{
    if (mercymod < 0)
        global.msg[0] = 
How
dare
you.
scr_gettext("obj_astigmatism_228")
;
    if (mercymod > 80)
        global.msg[0] = 
That's
right!
scr_gettext("obj_astigmatism_230")
;
}
if (whatiheard == 4)
{
    if (mercymod < 1)
        global.msg[0] = 
You
dare
defy me?
scr_gettext("obj_astigmatism_236")
;
    if (mercymod > 80)
        global.msg[0] = 
You've
pushed
your
luck.
scr_gettext("obj_astigmatism_238")
;
}
if (impress == 1)
    global.msg[0] = 
That
takes
guts.
scr_gettext("obj_astigmatism_242")
;
impress = 0;
if (turnt == 0)
{
    if (pickon == 0)
        global.msg[0] = 
...
Don't
pick on
me.
scr_gettext("obj_astigmatism_248")
;
    if (pickon == 1)
        global.msg[0] = 
...
Pick on
me.
scr_gettext("obj_astigmatism_249")
;
    turnt = 1;
}
global.msg[1] = 
Close MessageClose MessageClose Message
scr_gettext("obj_astigmatism_254")
;
global.typer = 2;
blconwd = instance_create(blcon.x + 15, blcon.y + 10, OBJ_NOMSCWRITER);
global.border = 3;
obj_heart.x = round((global.idealborder[0] + global.idealborder[1]) / 2) - 8;
obj_heart.y = round((global.idealborder[2] + global.idealborder[3]) / 2) - 8;
34 
        alarm[5] = 2;
gml_Object_obj_astigmatism_Alarm_5.gml

with (blconwd)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
global.mnfight = 2;
global.border = 3;
35 
}
36 
if (global.hurtanim[myself] == 1)
37 
{
38 
    shudder = 8;
39 
    alarm[3] = global.damagetimer;
gml_Object_obj_astigmatism_Alarm_3.gml

if (mypart1.pause != 1)
{
    dmgwriter = instance_create((x + (sprite_width / 2)) - 48, y - 24, obj_dmgwriter);
    global.damage = takedamage;
    with (dmgwriter)
        dmg = global.damage;
    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;
40 
    global.hurtanim[myself] = 3;
41 
}
42 
if (global.hurtanim[myself] == 2)
43 
{
44 
    global.monsterhp[myself] -= takedamage;
45 
    with (dmgwriter)
46 
alarm[2]
47 
    if (global.monsterhp[myself] >= 1)
48 
    {
49 
        global.hurtanim[myself] = 0;
50 
        mypart1.pause = 0;
51 
        global.myfight = 0;
52 
        global.mnfight = 1;
53 
    }
54 
    else
55 
    {
56 
        global.myfight = 0;
57 
        global.mnfight = 1;
58 
        killed = 1;
59 
        instance_destroy();
60 
    }
61 
}
62 
if (global.hurtanim[myself] == 5)
63 
{
64 
    global.damage = 0;
65 
    instance_create((x + (sprite_width / 2)) - 48, y - 24, obj_dmgwriter);
66 
    with (obj_dmgwriter)
67 
alarm[2]
68 
    global.myfight = 0;
69 
    global.mnfight = 1;
70 
    global.hurtanim[myself] = 0;
71 
}
72 
if (global.mnfight == 2)
73 
{
74 
    if (attacked == 0)
75 
    {
76 
        pop = scr_monstersum
scr_monstersum

return global.monster[0] + global.monster[1] + global.monster[2];
();
77 
        global.turntimer = 150;
78 
        global.firingrate = 17;
79 
        if (pop == 3)
80 
            global.firingrate = global.firingrate * 2.8;
81 
        if (pop == 2)
82 
            global.firingrate = global.firingrate * 1.8;
83 
        if (mycommand >= 50)
84 
        {
85 
            gen = instance_create(x, y, obj_astigmatismgen);
86 
            gen.dmg = global.monsteratk[myself];
87 
        }
88 
        else
89 
        {
90 
            gen = instance_create(x, y, obj_stromboligen);
91 
            gen.dmg = global.monsteratk[myself];
92 
            if (pop == 1)
93 
                gen.rate += 1;
94 
        }
95 
        if (mycommand >= 0)
96 
            global.msg[0] = 
* Astigmatism gazes through
your soul.
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_astigmatism_456")
;
97 
        if (mycommand >= 30)
98 
            global.msg[0] = 
* Astigmatism gives you a
hypnotizing glare.
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_astigmatism_457")
;
99 
        if (mycommand >= 70)
100 
            global.msg[0] = 
* Astigmatism clicks its teeth.
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_astigmatism_458")
;
101 
        if (mycommand >= 90)
102 
            global.msg[0] = 
* Smells like glasses.
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_astigmatism_459")
;
103 
        if (mercymod < -100)
104 
            global.msg[0] = 
* Astigmatism has gone
bloodshot.
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_astigmatism_460")
;
105 
        if (mercymod > 100)
106 
            global.msg[0] = 
* Astigmatism doesn't care
about fighting 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_astigmatism_461")
;
107 
        if (global.monsterhp[myself] < (global.monstermaxhp[myself] / 3))
108 
            global.msg[0] = 
* Astigmatism is watering.
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_astigmatism_462")
;
109 
        attacked = 1;
110 
    }
111 
    if (mercymod == 999999)
112 
    {
113 
        global.turntimer = -1;
114 
        global.mnfight = 3;
115 
    }
116 
    whatiheard = -1;
117 
}
118 
if (global.myfight == 2)
119 
{
120 
    if (whatiheard != -1)
121 
    {
122 
        if (global.heard == 0)
123 
        {
124 
            if (whatiheard == 0)
125 
            {
126 
                global.msc = 0;
127 
                global.msg[0] = 
* ASTIGMATISM - ATK 32 DEF 26
* This relentless bully ALWAYS
gets its way.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_astigmatism_495")
;
128 
                OBJ_WRITER.halt = 3;
129 
                iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);
130 
                with (iii)
131 
                    halt = 0;
132 
                whatiheard = 9;
133 
            }
134 
            if (whatiheard == 3)
135 
            {
136 
                global.msc = 0;
137 
                global.msg[0] = 
* You pick on Astigmatism.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_astigmatism_504")
;
138 
                OBJ_WRITER.halt = 3;
139 
                if (pickon == 0)
140 
                    mercymod = -120;
141 
                if (pickon == 1)
142 
                    mercymod = 120;
143 
                iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);
144 
                with (iii)
145 
                    halt = 0;
146 
            }
147 
            if (whatiheard == 1)
148 
            {
149 
                global.msc = 0;
150 
                global.msg[0] = 
* You don't pick on Astigmatism.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_astigmatism_518")
;
151 
                if (pickon == 1)
152 
                    mercymod = -120;
153 
                if (pickon == 0)
154 
                    mercymod = 120;
155 
                OBJ_WRITER.halt = 3;
156 
                iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);
157 
                with (iii)
158 
                    halt = 0;
159 
            }
160 
            if (whatiheard == 4)
161 
            {
162 
                global.msc = 0;
163 
                sum = scr_monstersum
scr_monstersum

return global.monster[0] + global.monster[1] + global.monster[2];
();
164 
                if (sum > 1)
165 
                    global.msg[0] = 
* You stand up to Astigmatism.Delay 11
* The other monsters are
impressed.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_astigmatism_534")
;
166 
                else
167 
                    global.msg[0] = 
* You stand up to Astigmatism.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_astigmatism_533")
;
168 
                obj_monsterparent.mercymod = 150;
169 
                obj_monsterparent.impress = 1;
170 
                impress = 0;
171 
                mercymod = 0;
172 
                OBJ_WRITER.halt = 3;
173 
                iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);
174 
                with (iii)
175 
                    halt = 0;
176 
            }
177 
            global.heard = 1;
178 
        }
179 
    }
180 
}
181 
if (global.myfight == 4)
182 
{
183 
    if (global.mercyuse == 0)
184 
    {
185 
        script_execute(scr_mercystandard);
186 
        if (mercy < 0)
187 
            instance_destroy();
188 
    }
189 
}
190 
if (mercymod == 222 && instance_exists(OBJ_WRITER) == 0)
191 
{
192 
    script_execute(scr_mercystandard);
193 
    if (mercy < 0)
194 
        instance_destroy();
195 
}