Deltarune (Chapter 4) script viewer

← back to main script listing

gml_Object_obj_dw_church_bookshelfpuzzle_Step_1

(view raw script w/o annotations or w/e)
1
with (obj_caterpillarchara)
2
    visible = false;
3
if (!shelvesinit)
4
{
5
    shelvesinit = true;
6
    layerarray = layer_get_all();
7
    for (var i = 0; i < array_length(layerarray); i++)
8
    {
9
        if (layer_get_name(layerarray[i]) == "spr_shelves")
10
        {
11
            elements = layer_get_all_elements(layerarray[i]);
12
            for (var j = 0; j < array_length(elements); j++)
13
            {
14
                if (layer_get_element_type(elements[j]) == 4)
15
                {
16
                    sprite_array_size++;
17
                    layersprite[sprite_array_size] = instance_create(layer_sprite_get_x(elements[j]), layer_sprite_get_y(elements[j]), obj_marker);
18
                    layersprite[sprite_array_size].sprite_index = layer_sprite_get_sprite(elements[j]);
19
                    layersprite[sprite_array_size].image_speed = 0;
20
                    layersprite[sprite_array_size].image_index = layer_sprite_get_index(elements[j]);
21
                    with (layersprite[sprite_array_size])
22
                    {
23
                        image_index = (x / 40) + (y / 40);
24
                        
scr_size
scr_size

function
scr_size(arg0 = image_xscale, arg1 = image_yscale, arg2 = id)
{ with (arg2) { image_xscale = arg0; image_yscale = arg1; } }
(2, 2);
25
                        
scr_depth_alt
scr_depth_alt

function
scr_depth_alt(arg0 = id, arg1 = 0)
{ with (arg0) depth = 100000 - ((y * 10) + ((sprite_height - sprite_yoffset) * 10) + (arg1 * 10)); }
(undefined, -38);
26
                        if (sprite_index == spr_church_ladder)
27
                            depth -= 4;
28
                    }
29
                    layer_sprite_destroy(elements[j]);
30
                }
31
            }
32
            break;
33
        }
34
    }
35
}
36
if (flooractive == 1)
37
{
38
    with (obj_solid_temp)
39
    {
40
        if (extflag == "FLOOR1")
41
            active = 1;
42
        else
43
            active = 0;
44
    }
45
}
46
if (flooractive == 2)
47
{
48
    with (obj_solid_temp)
49
    {
50
        if (extflag == "FLOOR2")
51
            active = 1;
52
        else
53
            active = 0;
54
    }
55
}
56
wasactive = flooractive;