Slight remapping of the mining dock to make it more compact and closer to cargo

Mining shuttle now stuns unbuckled carbon mobs for 3 ticks.

git-svn-id: http://tgstation13.googlecode.com/svn/trunk@5262 316c924e-a436-60f5-8080-3fe189b3f50e

code/modules/mining/mine_items.dm

@@ -53,11 +53,11 @@ proc/move_mining_shuttle()
 		if (mining_shuttle_location == 1)
 			fromArea = locate(/area/shuttle/mining/outpost)
 			toArea = locate(/area/shuttle/mining/station)
+
 		else
 			fromArea = locate(/area/shuttle/mining/station)
 			toArea = locate(/area/shuttle/mining/outpost)
 
-
 		var/list/dstturfs = list()
 		var/throwy = world.maxy
 
@@ -91,6 +91,18 @@ proc/move_mining_shuttle()
 			mining_shuttle_location = 0
 		else
 			mining_shuttle_location = 1
+
+		for(var/mob/M in toArea)
+			if(M.client)
+				spawn(0)
+					if(M.buckled)
+						shake_camera(M, 3, 1) // buckled, not a lot of shaking
+					else
+						shake_camera(M, 10, 1) // unbuckled, HOLY SHIT SHAKE THE ROOM
+			if(istype(M, /mob/living/carbon))
+				if(!M.buckled)
+					M.Weaken(3)
+
 		mining_shuttle_moving = 0
 	return