Undertale script viewer

← back to main script listing

gml_Object_obj_papyrusboss_Alarm_8

(view raw script w/o annotations or w/e)
1 
if (bonetalk3 == 0)
2 
{
3 
    vol = caster_get_volume(global.batmusic);
4 
    global.msg[0] = 
 WELL...! *HUFF*Delay 11
IT'S CLEAR...
YOU CAN'T!Delay 11 *HUFF*Delay 11
DEFEAT ME!!!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_papyrusboss_402")
;
5 
    global.msg[1] = 
 YEAH!!!
I CAN SEE YOU
SHAKING IN YOUR
BOOTS!!!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_papyrusboss_403")
;
6 
    global.msg[2] = 
 THEREFORE I,Delay 11 THE
GREAT PAPYRUS,Delay 11
ELECT TO GRANT
YOU PITY!!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_papyrusboss_404")
;
7 
    global.msg[3] = 
\X I WILL \RSPARE\X YOU,
HUMAN!!!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_papyrusboss_405")
;
8 
    global.msg[4] = 
 \XNOW'S YOUR CHANCE
TO ACCEPT MY
\RMERCY\X.Wait for inputClose MessageClose Message
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_papyrusboss_406")
;
9 
    global.typer = 22;
10 
    blcon = instance_create(x + 145, y + 52, obj_blconwdflowey);
11 
    blconwdS = instance_create(blcon.x + blcon_textofs, blcon.y + 10, OBJ_NOMSCWRITER);
12 
    bonetalk3 = 1;
13 
}
14 
alarm[8] = 2;
gml_Object_obj_papyrusboss_Alarm_8.gml

if (bonetalk3 == 0)
{
    vol = caster_get_volume(global.batmusic);
    global.msg[0] = 
 WELL...! *HUFF*Delay 11
IT'S CLEAR...
YOU CAN'T!Delay 11 *HUFF*Delay 11
DEFEAT ME!!!Wait for input
scr_gettext("obj_papyrusboss_402")
;
    global.msg[1] = 
 YEAH!!!
I CAN SEE YOU
SHAKING IN YOUR
BOOTS!!!Wait for input
scr_gettext("obj_papyrusboss_403")
;
    global.msg[2] = 
 THEREFORE I,Delay 11 THE
GREAT PAPYRUS,Delay 11
ELECT TO GRANT
YOU PITY!!Wait for input
scr_gettext("obj_papyrusboss_404")
;
    global.msg[3] = 
\X I WILL \RSPARE\X YOU,
HUMAN!!!Wait for input
scr_gettext("obj_papyrusboss_405")
;
    global.msg[4] = 
 \XNOW'S YOUR CHANCE
TO ACCEPT MY
\RMERCY\X.Wait for inputClose MessageClose Message
scr_gettext("obj_papyrusboss_406")
;
    global.typer = 22;
    blcon = instance_create(x + 145, y + 52, obj_blconwdflowey);
    blconwdS = instance_create(blcon.x + blcon_textofs, blcon.y + 10, OBJ_NOMSCWRITER);
    bonetalk3 = 1;
}
alarm[8] = 2;
if (bonetalk3 == 1 && instance_exists(OBJ_WRITER) == 0)
{
    vol = 0;
    with (blcon)
        instance_destroy();
    dontcancel = 0;
    alarm[8] = -2;
    bonetalk3 = 2;
    mercymod = 8000;
    global.msg[0] = 
* Papyrus is sparing you.
scr_gettext("obj_papyrusboss_423")
;
    global.monsterdef[myself] = -global.monsterhp[myself] * 2;
}
if (vol > 0.01)
    vol -= 0.01;
caster_set_volume(global.batmusic, vol);
15 
if (bonetalk3 == 1 && instance_exists(OBJ_WRITER) == 0)
16 
{
17 
    vol = 0;
18 
    with (blcon)
19 
        instance_destroy();
20 
    dontcancel = 0;
21 
    alarm[8] = -2;
gml_Object_obj_papyrusboss_Alarm_8.gml

if (bonetalk3 == 0)
{
    vol = caster_get_volume(global.batmusic);
    global.msg[0] = 
 WELL...! *HUFF*Delay 11
IT'S CLEAR...
YOU CAN'T!Delay 11 *HUFF*Delay 11
DEFEAT ME!!!Wait for input
scr_gettext("obj_papyrusboss_402")
;
    global.msg[1] = 
 YEAH!!!
I CAN SEE YOU
SHAKING IN YOUR
BOOTS!!!Wait for input
scr_gettext("obj_papyrusboss_403")
;
    global.msg[2] = 
 THEREFORE I,Delay 11 THE
GREAT PAPYRUS,Delay 11
ELECT TO GRANT
YOU PITY!!Wait for input
scr_gettext("obj_papyrusboss_404")
;
    global.msg[3] = 
\X I WILL \RSPARE\X YOU,
HUMAN!!!Wait for input
scr_gettext("obj_papyrusboss_405")
;
    global.msg[4] = 
 \XNOW'S YOUR CHANCE
TO ACCEPT MY
\RMERCY\X.Wait for inputClose MessageClose Message
scr_gettext("obj_papyrusboss_406")
;
    global.typer = 22;
    blcon = instance_create(x + 145, y + 52, obj_blconwdflowey);
    blconwdS = instance_create(blcon.x + blcon_textofs, blcon.y + 10, OBJ_NOMSCWRITER);
    bonetalk3 = 1;
}
alarm[8] = 2;
if (bonetalk3 == 1 && instance_exists(OBJ_WRITER) == 0)
{
    vol = 0;
    with (blcon)
        instance_destroy();
    dontcancel = 0;
    alarm[8] = -2;
    bonetalk3 = 2;
    mercymod = 8000;
    global.msg[0] = 
* Papyrus is sparing you.
scr_gettext("obj_papyrusboss_423")
;
    global.monsterdef[myself] = -global.monsterhp[myself] * 2;
}
if (vol > 0.01)
    vol -= 0.01;
caster_set_volume(global.batmusic, vol);
22 
    bonetalk3 = 2;
23 
    mercymod = 8000;
24 
    global.msg[0] = 
* Papyrus is sparing you.
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_papyrusboss_423")
;
25 
    global.monsterdef[myself] = -global.monsterhp[myself] * 2;
26 
}
27 
if (vol > 0.01)
28 
    vol -= 0.01;
29 
caster_set_volume(global.batmusic, vol);