Improved Husks/Strays Command - by ItsZender

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:"scoreboard objectives add alive dummy"},{id:MinecartCommandBlock,Command:setblock ~5 ~-1 ~ chain_command_block 4 replace {auto:1,Command:"entitydata @e[tag=Husk,score_alive=1] {ArmorItems:[{},{id:wheat,Count:3},{id:wheat_seeds,Count:1},{}],ArmorDropChances:[0.085F,0.4F,0.7F,0.085F],Attributes:[{Name:generic.maxHealth,Base:40},{Name:generic.maxHealth,Base:40},{Name:generic.movementSpeed,Base:0.35},{Name:generic.attackDamage,Base:8}],Health:40.0f}"}},{id:MinecartCommandBlock,Command:setblock ~6 ~-1 ~ chain_command_block 4 replace {auto:1,Command:"scoreboard players add @e[tag=Husk] alive 1"}},{id:MinecartCommandBlock,Command:setblock ~7 ~-1 ~ chain_command_block 4 replace {auto:1,Command:"scoreboard players tag @e[type=Zombie] add Husk {ZombieType:6}"}},{id:MinecartCommandBlock,Command:setblock ~7 ~-2 ~ chain_command_block 1 replace {auto:1,Command:"entitydata @e[tag=Stray,score_alive=1] {Attributes:[{Name:generic.maxHealth,Base:40},{Name:generic.movementSpeed,Base:0.3}],Health:40.0f}"}},{id:MinecartCommandBlock,Command:setblock ~6 ~-2 ~ chain_command_block 5 replace {auto:1,Command:"scoreboard players add @e[tag=Stray] alive 1"}},{id:MinecartCommandBlock,Command:setblock ~5 ~-2 ~ chain_command_block 5 replace {auto:1,Command:"execute @e[tag=Stray] ~ ~ ~ scoreboard teams join aqua @e[type=Arrow,r=3]"}},{id:MinecartCommandBlock,Command:setblock ~4 ~-2 ~ chain_command_block 5 replace {auto:1,Command:"execute @e[tag=Stray] ~ ~ ~ entitydata @e[type=Arrow,r=3] {Glowing:1b,Damage:4}"}},{id:MinecartCommandBlock,Command:setblock ~3 ~-2 ~ repeating_command_block 5 replace {auto:1,Command:"scoreboard players tag @e[type=Skeleton] add Stray {SkeletonType:2b}"}},{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]}]}]}]}