if (place_meeting(x, y, obj_caterpillarchara)) image_alpha = 1; else image_alpha = lerp(image_alpha, 0, 0.125);