Wither bow

/summon FallingSand ~ ~1 ~ {Block:redstone_block,Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:/fill ~ ~0 ~1 ~ ~-19 ~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 ~ ~ ~-23 ~1 air}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~3 ~-16 ~-1 command_block 0 replace {Command:/execute @e[type=Arrow] ~ ~ ~ summon WitherSkull}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~3 ~-15 ~1 command_block 0 replace {Command:}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~4 ~-14 ~-1 command_block 0 replace {Command:/scoreboard players set @e[type=Arrow] inground 1 {inGround:1b}}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~4 ~-13 ~1 command_block 0 replace {Command:}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~5 ~-12 ~-1 command_block 0 replace {Command:/execute @e[type=Arrow] ~ ~ ~ /particle smoke ~ ~ ~ .1 .1 .1 .000005 30}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~5 ~-11 ~1 command_block 0 replace {Command:}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~6 ~-10 ~-1 command_block 0 replace {Command:/execute @e[type=Arrow,score_inground_min=1] ~ ~ ~ /summon Creeper ~ ~ ~ {ExplosionRadius:2,Fuse:0}}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~6 ~-9 ~1 command_block 0 replace {Command:}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~7 ~-8 ~-1 command_block 0 replace {Command:/kill @e[score_inground_min=1]}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~7 ~-7 ~1 command_block 0 replace {Command:}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~8 ~-6 ~-1 command_block 0 replace {Command:/execute @e[type=Creeper] ~ ~ ~ /effect @e[r=4] minecraft:wither 5 0}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:setblock ~8 ~-5 ~1 command_block 0 replace {Command:}},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:/scoreboard objectives add inground dummy},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 ~ ~8 ~-2 ~ redstone_block"},Time:1,Riding:{id:"FallingSand",Block:command_block,TileEntityData:{Command:"setblock ~2 ~-1 ~-1 command_block 0 replace {Command:/fill ~ ~ ~1 ~7 ~ ~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 ~7 ~ ~-1 redstone_block 0 replace stone}"},Time:1,Riding:{id:"FallingSand",Block:stone,Time:1}}}}}}}}}}}}}}}}}}}}}}