Minecraft Quarry

/summon FallingSand ~ ~1 ~ {Block:redstone_block,Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:fill ~ ~0 ~1 ~ ~-9 ~1 redstone_block},Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:setblock ~ ~3 ~1 stone},Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:setblock ~ ~4 ~ command_block 0 replace {Command:fill ~ ~2 ~ ~ ~-13 ~1 air}},Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:scoreboard objectives add Quarry dummy },Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:/summon FallingSand ~2 ~ ~-1 {Block:command_block,TileEntityData:{Command:execute @e[type=ArmorStand,score_Quarry_min=2] ~ ~ ~ detect ~ ~-3 ~ bedrock 0 /kill @e[type=ArmorStand,score_Quarry_min=2,r=0] },Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:scoreboard players set @e[type=ArmorStand,score_Quarry_min=1,score_Quarry=1] Quarry 2 },Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:execute @e[type=ArmorStand,score_Quarry_min=1,score_Quarry=1] ~ ~ ~ /fill ~ ~ ~ ~ ~-2 ~ air 0 replace cobblestone_wall },Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:execute @e[type=ArmorStand] ~ ~ ~ detect ~ ~-3 ~ cobblestone_wall 0 /execute @e[type=ArmorStand] ~ ~ ~ detect ~ ~-2 ~ iron_block 0 /execute @e[type=ArmorStand] ~ ~ ~ detect ~ ~-1 ~ piston 0 scoreboard players set @e[type=ArmorStand,r=2] Quarry 1 },Time:1,}}}}},Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:/summon FallingSand ~2 ~ ~1 {Block:command_block,TileEntityData:{Command:execute @e[type=ArmorStand,score_Quarry_min=2] ~ ~ ~ /fill ~1 ~-1 ~1 ~-1 ~-1 ~-1 air 0 destroy},Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:execute @e[type=ArmorStand,score_Quarry_min=2] ~ ~ ~ /fill ~1 ~-1 ~1 ~-1 ~-1 ~-1 air 0 destroy },Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:execute @e[type=ArmorStand,score_Quarry_min=1,score_Quarry=1] ~ ~ ~ /fill ~ ~ ~ ~ ~-2 ~ air 0 replace iron_block },Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:execute @e[type=ArmorStand,score_Quarry_min=1,score_Quarry=1] ~ ~ ~ /fill ~ ~ ~ ~ ~-2 ~ air 0 replace piston },Time:1,}}}}},Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:gamerule commandBlockOutput false},Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:fill ~2 ~-2 ~ ~2 ~2 ~ redstone_block},Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:setblock ~2 ~-1 ~-1 command_block 0 replace {Command:fill ~ ~ ~1 ~ ~4 ~1 stone 0 replace redstone_block}},Time:1,Riding:{id:FallingSand,Block:command_block,TileEntityData:{Command:setblock ~2 ~ ~1 command_block 0 replace {Command:fill ~ ~ ~-1 ~ ~4 ~-1 redstone_block 0 replace stone}},Time:1,Riding:{id:FallingSand,Block:stone,Time:1}}}}}}}}}}}}