Villager luring

summon FallingSand ~ ~1 ~ {Block:redstone_block,Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:fill ~1 ~-1 ~ ~1 ~-9 ~ redstone_block},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:fill ~ ~2 ~ ~1 ~-10 ~ air},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~ 1 ~ redstone_block},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~ 1 ~-1 command_block 0 replace {Command:"execute @a[score_hasEmerald_min=1] ~ ~ ~ effect @e[type=Villager,r=2] resistance 1 6 true"}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~ 1 ~1 command_block 0 replace {Command:"execute @e[type=Villager] ~ ~ ~ tp @e[c=1,type=Villager] @a[score_hasEmerald_min=1,c=1,r=2]"}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~-1 1 ~ command_block 0 replace {Command:"scoreboard players set @a hasEmerald 0"}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~1 1 ~ command_block 0 replace {Command:"scoreboard players set @a hasEmerald 1 {SelectedItem:{id:\\\"minecraft:emerald\\\"}}"}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~ 2 ~ command_block 0 replace {Command:"setblock ~ ~-1 ~ redstone_block"}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~ 0 ~ command_block 0 replace {Command:"setblock ~ ~1 ~ stone"}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:scoreboard objectives add hasEmerald dummy},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:gamerule commandBlockOutput false},Time:1,Riding:{id:"FallingSand",Block:redstone_block,Time:1}}}}}}}}}}}}}