Made door crushing better.

Fixes #661 and is better than #821.

Again because git is a steaming pile of shit.

New proc of /obj/machinery/door: crush(). Crushes any mob on the tile. Called right after initiating the closing animation for poddoors and shutters and on the normal location for airlocks.