Undertale script viewer

← back to main script listing

gml_Object_obj_businessmanticore_Alarm_0

(view raw script w/o annotations or w/e)
1 
myinteract = 3;
2 
global.msc = 0;
3 
global.typer = 5;
4 
global.facechoice = 0;
5 
global.faceemotion = 0;
6 
global.msg[0] = 
* This elevator goes straight
to the capital.Delay 11
* But it stopped working.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_businessmanticore_70")
;
7 
global.msg[1] = 
* The hotel's doing its best to
accomodate everybody
stuck here.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_businessmanticore_71")
;
8 
if (talkedto > 0)
9 
    global.msg[0] = 
* Me?Delay 11
* I just like explaining things
to passersby.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_businessmanticore_75")
;
10 
if (global.flag[7 true_pacifist] == 1)
11 
{
12 
    global.msg[0] = 
* Good news!Delay 11
* The elevator started working
again.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_businessmanticore_80")
;
13 
    global.msg[1] = 
* But now it's been so busy,Delay 11
we still haven't gotten the
chance to ride it.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_businessmanticore_81")
;
14 
}
15 
if (global.flag[425 killed_mettaton] == 1)
16 
{
17 
    global.msg[0] = 
* Mettaton hasn't made a
performance for more
than five minutes...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_businessmanticore_86")
;
18 
    global.msg[1] = 
* What's happening...?Delay 11
* Can you explain it?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_businessmanticore_87")
;
19 
}
20 
mydialoguer = instance_create(0, 0, obj_dialoguer);
21 
talkedto += 1;