Replace event 2 with:
+ System: For "" from 1 to int(distance(Sprite.X, Sprite.Y, Sprite2.X, Sprite.Y)÷Sprite.Width)
+ System: Pick last created Sprite
+ Sprite: [X] Is contact
-> System: Create object Sprite on layer 0 at (Sprite(-1).X+Sprite.Width÷2×LoopIndex, Sprite.Y), create hierarchy: False, template: ""