help on optimizations

execute as @e at @s as @e[tag=alternate] if score @e[sort=nearest,limit=1] aid = @s aid run tag @e[sort=nearest,limit=1,type=!minecraft:block_display,type=!minecraft:item_display,dx=0] add pull_alternative
execute as @e[tag=alternate,type=block_display] at @s run tag @s add pull
execute as @e[tag=alternate,type=block_display] at @s run execute as @e[tag=pull_alternative,type=!minecraft:marker,type=!minecraft:block_display] positioned as @s run execute facing entity @e[tag=pull,sort=nearest,limit=1] feet run damage @s 2
execute as @e[tag=alternate,type=block_display] at @s run execute as @e[tag=pull_alternative,type=!minecraft:marker,type=!minecraft:block_display,distance=..2] positioned as @s run execute run particle minecraft:explosion_emitter ~ ~ ~
execute as @e[tag=alternate,type=block_display] at @s run execute as @e[tag=pull_alternative,type=!minecraft:marker,type=!minecraft:block_display,distance=..2] positioned as @s run execute run damage @s 15
execute as @e[tag=alternate,type=block_display] at @s run execute as @e[tag=pull_alternative,type=!minecraft:marker,type=!minecraft:block_display,distance=..2] positioned as @s run execute run kill @e[tag=alternate,sort=nearest,limit=12]
execute as @e[tag=alternate,type=block_display] at @s run execute as @e[tag=pull_alternative,type=!minecraft:marker,type=!minecraft:block_display] positioned as @s run execute facing entity @e[tag=pull,sort=nearest,limit=1] feet if block ^ ^ ^0.3 #jjba:walk_through run tp @s ^ ^ ^0.3
tag @e[tag=pull_alternative] remove pull_alternative
tag @e[tag=pull] remove pull
its supposed to pull an entity in, but its very laggy, does anyone know how to optimize it?