Undertale script viewer

if (x < -100)

    if (view_xview[0] < 0)

        view_xview[0] += 4;

    else

        view_xview[0] = 0;

var text_x = 10;

if (global.language == "ja")

    text_x = -2;

if (x > -440 && td == 0)

    td = 1;

    t1 = instance_create(text_x, view_yview[0] + 20, obj_creditsword);

    t1.text = ASGOREscr_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;
("castroll_name_asgore")
;

    if (global.language == "ja")

        t1.text_xofs = -3;

    t1.text2 = by Tobyscr_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;
("castroll_by_toby")
;

if (x > 0 && td == 1)

    t2 = instance_create(text_x, view_yview[0] + 120, obj_creditsword);

    t2.text = MONSTER#KIDscr_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;
("castroll_name_monster_kid")
;

    if (global.language == "ja")

        t2.text_xofs = -3;

    t2.text2 = by#Magnolia Porterscr_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;
("castroll_by_magnolia_porter_2line")
;

    td = 2;

if (x >= 195 && con == 0)

    hspeed = 0;

    x = 198;

    con = 1;

    sprite_index = spr_mkid_trip_r;

    image_index = 0;

    image_speed = 0.25;

    asg.sprite_index = spr_asgore_shears_sad;

    asg.image_speed = 0;

    asg.image_index = 0;

    alarm[5] = -1;gml_Object_obj_endschoolanim_Alarm_5.gml

alarm[5] = 20;
instance_create(((asg.x + 57) - random(3)) + random(3), ((asg.y + 11) - random(3)) + random(3), obj_tinyleaf);
instance_create(((asg.x + 57) - random(3)) + random(3), ((asg.y + 11) - random(3)) + random(3), obj_tinyleaf);

if (con == 1)

    if (image_index >= 19)

        image_speed = 0;

        con = 2;

        alarm[4] = 30;gml_Object_obj_endschoolanim_Alarm_4.gml

con += 1;

if (y < 360 && td == 2)

    with (t1)

        fader = 1;

    with (t2)

        fader = 1;

    td = 3;

if (instance_exists(t3))

    if (t3.y > (view_yview[0] + 84))

        t3.y = view_yview[0] + 84;

if (con == 3)

    asg.sprite_index = spr_asgore_shears;

    asg.image_speed = 0.1;

    alarm[5] = 10;gml_Object_obj_endschoolanim_Alarm_5.gml

alarm[5] = 20;
instance_create(((asg.x + 57) - random(3)) + random(3), ((asg.y + 11) - random(3)) + random(3), obj_tinyleaf);
instance_create(((asg.x + 57) - random(3)) + random(3), ((asg.y + 11) - random(3)) + random(3), obj_tinyleaf);

    x += 13;

    sprite_index = spr_mkid_u;

    image_speed = 0.2;

    vspeed = -1;

    con = 4;

if (con == 4)

    if (view_yview[0] > 0)

        view_yview[0] -= 1;

    else

        vspeed = -0.5;

        image_speed = 0.1;

        if (instance_exists(t3))

            t3.fader = 1;

        else

            vol -= 0.01;

            caster_set_volume(all, vol);

            view_xview[0] -= 2;

            if (view_xview[0] < -200)

                room_goto(room_end_mtebott Pacifist credits - Mount Ebott [Dogchecked]);

1	if (x < -100)
2	{
3	if (view_xview[0] < 0)
4	view_xview[0] += 4;
5	else
6	view_xview[0] = 0;
7	}
8	var text_x = 10;
9	if (global.language == "ja")
10	text_x = -2;
11	if (x > -440 && td == 0)
12	{
13	td = 1;
14	t1 = instance_create(text_x, view_yview[0] + 20, obj_creditsword);
15	t1.text = ASGORE 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; ("castroll_name_asgore") ;
16	if (global.language == "ja")
17	t1.text_xofs = -3;
18	t1.text2 = by Toby 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; ("castroll_by_toby") ;
19	}
20	if (x > 0 && td == 1)
21	{
22	t2 = instance_create(text_x, view_yview[0] + 120, obj_creditsword);
23	t2.text = MONSTER#KID 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; ("castroll_name_monster_kid") ;
24	if (global.language == "ja")
25	t2.text_xofs = -3;
26	t2.text2 = by#Magnolia Porter 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; ("castroll_by_magnolia_porter_2line") ;
27	td = 2;
28	}
29	if (x >= 195 && con == 0)
30	{
31	hspeed = 0;
32	x = 198;
33	con = 1;
34	sprite_index = spr_mkid_trip_r;
35	image_index = 0;
36	image_speed = 0.25;
37	asg.sprite_index = spr_asgore_shears_sad;
38	asg.image_speed = 0;
39	asg.image_index = 0;
40	alarm[5] = -1; gml_Object_obj_endschoolanim_Alarm_5.gml alarm[5] = 20; instance_create(((asg.x + 57) - random(3)) + random(3), ((asg.y + 11) - random(3)) + random(3), obj_tinyleaf); instance_create(((asg.x + 57) - random(3)) + random(3), ((asg.y + 11) - random(3)) + random(3), obj_tinyleaf);
41	}
42	if (con == 1)
43	{
44	if (image_index >= 19)
45	{
46	image_speed = 0;
47	con = 2;
48	alarm[4] = 30; gml_Object_obj_endschoolanim_Alarm_4.gml con += 1;
49	}
50	}
51	if (y < 360 && td == 2)
52	{
53	with (t1)
54	fader = 1;
55	with (t2)
56	fader = 1;
57	td = 3;
58	}
59	if (instance_exists(t3))
60	{
61	if (t3.y > (view_yview[0] + 84))
62	t3.y = view_yview[0] + 84;
63	}
64	if (con == 3)
65	{
66	asg.sprite_index = spr_asgore_shears;
67	asg.image_speed = 0.1;
68	alarm[5] = 10; gml_Object_obj_endschoolanim_Alarm_5.gml alarm[5] = 20; instance_create(((asg.x + 57) - random(3)) + random(3), ((asg.y + 11) - random(3)) + random(3), obj_tinyleaf); instance_create(((asg.x + 57) - random(3)) + random(3), ((asg.y + 11) - random(3)) + random(3), obj_tinyleaf);
69	x += 13;
70	sprite_index = spr_mkid_u;
71	image_speed = 0.2;
72	vspeed = -1;
73	con = 4;
74	}
75	if (con == 4)
76	{
77	if (view_yview[0] > 0)
78	{
79	view_yview[0] -= 1;
80	}
81	else
82	{
83	vspeed = -0.5;
84	image_speed = 0.1;
85	if (instance_exists(t3))
86	{
87	t3.fader = 1;
88	}
89	else
90	{
91	vol -= 0.01;
92	caster_set_volume(all, vol);
93	view_xview[0] -= 2;
94	if (view_xview[0] < -200)
95	room_goto(room_end_mtebott Pacifist credits - Mount Ebott [Dogchecked]);
96	}
97	}
98	}

gml_Object_obj_endschoolanim_Step_0