Information about object: objStage4Blocks
Sprite: sprWoodBlocks
Solid: false
Visible: true
Depth: 0
Persistent: false
Parent:
Children:
Mask:

No Physics Object
Create Event:

execute code:

x = 0;
y = 0
surf = noone; //surface_create(room_width,room_height);
image_xscale = room_width / sprite_get_width(sprite_index);
image_yscale = room_height / sprite_get_height(sprite_index);

SpikeImg = sprWoodSpike;

with objSpikeUp
{
    if sprite_index = sprSpikeUp
    {

    var OrigX = sprite_get_width(sprite_index);
    var XScale = round((OrigX * (round(image_xscale * 10) / 10)) / 16);
    var OrigY = sprite_get_height(sprite_index);
    var YScale = round((OrigY * (round(image_yscale * 10) / 10)) / 16);

    sprite_index = other.SpikeImg;

    image_index = 0;
    image_speed = 0;
    image_xscale = XScale / round(sprite_get_width(sprite_index) / 16);
    image_yscale = YScale / round(sprite_get_height(sprite_index) / 16);
    }
}
with objSpikeRight
{
    if sprite_index = sprSpikeRight
    {

    var OrigX = sprite_get_width(sprite_index);
    var XScale = round((OrigX * (round(image_xscale * 10) / 10)) / 16);
    var OrigY = sprite_get_height(sprite_index);
    var YScale = round((OrigY * (round(image_yscale * 10) / 10)) / 16);
    sprite_index = other.SpikeImg;
    image_index = 1;
    image_speed = 0;
    image_xscale = XScale / round(sprite_get_width(sprite_index) / 16);
    image_yscale = YScale / round(sprite_get_height(sprite_index) / 16);
    }
}
with objSpikeDown
{
    if sprite_index = sprSpikeDown
    {
    var OrigX = sprite_get_width(sprite_index);
    var XScale = round((OrigX * (round(image_xscale * 10) / 10)) / 16);
    var OrigY = sprite_get_height(sprite_index);
    var YScale = round((OrigY * (round(image_yscale * 10) / 10)) / 16);
    sprite_index = other.SpikeImg;
    image_index = 2;
    image_speed = 0;
    image_xscale = XScale / round(sprite_get_width(sprite_index) / 16);
    image_yscale = YScale / round(sprite_get_height(sprite_index) / 16);
    }
}
with objSpikeLeft
{
    if sprite_index = sprSpikeLeft
    {
    var OrigX = sprite_get_width(sprite_index);
    var XScale = round((OrigX * (round(image_xscale * 10) / 10)) / 16);
    var OrigY = sprite_get_height(sprite_index);
    var YScale = round((OrigY * (round(image_yscale * 10) / 10)) / 16);
    sprite_index = other.SpikeImg;
    image_index = 3;
    image_speed = 0;
    image_xscale = XScale / round(sprite_get_width(sprite_index) / 16);
    image_yscale = YScale / round(sprite_get_height(sprite_index) / 16);

    }
}

Other Event: Room End:

execute code:

if surface_exists(surf){
    surface_free(surf);
}

Draw Event:

execute code:

if !surface_exists(surf){
    surf=surface_create(room_width,room_height);


surface_set_target(surf);
draw_clear_alpha(c_black,0);


    with objBlock
    {
        draw_rectangle_color(x,y,x+ 32 * image_xscale - 1,y+ 32 * image_yscale - 1,c_black,c_black,c_black,c_black,false);

        var a;
        for (a = 0; a < image_xscale; a += 0.5)
        {
            if not (position_meeting(x + a * 32, y - 1, objBlock) or position_meeting(x + (a + 0.5) * 32 - 1, y - 1, objBlock)) // above
            {
                draw_rectangle_color(x + a * 32,y,x+(a + 0.5) * 32 - 1,y+1,c_dkgray,c_dkgray,c_dkgray,c_dkgray,false);
            }
            if not (position_meeting(x + a * 32, y +32 * image_yscale, objBlock) or position_meeting(x + (a + 0.5) * 32 - 1, y + 32 * image_yscale, objBlock)) // below
            {
                draw_rectangle_color(x + a * 32,y + 32 * image_yscale - 2,x+(a + 0.5) * 32 - 1,y+32 * image_yscale - 1,c_dkgray,c_dkgray,c_dkgray,c_dkgray,false);
            }
        }
        for (a = 0; a < image_yscale; a += 0.5)
        {
            if not (position_meeting(x -1, y + a * 32, objBlock) or position_meeting(x -1, y + (a + 0.5) * 32 - 1, objBlock)) // left
            {
                draw_rectangle_color(x ,y + a * 32,x+1,y+(a + 0.5) * 32 - 1,c_dkgray,c_dkgray,c_dkgray,c_dkgray,false);
            }
            if not (position_meeting(x +32 * image_xscale, y + a * 32, objBlock) or position_meeting(x + 32 * image_xscale, y + (a + 0.5) * 32 - 1, objBlock)) // right
            {
                draw_rectangle_color(x + 32 * image_xscale - 2,y + a * 32,x+ 32 * image_xscale - 1,y+(a + 0.5) * 32 - 1,c_dkgray,c_dkgray,c_dkgray,c_dkgray,false);
            }
        }


    }



        draw_set_blend_mode_ext(bm_dest_alpha, bm_one);
        draw_self();
        draw_set_blend_mode( bm_normal );

        surface_reset_target();
}


        if surface_exists(surf)
        {
            draw_surface(surf,0,0);
        }