Undertale script viewer

← back to main script listing

gml_Object_obj_napstablook_Step_0

(view raw script w/o annotations or w/e)

if (global.mnfight == 3)
    attacked = 0;
scr_blconmatchscr_blconmatchif (alarm[5] > 0)
{
    if (global.monster[0] == 1)
    {
        if (global.monsterinstance[0].alarm[5] >alarm[5]
alarm[5]
    }
    if (global.monster[1] == 1)
    {
        if (global.monsterinstance[1].alarm[5] >alarm[5]
alarm[5]
    }
    if (global.monster[2] == 1)
    {
        if (global.monsterinstance[2].alarm[5] >alarm[5]
alarm[5]
    }
}();
if (global.mnfight == 1)
{
    if (talked == 0)
    {
        if (global.monsterhp[myself] > 0)
            alarm[5] = 75;gml_Object_obj_napstablook_Alarm_5.gmlwith (blconwd)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
whatiheard = -1;
global.mnfight = 2;
        if (mercymod == -49)
            alarm[5] = 400;gml_Object_obj_napstablook_Alarm_5.gmlwith (blconwd)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
whatiheard = -1;
global.mnfight = 2;
        alarm[6] = 1;gml_Object_obj_napstablook_Alarm_6.gmlif (global.monsterhp[myself] > 0)
{
    blcon = instance_create(x + sprite_width + 21, ystart + 24, obj_blconsm);
    mycommand = round(random(100));
    if (mycommand >= 0 && mycommand < 40)
        global.msg[0] = i'mfine,thanks.scr_gettext("obj_napstablook_294");
    if (mycommand >= 40 && mycommand < 66)
        global.msg[0] = justplugginalong...scr_gettext("obj_napstablook_295");
    if (mycommand >= 66 && mycommand)
        global.msg[0] = nnnnnnggghhh.scr_gettext("obj_napstablook_296");
    if (whatiheard == 0)
        global.msg[0] = oh, i'mREALfunny.scr_gettext("obj_napstablook_297");
    if (whatiheard == 1)
        global.msg[0] = goahead,do it.scr_gettext("obj_napstablook_298");
    if (whatiheard == 3)
        global.msg[0] = i'd justweighyoudown.scr_gettext("obj_napstablook_299");
    if (whatiheard == 4)
        global.msg[0] = heh...scr_gettext("obj_napstablook_300");
    if (whatiheard == 4 && mercymod > -300)
        global.msg[0] = hehheh...scr_gettext("obj_napstablook_301");
    if (whatiheard == 4 && mercymod > -200)
        global.msg[0] = let metry...scr_gettext("obj_napstablook_302");
    if (whatiheard != 4 && whatiheard != 3 && mercymod == -50 && mercer == 0)
    {
        global.msg[0] = i knewit...scr_gettext("obj_napstablook_305");
        mercymod = -1200;
        if (instance_exists(blt_blookhat))
        {
            with (blt_blookhat)
                instance_destroy();
        }
    }
    if (whatiheard == 3 && mercymod == -49)
    {
        global.msg[0] = ohno...scr_gettext("obj_napstablook_311");
        alarm[7] = 60;
        global.plot = 10.3;
    }
    if (whatiheard == 4 && mercymod == -49)
    {
        global.msg[0] = ohgee...scr_gettext("obj_napstablook_317");
        alarm[7] = 60;
        global.plot = 10.3;
    }
    else
    {
        global.border = 3;
        if (global.turn == 1)
            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;
    }
    global.msg[1] = Close MessageClose MessageClose Messagescr_gettext("obj_napstablook_329");
    global.typer = 2;
    blconwd = instance_create(blcon.x + 15, blcon.y + 10, OBJ_NOMSCWRITER);
}
else
{
    if (instance_exists(dmgwriter))
    {
        with (dmgwriter)
            instance_destroy();
    }
    blcon = instance_create(x + sprite_width + 11, y + 24, obj_blconwdflowey);
    global.msc = 0;
    global.msg[0] = umm... you doknow you cantkill ghosts, right?Wait for inputscr_gettext("obj_napstablook_339");
    global.msg[1] = we're sortaincorporeal andallWait for inputscr_gettext("obj_napstablook_340");
    global.msg[2] = i was justlowering my hpbecause i didntwant to be rudeWait for inputscr_gettext("obj_napstablook_341");
    global.msg[3] = sorry...Delay 11i just made thismore awkward...Wait for inputscr_gettext("obj_napstablook_342");
    global.msg[4] = pretend you beatme...Wait for inputscr_gettext("obj_napstablook_343");
    global.msg[5] = ooooooooooDelay 11Close MessageClose Messagescr_gettext("obj_napstablook_344");
    global.plot = 11;
    conversation = 1;
    image_speed = 0.2;
    global.typer = 2;
    blconwriter = instance_create(obj_blconwdflowey.x + 36, obj_blconwdflowey.y + 10, OBJ_WRITER);
    alarm[9] = 2;
}
mercer = 0;
        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_napstablook_Alarm_6.gmlif (global.monsterhp[myself] > 0)
{
    blcon = instance_create(x + sprite_width + 21, ystart + 24, obj_blconsm);
    mycommand = round(random(100));
    if (mycommand >= 0 && mycommand < 40)
        global.msg[0] = i'mfine,thanks.scr_gettext("obj_napstablook_294");
    if (mycommand >= 40 && mycommand < 66)
        global.msg[0] = justplugginalong...scr_gettext("obj_napstablook_295");
    if (mycommand >= 66 && mycommand)
        global.msg[0] = nnnnnnggghhh.scr_gettext("obj_napstablook_296");
    if (whatiheard == 0)
        global.msg[0] = oh, i'mREALfunny.scr_gettext("obj_napstablook_297");
    if (whatiheard == 1)
        global.msg[0] = goahead,do it.scr_gettext("obj_napstablook_298");
    if (whatiheard == 3)
        global.msg[0] = i'd justweighyoudown.scr_gettext("obj_napstablook_299");
    if (whatiheard == 4)
        global.msg[0] = heh...scr_gettext("obj_napstablook_300");
    if (whatiheard == 4 && mercymod > -300)
        global.msg[0] = hehheh...scr_gettext("obj_napstablook_301");
    if (whatiheard == 4 && mercymod > -200)
        global.msg[0] = let metry...scr_gettext("obj_napstablook_302");
    if (whatiheard != 4 && whatiheard != 3 && mercymod == -50 && mercer == 0)
    {
        global.msg[0] = i knewit...scr_gettext("obj_napstablook_305");
        mercymod = -1200;
        if (instance_exists(blt_blookhat))
        {
            with (blt_blookhat)
                instance_destroy();
        }
    }
    if (whatiheard == 3 && mercymod == -49)
    {
        global.msg[0] = ohno...scr_gettext("obj_napstablook_311");
        alarm[7] = 60;
        global.plot = 10.3;
    }
    if (whatiheard == 4 && mercymod == -49)
    {
        global.msg[0] = ohgee...scr_gettext("obj_napstablook_317");
        alarm[7] = 60;
        global.plot = 10.3;
    }
    else
    {
        global.border = 3;
        if (global.turn == 1)
            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;
    }
    global.msg[1] = Close MessageClose MessageClose Messagescr_gettext("obj_napstablook_329");
    global.typer = 2;
    blconwd = instance_create(blcon.x + 15, blcon.y + 10, OBJ_NOMSCWRITER);
}
else
{
    if (instance_exists(dmgwriter))
    {
        with (dmgwriter)
            instance_destroy();
    }
    blcon = instance_create(x + sprite_width + 11, y + 24, obj_blconwdflowey);
    global.msc = 0;
    global.msg[0] = umm... you doknow you cantkill ghosts, right?Wait for inputscr_gettext("obj_napstablook_339");
    global.msg[1] = we're sortaincorporeal andallWait for inputscr_gettext("obj_napstablook_340");
    global.msg[2] = i was justlowering my hpbecause i didntwant to be rudeWait for inputscr_gettext("obj_napstablook_341");
    global.msg[3] = sorry...Delay 11i just made thismore awkward...Wait for inputscr_gettext("obj_napstablook_342");
    global.msg[4] = pretend you beatme...Wait for inputscr_gettext("obj_napstablook_343");
    global.msg[5] = ooooooooooDelay 11Close MessageClose Messagescr_gettext("obj_napstablook_344");
    global.plot = 11;
    conversation = 1;
    image_speed = 0.2;
    global.typer = 2;
    blconwriter = instance_create(obj_blconwdflowey.x + 36, obj_blconwdflowey.y + 10, OBJ_WRITER);
    alarm[9] = 2;
}
mercer = 0;
        alarm[5] = 2;gml_Object_obj_napstablook_Alarm_5.gmlwith (blconwd)
    instance_destroy();
with (blcon)
    instance_destroy();
talked = 0;
whatiheard = -1;
global.mnfight = 2;
}
if (global.hurtanim[myself] == 1)
{
    shudder = 16;
    alarm[3] = global.damagetimer;gml_Object_obj_napstablook_Alarm_3.gmlif (shudder == 16)
{
    dmgwriter = instance_create((x + (sprite_width / 2)) - 48, y - 20, obj_dmgwriter);
    global.damage = takedamage;
    with (dmgwriter)
        dmg = global.damage;
}
shudder -= 2;
if (shudder == 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;
        image_index = 0;
        global.myfight = 0;
        global.mnfight = 1;
    }
    else
    {
        global.myfight = 0;
        global.mnfight = 1;
    }
}
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)
    {
        global.turntimer = 160;
        if (mercymod != -100)
        {
            if (global.turn != 1)
            {
                if (mycommand >= 0 && mycommand <= 50)
                {
                    global.turntimer = 140;
                    global.firingrate = 4000 / -mercymod;
                    gen = instance_create(0, 0, obj_crygen1);
                }
                else
                {
                    global.turntimer = 170;
                    global.firingrate = 3600 / -mercymod;
                    gen = instance_create(0, 0, obj_crygen2);
                }
            }
            else
            {
                global.turntimer = 140;
                gen = instance_create(global.idealborder[0] + 30, global.idealborder[2] + 30, obj_sadmsggen);
            }
        }
        else
        {
            global.turntimer = 260;
            global.firingrate = 8;
            instance_create(obj_napstablook.x + 34, obj_napstablook.y - 30, blt_blookhat);
            gen = instance_create(0, 0, obj_crygen3);
        }
        gen.myself = myself;
        gen.dmg = global.monsteratk[myself];
        if (mycommand >= 0)
            global.msg[0] = * Napstablook is staring intothe distance.scr_gettextscr_gettextvar 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_napstablook_549");
        if (mycommand >= 30)
            global.msg[0] = * Napstablook is wishing theyweren't here.scr_gettextscr_gettextvar 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_napstablook_550");
        if (mycommand >= 70)
            global.msg[0] = * Napstablook is pretending tosleep.scr_gettextscr_gettextvar 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_napstablook_551");
        if (mycommand >= 90)
            global.msg[0] = * The faint odor of ectoplasmpermeates the vicinity.scr_gettextscr_gettextvar 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_napstablook_552");
        if (mercymod > -400)
            global.msg[0] = * Napstablook looks just alittle bit better.scr_gettextscr_gettextvar 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_napstablook_553");
        if (mercymod > -290)
            global.msg[0] = * Cheering seems to haveimproved Napstablook'smood again.scr_gettextscr_gettextvar 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_napstablook_554");
        attacked = 1;
    }
}
if (whatiheard == 3 && instance_exists(OBJ_WRITER) == 0)
{
    script_execute(scr_mercystandard);
    if (mercy < 0)
        instance_destroy();
}
if (global.myfight == 2)
{
    if (whatiheard != -1)
    {
        if (global.heard == 0)
        {
            if (whatiheard == 0)
            {
                global.msc = 0;
                global.msg[0] = * NAPSTABLOOK - ATK 10 DEF 10* This monster doesn't seem tohave a sense of humor...Wait for input^scr_gettextscr_gettextvar 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_napstablook_576");
                if (global.flag[6 hardmode] == 1)
                    global.msg[0] = * NAPSTABLOOK - ATK 10 DEF 10* Missed the memo and is thesame difficulty as normal.Wait for input^scr_gettextscr_gettextvar 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_napstablook_579");
                OBJ_WRITER.halt = 3;
                iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);
                with (iii)
                    halt = 0;
            }
            if (whatiheard == 3)
            {
                global.myfight = 0;
                global.mnfight = 1;
                if (mercymod == -50)
                {
                    mercymod = -49;
                    caster_stop(global.batmusic);
                    caster_free(global.batmusic);
                    global.myfight = 0;
                    global.mnfight = 1;
                }
            }
            if (whatiheard == 1)
            {
                global.msc = 0;
                global.msg[0] = * You give Napstablook acruel look.Wait for input^scr_gettextscr_gettextvar 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_napstablook_603");
                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;
                if (mercymod == -50)
                {
                    mercymod = -49;
                    caster_stop(global.batmusic);
                    caster_free(global.batmusic);
                    global.myfight = 0;
                    global.mnfight = 1;
                }
                else
                {
                    if (mercymod < -400)
                        global.msg[0] = * You try to consoleNapstablook...Wait for input^scr_gettextscr_gettextvar 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_napstablook_621");
                    if (mercymod == -400)
                        global.msg[0] = * You gave Napstablook apatient smile.Wait for input^scr_gettextscr_gettextvar 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_napstablook_622");
                    if (mercymod == -300)
                        global.msg[0] = * You told Napstablook alittle joke.Wait for input^scr_gettextscr_gettextvar 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_napstablook_623");
                    if (mercymod == -200)
                        global.msg[0] = * Napstablook wants toshow you something.Wait for input^scr_gettextscr_gettextvar 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_napstablook_624");
                    OBJ_WRITER.halt = 3;
                    iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);
                    with (iii)
                        halt = 0;
                    mercymod += 100;
                }
            }
            global.heard = 1;
        }
    }
}
if (global.myfight == 4)
{
    if (global.mercyuse == 0)
    {
        mercer = 1;
        script_execute(scr_mercystandard);
        if (mercy < 0)
            instance_destroy();
    }
}

1	`if (global.mnfight == 3)`
2	`attacked = 0;`
3	`scr_blconmatchscr_blconmatch if (alarm[5] > 0) { if (global.monster[0] == 1) { if (global.monsterinstance[0].alarm[5] >alarm[5] alarm[5] } if (global.monster[1] == 1) { if (global.monsterinstance[1].alarm[5] >alarm[5] alarm[5] } if (global.monster[2] == 1) { if (global.monsterinstance[2].alarm[5] >alarm[5] alarm[5] } } ();`
4	`if (global.mnfight == 1)`
5	`{`
6	`if (talked == 0)`
7	`{`
8	`if (global.monsterhp[myself] > 0)`
9	`alarm[5] = 75;gml_Object_obj_napstablook_Alarm_5.gml with (blconwd) instance_destroy(); with (blcon) instance_destroy(); talked = 0; whatiheard = -1; global.mnfight = 2;`
10	`if (mercymod == -49)`
11	`alarm[5] = 400;gml_Object_obj_napstablook_Alarm_5.gml with (blconwd) instance_destroy(); with (blcon) instance_destroy(); talked = 0; whatiheard = -1; global.mnfight = 2;`
12	alarm[6] = 1;gml_Object_obj_napstablook_Alarm_6.gml if (global.monsterhp[myself] > 0) { blcon = instance_create(x + sprite_width + 21, ystart + 24, obj_blconsm); mycommand = round(random(100)); if (mycommand >= 0 && mycommand < 40) global.msg[0] = i'm fine, thanks. scr_gettext("obj_napstablook_294") ; if (mycommand >= 40 && mycommand < 66) global.msg[0] = just pluggin along... scr_gettext("obj_napstablook_295") ; if (mycommand >= 66 && mycommand) global.msg[0] = nnnnnn ggghhh. scr_gettext("obj_napstablook_296") ; if (whatiheard == 0) global.msg[0] = oh, i'm REAL funny. scr_gettext("obj_napstablook_297") ; if (whatiheard == 1) global.msg[0] = go ahead, do it. scr_gettext("obj_napstablook_298") ; if (whatiheard == 3) global.msg[0] = i'd just weigh you down. scr_gettext("obj_napstablook_299") ; if (whatiheard == 4) global.msg[0] = heh... scr_gettext("obj_napstablook_300") ; if (whatiheard == 4 && mercymod > -300) global.msg[0] = heh heh... scr_gettext("obj_napstablook_301") ; if (whatiheard == 4 && mercymod > -200) global.msg[0] = let me try... scr_gettext("obj_napstablook_302") ; if (whatiheard != 4 && whatiheard != 3 && mercymod == -50 && mercer == 0) { global.msg[0] = i knew it... scr_gettext("obj_napstablook_305") ; mercymod = -1200; if (instance_exists(blt_blookhat)) { with (blt_blookhat) instance_destroy(); } } if (whatiheard == 3 && mercymod == -49) { global.msg[0] = oh no... scr_gettext("obj_napstablook_311") ; alarm[7] = 60; global.plot = 10.3; } if (whatiheard == 4 && mercymod == -49) { global.msg[0] = oh gee... scr_gettext("obj_napstablook_317") ; alarm[7] = 60; global.plot = 10.3; } else { global.border = 3; if (global.turn == 1) 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; } global.msg[1] = Close MessageClose MessageClose Message scr_gettext("obj_napstablook_329") ; global.typer = 2; blconwd = instance_create(blcon.x + 15, blcon.y + 10, OBJ_NOMSCWRITER); } else { if (instance_exists(dmgwriter)) { with (dmgwriter) instance_destroy(); } blcon = instance_create(x + sprite_width + 11, y + 24, obj_blconwdflowey); global.msc = 0; global.msg[0] = umm... you do know you cant kill ghosts, right?Wait for input scr_gettext("obj_napstablook_339") ; global.msg[1] = we're sorta incorporeal and allWait for input scr_gettext("obj_napstablook_340") ; global.msg[2] = i was just lowering my hp because i didnt want to be rudeWait for input scr_gettext("obj_napstablook_341") ; global.msg[3] = sorry...Delay 11 i just made this more awkward...Wait for input scr_gettext("obj_napstablook_342") ; global.msg[4] = pretend you beat me...Wait for input scr_gettext("obj_napstablook_343") ; global.msg[5] = ooooooooooDelay 11Close MessageClose Message scr_gettext("obj_napstablook_344") ; global.plot = 11; conversation = 1; image_speed = 0.2; global.typer = 2; blconwriter = instance_create(obj_blconwdflowey.x + 36, obj_blconwdflowey.y + 10, OBJ_WRITER); alarm[9] = 2; } mercer = 0;
13	`talked = 1;`
14	`global.heard = 0;`
15	`}`
16	`}`
17	`if (control_check_pressed(0))`
18	`{`
19	if (alarm[5] > 5 && obj_lborder.x == global.idealborder[0] && alarm[6] < 0)gml_Object_obj_napstablook_Alarm_6.gml if (global.monsterhp[myself] > 0) { blcon = instance_create(x + sprite_width + 21, ystart + 24, obj_blconsm); mycommand = round(random(100)); if (mycommand >= 0 && mycommand < 40) global.msg[0] = i'm fine, thanks. scr_gettext("obj_napstablook_294") ; if (mycommand >= 40 && mycommand < 66) global.msg[0] = just pluggin along... scr_gettext("obj_napstablook_295") ; if (mycommand >= 66 && mycommand) global.msg[0] = nnnnnn ggghhh. scr_gettext("obj_napstablook_296") ; if (whatiheard == 0) global.msg[0] = oh, i'm REAL funny. scr_gettext("obj_napstablook_297") ; if (whatiheard == 1) global.msg[0] = go ahead, do it. scr_gettext("obj_napstablook_298") ; if (whatiheard == 3) global.msg[0] = i'd just weigh you down. scr_gettext("obj_napstablook_299") ; if (whatiheard == 4) global.msg[0] = heh... scr_gettext("obj_napstablook_300") ; if (whatiheard == 4 && mercymod > -300) global.msg[0] = heh heh... scr_gettext("obj_napstablook_301") ; if (whatiheard == 4 && mercymod > -200) global.msg[0] = let me try... scr_gettext("obj_napstablook_302") ; if (whatiheard != 4 && whatiheard != 3 && mercymod == -50 && mercer == 0) { global.msg[0] = i knew it... scr_gettext("obj_napstablook_305") ; mercymod = -1200; if (instance_exists(blt_blookhat)) { with (blt_blookhat) instance_destroy(); } } if (whatiheard == 3 && mercymod == -49) { global.msg[0] = oh no... scr_gettext("obj_napstablook_311") ; alarm[7] = 60; global.plot = 10.3; } if (whatiheard == 4 && mercymod == -49) { global.msg[0] = oh gee... scr_gettext("obj_napstablook_317") ; alarm[7] = 60; global.plot = 10.3; } else { global.border = 3; if (global.turn == 1) 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; } global.msg[1] = Close MessageClose MessageClose Message scr_gettext("obj_napstablook_329") ; global.typer = 2; blconwd = instance_create(blcon.x + 15, blcon.y + 10, OBJ_NOMSCWRITER); } else { if (instance_exists(dmgwriter)) { with (dmgwriter) instance_destroy(); } blcon = instance_create(x + sprite_width + 11, y + 24, obj_blconwdflowey); global.msc = 0; global.msg[0] = umm... you do know you cant kill ghosts, right?Wait for input scr_gettext("obj_napstablook_339") ; global.msg[1] = we're sorta incorporeal and allWait for input scr_gettext("obj_napstablook_340") ; global.msg[2] = i was just lowering my hp because i didnt want to be rudeWait for input scr_gettext("obj_napstablook_341") ; global.msg[3] = sorry...Delay 11 i just made this more awkward...Wait for input scr_gettext("obj_napstablook_342") ; global.msg[4] = pretend you beat me...Wait for input scr_gettext("obj_napstablook_343") ; global.msg[5] = ooooooooooDelay 11Close MessageClose Message scr_gettext("obj_napstablook_344") ; global.plot = 11; conversation = 1; image_speed = 0.2; global.typer = 2; blconwriter = instance_create(obj_blconwdflowey.x + 36, obj_blconwdflowey.y + 10, OBJ_WRITER); alarm[9] = 2; } mercer = 0;
20	`alarm[5] = 2;gml_Object_obj_napstablook_Alarm_5.gml with (blconwd) instance_destroy(); with (blcon) instance_destroy(); talked = 0; whatiheard = -1; global.mnfight = 2;`
21	`}`
22	`if (global.hurtanim[myself] == 1)`
23	`{`
24	`shudder = 16;`
25	`alarm[3] = global.damagetimer;gml_Object_obj_napstablook_Alarm_3.gml if (shudder == 16) { dmgwriter = instance_create((x + (sprite_width / 2)) - 48, y - 20, obj_dmgwriter); global.damage = takedamage; with (dmgwriter) dmg = global.damage; } shudder -= 2; if (shudder == 0) { global.hurtanim[myself] = 2; exit; } alarm[3] = 2;`
26	`global.hurtanim[myself] = 3;`
27	`}`
28	`if (global.hurtanim[myself] == 2)`
29	`{`
30	`global.monsterhp[myself] -= takedamage;`
31	`with (dmgwriter)`
32	`alarm[2]`
33	`if (global.monsterhp[myself] >= 1)`
34	`{`
35	`global.hurtanim[myself] = 0;`
36	`image_index = 0;`
37	`global.myfight = 0;`
38	`global.mnfight = 1;`
39	`}`
40	`else`
41	`{`
42	`global.myfight = 0;`
43	`global.mnfight = 1;`
44	`}`
45	`}`
46	`if (global.hurtanim[myself] == 5)`
47	`{`
48	`global.damage = 0;`
49	`instance_create((x + (sprite_width / 2)) - 48, y - 24, obj_dmgwriter);`
50	`with (obj_dmgwriter)`
51	`alarm[2]`
52	`global.myfight = 0;`
53	`global.mnfight = 1;`
54	`global.hurtanim[myself] = 0;`
55	`}`
56	`if (global.mnfight == 2)`
57	`{`
58	`if (attacked == 0)`
59	`{`
60	`global.turntimer = 160;`
61	`if (mercymod != -100)`
62	`{`
63	`if (global.turn != 1)`
64	`{`
65	`if (mycommand >= 0 && mycommand <= 50)`
66	`{`
67	`global.turntimer = 140;`
68	`global.firingrate = 4000 / -mercymod;`
69	`gen = instance_create(0, 0, obj_crygen1);`
70	`}`
71	`else`
72	`{`
73	`global.turntimer = 170;`
74	`global.firingrate = 3600 / -mercymod;`
75	`gen = instance_create(0, 0, obj_crygen2);`
76	`}`
77	`}`
78	`else`
79	`{`
80	`global.turntimer = 140;`
81	`gen = instance_create(global.idealborder[0] + 30, global.idealborder[2] + 30, obj_sadmsggen);`
82	`}`
83	`}`
84	`else`
85	`{`
86	`global.turntimer = 260;`
87	`global.firingrate = 8;`
88	`instance_create(obj_napstablook.x + 34, obj_napstablook.y - 30, blt_blookhat);`
89	`gen = instance_create(0, 0, obj_crygen3);`
90	`}`
91	`gen.myself = myself;`
92	`gen.dmg = global.monsteratk[myself];`
93	`if (mycommand >= 0)`
94	global.msg[0] = * Napstablook is staring into the distance. scr_gettextscr_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_napstablook_549") ;
95	`if (mycommand >= 30)`
96	global.msg[0] = * Napstablook is wishing they weren't here. scr_gettextscr_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_napstablook_550") ;
97	`if (mycommand >= 70)`
98	global.msg[0] = * Napstablook is pretending to sleep. scr_gettextscr_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_napstablook_551") ;
99	`if (mycommand >= 90)`
100	global.msg[0] = * The faint odor of ectoplasm permeates the vicinity. scr_gettextscr_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_napstablook_552") ;
101	`if (mercymod > -400)`
102	global.msg[0] = * Napstablook looks just a little bit better. scr_gettextscr_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_napstablook_553") ;
103	`if (mercymod > -290)`
104	global.msg[0] = * Cheering seems to have improved Napstablook's mood again. scr_gettextscr_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_napstablook_554") ;
105	`attacked = 1;`
106	`}`
107	`}`
108	`if (whatiheard == 3 && instance_exists(OBJ_WRITER) == 0)`
109	`{`
110	`script_execute(scr_mercystandard);`
111	`if (mercy < 0)`
112	`instance_destroy();`
113	`}`
114	`if (global.myfight == 2)`
115	`{`
116	`if (whatiheard != -1)`
117	`{`
118	`if (global.heard == 0)`
119	`{`
120	`if (whatiheard == 0)`
121	`{`
122	`global.msc = 0;`
123	global.msg[0] = * NAPSTABLOOK - ATK 10 DEF 10 * This monster doesn't seem to have a sense of humor...Wait for input^ scr_gettextscr_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_napstablook_576") ;
124	`if (global.flag[6 hardmode] == 1)`
125	global.msg[0] = * NAPSTABLOOK - ATK 10 DEF 10 * Missed the memo and is the same difficulty as normal.Wait for input^ scr_gettextscr_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_napstablook_579") ;
126	`OBJ_WRITER.halt = 3;`
127	`iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);`
128	`with (iii)`
129	`halt = 0;`
130	`}`
131	`if (whatiheard == 3)`
132	`{`
133	`global.myfight = 0;`
134	`global.mnfight = 1;`
135	`if (mercymod == -50)`
136	`{`
137	`mercymod = -49;`
138	`caster_stop(global.batmusic);`
139	`caster_free(global.batmusic);`
140	`global.myfight = 0;`
141	`global.mnfight = 1;`
142	`}`
143	`}`
144	`if (whatiheard == 1)`
145	`{`
146	`global.msc = 0;`
147	global.msg[0] = * You give Napstablook a cruel look.Wait for input^ scr_gettextscr_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_napstablook_603") ;
148	`OBJ_WRITER.halt = 3;`
149	`iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);`
150	`with (iii)`
151	`halt = 0;`
152	`}`
153	`if (whatiheard == 4)`
154	`{`
155	`global.msc = 0;`
156	`if (mercymod == -50)`
157	`{`
158	`mercymod = -49;`
159	`caster_stop(global.batmusic);`
160	`caster_free(global.batmusic);`
161	`global.myfight = 0;`
162	`global.mnfight = 1;`
163	`}`
164	`else`
165	`{`
166	`if (mercymod < -400)`
167	global.msg[0] = * You try to console Napstablook...Wait for input^ scr_gettextscr_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_napstablook_621") ;
168	`if (mercymod == -400)`
169	global.msg[0] = * You gave Napstablook a patient smile.Wait for input^ scr_gettextscr_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_napstablook_622") ;
170	`if (mercymod == -300)`
171	global.msg[0] = * You told Napstablook a little joke.Wait for input^ scr_gettextscr_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_napstablook_623") ;
172	`if (mercymod == -200)`
173	global.msg[0] = * Napstablook wants to show you something.Wait for input^ scr_gettextscr_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_napstablook_624") ;
174	`OBJ_WRITER.halt = 3;`
175	`iii = instance_create(global.idealborder[0], global.idealborder[2], OBJ_WRITER);`
176	`with (iii)`
177	`halt = 0;`
178	`mercymod += 100;`
179	`}`
180	`}`
181	`global.heard = 1;`
182	`}`
183	`}`
184	`}`
185	`if (global.myfight == 4)`
186	`{`
187	`if (global.mercyuse == 0)`
188	`{`
189	`mercer = 1;`
190	`script_execute(scr_mercystandard);`
191	`if (mercy < 0)`
192	`instance_destroy();`
193	`}`
194	`}`