Miner's Bat command

summon FallingSand ~ ~1 ~ {Block:stone,Time:1,Passengers:[{id:FallingSand,Block:redstone_block,Time:1,Passengers:[{id:FallingSand,Block:activator_rail,Time:1,Passengers:[{id:MinecartCommandBlock,Command:gamerule commandBlockOutput false},{id:MinecartCommandBlock,Command:"fill ~2 ~-3 ~-2 ~8 ~ ~2 stained_hardened_clay 14 hollow"},{id:MinecartCommandBlock,Command:"fill ~2 ~-2 ~-2 ~8 ~-1 ~2 stained_glass 14 replace stained_hardened_clay"},{id:MinecartCommandBlock,Command:setblock ~1 ~-2 ~ wall_sign 4 replace {Text1:"{\\\"text\\\":\\\"----------\\\",\\\"color\\\":\\\"red\\\",\\\"clickEvent\\\":{\\\"action\\\":\\\"run_command\\\",\\\"value\\\":\\\"particle hugeexplosion ~ ~ ~ 0 0 0 1 1 force\\\"}}",Text2:"{\\\"text\\\":\\\"Miner's Bat by\\\",\\\"color\\\":\\\"dark_red\\\",\\\"clickEvent\\\":{\\\"action\\\":\\\"run_command\\\",\\\"value\\\":\\\"say thanks for using my command!\\\"}}",Text3:"{\\\"text\\\":\\\"RedstoneExpert\\\",\\\"color\\\":\\\"dark_red\\\"}",Text4:"{\\\"text\\\":\\\"destroy machine\\\",\\\"color\\\":\\\"red\\\",\\\"clickEvent\\\":{\\\"action\\\":\\\"run_command\\\",\\\"value\\\":\\\"fill ~ ~-1 ~-2 ~7 ~2 ~2 air\\\"}}"}},{id:MinecartCommandBlock,Command:setblock ~1 ~-1 ~ wall_sign 4 replace {Text1:"{\\\"text\\\":\\\"watch the\\\",\\\"color\\\":\\\"gold\\\",\\\"bold\\\":true}",Text2:"{\\\"text\\\":\\\"video for\\\",\\\"color\\\":\\\"gold\\\",\\\"bold\\\":true}",Text3:"{\\\"text\\\":\\\"crafting\\\",\\\"color\\\":\\\"gold\\\",\\\"bold\\\":true}",Text4:"{\\\"text\\\":\\\"recepies!\\\",\\\"color\\\":\\\"gold\\\",\\\"bold\\\":true}"}},{id:MinecartCommandBlock,Command:setblock ~1 ~ ~ wall_sign 4 replace {Text1:"{\\\"text\\\":\\\"Activate /\\\",\\\"color\\\":\\\"dark_green\\\",\\\"clickEvent\\\":{\\\"action\\\":\\\"run_command\\\",\\\"value\\\":\\\"scoreboard players add @e[type=ArmorStand,name=TogAct,c=1] 6S5UBy_A 1\\\"}}",Text2:"{\\\"text\\\":\\\"Deactivate\\\",\\\"color\\\":\\\"dark_red\\\",\\\"clickEvent\\\":{\\\"action\\\":\\\"run_command\\\",\\\"value\\\":\\\"execute @e[score_6S5UBy_A_min=1,score_6S5UBy_A=1] ~ ~ ~ blockdata ~ ~ ~ {auto:0}\\\"}}",Text3:"{\\\"text\\\":\\\"machine\\\",\\\"color\\\":\\\"red\\\",\\\"clickEvent\\\":{\\\"action\\\":\\\"run_command\\\",\\\"value\\\":\\\"execute @e[score_6S5UBy_A_min=2] ~ ~ ~ blockdata ~ ~ ~ {auto:1}\\\"}}",Text4:"{\\\"text\\\":\\\"----------\\\",\\\"color\\\":\\\"red\\\",\\\"clickEvent\\\":{\\\"action\\\":\\\"run_command\\\",\\\"value\\\":\\\"scoreboard players reset @e[score_6S5UBy_A_min=2] 6S5UBy_A\\\"}}"}},{id:MinecartCommandBlock,Command:"summon ArmorStand ~3 ~-2 ~-1 {CustomName:TogAct,Marker:1,NoGravity:1,Invisible:1}"},{id:MinecartCommandBlock,Command:"scoreboard objectives add 6S5UBy_A dummy"},{id:MinecartCommandBlock,Command:setblock ~3 ~-1 ~1 chain_command_block 2 replace {auto:1,Command:"/execute @e[type=ArmorStand,name=TurtleHopper,tag=TurtleHopper] ~ ~ ~ entitydata @e[type=Item,r=2] {Age:1}"}},{id:MinecartCommandBlock,Command:setblock ~4 ~-1 ~1 chain_command_block 4 replace {auto:1,Command:"/execute @e[type=ArmorStand,tag=TurtleHopper,name=TurtleHopper] ~ ~ ~ detect ~ ~-1 ~ air -1 /kill @e[type=ArmorStand,tag=TurtleHopper,r=1]"}},{id:MinecartCommandBlock,Command:setblock ~5 ~-1 ~1 chain_command_block 4 replace {auto:1,Command:"/execute @e[type=Bat,tag=minebat] ~ ~ ~ tp @e[type=Item,r=2] @e[type=ArmorStand,name=TurtleHopper,tag=TurtleHopper]"}},{id:MinecartCommandBlock,Command:setblock ~6 ~-1 ~1 chain_command_block 4 replace {auto:1,Command:"/execute @e[type=Bat,tag=minebat] ~ ~ ~ fill ~1 ~1 ~1 ~-1 ~-1 ~-1 air 0 destroy"}},{id:MinecartCommandBlock,Command:setblock ~7 ~-1 ~1 chain_command_block 4 replace {auto:1,Command:"/kill @e[type=PrimedTnt,tag=red]"}},{id:MinecartCommandBlock,Command:setblock ~7 ~-2 ~1 chain_command_block 1 replace {auto:1,Command:"/execute @e[type=PrimedTnt,tag=red] ~ ~ ~ /summon Bat ~ ~ ~ {CustomName:\\\"Miner's Bat\\\",CustomNameVisible:1,Tags:[\\\"minebat\\\"],Invulnerable:1,PersistenceRequired:1,ActiveEffects:[{Id:10,Amplifier:50,Duration:20000000,ShowParticles:0b},{Id:11,Amplifier:50,Duration:20000000,ShowParticles:0b}]}"}},{id:MinecartCommandBlock,Command:setblock ~6 ~-2 ~1 chain_command_block 5 replace {auto:1,Command:"/execute @e[type=PrimedTnt,tag=red] ~ ~ ~ gamerule doTileDrops true"}},{id:MinecartCommandBlock,Command:setblock ~5 ~-2 ~1 chain_command_block 5 replace {auto:1,Command:"/execute @e[type=PrimedTnt,tag=red] ~ ~ ~ fill ~ ~-1 ~ ~ ~1 ~ air 0 destroy"}},{id:MinecartCommandBlock,Command:setblock ~4 ~-2 ~1 chain_command_block 5 replace {auto:1,Command:"/execute @e[type=PrimedTnt,tag=red] ~ ~ ~ gamerule doTileDrops false"}},{id:MinecartCommandBlock,Command:setblock ~3 ~-2 ~1 chain_command_block 5 replace {auto:1,Command:"/scoreboard players tag @e remove dia"}},{id:MinecartCommandBlock,Command:setblock ~3 ~-2 ~ chain_command_block 3 replace {auto:1,Command:"/execute @e[type=PrimedTnt,tag=dia] ~ ~ ~ detect ~ ~1 ~ redstone_block -1 /scoreboard players tag @e[type=PrimedTnt,r=0] add red"}},{id:MinecartCommandBlock,Command:setblock ~4 ~-2 ~ chain_command_block 4 replace {auto:1,Command:"/execute @e[type=PrimedTnt] ~ ~ ~ detect ~ ~-1 ~ diamond_block -1 /scoreboard players tag @e[type=PrimedTnt,r=0] add dia"}},{id:MinecartCommandBlock,Command:setblock ~5 ~-2 ~ chain_command_block 4 replace {auto:1,Command:"/kill @e[type=PrimedTnt,tag=purblock]"}},{id:MinecartCommandBlock,Command:setblock ~6 ~-2 ~ chain_command_block 4 replace {auto:1,Command:"/execute @e[type=PrimedTnt,tag=purblock] ~ ~ ~ /summon ArmorStand ~ ~ ~ {CustomName:\\\"TurtleHopper\\\",Tags:[\\\"TurtleHopper\\\"],NoGravity:1b,Small:1,Marker:1b,Invisible:1,Invulnerable:1,NoBasePlate:1,PersistenceRequired:1}"}},{id:MinecartCommandBlock,Command:setblock ~7 ~-2 ~ chain_command_block 4 replace {auto:1,Command:"/execute @e[type=PrimedTnt,tag=purblock] ~ ~ ~ gamerule doTileDrops true"}},{id:MinecartCommandBlock,Command:setblock ~7 ~-2 ~-1 chain_command_block 3 replace {auto:1,Command:"/execute @e[type=PrimedTnt,tag=purblock] ~ ~ ~ fill ~ ~ ~ ~ ~1 ~ air 0 destroy"}},{id:MinecartCommandBlock,Command:setblock ~6 ~-2 ~-1 chain_command_block 5 replace {auto:1,Command:"/execute @e[type=PrimedTnt,tag=purblock] ~ ~ ~ gamerule doTileDrops false"}},{id:MinecartCommandBlock,Command:setblock ~5 ~-2 ~-1 chain_command_block 5 replace {auto:1,Command:"/scoreboard players tag @e remove hopper"}},{id:MinecartCommandBlock,Command:setblock ~4 ~-2 ~-1 chain_command_block 5 replace {auto:1,Command:"/execute @e[type=PrimedTnt,tag=hopper] ~ ~ ~ detect ~ ~1 ~ purpur_block -1 scoreboard players tag @e[type=PrimedTnt,tag=hopper,r=0] add purblock"}},{id:MinecartCommandBlock,Command:setblock ~3 ~-2 ~-1 repeating_command_block 5 replace {auto:1,Command:"/execute @e[type=PrimedTnt] ~ ~ ~ detect ~ ~-1 ~ hopper -1 scoreboard players tag @e[type=PrimedTnt,r=0] add hopper"}},{id:MinecartCommandBlock,Command:setblock ~ ~ ~1 command_block 0 replace {Command:fill ~ ~-3 ~-1 ~ ~ ~ air}},{id:MinecartCommandBlock,Command:setblock ~ ~-1 ~1 redstone_block},{id:MinecartCommandBlock,Command:kill @e[type=MinecartCommandBlock,r=1]}]}]}]}