if (collision_rectangle(bbox_left, bbox_top, bbox_right, bbox_bottom, obj_heart, 0, 1))
    event_user(0);
speed -= negaspeed;