Some additional shuttle/z-level 1 fixes (#9768)

code/game/atoms_movable.dm

@@ -241,7 +241,11 @@
 			G.check_nuke_disks()
 
 		spawn(0)
-			if(loc) loc.Entered(src)
+			if(loc)
+				var/turf/T = loc
+				loc.Entered(src)
+				if(!T.is_hole)
+					fall_impact(text2num(pickweight(list("1" = 60, "2" = 30, "3" = 10))))
 
 //by default, transition randomly to another zlevel
 /atom/movable/proc/get_transit_zlevel()

code/modules/shuttles/shuttle.dm

@@ -231,6 +231,8 @@
 			if(SW.outside_window)
 				var/turf/target_turf = get_turf(SW)
 				target_turf.ChangeTurf(destination.base_turf)
+		for(var/obj/effect/energy_field/ef in sub_area)
+			qdel(ef)
 
 	// Remove all powernets that were affected, and rebuild them.
 	var/list/cables = list()