From 1bc28c07c09828f70c986fe67e658a065367efdf Mon Sep 17 00:00:00 2001
From: Neerti <neerti@users.noreply.github.com>
Date: Fri, 8 Sep 2017 08:14:43 -0400
Subject: [PATCH] Port's TG's Maploader

---
 .../binary_devices/binary_atmos_base.dm       | 222 +++++----
 .../components/omni_devices/omni_base.dm      |   1 +
 .../components/portables_connector.dm         |  10 +-
 .../trinary_devices/trinary_base.dm           | 280 ++++++-----
 code/ATMOSPHERICS/components/tvalve.dm        |  11 +-
 .../components/unary/unary_base.dm            | 143 +++---
 code/ATMOSPHERICS/components/valve.dm         |   6 +-
 code/ATMOSPHERICS/he_pipes.dm                 | 205 ++++----
 code/ATMOSPHERICS/pipes.dm                    |  68 ++-
 code/__defines/misc.dm                        |   8 +
 code/_helpers/lists.dm                        |  10 +
 code/_helpers/text.dm                         |  57 +++
 code/controllers/master.dm                    |  12 +-
 code/controllers/subsystems/creation.dm       |  29 ++
 code/game/atoms_movable.dm                    |   5 +-
 code/game/machinery/alarm.dm                  |   2 +-
 code/game/machinery/status_display.dm         |   8 +
 code/game/objects/effects/landmarks.dm        |   8 +-
 code/modules/admin/admin_verbs.dm             |   5 +-
 .../admin/verbs/map_template_loadverb.dm      |  69 +++
 code/modules/awaymissions/zlevel.dm           |   3 +-
 code/modules/maps/dmm_suite.dm                |   2 +-
 code/modules/maps/tg/dmm_suite.dm             |  63 +++
 code/modules/maps/tg/map_template.dm          | 165 +++++++
 code/modules/maps/tg/reader.dm                | 466 ++++++++++++++++++
 code/world.dm                                 |   3 +
 icons/turf/floors.dmi                         | Bin 50521 -> 50556 bytes
 maps/submaps/_readme.dm                       |  27 +
 maps/submaps/cave_submaps/cave.dm             |   5 +
 maps/submaps/space_submaps/space.dm           |   5 +
 maps/submaps/surface_submaps/forest.dm        |   5 +
 polaris.dme                                   |  13 +-
 32 files changed, 1472 insertions(+), 444 deletions(-)
 create mode 100644 code/controllers/subsystems/creation.dm
 create mode 100644 code/modules/admin/verbs/map_template_loadverb.dm
 create mode 100644 code/modules/maps/tg/dmm_suite.dm
 create mode 100644 code/modules/maps/tg/map_template.dm
 create mode 100644 code/modules/maps/tg/reader.dm
 create mode 100644 maps/submaps/_readme.dm
 create mode 100644 maps/submaps/cave_submaps/cave.dm
 create mode 100644 maps/submaps/space_submaps/space.dm
 create mode 100644 maps/submaps/surface_submaps/forest.dm

diff --git a/code/ATMOSPHERICS/components/binary_devices/binary_atmos_base.dm b/code/ATMOSPHERICS/components/binary_devices/binary_atmos_base.dm
index ea604bc996..4bbbf02b16 100644
--- a/code/ATMOSPHERICS/components/binary_devices/binary_atmos_base.dm
+++ b/code/ATMOSPHERICS/components/binary_devices/binary_atmos_base.dm
@@ -1,4 +1,4 @@
-obj/machinery/atmospherics/binary
+/obj/machinery/atmospherics/binary
 	dir = SOUTH
 	initialize_directions = SOUTH|NORTH
 	use_power = 1
@@ -9,123 +9,131 @@ obj/machinery/atmospherics/binary
 	var/datum/pipe_network/network1
 	var/datum/pipe_network/network2
 
-	New()
-		..()
-		switch(dir)
-			if(NORTH)
-				initialize_directions = NORTH|SOUTH
-			if(SOUTH)
-				initialize_directions = NORTH|SOUTH
-			if(EAST)
-				initialize_directions = EAST|WEST
-			if(WEST)
-				initialize_directions = EAST|WEST
-		air1 = new
-		air2 = new
+/obj/machinery/atmospherics/binary/New()
+	..()
 
-		air1.volume = 200
-		air2.volume = 200
+	air1 = new
+	air2 = new
+
+	air1.volume = 200
+	air2.volume = 200
+
+/obj/machinery/atmospherics/binary/init_dir()
+	switch(dir)
+		if(NORTH)
+			initialize_directions = NORTH|SOUTH
+		if(SOUTH)
+			initialize_directions = NORTH|SOUTH
+		if(EAST)
+			initialize_directions = EAST|WEST
+		if(WEST)
+			initialize_directions = EAST|WEST
 
 // Housekeeping and pipe network stuff below
-	network_expand(datum/pipe_network/new_network, obj/machinery/atmospherics/pipe/reference)
-		if(reference == node1)
-			network1 = new_network
+/obj/machinery/atmospherics/binary/network_expand(datum/pipe_network/new_network, obj/machinery/atmospherics/pipe/reference)
+	if(reference == node1)
+		network1 = new_network
 
-		else if(reference == node2)
-			network2 = new_network
+	else if(reference == node2)
+		network2 = new_network
 
-		if(new_network.normal_members.Find(src))
-			return 0
+	if(new_network.normal_members.Find(src))
+		return 0
 
-		new_network.normal_members += src
+	new_network.normal_members += src
 
-		return null
+	return null
 
-	Destroy()
-		. = ..()
+/obj/machinery/atmospherics/binary/Destroy()
+	. = ..()
 
-		if(node1)
-			node1.disconnect(src)
-			qdel(network1)
-		if(node2)
-			node2.disconnect(src)
-			qdel(network2)
+	if(node1)
+		node1.disconnect(src)
+		qdel(network1)
+	if(node2)
+		node2.disconnect(src)
+		qdel(network2)
 
+	node1 = null
+	node2 = null
+
+/obj/machinery/atmospherics/binary/initialize()
+	if(node1 && node2)
+		return
+
+	init_dir()
+
+	var/node2_connect = dir
+	var/node1_connect = turn(dir, 180)
+
+	for(var/obj/machinery/atmospherics/target in get_step(src,node1_connect))
+		target.init_dir()
+		if(target.initialize_directions & get_dir(target,src))
+			if (check_connect_types(target,src))
+				node1 = target
+				break
+
+	for(var/obj/machinery/atmospherics/target in get_step(src,node2_connect))
+		target.init_dir()
+		if(target.initialize_directions & get_dir(target,src))
+			if (check_connect_types(target,src))
+				node2 = target
+				break
+
+	update_icon()
+	update_underlays()
+
+/obj/machinery/atmospherics/binary/build_network()
+	if(!network1 && node1)
+		network1 = new /datum/pipe_network()
+		network1.normal_members += src
+		network1.build_network(node1, src)
+
+	if(!network2 && node2)
+		network2 = new /datum/pipe_network()
+		network2.normal_members += src
+		network2.build_network(node2, src)
+
+
+/obj/machinery/atmospherics/binary/return_network(obj/machinery/atmospherics/reference)
+	build_network()
+
+	if(reference==node1)
+		return network1
+
+	if(reference==node2)
+		return network2
+
+	return null
+
+/obj/machinery/atmospherics/binary/reassign_network(datum/pipe_network/old_network, datum/pipe_network/new_network)
+	if(network1 == old_network)
+		network1 = new_network
+	if(network2 == old_network)
+		network2 = new_network
+
+	return 1
+
+/obj/machinery/atmospherics/binary/return_network_air(datum/pipe_network/reference)
+	var/list/results = list()
+
+	if(network1 == reference)
+		results += air1
+	if(network2 == reference)
+		results += air2
+
+	return results
+
+/obj/machinery/atmospherics/binary/disconnect(obj/machinery/atmospherics/reference)
+	if(reference==node1)
+		qdel(network1)
 		node1 = null
+
+	else if(reference==node2)
+		qdel(network2)
 		node2 = null
 
-	initialize()
-		if(node1 && node2) return
+	update_icon()
+	update_underlays()
 
-		var/node2_connect = dir
-		var/node1_connect = turn(dir, 180)
-
-		for(var/obj/machinery/atmospherics/target in get_step(src,node1_connect))
-			if(target.initialize_directions & get_dir(target,src))
-				if (check_connect_types(target,src))
-					node1 = target
-					break
-
-		for(var/obj/machinery/atmospherics/target in get_step(src,node2_connect))
-			if(target.initialize_directions & get_dir(target,src))
-				if (check_connect_types(target,src))
-					node2 = target
-					break
-
-		update_icon()
-		update_underlays()
-
-	build_network()
-		if(!network1 && node1)
-			network1 = new /datum/pipe_network()
-			network1.normal_members += src
-			network1.build_network(node1, src)
-
-		if(!network2 && node2)
-			network2 = new /datum/pipe_network()
-			network2.normal_members += src
-			network2.build_network(node2, src)
-
-
-	return_network(obj/machinery/atmospherics/reference)
-		build_network()
-
-		if(reference==node1)
-			return network1
-
-		if(reference==node2)
-			return network2
-
-		return null
-
-	reassign_network(datum/pipe_network/old_network, datum/pipe_network/new_network)
-		if(network1 == old_network)
-			network1 = new_network
-		if(network2 == old_network)
-			network2 = new_network
-
-		return 1
-
-	return_network_air(datum/pipe_network/reference)
-		var/list/results = list()
-
-		if(network1 == reference)
-			results += air1
-		if(network2 == reference)
-			results += air2
-
-		return results
-
-	disconnect(obj/machinery/atmospherics/reference)
-		if(reference==node1)
-			qdel(network1)
-			node1 = null
-
-		else if(reference==node2)
-			qdel(network2)
-			node2 = null
-
-		update_icon()
-		update_underlays()
-
-		return null
\ No newline at end of file
+	return null
\ No newline at end of file
diff --git a/code/ATMOSPHERICS/components/omni_devices/omni_base.dm b/code/ATMOSPHERICS/components/omni_devices/omni_base.dm
index 6690c7c257..8b174b2845 100644
--- a/code/ATMOSPHERICS/components/omni_devices/omni_base.dm
+++ b/code/ATMOSPHERICS/components/omni_devices/omni_base.dm
@@ -247,6 +247,7 @@
 		if(P.node || P.mode == 0)
 			continue
 		for(var/obj/machinery/atmospherics/target in get_step(src, P.dir))
+			target.init_dir()
 			if(target.initialize_directions & get_dir(target,src))
 				if (check_connect_types(target,src))
 					P.node = target
diff --git a/code/ATMOSPHERICS/components/portables_connector.dm b/code/ATMOSPHERICS/components/portables_connector.dm
index c39ca8469b..69fc0561c9 100644
--- a/code/ATMOSPHERICS/components/portables_connector.dm
+++ b/code/ATMOSPHERICS/components/portables_connector.dm
@@ -18,9 +18,11 @@
 	use_power = 0
 	level = 1
 
+/obj/machinery/atmospherics/portables_connector/init_dir()
+	initialize_directions = dir
 
 /obj/machinery/atmospherics/portables_connector/New()
-	initialize_directions = dir
+	init_dir()
 	..()
 
 /obj/machinery/atmospherics/portables_connector/update_icon()
@@ -73,11 +75,15 @@
 	node = null
 
 /obj/machinery/atmospherics/portables_connector/initialize()
-	if(node) return
+	if(node)
+		return
+
+	init_dir()
 
 	var/node_connect = dir
 
 	for(var/obj/machinery/atmospherics/target in get_step(src,node_connect))
+		target.init_dir()
 		if(target.initialize_directions & get_dir(target,src))
 			if (check_connect_types(target,src))
 				node = target
diff --git a/code/ATMOSPHERICS/components/trinary_devices/trinary_base.dm b/code/ATMOSPHERICS/components/trinary_devices/trinary_base.dm
index 717540db69..34e6d480a8 100644
--- a/code/ATMOSPHERICS/components/trinary_devices/trinary_base.dm
+++ b/code/ATMOSPHERICS/components/trinary_devices/trinary_base.dm
@@ -1,4 +1,4 @@
-obj/machinery/atmospherics/trinary
+/obj/machinery/atmospherics/trinary
 	dir = SOUTH
 	initialize_directions = SOUTH|NORTH|WEST
 	use_power = 0
@@ -13,153 +13,163 @@ obj/machinery/atmospherics/trinary
 	var/datum/pipe_network/network2
 	var/datum/pipe_network/network3
 
-	New()
-		..()
-		switch(dir)
-			if(NORTH)
-				initialize_directions = EAST|NORTH|SOUTH
-			if(SOUTH)
-				initialize_directions = SOUTH|WEST|NORTH
-			if(EAST)
-				initialize_directions = EAST|WEST|SOUTH
-			if(WEST)
-				initialize_directions = WEST|NORTH|EAST
-		air1 = new
-		air2 = new
-		air3 = new
+/obj/machinery/atmospherics/trinary/New()
+	..()
+	init_dir()
 
-		air1.volume = 200
-		air2.volume = 200
-		air3.volume = 200
+	air1 = new
+	air2 = new
+	air3 = new
+
+	air1.volume = 200
+	air2.volume = 200
+	air3.volume = 200
+
+/obj/machinery/atmospherics/trinary/init_dir()
+	switch(dir)
+		if(NORTH)
+			initialize_directions = EAST|NORTH|SOUTH
+		if(SOUTH)
+			initialize_directions = SOUTH|WEST|NORTH
+		if(EAST)
+			initialize_directions = EAST|WEST|SOUTH
+		if(WEST)
+			initialize_directions = WEST|NORTH|EAST
 
 // Housekeeping and pipe network stuff below
-	network_expand(datum/pipe_network/new_network, obj/machinery/atmospherics/pipe/reference)
-		if(reference == node1)
-			network1 = new_network
+/obj/machinery/atmospherics/trinary/network_expand(datum/pipe_network/new_network, obj/machinery/atmospherics/pipe/reference)
+	if(reference == node1)
+		network1 = new_network
 
-		else if(reference == node2)
-			network2 = new_network
+	else if(reference == node2)
+		network2 = new_network
 
-		else if (reference == node3)
-			network3 = new_network
+	else if (reference == node3)
+		network3 = new_network
 
-		if(new_network.normal_members.Find(src))
-			return 0
+	if(new_network.normal_members.Find(src))
+		return 0
 
-		new_network.normal_members += src
+	new_network.normal_members += src
 
-		return null
+	return null
 
-	Destroy()
-		. = ..()
+/obj/machinery/atmospherics/trinary/Destroy()
+	. = ..()
 
-		if(node1)
-			node1.disconnect(src)
-			qdel(network1)
-		if(node2)
-			node2.disconnect(src)
-			qdel(network2)
-		if(node3)
-			node3.disconnect(src)
-			qdel(network3)
+	if(node1)
+		node1.disconnect(src)
+		qdel(network1)
+	if(node2)
+		node2.disconnect(src)
+		qdel(network2)
+	if(node3)
+		node3.disconnect(src)
+		qdel(network3)
 
+	node1 = null
+	node2 = null
+	node3 = null
+
+/obj/machinery/atmospherics/trinary/initialize()
+	if(node1 && node2 && node3)
+		return
+
+	init_dir()
+
+	var/node1_connect = turn(dir, -180)
+	var/node2_connect = turn(dir, -90)
+	var/node3_connect = dir
+
+	for(var/obj/machinery/atmospherics/target in get_step(src,node1_connect))
+		target.init_dir()
+		if(target.initialize_directions & get_dir(target,src))
+			if (check_connect_types(target,src))
+				node1 = target
+				break
+
+	for(var/obj/machinery/atmospherics/target in get_step(src,node2_connect))
+		target.init_dir()
+		if(target.initialize_directions & get_dir(target,src))
+			if (check_connect_types(target,src))
+				node2 = target
+				break
+	for(var/obj/machinery/atmospherics/target in get_step(src,node3_connect))
+		target.init_dir()
+		if(target.initialize_directions & get_dir(target,src))
+			if (check_connect_types(target,src))
+				node3 = target
+				break
+
+	update_icon()
+	update_underlays()
+
+/obj/machinery/atmospherics/trinary/build_network()
+	if(!network1 && node1)
+		network1 = new /datum/pipe_network()
+		network1.normal_members += src
+		network1.build_network(node1, src)
+
+	if(!network2 && node2)
+		network2 = new /datum/pipe_network()
+		network2.normal_members += src
+		network2.build_network(node2, src)
+
+	if(!network3 && node3)
+		network3 = new /datum/pipe_network()
+		network3.normal_members += src
+		network3.build_network(node3, src)
+
+
+/obj/machinery/atmospherics/trinary/return_network(obj/machinery/atmospherics/reference)
+	build_network()
+
+	if(reference==node1)
+		return network1
+
+	if(reference==node2)
+		return network2
+
+	if(reference==node3)
+		return network3
+
+	return null
+
+/obj/machinery/atmospherics/trinary/reassign_network(datum/pipe_network/old_network, datum/pipe_network/new_network)
+	if(network1 == old_network)
+		network1 = new_network
+	if(network2 == old_network)
+		network2 = new_network
+	if(network3 == old_network)
+		network3 = new_network
+
+	return 1
+
+/obj/machinery/atmospherics/trinary/return_network_air(datum/pipe_network/reference)
+	var/list/results = list()
+
+	if(network1 == reference)
+		results += air1
+	if(network2 == reference)
+		results += air2
+	if(network3 == reference)
+		results += air3
+
+	return results
+
+/obj/machinery/atmospherics/trinary/disconnect(obj/machinery/atmospherics/reference)
+	if(reference==node1)
+		qdel(network1)
 		node1 = null
+
+	else if(reference==node2)
+		qdel(network2)
 		node2 = null
+
+	else if(reference==node3)
+		qdel(network3)
 		node3 = null
 
-	initialize()
-		if(node1 && node2 && node3) return
+	update_underlays()
 
-		var/node1_connect = turn(dir, -180)
-		var/node2_connect = turn(dir, -90)
-		var/node3_connect = dir
-
-		for(var/obj/machinery/atmospherics/target in get_step(src,node1_connect))
-			if(target.initialize_directions & get_dir(target,src))
-				if (check_connect_types(target,src))
-					node1 = target
-					break
-
-		for(var/obj/machinery/atmospherics/target in get_step(src,node2_connect))
-			if(target.initialize_directions & get_dir(target,src))
-				if (check_connect_types(target,src))
-					node2 = target
-					break
-		for(var/obj/machinery/atmospherics/target in get_step(src,node3_connect))
-			if(target.initialize_directions & get_dir(target,src))
-				if (check_connect_types(target,src))
-					node3 = target
-					break
-
-		update_icon()
-		update_underlays()
-
-	build_network()
-		if(!network1 && node1)
-			network1 = new /datum/pipe_network()
-			network1.normal_members += src
-			network1.build_network(node1, src)
-
-		if(!network2 && node2)
-			network2 = new /datum/pipe_network()
-			network2.normal_members += src
-			network2.build_network(node2, src)
-
-		if(!network3 && node3)
-			network3 = new /datum/pipe_network()
-			network3.normal_members += src
-			network3.build_network(node3, src)
-
-
-	return_network(obj/machinery/atmospherics/reference)
-		build_network()
-
-		if(reference==node1)
-			return network1
-
-		if(reference==node2)
-			return network2
-
-		if(reference==node3)
-			return network3
-
-		return null
-
-	reassign_network(datum/pipe_network/old_network, datum/pipe_network/new_network)
-		if(network1 == old_network)
-			network1 = new_network
-		if(network2 == old_network)
-			network2 = new_network
-		if(network3 == old_network)
-			network3 = new_network
-
-		return 1
-
-	return_network_air(datum/pipe_network/reference)
-		var/list/results = list()
-
-		if(network1 == reference)
-			results += air1
-		if(network2 == reference)
-			results += air2
-		if(network3 == reference)
-			results += air3
-
-		return results
-
-	disconnect(obj/machinery/atmospherics/reference)
-		if(reference==node1)
-			qdel(network1)
-			node1 = null
-
-		else if(reference==node2)
-			qdel(network2)
-			node2 = null
-
-		else if(reference==node3)
-			qdel(network3)
-			node3 = null
-
-		update_underlays()
-
-		return null
\ No newline at end of file
+	return null
\ No newline at end of file
diff --git a/code/ATMOSPHERICS/components/tvalve.dm b/code/ATMOSPHERICS/components/tvalve.dm
index 81a870743e..9a0a92c75c 100644
--- a/code/ATMOSPHERICS/components/tvalve.dm
+++ b/code/ATMOSPHERICS/components/tvalve.dm
@@ -47,10 +47,10 @@
 	update_underlays()
 
 /obj/machinery/atmospherics/tvalve/New()
-	initialize_directions()
+	init_dir()
 	..()
 
-/obj/machinery/atmospherics/tvalve/proc/initialize_directions()
+/obj/machinery/atmospherics/tvalve/init_dir()
 	switch(dir)
 		if(NORTH)
 			initialize_directions = SOUTH|NORTH|EAST
@@ -189,21 +189,26 @@
 	var/node2_dir
 	var/node3_dir
 
+	init_dir()
+
 	node1_dir = turn(dir, 180)
 	node2_dir = turn(dir, -90)
 	node3_dir = dir
 
 	for(var/obj/machinery/atmospherics/target in get_step(src,node1_dir))
+		target.init_dir()
 		if(target.initialize_directions & get_dir(target,src))
 			if (check_connect_types(target,src))
 				node1 = target
 				break
 	for(var/obj/machinery/atmospherics/target in get_step(src,node2_dir))
+		target.init_dir()
 		if(target.initialize_directions & get_dir(target,src))
 			if (check_connect_types(target,src))
 				node2 = target
 				break
 	for(var/obj/machinery/atmospherics/target in get_step(src,node3_dir))
+		target.init_dir()
 		if(target.initialize_directions & get_dir(target,src))
 			if (check_connect_types(target,src))
 				node3 = target
@@ -371,7 +376,7 @@
 	icon_state = "map_tvalvem1"
 	state = 1
 
-/obj/machinery/atmospherics/tvalve/mirrored/initialize_directions()
+/obj/machinery/atmospherics/tvalve/mirrored/init_dir()
 	switch(dir)
 		if(NORTH)
 			initialize_directions = SOUTH|NORTH|WEST
diff --git a/code/ATMOSPHERICS/components/unary/unary_base.dm b/code/ATMOSPHERICS/components/unary/unary_base.dm
index 0372483c79..327112d918 100644
--- a/code/ATMOSPHERICS/components/unary/unary_base.dm
+++ b/code/ATMOSPHERICS/components/unary/unary_base.dm
@@ -11,83 +11,90 @@
 
 	var/welded = 0 //defining this here for ventcrawl stuff
 
-	New()
-		..()
-		initialize_directions = dir
-		air_contents = new
+/obj/machinery/atmospherics/unary/New()
+	..()
+	init_dir()
+	air_contents = new
 
-		air_contents.volume = 200
+	air_contents.volume = 200
+
+/obj/machinery/atmospherics/unary/init_dir()
+	initialize_directions = dir
 
 // Housekeeping and pipe network stuff below
-	network_expand(datum/pipe_network/new_network, obj/machinery/atmospherics/pipe/reference)
-		if(reference == node)
-			network = new_network
+/obj/machinery/atmospherics/unary/network_expand(datum/pipe_network/new_network, obj/machinery/atmospherics/pipe/reference)
+	if(reference == node)
+		network = new_network
 
-		if(new_network.normal_members.Find(src))
-			return 0
+	if(new_network.normal_members.Find(src))
+		return 0
 
-		new_network.normal_members += src
+	new_network.normal_members += src
 
-		return null
+	return null
 
-	Destroy()
-		. = ..()
+/obj/machinery/atmospherics/unary/Destroy()
+	. = ..()
 
-		if(node)
-			node.disconnect(src)
-			qdel(network)
+	if(node)
+		node.disconnect(src)
+		qdel(network)
 
+	node = null
+
+/obj/machinery/atmospherics/unary/initialize()
+	if(node)
+		return
+
+	init_dir()
+
+	var/node_connect = dir
+
+	for(var/obj/machinery/atmospherics/target in get_step(src,node_connect))
+		target.init_dir()
+		if(target.initialize_directions & get_dir(target,src))
+			if (check_connect_types(target,src))
+				node = target
+				break
+
+	update_icon()
+	update_underlays()
+
+/obj/machinery/atmospherics/unary/build_network()
+	if(!network && node)
+		network = new /datum/pipe_network()
+		network.normal_members += src
+		network.build_network(node, src)
+
+
+/obj/machinery/atmospherics/unary/return_network(obj/machinery/atmospherics/reference)
+	build_network()
+
+	if(reference==node)
+		return network
+
+	return null
+
+/obj/machinery/atmospherics/unary/reassign_network(datum/pipe_network/old_network, datum/pipe_network/new_network)
+	if(network == old_network)
+		network = new_network
+
+	return 1
+
+/obj/machinery/atmospherics/unary/return_network_air(datum/pipe_network/reference)
+	var/list/results = list()
+
+	if(network == reference)
+		results += air_contents
+
+	return results
+
+/obj/machinery/atmospherics/unary/disconnect(obj/machinery/atmospherics/reference)
+	if(reference==node)
+		qdel(network)
 		node = null
 
-	initialize()
-		if(node) return
+	update_icon()
+	update_underlays()
 
-		var/node_connect = dir
-
-		for(var/obj/machinery/atmospherics/target in get_step(src,node_connect))
-			if(target.initialize_directions & get_dir(target,src))
-				if (check_connect_types(target,src))
-					node = target
-					break
-
-		update_icon()
-		update_underlays()
-
-	build_network()
-		if(!network && node)
-			network = new /datum/pipe_network()
-			network.normal_members += src
-			network.build_network(node, src)
-
-
-	return_network(obj/machinery/atmospherics/reference)
-		build_network()
-
-		if(reference==node)
-			return network
-
-		return null
-
-	reassign_network(datum/pipe_network/old_network, datum/pipe_network/new_network)
-		if(network == old_network)
-			network = new_network
-
-		return 1
-
-	return_network_air(datum/pipe_network/reference)
-		var/list/results = list()
-
-		if(network == reference)
-			results += air_contents
-
-		return results
-
-	disconnect(obj/machinery/atmospherics/reference)
-		if(reference==node)
-			qdel(network)
-			node = null
-
-		update_icon()
-		update_underlays()
-
-		return null
\ No newline at end of file
+	return null
\ No newline at end of file
diff --git a/code/ATMOSPHERICS/components/valve.dm b/code/ATMOSPHERICS/components/valve.dm
index 7fa8d60a77..209c4730a0 100644
--- a/code/ATMOSPHERICS/components/valve.dm
+++ b/code/ATMOSPHERICS/components/valve.dm
@@ -38,13 +38,12 @@
 /obj/machinery/atmospherics/valve/hide(var/i)
 	update_underlays()
 
-/obj/machinery/atmospherics/valve/New()
+/obj/machinery/atmospherics/valve/init_dir()
 	switch(dir)
 		if(NORTH || SOUTH)
 			initialize_directions = NORTH|SOUTH
 		if(EAST || WEST)
 			initialize_directions = EAST|WEST
-	..()
 
 /obj/machinery/atmospherics/valve/network_expand(datum/pipe_network/new_network, obj/machinery/atmospherics/pipe/reference)
 	if(reference == node1)
@@ -142,6 +141,7 @@
 	return
 
 /obj/machinery/atmospherics/valve/initialize()
+	init_dir()
 	normalize_dir()
 
 	var/node1_dir
@@ -155,11 +155,13 @@
 				node2_dir = direction
 
 	for(var/obj/machinery/atmospherics/target in get_step(src,node1_dir))
+		target.init_dir()
 		if(target.initialize_directions & get_dir(target,src))
 			if (check_connect_types(target,src))
 				node1 = target
 				break
 	for(var/obj/machinery/atmospherics/target in get_step(src,node2_dir))
+		target.init_dir()
 		if(target.initialize_directions & get_dir(target,src))
 			if (check_connect_types(target,src))
 				node2 = target
diff --git a/code/ATMOSPHERICS/he_pipes.dm b/code/ATMOSPHERICS/he_pipes.dm
index 52dedfb089..bdad6a62e5 100644
--- a/code/ATMOSPHERICS/he_pipes.dm
+++ b/code/ATMOSPHERICS/he_pipes.dm
@@ -1,5 +1,5 @@
 
-obj/machinery/atmospherics/pipe/simple/heat_exchanging
+/obj/machinery/atmospherics/pipe/simple/heat_exchanging
 	icon = 'icons/atmos/heat.dmi'
 	icon_state = "intact"
 	pipe_icon = "hepipe"
@@ -17,93 +17,99 @@ obj/machinery/atmospherics/pipe/simple/heat_exchanging
 	buckle_lying = 1
 
 	// BubbleWrap
-	New()
-		..()
-		initialize_directions_he = initialize_directions	// The auto-detection from /pipe is good enough for a simple HE pipe
-	// BubbleWrap END
-		color = "#404040" //we don't make use of the fancy overlay system for colours, use this to set the default.
+/obj/machinery/atmospherics/pipe/simple/heat_exchanging/New()
+	..()
+	init_dir()
+// BubbleWrap END
+	color = "#404040" //we don't make use of the fancy overlay system for colours, use this to set the default.
 
-	initialize()
-		normalize_dir()
-		var/node1_dir
-		var/node2_dir
+/obj/machinery/atmospherics/pipe/simple/heat_exchanging/init_dir()
+	initialize_directions_he = initialize_directions	// The auto-detection from /pipe is good enough for a simple HE pipe
 
-		for(var/direction in cardinal)
-			if(direction&initialize_directions_he)
-				if (!node1_dir)
-					node1_dir = direction
-				else if (!node2_dir)
-					node2_dir = direction
+/obj/machinery/atmospherics/pipe/simple/heat_exchanging/initialize()
+	init_dir()
+	normalize_dir()
+	var/node1_dir
+	var/node2_dir
 
-		for(var/obj/machinery/atmospherics/pipe/simple/heat_exchanging/target in get_step(src,node1_dir))
-			if(target.initialize_directions_he & get_dir(target,src))
-				node1 = target
-				break
-		for(var/obj/machinery/atmospherics/pipe/simple/heat_exchanging/target in get_step(src,node2_dir))
-			if(target.initialize_directions_he & get_dir(target,src))
-				node2 = target
-				break
-		if(!node1 && !node2)
-			qdel(src)
-			return
+	for(var/direction in cardinal)
+		if(direction&initialize_directions_he)
+			if (!node1_dir)
+				node1_dir = direction
+			else if (!node2_dir)
+				node2_dir = direction
 
-		update_icon()
+	for(var/obj/machinery/atmospherics/pipe/simple/heat_exchanging/target in get_step(src,node1_dir))
+		target.init_dir()
+		if(target.initialize_directions_he & get_dir(target,src))
+			node1 = target
+			break
+	for(var/obj/machinery/atmospherics/pipe/simple/heat_exchanging/target in get_step(src,node2_dir))
+		target.init_dir()
+		if(target.initialize_directions_he & get_dir(target,src))
+			node2 = target
+			break
+	if(!node1 && !node2)
+		qdel(src)
 		return
 
+	update_icon()
+	return
 
-	process()
-		if(!parent)
-			..()
-		else
-			var/datum/gas_mixture/pipe_air = return_air()
-			if(istype(loc, /turf/simulated/))
-				var/environment_temperature = 0
-				if(loc:blocks_air)
-					environment_temperature = loc:temperature
-				else
-					var/datum/gas_mixture/environment = loc.return_air()
-					environment_temperature = environment.temperature
-				if(abs(environment_temperature-pipe_air.temperature) > minimum_temperature_difference)
-					parent.temperature_interact(loc, volume, thermal_conductivity)
-			else if(istype(loc, /turf/space/))
-				parent.radiate_heat_to_space(surface, 1)
 
-			if(buckled_mob)
-				var/hc = pipe_air.heat_capacity()
-				var/avg_temp = (pipe_air.temperature * hc + buckled_mob.bodytemperature * 3500) / (hc + 3500)
-				pipe_air.temperature = avg_temp
-				buckled_mob.bodytemperature = avg_temp
+/obj/machinery/atmospherics/pipe/simple/heat_exchanging/process()
+	if(!parent)
+		..()
+	else
+		var/datum/gas_mixture/pipe_air = return_air()
+		if(istype(loc, /turf/simulated/))
+			var/environment_temperature = 0
+			if(loc:blocks_air)
+				environment_temperature = loc:temperature
+			else
+				var/datum/gas_mixture/environment = loc.return_air()
+				environment_temperature = environment.temperature
+			if(abs(environment_temperature-pipe_air.temperature) > minimum_temperature_difference)
+				parent.temperature_interact(loc, volume, thermal_conductivity)
+		else if(istype(loc, /turf/space/))
+			parent.radiate_heat_to_space(surface, 1)
 
-				var/heat_limit = 1000
+		if(buckled_mob)
+			var/hc = pipe_air.heat_capacity()
+			var/avg_temp = (pipe_air.temperature * hc + buckled_mob.bodytemperature * 3500) / (hc + 3500)
+			pipe_air.temperature = avg_temp
+			buckled_mob.bodytemperature = avg_temp
 
-				var/mob/living/carbon/human/H = buckled_mob
-				if(istype(H) && H.species)
-					heat_limit = H.species.heat_level_3
+			var/heat_limit = 1000
 
-				if(pipe_air.temperature > heat_limit + 1)
-					buckled_mob.apply_damage(4 * log(pipe_air.temperature - heat_limit), BURN, BP_TORSO, used_weapon = "Excessive Heat")
+			var/mob/living/carbon/human/H = buckled_mob
+			if(istype(H) && H.species)
+				heat_limit = H.species.heat_level_3
 
-			//fancy radiation glowing
-			if(pipe_air.temperature && (icon_temperature > 500 || pipe_air.temperature > 500)) //start glowing at 500K
-				if(abs(pipe_air.temperature - icon_temperature) > 10)
-					icon_temperature = pipe_air.temperature
+			if(pipe_air.temperature > heat_limit + 1)
+				buckled_mob.apply_damage(4 * log(pipe_air.temperature - heat_limit), BURN, BP_TORSO, used_weapon = "Excessive Heat")
 
-					var/h_r = heat2color_r(icon_temperature)
-					var/h_g = heat2color_g(icon_temperature)
-					var/h_b = heat2color_b(icon_temperature)
+		//fancy radiation glowing
+		if(pipe_air.temperature && (icon_temperature > 500 || pipe_air.temperature > 500)) //start glowing at 500K
+			if(abs(pipe_air.temperature - icon_temperature) > 10)
+				icon_temperature = pipe_air.temperature
 
-					if(icon_temperature < 2000) //scale up overlay until 2000K
-						var/scale = (icon_temperature - 500) / 1500
-						h_r = 64 + (h_r - 64)*scale
-						h_g = 64 + (h_g - 64)*scale
-						h_b = 64 + (h_b - 64)*scale
+				var/h_r = heat2color_r(icon_temperature)
+				var/h_g = heat2color_g(icon_temperature)
+				var/h_b = heat2color_b(icon_temperature)
 
-					animate(src, color = rgb(h_r, h_g, h_b), time = 20, easing = SINE_EASING)
+				if(icon_temperature < 2000) //scale up overlay until 2000K
+					var/scale = (icon_temperature - 500) / 1500
+					h_r = 64 + (h_r - 64)*scale
+					h_g = 64 + (h_g - 64)*scale
+					h_b = 64 + (h_b - 64)*scale
+
+				animate(src, color = rgb(h_r, h_g, h_b), time = 20, easing = SINE_EASING)
 
 
 
 
-obj/machinery/atmospherics/pipe/simple/heat_exchanging/junction
+/obj/machinery/atmospherics/pipe/simple/heat_exchanging/junction
 	icon = 'icons/atmos/junction.dmi'
 	icon_state = "intact"
 	pipe_icon = "hejunction"
@@ -112,37 +118,38 @@ obj/machinery/atmospherics/pipe/simple/heat_exchanging/junction
 	minimum_temperature_difference = 300
 	thermal_conductivity = WALL_HEAT_TRANSFER_COEFFICIENT
 
-	// BubbleWrap
-	New()
-		.. ()
-		switch ( dir )
-			if ( SOUTH )
-				initialize_directions = NORTH
-				initialize_directions_he = SOUTH
-			if ( NORTH )
-				initialize_directions = SOUTH
-				initialize_directions_he = NORTH
-			if ( EAST )
-				initialize_directions = WEST
-				initialize_directions_he = EAST
-			if ( WEST )
-				initialize_directions = EAST
-				initialize_directions_he = WEST
-	// BubbleWrap END
+/obj/machinery/atmospherics/pipe/simple/heat_exchanging/init_dir()
+	switch ( dir )
+		if ( SOUTH )
+			initialize_directions = NORTH
+			initialize_directions_he = SOUTH
+		if ( NORTH )
+			initialize_directions = SOUTH
+			initialize_directions_he = NORTH
+		if ( EAST )
+			initialize_directions = WEST
+			initialize_directions_he = EAST
+		if ( WEST )
+			initialize_directions = EAST
+			initialize_directions_he = WEST
 
-	initialize()
-		for(var/obj/machinery/atmospherics/target in get_step(src,initialize_directions))
-			if(target.initialize_directions & get_dir(target,src))
-				node1 = target
-				break
-		for(var/obj/machinery/atmospherics/pipe/simple/heat_exchanging/target in get_step(src,initialize_directions_he))
-			if(target.initialize_directions_he & get_dir(target,src))
-				node2 = target
-				break
 
-		if(!node1&&!node2)
-			qdel(src)
-			return
+/obj/machinery/atmospherics/pipe/simple/heat_exchanging/initialize()
+	init_dir()
+	for(var/obj/machinery/atmospherics/target in get_step(src,initialize_directions))
+		target.init_dir()
+		if(target.initialize_directions & get_dir(target,src))
+			node1 = target
+			break
+	for(var/obj/machinery/atmospherics/pipe/simple/heat_exchanging/target in get_step(src,initialize_directions_he))
+		target.init_dir()
+		if(target.initialize_directions_he & get_dir(target,src))
+			node2 = target
+			break
 
-		update_icon()
+	if(!node1&&!node2)
+		qdel(src)
 		return
+
+	update_icon()
+	return
diff --git a/code/ATMOSPHERICS/pipes.dm b/code/ATMOSPHERICS/pipes.dm
index 9566be9947..c363d85575 100644
--- a/code/ATMOSPHERICS/pipes.dm
+++ b/code/ATMOSPHERICS/pipes.dm
@@ -34,6 +34,10 @@
 
 	return 1
 
+// This is used to set up what directions pipes will connect to.  Called inside New(), initialize(), and when pipes look at another pipe, incase they didn't get to initialize() yet.
+/obj/machinery/atmospherics/proc/init_dir()
+	return
+
 /obj/machinery/atmospherics/pipe/return_air()
 	if(!parent)
 		parent = new /datum/pipeline()
@@ -170,19 +174,9 @@
 	icon = null
 	alpha = 255
 
-	switch(dir)
-		if(SOUTH || NORTH)
-			initialize_directions = SOUTH|NORTH
-		if(EAST || WEST)
-			initialize_directions = EAST|WEST
-		if(NORTHEAST)
-			initialize_directions = NORTH|EAST
-		if(NORTHWEST)
-			initialize_directions = NORTH|WEST
-		if(SOUTHEAST)
-			initialize_directions = SOUTH|EAST
-		if(SOUTHWEST)
-			initialize_directions = SOUTH|WEST
+	init_dir()
+
+
 
 /obj/machinery/atmospherics/pipe/simple/hide(var/i)
 	if(istype(loc, /turf/simulated))
@@ -210,6 +204,21 @@
 
 	else return 1
 
+/obj/machinery/atmospherics/pipe/simple/init_dir()
+	switch(dir)
+		if(SOUTH || NORTH)
+			initialize_directions = SOUTH|NORTH
+		if(EAST || WEST)
+			initialize_directions = EAST|WEST
+		if(NORTHEAST)
+			initialize_directions = NORTH|EAST
+		if(NORTHWEST)
+			initialize_directions = NORTH|WEST
+		if(SOUTHEAST)
+			initialize_directions = SOUTH|EAST
+		if(SOUTHWEST)
+			initialize_directions = SOUTH|WEST
+
 /obj/machinery/atmospherics/pipe/simple/proc/burst()
 	src.visible_message("<span class='danger'>\The [src] bursts!</span>");
 	playsound(src.loc, 'sound/effects/bang.ogg', 25, 1)
@@ -270,6 +279,7 @@
 	return
 
 /obj/machinery/atmospherics/pipe/simple/initialize()
+	init_dir()
 	normalize_dir()
 	var/node1_dir
 	var/node2_dir
@@ -282,11 +292,13 @@
 				node2_dir = direction
 
 	for(var/obj/machinery/atmospherics/target in get_step(src,node1_dir))
+		target.init_dir()
 		if(target.initialize_directions & get_dir(target,src))
 			if (check_connect_types(target,src))
 				node1 = target
 				break
 	for(var/obj/machinery/atmospherics/target in get_step(src,node2_dir))
+		target.init_dir()
 		if(target.initialize_directions & get_dir(target,src))
 			if (check_connect_types(target,src))
 				node2 = target
@@ -436,6 +448,9 @@
 	alpha = 255
 	icon = null
 
+	init_dir()
+
+/obj/machinery/atmospherics/pipe/manifold/init_dir()
 	switch(dir)
 		if(NORTH)
 			initialize_directions = EAST|SOUTH|WEST
@@ -544,11 +559,13 @@
 	update_icon()
 
 /obj/machinery/atmospherics/pipe/manifold/initialize()
+	init_dir()
 	var/connect_directions = (NORTH|SOUTH|EAST|WEST)&(~dir)
 
 	for(var/direction in cardinal)
 		if(direction&connect_directions)
 			for(var/obj/machinery/atmospherics/target in get_step(src,direction))
+				target.init_dir()
 				if(target.initialize_directions & get_dir(target,src))
 					if (check_connect_types(target,src))
 						node1 = target
@@ -561,6 +578,7 @@
 	for(var/direction in cardinal)
 		if(direction&connect_directions)
 			for(var/obj/machinery/atmospherics/target in get_step(src,direction))
+				target.init_dir()
 				if(target.initialize_directions & get_dir(target,src))
 					if (check_connect_types(target,src))
 						node2 = target
@@ -573,6 +591,7 @@
 	for(var/direction in cardinal)
 		if(direction&connect_directions)
 			for(var/obj/machinery/atmospherics/target in get_step(src,direction))
+				target.init_dir()
 				if(target.initialize_directions & get_dir(target,src))
 					if (check_connect_types(target,src))
 						node3 = target
@@ -823,24 +842,28 @@
 /obj/machinery/atmospherics/pipe/manifold4w/initialize()
 
 	for(var/obj/machinery/atmospherics/target in get_step(src,1))
+		target.init_dir()
 		if(target.initialize_directions & 2)
 			if (check_connect_types(target,src))
 				node1 = target
 				break
 
 	for(var/obj/machinery/atmospherics/target in get_step(src,2))
+		target.init_dir()
 		if(target.initialize_directions & 1)
 			if (check_connect_types(target,src))
 				node2 = target
 				break
 
 	for(var/obj/machinery/atmospherics/target in get_step(src,4))
+		target.init_dir()
 		if(target.initialize_directions & 8)
 			if (check_connect_types(target,src))
 				node3 = target
 				break
 
 	for(var/obj/machinery/atmospherics/target in get_step(src,8))
+		target.init_dir()
 		if(target.initialize_directions & 4)
 			if (check_connect_types(target,src))
 				node4 = target
@@ -958,6 +981,9 @@
 
 /obj/machinery/atmospherics/pipe/cap/New()
 	..()
+	init_dir()
+
+/obj/machinery/atmospherics/pipe/cap/init_dir()
 	initialize_directions = dir
 
 /obj/machinery/atmospherics/pipe/cap/hide(var/i)
@@ -1006,7 +1032,9 @@
 	overlays += icon_manager.get_atmos_icon("pipe", , pipe_color, "cap")
 
 /obj/machinery/atmospherics/pipe/cap/initialize()
+	init_dir()
 	for(var/obj/machinery/atmospherics/target in get_step(src, dir))
+		target.init_dir()
 		if(target.initialize_directions & get_dir(target,src))
 			if (check_connect_types(target,src))
 				node = target
@@ -1079,9 +1107,12 @@
 
 /obj/machinery/atmospherics/pipe/tank/New()
 	icon_state = "air"
-	initialize_directions = dir
+	init_dir()
 	..()
 
+/obj/machinery/atmospherics/pipe/tank/init_dir()
+	initialize_directions = dir
+
 /obj/machinery/atmospherics/pipe/tank/process()
 	if(!parent)
 		..()
@@ -1110,9 +1141,11 @@
 	update_underlays()
 
 /obj/machinery/atmospherics/pipe/tank/initialize()
+	init_dir()
 	var/connect_direction = dir
 
 	for(var/obj/machinery/atmospherics/target in get_step(src,connect_direction))
+		target.init_dir()
 		if(target.initialize_directions & get_dir(target,src))
 			if (check_connect_types(target,src))
 				node1 = target
@@ -1241,9 +1274,12 @@
 	var/build_killswitch = 1
 
 /obj/machinery/atmospherics/pipe/vent/New()
-	initialize_directions = dir
+	init_dir()
 	..()
 
+/obj/machinery/atmospherics/pipe/vent/init_dir()
+	initialize_directions = dir
+
 /obj/machinery/atmospherics/pipe/vent/high_volume
 	name = "Larger vent"
 	volume = 1000
@@ -1279,9 +1315,11 @@
 		icon_state = "exposed"
 
 /obj/machinery/atmospherics/pipe/vent/initialize()
+	init_dir()
 	var/connect_direction = dir
 
 	for(var/obj/machinery/atmospherics/target in get_step(src,connect_direction))
+		target.init_dir()
 		if(target.initialize_directions & get_dir(target,src))
 			if (check_connect_types(target,src))
 				node1 = target
diff --git a/code/__defines/misc.dm b/code/__defines/misc.dm
index 5b0de767eb..3bb7333a02 100644
--- a/code/__defines/misc.dm
+++ b/code/__defines/misc.dm
@@ -214,3 +214,11 @@
 
 #define WORLD_ICON_SIZE 32 //Needed for the R-UST port
 #define PIXEL_MULTIPLIER WORLD_ICON_SIZE/32 //Needed for the R-UST port
+
+// Maploader bounds indices
+#define MAP_MINX 1
+#define MAP_MINY 2
+#define MAP_MINZ 3
+#define MAP_MAXX 4
+#define MAP_MAXY 5
+#define MAP_MAXZ 6
\ No newline at end of file
diff --git a/code/_helpers/lists.dm b/code/_helpers/lists.dm
index e647cd1df7..8b9040820f 100644
--- a/code/_helpers/lists.dm
+++ b/code/_helpers/lists.dm
@@ -662,3 +662,13 @@ proc/dd_sortedTextList(list/incoming)
 			L.Swap(start++,end--)
 
 	return L
+
+//Copies a list, and all lists inside it recusively
+//Does not copy any other reference type
+/proc/deepCopyList(list/l)
+	if(!islist(l))
+		return l
+	. = l.Copy()
+	for(var/i = 1 to l.len)
+		if(islist(.[i]))
+			.[i] = .(.[i])
diff --git a/code/_helpers/text.dm b/code/_helpers/text.dm
index bd175e4fcc..d4fa4a74bb 100644
--- a/code/_helpers/text.dm
+++ b/code/_helpers/text.dm
@@ -331,4 +331,61 @@ proc/TextPreview(var/string,var/len=40)
 /proc/strip_improper(var/text)
 	return replacetext(replacetext(text, "\proper", ""), "\improper", "")
 
+//Used for applying byonds text macros to strings that are loaded at runtime
+/proc/apply_text_macros(string)
+	var/next_backslash = findtext(string, "\\")
+	if(!next_backslash)
+		return string
+
+	var/leng = length(string)
+
+	var/next_space = findtext(string, " ", next_backslash + 1)
+	if(!next_space)
+		next_space = leng - next_backslash
+
+	if(!next_space)	//trailing bs
+		return string
+
+	var/base = next_backslash == 1 ? "" : copytext(string, 1, next_backslash)
+	var/macro = lowertext(copytext(string, next_backslash + 1, next_space))
+	var/rest = next_backslash > leng ? "" : copytext(string, next_space + 1)
+
+	//See http://www.byond.com/docs/ref/info.html#/DM/text/macros
+	switch(macro)
+		//prefixes/agnostic
+		if("the")
+			rest = text("\the []", rest)
+		if("a")
+			rest = text("\a []", rest)
+		if("an")
+			rest = text("\an []", rest)
+		if("proper")
+			rest = text("\proper []", rest)
+		if("improper")
+			rest = text("\improper []", rest)
+		if("roman")
+			rest = text("\roman []", rest)
+		//postfixes
+		if("th")
+			base = text("[]\th", rest)
+		if("s")
+			base = text("[]\s", rest)
+		if("he")
+			base = text("[]\he", rest)
+		if("she")
+			base = text("[]\she", rest)
+		if("his")
+			base = text("[]\his", rest)
+		if("himself")
+			base = text("[]\himself", rest)
+		if("herself")
+			base = text("[]\herself", rest)
+		if("hers")
+			base = text("[]\hers", rest)
+
+	. = base
+	if(rest)
+		. += .(rest)
+
+
 #define gender2text(gender) capitalize(gender)
\ No newline at end of file
diff --git a/code/controllers/master.dm b/code/controllers/master.dm
index 7c2bc86a65..5056e82e7b 100644
--- a/code/controllers/master.dm
+++ b/code/controllers/master.dm
@@ -47,7 +47,7 @@ var/datum/controller/master/Master = new()
 	var/static/restart_clear = 0
 	var/static/restart_timeout = 0
 	var/static/restart_count = 0
-	
+
 	//current tick limit, assigned before running a subsystem.
 	//used by CHECK_TICK as well so that the procs subsystems call can obey that SS's tick limits
 	var/static/current_ticklimit = TICK_LIMIT_RUNNING
@@ -541,15 +541,25 @@ var/datum/controller/master/Master = new()
 	stat("Master Controller:", statclick.update("(TickRate:[Master.processing]) (Iteration:[Master.iteration])"))
 
 /datum/controller/master/StartLoadingMap()
+	if(map_loading)
+		admin_notice("<span class='danger'>Another map is attempting to be loaded before first map released lock.  Delaying.</span>", R_DEBUG)
+	else
+		admin_notice("<span class='danger'>Map is now being built.  Locking.</span>", R_DEBUG)
+
 	//disallow more than one map to load at once, multithreading it will just cause race conditions
 	while(map_loading)
 		stoplag()
 	for(var/S in subsystems)
 		var/datum/controller/subsystem/SS = S
 		SS.StartLoadingMap()
+
+	// ZAS might displace objects as the map loads if an air tick is processed mid-load.
+	air_processing_killed = TRUE
 	map_loading = TRUE
 
 /datum/controller/master/StopLoadingMap(bounds = null)
+	admin_notice("<span class='danger'>Map is finished.  Unlocking.</span>", R_DEBUG)
+	air_processing_killed = FALSE
 	map_loading = FALSE
 	for(var/S in subsystems)
 		var/datum/controller/subsystem/SS = S
diff --git a/code/controllers/subsystems/creation.dm b/code/controllers/subsystems/creation.dm
new file mode 100644
index 0000000000..e92a0447c8
--- /dev/null
+++ b/code/controllers/subsystems/creation.dm
@@ -0,0 +1,29 @@
+//
+// Creation subsystem, which is responsible for initializing newly created objects.
+//
+SUBSYSTEM_DEF(creation)
+	name = "Creation"
+	priority = 14
+	wait = 5
+//	flags = SS_POST_FIRE_TIMING|SS_BACKGROUND|SS_NO_INIT
+	flags = SS_NO_FIRE|SS_NO_INIT
+	runlevels = RUNLEVELS_DEFAULT | RUNLEVEL_LOBBY
+
+	var/list/atoms_needing_initialize = list()
+
+	var/map_loading = FALSE
+
+/datum/controller/subsystem/creation/StartLoadingMap()
+	map_loading = TRUE
+
+/datum/controller/subsystem/creation/StopLoadingMap()
+	map_loading = FALSE
+
+/datum/controller/subsystem/creation/proc/initialize_late_atoms()
+	admin_notice("<span class='danger'>Initializing atoms in submap.</span>", R_DEBUG)
+	var/total_atoms = atoms_needing_initialize.len
+	for(var/atom/movable/A in atoms_needing_initialize)
+		if(!QDELETED(A))
+			A.initialize()
+		atoms_needing_initialize -= A
+	admin_notice("<span class='danger'>Initalized [total_atoms] atoms in submap.</span>", R_DEBUG)
\ No newline at end of file
diff --git a/code/game/atoms_movable.dm b/code/game/atoms_movable.dm
index 64ae0722f8..81501979fd 100644
--- a/code/game/atoms_movable.dm
+++ b/code/game/atoms_movable.dm
@@ -21,7 +21,10 @@
 /atom/movable/New()
 	..()
 	if(auto_init && ticker && ticker.current_state == GAME_STATE_PLAYING)
-		initialize()
+		if(SScreation && SScreation.map_loading) // If a map is being loaded, newly created objects need to wait for it to finish.
+			SScreation.atoms_needing_initialize += src
+		else
+			initialize()
 
 /atom/movable/Destroy()
 	. = ..()
diff --git a/code/game/machinery/alarm.dm b/code/game/machinery/alarm.dm
index 5e8620fd10..7b330d10f9 100644
--- a/code/game/machinery/alarm.dm
+++ b/code/game/machinery/alarm.dm
@@ -267,7 +267,7 @@
 	return 0
 
 /obj/machinery/alarm/proc/master_is_operating()
-	return alarm_area.master_air_alarm && !(alarm_area.master_air_alarm.stat & (NOPOWER | BROKEN))
+	return alarm_area && alarm_area.master_air_alarm && !(alarm_area.master_air_alarm.stat & (NOPOWER | BROKEN))
 
 /obj/machinery/alarm/proc/elect_master()
 	for(var/obj/machinery/alarm/AA in alarm_area)
diff --git a/code/game/machinery/status_display.dm b/code/game/machinery/status_display.dm
index 98582f3ccc..527b5f1283 100644
--- a/code/game/machinery/status_display.dm
+++ b/code/game/machinery/status_display.dm
@@ -90,6 +90,10 @@
 		if(STATUS_DISPLAY_BLANK)	//blank
 			return 1
 		if(STATUS_DISPLAY_TRANSFER_SHUTTLE_TIME)				//emergency shuttle timer
+			if(!emergency_shuttle)
+				message1 = "-ETA-"
+				message2 = "Never" // You're here forever.
+				return 1
 			if(emergency_shuttle.waiting_to_leave())
 				message1 = "-ETD-"
 				if(emergency_shuttle.shuttle.is_launching())
@@ -172,12 +176,16 @@
 		maptext = new_text
 
 /obj/machinery/status_display/proc/get_shuttle_timer_arrival()
+	if(!emergency_shuttle)
+		return "Error"
 	var/timeleft = emergency_shuttle.estimate_arrival_time()
 	if(timeleft < 0)
 		return ""
 	return "[add_zero(num2text((timeleft / 60) % 60),2)]:[add_zero(num2text(timeleft % 60), 2)]"
 
 /obj/machinery/status_display/proc/get_shuttle_timer_departure()
+	if(!emergency_shuttle)
+		return "Error"
 	var/timeleft = emergency_shuttle.estimate_launch_time()
 	if(timeleft < 0)
 		return ""
diff --git a/code/game/objects/effects/landmarks.dm b/code/game/objects/effects/landmarks.dm
index 788e65827b..e031b09f5e 100644
--- a/code/game/objects/effects/landmarks.dm
+++ b/code/game/objects/effects/landmarks.dm
@@ -87,9 +87,11 @@
 	if(delete_me)
 		qdel(src)
 
-/obj/effect/landmark/Destroy()
-	landmarks_list -= src
-	return ..()
+/obj/effect/landmark/Destroy(var/force = FALSE)
+	if(delete_me || force)
+		landmarks_list -= src
+		return ..()
+	return QDEL_HINT_LETMELIVE
 
 /obj/effect/landmark/start
 	name = "start"
diff --git a/code/modules/admin/admin_verbs.dm b/code/modules/admin/admin_verbs.dm
index ab3fa05d21..f527de5de6 100644
--- a/code/modules/admin/admin_verbs.dm
+++ b/code/modules/admin/admin_verbs.dm
@@ -136,7 +136,10 @@ var/list/admin_verbs_spawn = list(
 	/datum/admins/proc/spawn_atom,		//allows us to spawn instances,
 	/client/proc/respawn_character,
 	/client/proc/virus2_editor,
-	/client/proc/spawn_chemdisp_cartridge
+	/client/proc/spawn_chemdisp_cartridge,
+	/client/proc/map_template_load,
+	/client/proc/map_template_upload,
+	/client/proc/map_template_load_on_new_z
 	)
 var/list/admin_verbs_server = list(
 	/datum/admins/proc/capture_map,
diff --git a/code/modules/admin/verbs/map_template_loadverb.dm b/code/modules/admin/verbs/map_template_loadverb.dm
new file mode 100644
index 0000000000..25fda4bfb3
--- /dev/null
+++ b/code/modules/admin/verbs/map_template_loadverb.dm
@@ -0,0 +1,69 @@
+/client/proc/map_template_load()
+	set category = "Debug"
+	set name = "Map template - Place At Loc"
+
+	var/datum/map_template/template
+
+
+	var/map = input(usr, "Choose a Map Template to place at your CURRENT LOCATION","Place Map Template") as null|anything in map_templates
+	if(!map)
+		return
+	template = map_templates[map]
+
+	var/turf/T = get_turf(mob)
+	if(!T)
+		return
+
+	var/list/preview = list()
+	template.preload_size(template.mappath)
+	for(var/S in template.get_affected_turfs(T,centered = TRUE))
+		preview += image('icons/misc/debug_group.dmi',S ,"red")
+	usr.client.images += preview
+	if(alert(usr,"Confirm location.", "Template Confirm","No","Yes") == "Yes")
+		if(template.annihilate && alert(usr,"This template is set to annihilate everything in the red square.  \
+		\nEVERYTHING IN THE RED SQUARE WILL BE DELETED, ARE YOU ABSOLUTELY SURE?", "Template Confirm","No","Yes") == "No")
+			usr.client.images -= preview
+			return
+
+		if(template.load(T, centered = TRUE))
+			message_admins("<span class='adminnotice'>[key_name_admin(usr)] has placed a map template ([template.name]).</span>")
+		else
+			to_chat(usr, "Failed to place map")
+	usr.client.images -= preview
+
+/client/proc/map_template_load_on_new_z()
+	set category = "Debug"
+	set name = "Map template - New Z"
+
+	var/datum/map_template/template
+
+	var/map = input(usr, "Choose a Map Template to place on a new Z-level.","Place Map Template") as null|anything in map_templates
+	if(!map)
+		return
+	template = map_templates[map]
+
+	if(alert(usr,"Confirm map load.", "Template Confirm","No","Yes") == "Yes")
+		if(template.load_new_z())
+			message_admins("<span class='adminnotice'>[key_name_admin(usr)] has placed a map template ([template.name]) on Z level [world.maxz].</span>")
+		else
+			to_chat(usr, "Failed to place map")
+
+
+/client/proc/map_template_upload()
+	set category = "Debug"
+	set name = "Map Template - Upload"
+
+	var/map = input(usr, "Choose a Map Template to upload to template storage","Upload Map Template") as null|file
+	if(!map)
+		return
+	if(copytext("[map]",-4) != ".dmm")
+		to_chat(usr, "Bad map file: [map]")
+		return
+
+	var/datum/map_template/M = new(map, "[map]")
+	if(M.preload_size(map))
+		to_chat(usr, "Map template '[map]' ready to place ([M.width]x[M.height])")
+		map_templates[M.name] = M
+		message_admins("<span class='adminnotice'>[key_name_admin(usr)] has uploaded a map template ([map])</span>")
+	else
+		to_chat(usr, "Map template '[map]' failed to load properly")
diff --git a/code/modules/awaymissions/zlevel.dm b/code/modules/awaymissions/zlevel.dm
index 43f11c7521..740e408062 100644
--- a/code/modules/awaymissions/zlevel.dm
+++ b/code/modules/awaymissions/zlevel.dm
@@ -40,7 +40,8 @@ proc/createRandomZlevel()
 		var/map = pick(potentialRandomZlevels)
 		var/file = file(map)
 		if(isfile(file))
-			maploader.load_map(file)
+			var/datum/map_template/template = new(file, "away mission")
+			template.load_new_z()
 			world.log << "away mission loaded: [map]"
 
 		for(var/obj/effect/landmark/L in landmarks_list)
diff --git a/code/modules/maps/dmm_suite.dm b/code/modules/maps/dmm_suite.dm
index c263072f99..a9f9825211 100644
--- a/code/modules/maps/dmm_suite.dm
+++ b/code/modules/maps/dmm_suite.dm
@@ -1,4 +1,4 @@
-var/global/dmm_suite/maploader = new
+var/global/dmm_suite/maploader = null
 
 dmm_suite{
 	/*
diff --git a/code/modules/maps/tg/dmm_suite.dm b/code/modules/maps/tg/dmm_suite.dm
new file mode 100644
index 0000000000..c4ceec33ee
--- /dev/null
+++ b/code/modules/maps/tg/dmm_suite.dm
@@ -0,0 +1,63 @@
+dmm_suite{
+	/*
+
+		dmm_suite version 1.0
+			Released January 30th, 2011.
+
+		NOTE: Map saving functionality removed
+
+		defines the object /dmm_suite
+			- Provides the proc load_map()
+				- Loads the specified map file onto the specified z-level.
+			- provides the proc write_map()
+				- Returns a text string of the map in dmm format
+					ready for output to a file.
+			- provides the proc save_map()
+				- Returns a .dmm file if map is saved
+				- Returns FALSE if map fails to save
+
+		The dmm_suite provides saving and loading of map files in BYOND's native DMM map
+		format. It approximates the map saving and loading processes of the Dream Maker
+		and Dream Seeker programs so as to allow editing, saving, and loading of maps at
+		runtime.
+
+		------------------------
+
+		To save a map at runtime, create an instance of /dmm_suite, and then call
+		write_map(), which accepts three arguments:
+			- A turf representing one corner of a three dimensional grid (Required).
+			- Another turf representing the other corner of the same grid (Required).
+			- Any, or a combination, of several bit flags (Optional, see documentation).
+
+		The order in which the turfs are supplied does not matter, the /dmm_writer will
+		determine the grid containing both, in much the same way as DM's block() function.
+		write_map() will then return a string representing the saved map in dmm format;
+		this string can then be saved to a file, or used for any other purose.
+
+		------------------------
+
+		To load a map at runtime, create an instance of /dmm_suite, and then call load_map(),
+		which accepts two arguments:
+			- A .dmm file to load (Required).
+			- A number representing the z-level on which to start loading the map (Optional).
+
+		The /dmm_suite will load the map file starting on the specified z-level. If no
+		z-level	was specified, world.maxz will be increased so as to fit the map. Note
+		that if you wish to load a map onto a z-level that already has objects on it,
+		you will have to handle the removal of those objects. Otherwise the new map will
+		simply load the new objects on top of the old ones.
+
+		Also note that all type paths specified in the .dmm file must exist in the world's
+		code, and that the /dmm_reader trusts that files to be loaded are in fact valid
+		.dmm files. Errors in the .dmm format will cause runtime errors.
+
+		*/
+
+	verb/load_map(var/dmm_file as file, var/x_offset as num, var/y_offset as num, var/z_offset as num, var/cropMap as num, var/measureOnly as num, no_changeturf as num){
+		// dmm_file: A .dmm file to load (Required).
+		// z_offset: A number representing the z-level on which to start loading the map (Optional).
+		// cropMap: When true, the map will be cropped to fit the existing world dimensions (Optional).
+		// measureOnly: When true, no changes will be made to the world (Optional).
+		// no_changeturf: When true, turf/AfterChange won't be called on loaded turfs
+		}
+}
\ No newline at end of file
diff --git a/code/modules/maps/tg/map_template.dm b/code/modules/maps/tg/map_template.dm
new file mode 100644
index 0000000000..ae8031638f
--- /dev/null
+++ b/code/modules/maps/tg/map_template.dm
@@ -0,0 +1,165 @@
+var/list/global/map_templates = list()
+
+// Called when the world starts, in world.dm
+/proc/load_map_templates()
+	for(var/T in subtypesof(/datum/map_template))
+		var/datum/map_template/template = T
+		if(!(initial(template.mappath))) // If it's missing the actual path its probably a base type or being used for inheritence.
+			continue
+		template = new T()
+		map_templates[template.name] = template
+	return TRUE
+
+/datum/map_template
+	var/name = "Default Template Name"
+	var/desc = "Some text should go here. Maybe."
+	var/width = 0
+	var/height = 0
+	var/mappath = null
+	var/loaded = 0 // Times loaded this round
+	var/annihilate = FALSE // If true, all (movable) atoms at the location where the map is loaded will be deleted before the map is loaded in.
+	var/static/dmm_suite/maploader = new
+
+/datum/map_template/New(path = null, rename = null)
+	if(path)
+		mappath = path
+	if(mappath)
+		preload_size(mappath)
+	if(rename)
+		name = rename
+
+/datum/map_template/proc/preload_size(path)
+	var/bounds = maploader.load_map(file(path), 1, 1, 1, cropMap=FALSE, measureOnly=TRUE)
+	if(bounds)
+		width = bounds[MAP_MAXX] // Assumes all templates are rectangular, have a single Z level, and begin at 1,1,1
+		height = bounds[MAP_MAXY]
+	return bounds
+
+/datum/map_template/proc/initTemplateBounds(var/list/bounds)
+	var/list/obj/machinery/atmospherics/atmos_machines = list()
+	var/list/atom/atoms = list()
+	var/list/area/areas = list()
+//	var/list/turf/turfs = list()
+
+	for(var/L in block(locate(bounds[MAP_MINX], bounds[MAP_MINY], bounds[MAP_MINZ]),
+	                   locate(bounds[MAP_MAXX], bounds[MAP_MAXY], bounds[MAP_MAXZ])))
+		var/turf/B = L
+		atoms += B
+		for(var/A in B)
+			atoms += A
+//			turfs += B
+			areas |= get_area(B)
+			if(istype(A, /obj/machinery/atmospherics))
+				atmos_machines += A
+
+	var/i = 0
+
+// Apparently when areas get initialize()'d they initialize their turfs as well.
+// If this is ever changed, uncomment the block of code below.
+
+//	admin_notice("<span class='danger'>Initializing newly created simulated turfs in submap.</span>", R_DEBUG)
+//	for(var/turf/simulated/T in turfs)
+//		T.initialize()
+//		i++
+//	admin_notice("<span class='danger'>[i] turf\s initialized.</span>", R_DEBUG)
+//	i = 0
+
+	SScreation.initialize_late_atoms()
+
+	admin_notice("<span class='danger'>Initializing newly created area(s) in submap.</span>", R_DEBUG)
+	for(var/area/A in areas)
+		A.initialize()
+		i++
+	admin_notice("<span class='danger'>[i] area\s initialized.</span>", R_DEBUG)
+	i = 0
+
+	admin_notice("<span class='danger'>Initializing atmos pipenets and machinery in submap.</span>", R_DEBUG)
+	for(var/obj/machinery/atmospherics/machine in atmos_machines)
+		machine.initialize()
+		i++
+
+	for(var/obj/machinery/atmospherics/machine in atmos_machines)
+		machine.build_network()
+
+	for(var/obj/machinery/atmospherics/unary/U in machines)
+		if(istype(U, /obj/machinery/atmospherics/unary/vent_pump))
+			var/obj/machinery/atmospherics/unary/vent_pump/T = U
+			T.broadcast_status()
+		else if(istype(U, /obj/machinery/atmospherics/unary/vent_scrubber))
+			var/obj/machinery/atmospherics/unary/vent_scrubber/T = U
+			T.broadcast_status()
+	admin_notice("<span class='danger'>[i] pipe\s initialized.</span>", R_DEBUG)
+
+	admin_notice("<span class='danger'>Rebuilding powernets due to submap creation.</span>", R_DEBUG)
+	makepowernets()
+
+	admin_notice("<span class='danger'>Submap initializations finished.</span>", R_DEBUG)
+
+/datum/map_template/proc/load_new_z()
+	var/x = round(world.maxx/2)
+	var/y = round(world.maxy/2)
+
+	var/list/bounds = maploader.load_map(file(mappath), x, y)
+	if(!bounds)
+		return FALSE
+
+//	repopulate_sorted_areas()
+
+	//initialize things that are normally initialized after map load
+	initTemplateBounds(bounds)
+	log_game("Z-level [name] loaded at at [x],[y],[world.maxz]")
+	return TRUE
+
+/datum/map_template/proc/load(turf/T, centered = FALSE)
+	var/old_T = T
+	if(centered)
+		T = locate(T.x - round(width/2) , T.y - round(height/2) , T.z)
+	if(!T)
+		return
+	if(T.x+width > world.maxx)
+		return
+	if(T.y+height > world.maxy)
+		return
+
+	if(annihilate)
+		annihilate_bounds(old_T, centered)
+
+	var/list/bounds = maploader.load_map(file(mappath), T.x, T.y, T.z, cropMap=TRUE)
+	if(!bounds)
+		return
+
+//	if(!SSmapping.loading_ruins) //Will be done manually during mapping ss init
+//		repopulate_sorted_areas()
+
+	//initialize things that are normally initialized after map load
+	initTemplateBounds(bounds)
+
+	log_game("[name] loaded at at [T.x],[T.y],[T.z]")
+	loaded++
+	return TRUE
+
+/datum/map_template/proc/get_affected_turfs(turf/T, centered = FALSE)
+	var/turf/placement = T
+	if(centered)
+		var/turf/corner = locate(placement.x - round(width/2), placement.y - round(height/2), placement.z)
+		if(corner)
+			placement = corner
+	return block(placement, locate(placement.x+width-1, placement.y+height-1, placement.z))
+
+/datum/map_template/proc/annihilate_bounds(turf/origin, centered = FALSE)
+	var/deleted_atoms = 0
+	admin_notice("<span class='danger'>Annihilating objects in submap loading locatation.</span>", R_DEBUG)
+	var/list/turfs_to_clean = get_affected_turfs(origin, centered)
+	if(turfs_to_clean.len)
+		for(var/turf/T in turfs_to_clean)
+			for(var/atom/movable/AM in T)
+				++deleted_atoms
+				qdel(AM)
+	admin_notice("<span class='danger'>Annihilated [deleted_atoms] objects.</span>", R_DEBUG)
+
+
+//for your ever biggening badminnery kevinz000
+//❤ - Cyberboss
+/proc/load_new_z_level(var/file, var/name)
+	var/datum/map_template/template = new(file, name)
+	template.load_new_z()
\ No newline at end of file
diff --git a/code/modules/maps/tg/reader.dm b/code/modules/maps/tg/reader.dm
new file mode 100644
index 0000000000..e74977d0e5
--- /dev/null
+++ b/code/modules/maps/tg/reader.dm
@@ -0,0 +1,466 @@
+///////////////////////////////////////////////////////////////
+//SS13 Optimized Map loader
+//////////////////////////////////////////////////////////////
+
+/*
+//global datum that will preload variables on atoms instanciation
+GLOBAL_VAR_INIT(use_preloader, FALSE)
+GLOBAL_DATUM_INIT(_preloader, /dmm_suite/preloader, new)
+*/
+
+//global datum that will preload variables on atoms instanciation
+var/global/dmm_suite/preloader/_preloader = new()
+var/global/use_preloader = FALSE
+
+/dmm_suite
+		// /"([a-zA-Z]+)" = \(((?:.|\n)*?)\)\n(?!\t)|\((\d+),(\d+),(\d+)\) = \{"([a-zA-Z\n]*)"\}/g
+	var/static/regex/dmmRegex = new/regex({""(\[a-zA-Z]+)" = \\(((?:.|\n)*?)\\)\n(?!\t)|\\((\\d+),(\\d+),(\\d+)\\) = \\{"(\[a-zA-Z\n]*)"\\}"}, "g")
+		// /^[\s\n]+"?|"?[\s\n]+$|^"|"$/g
+	var/static/regex/trimQuotesRegex = new/regex({"^\[\\s\n]+"?|"?\[\\s\n]+$|^"|"$"}, "g")
+		// /^[\s\n]+|[\s\n]+$/
+	var/static/regex/trimRegex = new/regex("^\[\\s\n]+|\[\\s\n]+$", "g")
+	var/static/list/modelCache = list()
+	var/static/space_key
+	#ifdef TESTING
+	var/static/turfsSkipped
+	#endif
+
+/**
+ * Construct the model map and control the loading process
+ *
+ * WORKING :
+ *
+ * 1) Makes an associative mapping of model_keys with model
+ *		e.g aa = /turf/unsimulated/wall{icon_state = "rock"}
+ * 2) Read the map line by line, parsing the result (using parse_grid)
+ *
+ */
+/dmm_suite/load_map(dmm_file as file, x_offset as num, y_offset as num, z_offset as num, cropMap as num, measureOnly as num, no_changeturf as num)
+	//How I wish for RAII
+	if(!measureOnly)
+		Master.StartLoadingMap()
+	space_key = null
+	#ifdef TESTING
+	turfsSkipped = 0
+	#endif
+	. = load_map_impl(dmm_file, x_offset, y_offset, z_offset, cropMap, measureOnly, no_changeturf)
+	#ifdef TESTING
+	if(turfsSkipped)
+		testing("Skipped loading [turfsSkipped] default turfs")
+	#endif
+	if(!measureOnly)
+		Master.StopLoadingMap()
+
+/dmm_suite/proc/load_map_impl(dmm_file, x_offset, y_offset, z_offset, cropMap, measureOnly, no_changeturf)
+	var/tfile = dmm_file//the map file we're creating
+	if(isfile(tfile))
+		tfile = file2text(tfile)
+
+	if(!x_offset)
+		x_offset = 1
+	if(!y_offset)
+		y_offset = 1
+	if(!z_offset)
+		z_offset = world.maxz + 1
+
+	var/list/bounds = list(1.#INF, 1.#INF, 1.#INF, -1.#INF, -1.#INF, -1.#INF)
+	var/list/grid_models = list()
+	var/key_len = 0
+
+	var/stored_index = 1
+	while(dmmRegex.Find(tfile, stored_index))
+		stored_index = dmmRegex.next
+
+		// "aa" = (/type{vars=blah})
+		if(dmmRegex.group[1]) // Model
+			var/key = dmmRegex.group[1]
+			if(grid_models[key]) // Duplicate model keys are ignored in DMMs
+				continue
+			if(key_len != length(key))
+				if(!key_len)
+					key_len = length(key)
+				else
+					throw EXCEPTION("Inconsistant key length in DMM")
+			if(!measureOnly)
+				grid_models[key] = dmmRegex.group[2]
+
+		// (1,1,1) = {"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"}
+		else if(dmmRegex.group[3]) // Coords
+			if(!key_len)
+				throw EXCEPTION("Coords before model definition in DMM")
+
+			var/xcrdStart = text2num(dmmRegex.group[3]) + x_offset - 1
+			//position of the currently processed square
+			var/xcrd
+			var/ycrd = text2num(dmmRegex.group[4]) + y_offset - 1
+			var/zcrd = text2num(dmmRegex.group[5]) + z_offset - 1
+
+			var/zexpansion = zcrd > world.maxz
+			if(zexpansion)
+				if(cropMap)
+					continue
+				else
+					world.maxz = zcrd //create a new z_level if needed
+				if(!no_changeturf)
+					WARNING("Z-level expansion occurred without no_changeturf set, this may cause problems")
+
+			bounds[MAP_MINX] = min(bounds[MAP_MINX], xcrdStart)
+			bounds[MAP_MINZ] = min(bounds[MAP_MINZ], zcrd)
+			bounds[MAP_MAXZ] = max(bounds[MAP_MAXZ], zcrd)
+
+			var/list/gridLines = splittext(dmmRegex.group[6], "\n")
+
+			var/leadingBlanks = 0
+			while(leadingBlanks < gridLines.len && gridLines[++leadingBlanks] == "")
+			if(leadingBlanks > 1)
+				gridLines.Cut(1, leadingBlanks) // Remove all leading blank lines.
+
+			if(!gridLines.len) // Skip it if only blank lines exist.
+				continue
+
+			if(gridLines.len && gridLines[gridLines.len] == "")
+				gridLines.Cut(gridLines.len) // Remove only one blank line at the end.
+
+			bounds[MAP_MINY] = min(bounds[MAP_MINY], ycrd)
+			ycrd += gridLines.len - 1 // Start at the top and work down
+
+			if(!cropMap && ycrd > world.maxy)
+				if(!measureOnly)
+					world.maxy = ycrd // Expand Y here.  X is expanded in the loop below
+				bounds[MAP_MAXY] = max(bounds[MAP_MAXY], ycrd)
+			else
+				bounds[MAP_MAXY] = max(bounds[MAP_MAXY], min(ycrd, world.maxy))
+
+			var/maxx = xcrdStart
+			if(measureOnly)
+				for(var/line in gridLines)
+					maxx = max(maxx, xcrdStart + length(line) / key_len - 1)
+			else
+				for(var/line in gridLines)
+					if(ycrd <= world.maxy && ycrd >= 1)
+						xcrd = xcrdStart
+						for(var/tpos = 1 to length(line) - key_len + 1 step key_len)
+							if(xcrd > world.maxx)
+								if(cropMap)
+									break
+								else
+									world.maxx = xcrd
+
+							if(xcrd >= 1)
+								var/model_key = copytext(line, tpos, tpos + key_len)
+								var/no_afterchange = no_changeturf || zexpansion
+								if(!no_afterchange || (model_key != space_key))
+									if(!grid_models[model_key])
+										throw EXCEPTION("Undefined model key in DMM.")
+									parse_grid(grid_models[model_key], model_key, xcrd, ycrd, zcrd, no_changeturf || zexpansion)
+								#ifdef TESTING
+								else
+									++turfsSkipped
+								#endif
+								CHECK_TICK
+							maxx = max(maxx, xcrd)
+							++xcrd
+					--ycrd
+
+			bounds[MAP_MAXX] = max(bounds[MAP_MAXX], cropMap ? min(maxx, world.maxx) : maxx)
+
+		CHECK_TICK
+
+	if(bounds[1] == 1.#INF) // Shouldn't need to check every item
+		return null
+	else
+	//	if(!measureOnly)
+	//		if(!no_changeturf)
+	//			for(var/t in block(locate(bounds[MAP_MINX], bounds[MAP_MINY], bounds[MAP_MINZ]), locate(bounds[MAP_MAXX], bounds[MAP_MAXY], bounds[MAP_MAXZ])))
+	//				var/turf/T = t
+	//				//we do this after we load everything in. if we don't; we'll have weird atmos bugs regarding atmos adjacent turfs
+	//				T.post_change()
+		return bounds
+
+/**
+ * Fill a given tile with its area/turf/objects/mobs
+ * Variable model is one full map line (e.g /turf/unsimulated/wall{icon_state = "rock"}, /area/mine/explored)
+ *
+ * WORKING :
+ *
+ * 1) Read the model string, member by member (delimiter is ',')
+ *
+ * 2) Get the path of the atom and store it into a list
+ *
+ * 3) a) Check if the member has variables (text within '{' and '}')
+ *
+ * 3) b) Construct an associative list with found variables, if any (the atom index in members is the same as its variables in members_attributes)
+ *
+ * 4) Instanciates the atom with its variables
+ *
+ */
+/dmm_suite/proc/parse_grid(model as text, model_key as text, xcrd as num,ycrd as num,zcrd as num, no_changeturf as num)
+	/*Method parse_grid()
+	- Accepts a text string containing a comma separated list of type paths of the
+		same construction as those contained in a .dmm file, and instantiates them.
+	*/
+
+	var/list/members //will contain all members (paths) in model (in our example : /turf/unsimulated/wall and /area/mine/explored)
+	var/list/members_attributes //will contain lists filled with corresponding variables, if any (in our example : list(icon_state = "rock") and list())
+	var/list/cached = modelCache[model]
+	var/index
+
+	if(cached)
+		members = cached[1]
+		members_attributes = cached[2]
+	else
+
+		/////////////////////////////////////////////////////////
+		//Constructing members and corresponding variables lists
+		////////////////////////////////////////////////////////
+
+		members = list()
+		members_attributes = list()
+		index = 1
+
+		var/old_position = 1
+		var/dpos
+
+		do
+			//finding next member (e.g /turf/unsimulated/wall{icon_state = "rock"} or /area/mine/explored)
+			dpos = find_next_delimiter_position(model, old_position, ",", "{", "}") //find next delimiter (comma here) that's not within {...}
+
+			var/full_def = trim_text(copytext(model, old_position, dpos)) //full definition, e.g : /obj/foo/bar{variables=derp}
+			var/variables_start = findtext(full_def, "{")
+			var/atom_def = text2path(trim_text(copytext(full_def, 1, variables_start))) //path definition, e.g /obj/foo/bar
+			old_position = dpos + 1
+
+			if(!atom_def) // Skip the item if the path does not exist.  Fix your crap, mappers!
+				continue
+			members.Add(atom_def)
+
+			//transform the variables in text format into a list (e.g {var1="derp"; var2; var3=7} => list(var1="derp", var2, var3=7))
+			var/list/fields = list()
+
+			if(variables_start)//if there's any variable
+				full_def = copytext(full_def,variables_start+1,length(full_def))//removing the last '}'
+				fields = readlist(full_def, ";")
+				if(fields.len)
+					if(!trim(fields[fields.len]))
+						--fields.len
+					for(var/I in fields)
+						var/value = fields[I]
+						if(istext(value))
+							fields[I] = apply_text_macros(value)
+
+			//then fill the members_attributes list with the corresponding variables
+			members_attributes.len++
+			members_attributes[index++] = fields
+
+			CHECK_TICK
+		while(dpos != 0)
+
+		//check and see if we can just skip this turf
+		//So you don't have to understand this horrid statement, we can do this if
+		// 1. no_changeturf is set
+		// 2. the space_key isn't set yet
+		// 3. there are exactly 2 members
+		// 4. with no attributes
+		// 5. and the members are world.turf and world.area
+		// Basically, if we find an entry like this: "XXX" = (/turf/default, /area/default)
+		// We can skip calling this proc every time we see XXX
+		if(no_changeturf && !space_key && members.len == 2 && members_attributes.len == 2 && length(members_attributes[1]) == 0 && length(members_attributes[2]) == 0 && (world.area in members) && (world.turf in members))
+			space_key = model_key
+			return
+
+
+		modelCache[model] = list(members, members_attributes)
+
+
+	////////////////
+	//Instanciation
+	////////////////
+
+	//The next part of the code assumes there's ALWAYS an /area AND a /turf on a given tile
+	var/turf/crds = locate(xcrd,ycrd,zcrd)
+
+	//first instance the /area and remove it from the members list
+	index = members.len
+	if(members[index] != /area/template_noop)
+		var/atom/instance
+		_preloader.setup(members_attributes[index])//preloader for assigning  set variables on atom creation
+		var/atype = members[index]
+		for(var/area/A in world)
+			if(A.type == atype)
+				instance = A
+				break
+		if(!instance)
+			instance = new atype(null)
+		if(crds)
+			instance.contents.Add(crds)
+
+		if(use_preloader && instance)
+			_preloader.load(instance)
+
+	//then instance the /turf and, if multiple tiles are presents, simulates the DMM underlays piling effect
+
+	var/first_turf_index = 1
+	while(!ispath(members[first_turf_index], /turf)) //find first /turf object in members
+		first_turf_index++
+
+	//turn off base new Initialization until the whole thing is loaded
+	SScreation.StartLoadingMap()
+	//instanciate the first /turf
+	var/turf/T
+	if(members[first_turf_index] != /turf/template_noop)
+		T = instance_atom(members[first_turf_index],members_attributes[first_turf_index],crds,no_changeturf)
+
+	if(T)
+		//if others /turf are presents, simulates the underlays piling effect
+		index = first_turf_index + 1
+		while(index <= members.len - 1) // Last item is an /area
+			var/underlay = T.appearance
+			T = instance_atom(members[index],members_attributes[index],crds,no_changeturf)//instance new turf
+			T.underlays += underlay
+			index++
+
+	//finally instance all remainings objects/mobs
+	for(index in 1 to first_turf_index-1)
+		instance_atom(members[index],members_attributes[index],crds,no_changeturf)
+	//Restore initialization to the previous value
+	SScreation.StopLoadingMap()
+
+////////////////
+//Helpers procs
+////////////////
+
+//Instance an atom at (x,y,z) and gives it the variables in attributes
+/dmm_suite/proc/instance_atom(path,list/attributes, turf/crds, no_changeturf)
+	_preloader.setup(attributes, path)
+
+	if(crds)
+		if(!no_changeturf && ispath(path, /turf))
+			. = crds.ChangeTurf(path, FALSE, TRUE)
+		else
+			. = create_atom(path, crds)//first preloader pass
+
+	if(use_preloader && .)//second preloader pass, for those atoms that don't ..() in New()
+		_preloader.load(.)
+
+	//custom CHECK_TICK here because we don't want things created while we're sleeping to not initialize
+	if(TICK_CHECK)
+		SScreation.StopLoadingMap()
+		stoplag()
+		SScreation.StartLoadingMap()
+
+/dmm_suite/proc/create_atom(path, crds)
+	set waitfor = FALSE
+	. = new path (crds)
+
+//text trimming (both directions) helper proc
+//optionally removes quotes before and after the text (for variable name)
+/dmm_suite/proc/trim_text(what as text,trim_quotes=0)
+	if(trim_quotes)
+		return trimQuotesRegex.Replace(what, "")
+	else
+		return trimRegex.Replace(what, "")
+
+
+//find the position of the next delimiter,skipping whatever is comprised between opening_escape and closing_escape
+//returns 0 if reached the last delimiter
+/dmm_suite/proc/find_next_delimiter_position(text as text,initial_position as num, delimiter=",",opening_escape="\"",closing_escape="\"")
+	var/position = initial_position
+	var/next_delimiter = findtext(text,delimiter,position,0)
+	var/next_opening = findtext(text,opening_escape,position,0)
+
+	while((next_opening != 0) && (next_opening < next_delimiter))
+		position = findtext(text,closing_escape,next_opening + 1,0)+1
+		next_delimiter = findtext(text,delimiter,position,0)
+		next_opening = findtext(text,opening_escape,position,0)
+
+	return next_delimiter
+
+
+//build a list from variables in text form (e.g {var1="derp"; var2; var3=7} => list(var1="derp", var2, var3=7))
+//return the filled list
+/dmm_suite/proc/readlist(text as text, delimiter=",")
+
+	var/list/to_return = list()
+
+	var/position
+	var/old_position = 1
+
+	do
+		//find next delimiter that is not within  "..."
+		position = find_next_delimiter_position(text,old_position,delimiter)
+
+		//check if this is a simple variable (as in list(var1, var2)) or an associative one (as in list(var1="foo",var2=7))
+		var/equal_position = findtext(text,"=",old_position, position)
+
+		var/trim_left = trim_text(copytext(text,old_position,(equal_position ? equal_position : position)),1)//the name of the variable, must trim quotes to build a BYOND compliant associatives list
+		old_position = position + 1
+
+		if(equal_position)//associative var, so do the association
+			var/trim_right = trim_text(copytext(text,equal_position+1,position))//the content of the variable
+
+			//Check for string
+			if(findtext(trim_right,"\"",1,2))
+				trim_right = copytext(trim_right,2,findtext(trim_right,"\"",3,0))
+
+			//Check for number
+			else if(isnum(text2num(trim_right)))
+				trim_right = text2num(trim_right)
+
+			//Check for null
+			else if(trim_right == "null")
+				trim_right = null
+
+			//Check for list
+			else if(copytext(trim_right,1,5) == "list")
+				trim_right = readlist(copytext(trim_right,6,length(trim_right)))
+
+			//Check for file
+			else if(copytext(trim_right,1,2) == "'")
+				trim_right = file(copytext(trim_right,2,length(trim_right)))
+
+			//Check for path
+			else if(ispath(text2path(trim_right)))
+				trim_right = text2path(trim_right)
+
+			to_return[trim_left] = trim_right
+
+		else//simple var
+			to_return[trim_left] = null
+
+	while(position != 0)
+
+	return to_return
+
+/dmm_suite/Destroy()
+	..()
+	return QDEL_HINT_HARDDEL_NOW
+
+//////////////////
+//Preloader datum
+//////////////////
+
+/dmm_suite/preloader
+	parent_type = /datum
+	var/list/attributes
+	var/target_path
+
+/dmm_suite/preloader/proc/setup(list/the_attributes, path)
+	if(the_attributes.len)
+		use_preloader = TRUE
+		attributes = the_attributes
+		target_path = path
+
+/dmm_suite/preloader/proc/load(atom/what)
+	for(var/attribute in attributes)
+		var/value = attributes[attribute]
+		if(islist(value))
+			value = deepCopyList(value)
+		what.vars[attribute] = value
+	use_preloader = FALSE
+
+/area/template_noop
+	name = "Area Passthrough"
+
+/turf/template_noop
+	name = "Turf Passthrough"
+	icon_state = "template_void"
diff --git a/code/world.dm b/code/world.dm
index 9a031dda0f..3d89f0c043 100644
--- a/code/world.dm
+++ b/code/world.dm
@@ -82,6 +82,9 @@ var/global/datum/global_init/init = new ()
 	// This is kinda important. Set up details of what the hell things are made of.
 	populate_material_list()
 
+	// Loads all the pre-made submap templates.
+	load_map_templates()
+
 	if(config.generate_map)
 		if(using_map.perform_map_generation())
 			using_map.refresh_mining_turfs()
diff --git a/icons/turf/floors.dmi b/icons/turf/floors.dmi
index 7f474fa1fe14baceb899e6812c19c651033083ac..7c2f111e05f7b38b79bd888db618161d2b1d399e 100644
GIT binary patch
delta 12272
zcmV<MFAvb!iUa(L1CS&EYmp^9e}g%jdTFIkmQ(-E*t{;^RvWWeuks!_Itr#Rv!_X(
z4bDny3NwAlvld;`%IPBt2%5r-hSmv=^2|DprZCTWRx|AJ^!}v|9>j%4bryK1A{A^a
z$5rP<g-t5ldZ;cMo8MM7BfcZoo`}_w5Cxf>RbhLyOldVM-~;NXi7gFGf3#04iXM9q
z;@Cp1*Y2V7qW&qSYWGdv>lK2HLIKk_c!wd4Rw>9s54X`g&n$X4n!-#UuAYnKAkya>
z0}aV(NnNC~Ps~l{<uL$9cW0GnKMs4*zaaXAolMN8Ao|iemZNGv_e~$73#8u#3^7hr
z#^^##T%kT#>nPj_&%Y;iIo2iG2Fv(IAO7g|i~ZWC=eV?8dWcKgH6``P9`sNM?hhUW
z%l?<kb!?WKg;}gu`3Dwa3KrZo1!l940Y{F1EW6V5zBfOc&D=eFi0}xH$QUvrlguQO
ztfIQqQs+WIX(6Z^0#ZPsAyCjt5Tu<p4X8JQfYwUAXh5Y+m%xR@1$Tw67P?DnCDkQW
zwMb?rnaP+ZkHKemo6X*I@73bI_w1R4c??N1-KoqIFu2?Ecg_7;*tz%IbN>H74?e$t
z#rC%3+16bi-~BwFw`tY#Fuqkg!`fPdR_zQ$D>uA+{F5h-^YPj4-W>(BYG-Jaea@|~
z=L>>q)$;qgNSxJ}k@tY4`;4&TU=BK*|AWUo?40LX&E=u>Hg7Lp=X^)8--h>%9&5jV
zP6PVA6)yB)|L_hMTX63ZT>Jh4wR?Aesa%Npw|%&?f5g8&cbWIrZxZ^?xTGxpaJ+|D
zd@;JoY~CVJ{5tR2n>s&e0G+Wh5fjaJ>o5-TaK0F_&$E6Yxbw7^hx)~cB3mdPZ|~(t
zikffn_W3%V<EP!mrm*2U^RK}>X<KSYyVM#lBn)A)fFQL>tjHDvrLb%p+jX&jT^Ga9
z9cxcp1aR#9d2#+(a?o}hy{lUmj_>R7Dc@QOF*Se7ar9!4&OeGm2Aw0M6eJ?iQGk#H
z<3NY;>7&=}5Q_xIbs3F@Btq!LR_dbykRJ!4I3bB*Y}cc6ct{Y0gi*+FFhCgwZl%n4
zG$M+^lru2-Ka7WaIF)6baw~U#dMWyOf)Aj)bT&`)W!9>l!7S?!o!4mMEm>2E!J@<a
zty(@N%N4Y0XXwd*FZSWl-$2QLTDwk_tNhJ@gi4>iqXW)9>atM1&99%sM)@6Rt+8J-
zSdTBWuzHVQw%2jKQ|EcV!uIwGpFXUxdjWoy)cKpw;p(M;)tv_n)DpvgD>eT5-ZHnn
zt2BE>WW|g2vPGcy{g-uq0MGGJn_b!!J9qTrBMa9nUMY_Pii<&U!3g7kejr|O{%ps8
zyuHUT9Mca3Tl+)aK3`9TLNW(V&-!`)u#}kxr0g>Fg7d>92arffCSYL$Dh+ovi%o~o
zPU<+hop1yoqVZ%-hC!`=-pmtoMM`uwf7f*w4oA3Y=iO}npb*(2SeSnzlC%oqU}n_-
zDbnb`Kqk6+AX0w6ngGH9@T*mZ{k{hA8Zti$WJ_pvBuJ82e^7hfsqs-5QEfIE4F*^#
zM?72Hfi$Ckjd;|~L;q~&)^+_fG|g-LLGIYkpFLx3?L6VZW1Mn-3*VWHZ<Mnfz$?Z_
zuprKHc(Foz?;cOjOXxml{fvR(br?q1xH#_c(=ohv9)5O|@B>HT3xzX!z@>%j3`@81
zZeGQE_kiy{iU=z<zg~pp&+gN>4)!4|*TL95U~g-Uy4|E42Xv+bnz{DLC!gT^J|BGW
z!AtMEdGjWpeDcYE8&?mq41H@DU|edVHoH?l&(89{dbmd-6;9!vEb9;CnSaupLGoxk
zl?woLB_IxR9KqK9P)7h+(kM$tWxGSR7+`2EGV7QmAf$;u+s01M%1K%l)7a#R1l0>;
zPeBAQJO5(RZ+8AlN{B;}I3gGg2*)F$@t6!_Uz~pwMaV>dU|{6)7fDPMjLFiiQpr3j
z5<;d5NHTpWhP_@2nMSiEg(OKt9z{tdbEtI~1}}`4N;2$q^D<?YbIAT1OsmG)T0>{+
z3p;+XoHx(1M4oBYxN!MmzId2cZR))Ls`2M~8w}zG=ML_&eR+Yu-RSb|jTozck;4Su
z7W@2_-$6cqYp~@mvp&4b{({MOM<AYi>}+pg_8L63p0KtVQEU5@ZAn#J<-+0>);8hM
zu)_ZKJGd)wJ=vzbG-7z*@tA8b{TpAWj-P$~vWdg2_FuGY#|Ead`2CuL+U&lN^;er+
zRwFx)5N0a|Tl>R&$6u;V;|cOAKrzFwlx{wmpEV1AJAan(o_diCACPDwgQm3Fc}-lT
zp=<UUQ;Wb!=Kz$Nnt!$sWC^+1`P+_5rQS%1Hu{=hspz_YI{)mPpH)G!3V?oZA&DbB
zp6n%z90!onBT$Mw<F90K@l<o)OOY-v#qs&?OGLiN=tX2Q{`s?KdDz|^1^RhfyMLLD
zx?!Gw{F@!W+wB0nbOFi6f705dvE1jtg^lVGL+LR5<p#ChBfk6mIxY!|M103B<9y!Y
zys^sRpvKm>;a9a)nwQr&yWQo`U1qyc;a^|%*$zzP-Fs~L9iq_ZMzqBE{YNBs775=o
zSy<o1>fdIudiU7B?^SjD*_!@uvIt~}yX+``5XM2iYxj@Q?97~bsaDC6e??3{F=?2+
zMpkOf9x#Ig$TQXH&X<LXB0Xn{c{_M|k7ZeD8*iNz&%$HdaWro~&78jw1)OjMV7fj>
zJI@Q`8#8|oUN-+xuY>LRBxxBho4-;@%Z{aZ3CDHw`9qp84Z}PMXc&4Ix7{oum1Q4)
z(#0Tie)Mjh35aIzpi1)<mSy1jeySg@@`q(xDN$;Y%v4I{n)GXHjoeXNwKJ3(9v3cO
z%>R3i+s(@jkCn#xspMdz?6bDk$YH+6l>v+6mwl6<wTt5{B8HFoWzeMg?WcUP3Oh-M
zU9Zf$_7V>^S~M=);aBI{_y^B;dLQ0@-RjVJWFZ?KM!!O-y+>p4h%0VLX&J5_H1TU^
zxP4}m>-Lztj^g2ivm8BL<;KzmE05+cP+#^;|Jy_q-g(-ag7m^P8nEchvzA2&{hEWZ
z(Rd*@P|O$P@I0jyLE4<M7_QITwKJefajX!6QGq-IKq2#;MGmK}3Sbx}cFCiE-)&Q=
zHC{UZB#!jCJ#AHH**1Qugg|rchZ*1AFhB?lAqb)<Mc*ZQQAsoKdbifv?UrQ|$5BQA
zPJge=cW?leDS(h74D)AcQr0jT4o6x@v|v#X>c$c&t+<H!fC-upCSiYeZF{@Ry+^n4
ztZ7I2!4KZg?*nL*Uwkdli^sfw@z=loc0T@sDY0&PSl1n%Y=@i)cai6zHoC&%3Rp*y
zUsfy}=O(qM5dJ{&?zZ6Edk_x0l(!<}T9qqXw~>u?%;*_kR1%tZuOP2K;!{WPt)IWe
z;L<ZLEgw-bkND#Ab-XK^l+LU%VA_6@gdV&(qOc!`DQthOAJeWmtVWZ6{6NkHNW=eP
zmOry%!Y_vv2e5N6q$U;2+zUX)1t?nf;m@oH>CGH@HVViRd`jsqHE|s0V3!OuQ*`>%
z6ak2EM736@)@bQBCyq$sC`H{R`TXNxO#g77?%^K8UY|sy3tt@N&LmRqL&nF?lvhNO
zFzU7G9quvicX9kO)z%q*Ov_@>>(W?Uq_uR0=F$@N)&jL=lUlPywcey!uT!a2sn%=M
zn@w7ai?k2+Cy7)8cAh+Db^Sam=hkU1EmLhSP^mYm)avQ@I+a?DO07n<(WJSs$apZl
zLuF_G%&Cjc?=_m3c7)ex5{iJ&Zg0M@yT8f!?)FZ8-_u*~@YBnG=MkUnaKE-py#+@P
zn=Fkx*sBllMi#3__pqNYu=zHW;yOQnD<C?AyX~`lzBuOoua;rq2D{-9=gbC;2WQ#5
zcpvNDWmfl1etz*G$+HsXbLbp2Idiqnrm7KCrswdRI)7$w5(#8Gadr%_O=B+Tr+96a
z1Ca3mvc+L*f5_Q?lycu1CV3>#uGsnS=+_*UY84#;1aqjT$5{~(m|3M<o`3V}*oj8~
z23wnts8p&rr847wPlF##ePnU`5=sgNokI-UO94S9!T=G+>~BA3ab-=T0ByYpCQ*o?
z45Wy$T^AE5m8%#AdLcR31p}l=c=YTkZ=JtDrk$pkgT~B%R2<Md{%TYA6C4eP7>2<+
zSFY)ip8Hzk4FjI-y!@PBZg{!#0$jMV%H!Kdc$UwC^J)TVHa@eJ<{6IC&#+T&<=3Ts
zllOiN!CMvn=wXjf6BnEg-jd7s(OXFWKIIY&cS8L2Ro1r;xxZEB*2ajXg)O2nES$fE
ztFG~mW6-~UwMkG1)q}sfewROZ3{T!#AX+=(`2na>2gho#=Jj!Zv6Ao7zb)s_Y+fW#
z{0cgMuvDvX&>y1vE>GLM1R+e|ycMs6J)97Khy&J^mKh8tNx!VZ5cfN*rk%2M0x{rT
z1?-PM{`gBza&c*izxa#4_|oG6y%YbvzjtC^fA;5pf1cO%0mh>teyIfLjK7E@k|ah7
zfu9nEq?ClC0gZZ%|NF214UNSmEZfltJs}7NU8E3Lj!UUppIR`(@sKzQaXlZuQsbxp
z$G_sIZ}^sthWdliT3X~E{}2C|a;5T$5y!tqW`3(yDAi3Y9`3Pz_8Pw9;WZ?^qaB>`
z#TV{>J8rz!XtK6u;yY(Jda_H&GuiESxYW>jg8fCfP=og75c7izghRo~?dKd>5##U>
zmK7@z3|1mWa)-zL7Jp>5`NX<_Wh#~yJ3RdPDo*JxSKe(9mS8KY@wXqw>{TxC>Did?
zKYGNTgzvlspWR-fy|KxqNAPR0ONq0;b?482Y<3ZVc{qYP@4dDB0=cJXnX_l1fAKl^
z3`1S=%g}z0{z)xg1ZuuTm@d3w92BYmKC2O5UJn4YCcuXue)wgF^YO<YpST{tf4236
za=D^OI^F~sX8Ss-5s8-QMrpBy@o1EbbAIyKXWY1SUbi$$6<93G!t-1#%gi7V4BCf(
zn5IQ-;S5O<(b?G|7!SGgbcg@(&;IO7zkmPTKl(@fH~-)t0L99`nt86xnE7sdZ;wCw
zr~mYodH|rEI7~D9+4DEi1IWf?dH`!ny6gz>FaMpt=8w!W4|jURs)n_;gzrA*@@k2n
ze!jzvtE-GF6>2|wfV{ZC?cR{H{gCK?f{Q)4%;EFLoT+cHS-s7BM{qkiPwm`O7KZDX
ztIw#6J;smE((!t%UKr5aOL%0x&9f-razAGMm+u27rw6cB-pZl8cb@jxaT99&n2J}L
z(gzrZV?MaD!q)yUhXQ|aWrbfo+{?8B+7+Ac)))A+cf@L>(|a}F;-EjwF#~FUv&&Mg
z!r3zww)Thm2;lktq)wfetJK^iV78lCg){wdG@ANZG0|64)v;4HoN1a9S?d#y0FtMV
zuxy7~t%_6%uiD7xEv3YAC-XN91KTfYq+b}|dA`p48wR%LPY{Ksg)~wPb|vxaEe*1=
zZ9Lbdv2vE~ozEHfb$xdvg+@<*CJCZYt}6nR48y>*bX)WBaKO2h6-@^Q9zT6bt*QGJ
zCUK&x1cgMRPW~BKwu5ckIIhFm@&pB=fj{#<_@M}(+aVMIp5+sYfD3c<0A4oUvwV6-
zJJc6eUx*-nus$TQ`YiPq*s8V=hj)lnohNFC3pXs9Y6o)!pGqjVjwtzmV4SV98uW<R
z<xK4owlSu^2hT5Tz*0o}VT+CBHrr)*JPJ8~c1Y}kaTM}b;SH+RkW0f&2JgZr|FfW0
ztNm7~z?scP7W0k(*M6YOec5hJ0MVri;bxaRPnk*(&PEAa`@=k(&lZ8rrI6LgW*F*Y
zeHa^h*Y6LB`<+}5AUj@vyeJ7)2v>^>KrsP0F9}$@RxI^p3BcllaGH>S%gf97ewpgR
z(i9*lNs=kzl5M5kR?_)<o~Qd1mTEY@pF@3>k~#Vj(nZg4r{-_jHje92uGR4?6?UIJ
zB_j{X93PM^LMkO>Y8hxLB$fKKtXFe!k@mqs3S^pqd{l~YFf9{*Lz*dwC?*U8mKSup
z@*<yqwr)R958(QRmHfV0J%HoJ!$c3@>ZR*bdICFfoiYucT-qc$I>MHhC|!I+FNE*k
zUSaQggKBaM<6Ve8U8dshvn=Zj#_KF!zsX}`mCDK<;*$pB_9jUPX8Rnz?_wSeSxMlY
z+(Vh`lt)+D80~U@u5rZA>@wdjudrRy)a=uw2XK^T?vro~l=ADd@ZO>=ELBj$F78%H
z7zg=1!*I+_cfe|+nnw=0B9Owgi!b84E+yB+bDaG9is#|GZqA9Hrw0If;i&jNW#6al
zdH9Zl?>L%QZ&~=ZO*y5@PK`eWNWf}KJ3|tTD7h}SX<{mWg=gDTJrB=ua2;oA{#m)r
zOndQ}rb*d#DS18>-+%f1O%v0!FfBXZ>6KEL)&zrKnI@%j8P~S3O$*1db#sVZgrrcO
z%y<WuE-6~3kpX^nbSET+k~prD9$$2Xky%j$WL6I#<ML;E0GZ9x12}GcQ4e5NPoNg|
zSnX{x9$)5vom!1cl}&mF;Hw2bzFy<t)?GrQ#q7O^8vp<x07*naRFwd{YlnE(6+QbI
z?LWH7rVWF`n=BkzG`ud-SYY+&9i-{<=-Dn8&uma~*7$Cz#nn-pR{tIs%17))%e;N5
z#GT~P)Mxl4^Z>FtepaWC&U$(HZkq<fa7-8nRJ_uETn6B*WjlX%PsSnG=?<pk!7?m>
z36oM?-lVedf`(yWr~Gy+4Mk^_f{Oh3tV&?apbJIHhyzX)4#09t47*2D^Uv9grf$xG
z(4Bg+`3s>Nbzm4d(8)}B|7LoRVNMW}v-7ts3)l1Y5uxy2W}qG+CARM|9t{yvVmUS<
zj&%or;WRqQ99Vabk-45glElPuLX;#peu-YUOB6>)U^E&Mr6t-7?)>Dz<GFeO#XA42
zy-E+@O~wbt8J=`kxzUe!qy+slEzX*7eb8XVe8%;-#nNV*((Vf1j%sY&gw+d84sL=a
zz^K9CDCS_LfxCFb<+Yn!d;bwT-?_mr_PZ>9?1$VMwb@%)CB6WO;n7G8I?p>?Q<q-&
z+rDZ&fUFD{o%Psp6Wpx{@G9Hoi#mX_nt+)V;lH!dL1tNUF<S)M6?-}Y$ijRpJ*#Kk
zX#fn%(vOq@SG275uL&zg-ikU`x5*Zc^g}u&2yzM{fck<y57(Ou`TQNn(epJ;EZatZ
z0?Nq9L5lHch*Ap2bxEe?pK%DxW9KiW!g5^<jFbr|Gz(B_$gWo^Ga3vKLSi~L!FY^N
znwcntoE8L;iYST+!XTv;C&WU(M!(Y`P7=(NO&CQnVHgoaVZQKO|G^&t8WOzHIR66W
zH?ud@19;u>XE$p+YPVRq^px*C95GaX0SAuH6XQ7t&X9xiJwDsG%sAQO-a&`E<qH4L
zwvYdgLoY6~UWU3erfhb(d;neN8lzt<@SP{OFg7}<<s;tf!`t2imbVtT`R$OWH+E5%
z1^(UnLatw>9zeTdv*T(h`R~>ja_25O>o6R1&>ynesOICcq+xa}$OJ>Pam5HPVU`t`
z-Pal>6DY7ucc?ts$HbX|DdyYk5g=pu$y66WWWt}RGuf6_#<AxCiB6i6+@vJ|C6fZB
zMt^?r`7Itj+2z^RUADKowEO${?wmR5tR6s-&tKFN$an!6N$7RP$BBvaL64squ)A`W
zZygSKZ}1k*<tzNbL)cnv@=o~yiPzwrx0X0l8S%ZhY6QQGxqRUB$ufK#E^;M+P7e<1
z17i1xQtt-K!y9b1TYPbK1MlWLw3|m<c^Y_)_2(wLccFJ_QrVcbuSyS~HPl)EjmYED
zli{UG0n?K#rX~T&lT)Tqe?iG-o*qDv&!6c5%#P3QdDZyab!hdUv$_q73xdyX_#9lh
zN#&;Gse+ZCC49CCmB8nLXwx+6jQ87Iy;$O2bCLHyhxbi`%_cNm=vZae-h<@*TU_iK
zbj>zD=sabUn~W}kwR)FNyd~bYAnCqbX6via0|3qP`?PnI*YD?rlOv}%0g97crzHXD
zlY*y3e{<{W#G^J&xjCieGdaV*oX>x5{T;#stpt?S_TOau#&_;wS68^>?y_R+Qr~=s
zAiT%w#oH|UZ()h2s78Z*cZW5r!RJPo8x`=L!glo@Pa5aAD&cSsHX?Xuut#_s5@&<a
z@=ew+t<rt~!>G$>b4=2KKdhAa^uiV1{q+_T1-Z=m_Pdiys2l?7;ge~oFag?=ny4fK
zyf~A<s5XDOaQR}+3Vc&Oe>VQY<%_R1K3f>F@%tCR8JGE9yTP;32JLe<dA59>T@!-j
zArI?y9`3DibrF_!x-7Zy=)S>UUumHn=&V;c+JDaV2JAV&y^vqM3!T~~jpQ9VT}2r0
zpsxCyKXADu7ck%1<b$L8?A6b{bdFzz9>DC`J=>FYsTKh>lZ>e_0cn%HsVxC7lk2H7
ze{Q}JpFbN9yp|q7kuf;xhQwdMou`jrv&-RdhY#+;yW0<Ow?M=mfp-YuZSE!Tuhv!=
zu)<+g@qJb1yIWWITjGGj7ToeK;jO?Y*UoXV1W#61d4BYi<<RAj8(e7DxLb<Y{Pq#*
zIdmM8OY8TKo!?ib2XI`*KHH&-jK6F*lbxyv5Wcv!oS*I0W*6sDGaq~QOp~>$F##o$
z=c;Ej`6)jCm(c_G&h?FaQFvK2P;PjvI?(BvbS}X8N{jn-Q0L)!8*X(%j>>SU)?{h0
zfPZ(BfvXfkEMj*DHntwpk{eubc34vpepAr>-Yx0_L1no?D}*hv!Kho~7p3`s*H@_r
zP!#CQ;Jn2%eo-5+7|Lg5Jm*rA_)(MBt1bp#003on3X==0KmiMrOspUQFOzMo7-d&j
zZ*H=`E(!K_c-MyiYX{!D^fq5~1V0$w=Zk%tE3GBI|IQI#JT>{&gB7;l@8EwH68_;8
z!cm($hE41K67Izos+X{0!~GV-#uiIPnP<^+B4>>tDD%wQWMStL7rQX6!1vXY>Z}?8
z<C6ugE&<w;G_4~6l#^JkHvyrOkgYF&9-kkeceFFb=g-ErYG<a70>#DSWqJVbhxb{H
zeJ*}dCV2>UeU0y}!hPA{ZR>!~RGm^wa>tYWzYjNPkB0F6F5{<{>B_Tol??}DqV_g>
zzQi-`QL}frU3!an8OqHI?A#xru3hGxW(m>V=AAJFRq&5yoZ|%a0AQNmUsM7oE@}gU
z&JPqb`&rbGS=L1;iztc`V|SkRrj7ww72vnh9r(*K0#5^zWv(TE<?VaAd5C56t!tMt
z45&00u^ktY#0)z}7=}r?(bO%<ne-5dQk9_F_wMue|I7b^D;G9i`#sA}^gsSz{#Q)b
zq3nA6hky6)BBaQXgiz3JFjDoV>?>Lm;Qr=g{_>yyZ-o7wJcNH)ci@#qlijq*=haKs
zr#c3`4x4ao&E)Za?W6p8cFg!c|Gj@nYx!-sb%zZHDsRK#tz~wqF)MqE-1)#@`Bz(9
z5DM@5h{q4kvw!g^!^dxPwfvX``#ihiK2Jv1`L`}V#~<{0V6HLPsk6V-WkEIQbnb9@
zeS^wlpTUJYEJWw|nGD&mEA;<i_&d=90JwVf>J-ax9vSF=-+jNrj+;z5@+{={xDLUy
zV4&g{;DrR@JQU$?qz91MZ}b``%m)0$Kl^7I<TP_SDYgukBEht5M3SUPzz(HK4coR5
zLUQZT6Hs87&+;)jaB3#$rwTa~)3W%>zxe0;<(GWxT1$&O-`e6&|MXA4<SS^CqEC70
z>|8#-Q(0zz!BN`b(+x8owV|O)exq(kqwK$y9)Q=-ora5oB7aM*^6=&}8cvP&**@Fj
z>-5%d^PM(yMH{yZ@wIa}QA~F@V)Pvw@6#3j0E=H-Im@c~gv!HJZipd~WAjkL-e{Y}
z;Wp+PSPMH4Ez<}$X;h%nd7E2%Teyu1mG}|;6V?NNh|Vrhdo+e3!KaY;%ba|k<qX0?
znXpLoDJBpn&!-m%<G=rJ|DhVk0>{iH{ikdextBGVJlcCsqgr7w9<y}rO3qZ9XQpMQ
z6@lsN2hZ>G@Bc^t$(+Q%S7#r6^wF2rL-=jjPk!=~uYCR=ee}^E1AhYiFun96;Kx7t
z$xr@&#aI2e{O^DMBNc}c!|{kly^fHQ!C-*zx>T!G!YIOXUAA|3Sy)&g2tumW3cXH;
zYOPAIH=tgtVOS<Y2uuv3B-S0BfH+DBqmXK~itTs|20bjxBn~55tpz^(5B~m%e*Sn-
zx?##*wYk13`hL}TGZBJHxs2<TwGxi$;5u%9>iFcG@+>zUCo!gJ(pXw!FdnmT_A=wq
zfM7Tv3dh7zkUvBc>F>iaQpEYSc}T(&v>(0U^WWv~{+-(#=RZ-?h(!<2b%|o#+@#fN
z5k@g#9Fqu1r`MyJsvb3)4aVa!t;H5nDyr2AVW@XHnTQ+~Jq`jq-^ce$c&<+zB|Lq9
zvWaPc5|VneIh8Q`x|$6-Yc0}d6Q-d^gaix>BP)-Qe$^zOIEl$(X45e6U579Vb?F*i
zGq+3=Y3MU`A`NU?CljSIK*U(KJLk_i5&LoawdfE(n)7pJ?)wohI?+6b{^2p#=e_pV
z&XkbgpxKv(!EiVN6rStQ@Aqlc>nNpvOR(eN7?i>?48lMsC8H?9FkydxpY?O+I6Tt1
zmy+)h1OWynj_VLd5trV&M7!Ol<a>}V6km6<fr)~z?P8d^w56e}`dnaJRt|O%G69S!
zMIg<B(-c}MC3aed0>CgR`985w*lCz%nbthz$`i4l{NyM9;-il~DqhMQ_Q%IL{5-QC
zA2;R|_fGxpH~o8mNA^R2k3Rb7EB~7$CQqL}<>G}4498<^%R!2SAdc}}7bz2Vw)a^-
zx05roJOS5}aI-akoV3kx@~QK1@%!w)SB)v&e~KLa)R}GDtgWpPMiId{pjx&G;|SYv
zXf&IQMkAIMwO~uxbqRpMV1VO!w2zL6<CuD*$~YJyk}>sKm2T9-^Gl3JBapDrT0knn
zU@#<(V=TkK^~+etb8fyiHfaok*7=i}tdtZPNB|52k%&}(`b+QpuH$eR#rZ~VS~iyB
zAw>$EP02Gd$I)vNjiI!xwv>v&aLj43%t>G6u=5s%myJ11&OdYhpLc}$$}I>+c%G|q
z7(y@_4>c0gG8v8a+1|4C=QD_72IG)Kfu$gfVg#C!O<>}>CZ=suEmuiof&oNH#5f3O
zHJd0DwrwMSg@(8%;>~kWAAb1Z;_S7LKmPdeH+>&Y%JS~OD2bGM$Ijjst!%3hsaD+t
z$8Kocxtl^)l|UvE%Ss~z)55YGUGfrI$;L1gDqU~lMCSnFQ+NjZG7fv1ocs;!#GN0~
zB(snj>{O}H@Aq*$k3p}GWtohEv5o)?gQIqbBuOxTOp`DS@qM2pPS|?3O|@R5-yaeL
z30}#=wr!#)qS<V+ySERfW~lnUM-b><7?$~hB<4$Pp7S4f{r6>2$n^lSx_1U6S1Rpj
zs}xo$Z>2C0`3+2T<rElc@=!^MAq7&zNG0(661MAOIvyBIiEgZ~zD9rMZ|t{b=|c5m
z=2tp@PNWRz`&t@pG#rs6ie|lzWm>cr7Z5_Rw6w%12<i0(BuPTGTE%l+eBUPyBTUnv
zTCZW61|pHTu1gX{^m{tPKN<(vwyiZ0QrUOU^N8aZ-+#Rvz=t1xxOklNziiAKz7;28
zc?4i)H~>Hy+M#pGsMLfL(@<Dx%pb*Z+K3W=varEWQb!9}KS0wYib5R`n3hJwO^9fD
zFT!u^>uX6AVOSQ`N{Md2OH%T4M{h1PXt#R=<1vosG7dtbSm1dsqfvlmTLk?8zhqPL
zUA&Tu5HXJD62>t>pd(V-w&-=*IG(397EP08tNB`a=ov>|Ip((Ac^5zY@WaJdMFPKn
z>pK6d#@mThxT&awX*rs3QaBo!DRV3f{sq(A0j+bVj{}Bf6AO)>w+$ng)^==XqKBsh
zrtwYo<r~vxSQf7B5XKRevd?fFVwslS@kN4Rn2g3Dgdvt;@cj86<1nDvXb=V=aU$?M
zkBb|tdGi*fAPfSWS_5U6_>N1f)uP=WZsVqUmq8f5z-fVFckZI&|D9u|@>Aw41h2CQ
zoTS;4HMcr{jeTRe8J0=aE7Kq7r0`Lvi<|N%4AZ1itMK^gHZn;#Xm=4(G7eH*Lj&9(
zV)y5VeCx)goQ&3JG{CS3$76=WA*FHJyvA`Uxw?--kT$f*tl<3fcKXcmZyYm?8^Hg>
z@7W@t1wl+BSM+rp-Dxz-2}r4R=S>r&GH^^SDv`*4Njvc<jxh`iGiAIfDRa!bX**bs
zhiN%rm?_ov#h&Kh*jHo6<N<yN{7G6R_)1L)EyB|84T!^t@o<RmIykn4Wg6Un_=Nip
zpD-E>Y4?U0ro~_|rrqt+?GNd62kh?cqmcaS<^x9K7|->!YEl$oTQ0U~V;Cl3FwrK6
z!wB1deJwEB-{D2)zdYvw@Sk)1G2v922^t8bq(q6BAQ%%yAxRRaFkp#^B1vKl8Iq*b
zUf;1f>hv%z6W{YtN)Sh3p5&8KY5~h&L@*u_hhsz>rn!M{jsPcRg;L<Du;FN!QlKpw
zjV4~XjAdIneLUNUhCxUYC-i!Q9Jr>G%!OEg`+dEefA;wue)h{Ra8smdA_Si2<2f$n
zvX2xo{Xv&fsXQ%DKe6K+xaj=zthfmL$8Y#HoS5ZsK82BYnDIR)zai^!Zy09!&>6o(
z2o{=kq>zMBgke}|^NScIV`N%~HBCz^;S^bMN)v=m6As|(V5f}-0I;~QM5o<B3PEpw
z&|@$dQu0a~c$UQYp2y))4<!|Gq9xcY$3`i|U>MNt4d@R>NTuix#z-k>clvyB>mEW0
z6k5(b2y`{T_dHzJqd(|PHG_SH9T)bm7alNK1a9zqvIv-<TVhAy2$94{kq`y}aV~#7
zEfS(3z|+YSuT;e=Rj5=O_?7fguH%(|D!6_b$My4vWxLp}gA|f#<rqz-Z|rwsGvWX2
zB5)$d0HG4juB~ZBWejSyI^!@zD72_aIL0&$Y};Zm4D<dIz1~14qf-Hv{$PZZf^JVY
zY&qz3x%co1eyN1**;MOQ9M=O(5+QJ0mu_cP59pOv-2K;Qe)fC02-t(R&RO_>uFGJi
zEVs~Vanx?-&r80~AP5+bLrNu&vhQ*G^Ix#E(3tz;{lSP@wM?^KCyXM55FEC<)T-s*
z-Hg7mW9>9X0C5~M3dST!LZ{n9DV;pdGW3pRYm}g2;@CDqYDB7K+ayUszdxW})m@TD
z<B(ddf^A!bVTf(n^m+p-<r2z&aWHL*AdX0q1mE{@UFYS0-0RtSAnS>?4m_Lr`3lFB
z2~UIBjis|%4OdF4Gra~QpxT-oi7d;+DoLs>{d~~g<>KXQ$G&)WUjjJgGL}-T*O#==
zrI3XEgWv9KzOmm!GZ>G@n1(^UUZ>k1=(cjU7GQ~z1iw^5N=e;yXm|8~aX>2F`M6do
z=Mr;`dNtK))ZLq-NcT`24u>Qn(aA;EMM=qcJf>8B<BjM6FXjNA7QUZ#{@jkM1pKb+
z{IAplkWykfK8~x~T~E&Wx;lVTxQ>I8f+UW0<BR+#piRU9A`a*cLqr@RlZYS;K_<u~
zLWu;C#6XHHv~-4dp2F~AH};j-JbLnppaCtzqEsrS4Nel47h4*zlO(#Wnr%}l`6+%(
z|C35mE&F*t3Lym5vOZ2$EBduu$Hh%^S+-+iTQ;?7m2S6-REkomL=envUOI2LzBT9C
ztg~m&AAG4d;)IhyyfYtD!vg%eSs@2-YD}W5MULa(+73b~MuR@Vc#KRE&aab`yf{@#
z`)T?$TLg*@{;cqr{n_t@nMzH%%Q&u&@3}aRgYCH3wwovJOw-0RErif=)tPj$kcv2t
zH8wyQSdNQjyC_3Le+|>pOhMDeaeWNq7<uq->?G~PlOVkq0_75uI=vtRx2_YDUA-F*
zY5JJA2xQM^uiav@c$`|3hrKs{H+CZS5<<|4SQN+9s&%3$BnU&wCC%`wl`B-rJ|-6J
zcAI*&rk%f8!@yu^p-H`7q1DiG=B8!Qs8?8QHCSG3PL8p8Yj!Qo-l#P&EsJKWIrs0G
zSp;5o9C*Nsj(@B0IPP^%m6<|LaJky84KOSX&M=L<v#nv82&M2`7u#`vu}mXpQ%RX1
zWrC0@?H!O}2F$b(g`rD_847Sb8qIGL_KlsCofs0Z-RUqMkEm4}n3jV~1ir6BbK9~h
zm0fDJI!Pi}InzQ2$wI46vr*;D(gKSM4VD(0EVb&`X@eReB@4|e<4jM$wD4V*qjraO
z`$)I3k7N4X`I`MR&RSf51d7Ljc@O5?d#cT}Oe61tBa?U{TdmOHdgi1Gq|!a=<3!&R
zrV2r(sqz1&kpY1w-D^$L);Wc|r=SKB6%~ZOv9HcfTPbjLbrr{(KyrQG$H1i7s52N2
zQA%Q43ZZlh_A8gpb8c+~*Y$K@iAfl0Mxj)iZhm%k3D5U&EDPIPwy+%=Oq0Q2gzJ0M
z>QyY;rq(#VYtJhdfmb<q@#m+u1PEykz(~8^X3nmZ)LQsy6@ZKpm@<Y;Lstg8w2m4k
z0@JiK*~ipQZkuRL0GZ@b1cs5{2O1~vjeWh7mcJwtKex>JvuDuF*&&G&E}maw`OK5d
zzab5hMF8e61jTE|9U)GYlls3kfBuFO@O3xWb}%d*Sqdq!u-Mt%VdKIEQc3zp12Dm_
z_%xFQsU()6$!m!aTs*%<6vw!Z11RdXD$PcnUSFg9!YH8CY!Jo)j#H-J@6xDMiIO<i
zs(b_6<wdT*yl7y`@n3fSKWRMxQ}?77$Xp3nAw)810BRVRM%w4zN}CDJfAD#OC<X(<
zSfu^*(&n0J=wB+8(}W^<3oC##OA9ak<1+i`qmTahB+jS*f3#DV1WXb-?GC<QqFSk7
zSO!<GU1c!n;kh1bXIH4#svI32;g@_&!(ee~fnYoasR$$8XCe`TBo?@~MHGctrio=+
zv>ICfzgBC~?{}%y8VrUSe|V(klYyq}<BvZ+oD&JWY-fLM=RXaW_62YdshFpd5}|ZE
zY$YXzX(H1!fQcseV1O*Vd6t0|{lHA~{#rqZbRmeN2m?sOgxzHt2EA7_W+*uQpQO*f
zwEkZ9TED0IeZMt3Z8?BywL%idsm7m29L6MGj8sa?eET+)N(sw4e?$AIOSN7l3?o{N
zIzoc$YPm1stGTWK00V?cL_t&~1W}S;yB@Y}5M<3ll!@c`?C<Z>YPA4Gxl-2c?%zO{
z;^U7$KAaH?IrZWF>zI}VlM*X+Ov|#cut*Z!A=ffUqXUI9^>INr`$%8FvPfj2yR(>1
zTK>zLh?r@k5YjTDF3o5xu*^xL%FI6c=%YVQrM8PZeMVdTVc|ZC_svLl=VOn1t)i^=
zmwnTIU+uJ$RKiXS0SE9Z%XahE)%!c`ldi&5e^sybjb8uhFx$2<42w7j5mAh7=@N62
zBvdLD4u*%sag0>Dfos3p#djPW&(&pWDJWMen3hSW)1g|aU^@l}yL(itWm>I827^9e
zAXI{FS-7qXhM~I>eF-Z%_V2SIFr*8BRJxHzoFpkRDC-3{Q4Dq+v(O_@XZaH$blWh?
ze@2J|)3oqBk1!00<9MPkXrxDnY^-e)MS>s<=j}?b+MQl@-`oX*7u9coZx(@qofr}@
zNfJsWAFEQvFl-L?57@YPmhmv4)9KJ?Hi+VcAQ<7=wuYcfa2=O8j0mEDQpqO>#?-16
zk|d$kSi<+qX)}<4PHHC+OG`_1IvqUMf93I$C!9I+o2yd)J~{h5vkk)_i9$ry1z3S$
zPC5c-IDuG#qea9)!JxCt+L=WL?Om#^6%5O!R4OqZkHNGl`5wb@pb15(S*AfEBvBX^
zB?aEZ`7`_BG2g$*J=wLd%>ppf&FEAd18md5whfXP#^WK4dJQG@!jL2h-Ch^pfA{lT
zf#bS}L^A02C|9ex+JwS$EQA2R>=DNyy?!6dwkY`}qA0+y3<mu^u5A-U5$DgJM@!s(
zz0K|)?JyXQr^Gobr4qyOi)uZ^s%gDeW1-bR?H`h93JfOF0nDcN#^aE25VFv!&%W$Q
zeh_~M{HG`Q`@eEKZHs_z&}k5bS`n71slknA4WT4)7;)x|uDT5def+YY9wWi9px^J{
zIc1~}2qgiNFpls|mqxRp<>`dNbv?~hi3Lf@1#ldPf*{t{*8V^5#7_{sATP840000<
KMNUMnLSTaT`zFNz

delta 12257
zcmV<7FCNhRiUZk-1CS&EVv!|0e*-y8y|mIN%c*~7Y~Gh2tBqN#S9y;d9R*XE*~=u)
z24|%;g_*wPS&Ob|<@6B+1WjQ^L+b=bd1f6)Q<&F0s~PrqdjC-e58^_jIt#p0kqWkz
z<EnF_!X_1NJyaKs&2Ouk5kHY@PsD0Th=NScs<1s;rnH(B@B#JH#Fhpof7+)NMUOoQ
zacrU1YxmH3QU4TEwfiOS^$Nj8p@3-|yu*-2s}$s+hudhLXBIsiO<|@_SI@<A5b5)c
zfrjL?q%P9gC+4Q}@*IGpyR*u(KZm{OUl4u5P9|nk5PfMK%Tcx8`=$@k1=8;Vh8QO*
zV|1Y=u23JWbrkM|=iie$FzXU+gJpcshX=iWv0wZ29GA9B4{>R`rlcO(!`)Df&2qCa
zi}fo10y)6@{IYq+&a;>SM~;8&%F^_{H$R)r+&z4V@Cc7!42&Q%$xLQerMlEob0MI#
z5Y!C;6i{dgDQG1K(oUNO)EhxSYo%T^pwgyG$c2=P+!eZ7=q{<nRF_oM%1n}(WX3#s
z3_iQtZ1$#muNL>cXU{CmV_-5FPBBiv;BL>~HTP>_=iYPA`Tzgi`}}_f+uM>STeo?5
z`}2I>rd7+s_*U%{YikW!wNn(W-0<@8j~+eD$7j2HcNEa7ouX0pIkUc=F9@bp%kS$V
zaaLnS-aV4;6T*&zIp}cq4<2&AbCxSLm;2V+yuEmpvmM2L8{Rj1to;f)4e0k)IM;{$
z!&{th!JP|m<%bK@?%aQ-axUiI_Tkq45&!zkMc!M#PUt`3g0lF-@g8FF+2|&-d5b{t
z>%42P>inPqbjHR+Of=iA!#K#p`C`aE&-#Jj*5h6t>K7x5Y@v9#y_X*;YQDwWXX|*5
zpLQFY!iMY2zXtE5ZK)ycQfoYuFoekhg48OpB3lfU!m@2_*TsK!T?|8atUYNFz_Ih^
z+4*P5LECZku5MX4zOTopd}}Gh)ch^S(ThPk|0oI>bdHcxkcdP_0YVat10BYvk6yP!
zED{{oWi%R+2%#5SsgDXkejJG6gd~cwU60P;AwdulMj^w&0A(1sl``Yeh$sqE&cNjV
zFdpvVRF-kdt=xa<rRe7gK7jJl={(VwS*vymv#dXKUZaV(WKAUoiw^I%YWbKfSJ0}R
zq9+5s*oOyy10@4$?K)L1^EU?)Dt-2j4mkaw%R==gzkLcD<#(X9#(vFUJ-*1o>K%UF
zUdQ=fou~Z@+uJLAdcVT%Irv3V=WjlT%NGJxckVGzOALQ6)%fc>%iQ!X)9e+I70=r9
z7J=gTU)K2nJjX|Ec4=4a+|i4VEL^X6r928KE(XN~Ba8$3fq2IGvmO88_8!A<Og|88
z?GJhTY&{hU$s9O6>*xK$Qf3~Ivdh#n&JU9uKq4iXfQ1dHG~CrJHXTMgspI7Knj-)a
zjVE(53~GP%W}cWUQlhi@yRO4<IKoXk?`HD{g~%4c!u%7Fq*V|HGphzjkwymwGSSro
zk@EZ11P~5@U#&9i_ce&ukoi#{TSBuVL6XG!gWBs(jgP{JYO~2`Fu+PV;@RR3q#6Ay
z#G`f|`e!@0uIs0vX<p+Ga>su9<OyqQX9*7;;*@_|_|9Z}qnzacUNAm_1#yPM^A*~A
zcX)hOLiZ`_rwk0Q!!WwS`EiGzkKw(u@Qb5_A2|wND4fwfE-YMSSh|UK{W9LW2YmlQ
zL|C!;?IJ9Hc9+Igun%Fm4#w^Qds}PN?Iz_opferN%(YKG`2^qh`QU>Oo_pW*>(}|@
zlTUwMxq6Ug=v%`8<3ba)*`4}%c9#Fm{XG(?a0>TiS$`nU{FCMkk_Y3dTmYae0dbJy
z2)6czIs(X&Mp-f{+a0pS07Gk$S;r&+Ax-?*Hg<YePSUcN#wJfBsGb>n0wRFf`4^LZ
zv-4L{LL8FB5y5CcI35v=$7C4$;{2m1LMDF#10$cmNMfR3OqOnyO6F0K5HeLjlIcS+
z?DbN}G@30bBuOIjC`u}sL#@LwcxJp*l3}l#mnpNHL-yZbS~b?z8ai8F*zt?yym^)-
z@=UA7xr^uX#ly5}Q|J8`jX%@dU=TMrb8wsOiwpeiMwjny#900F947F#*ypeO4)T9V
zgDrQN_2F&y7filC0`b&iXL}2?*Wj`Bh_%g#THB{=ORC~B=N2!qwh0f0752B^!Cir?
z$u{Ms5yJzIhg^B?-}o|h{Os$OO&n&m|Dt6(HZYaN@7EmEX7`z_zuN4w8rgY-Fk3O$
z+8^dS{!(okPmosuiWz>Tbo0sltXY59`Lm4o)Qe>JfJ74+G^N$fYvLjeU9;DiS_EEq
z4nV1?`DY73mXMpBzwNkG>W!3Wqp$guimv;o^Uu!tSrsI!0O<D?k~q@i$zH<9aR4bj
z0;R|^{z?`XPc`?w6zSqp9H0NbMC6N%UPLD2pFVk#hwa@_pr5C;`{&uH8|Ht>zuED-
z-44KW7m#fHC#_8y%Y6=9*r+Zsln%pRZ&2$!;QLRn;*zjP#P{4X&gU)88mk-*YHWQM
zep6eed2x-?+g%RbWwsj?{`F;_?Z8CdzQdN^Aqsu2MN5p|e?W3;k?=i}h4oFW{!JFE
zw~zh%UR1}Qt?B<Ri$IpR%Z`5nVI1VUcK;a7&diyYYLy)MSHuJqlZM%AWTnRJ0W&y&
zJX4+Sd|9X{(sQPmw}YqmSeBKx@zz=KEIhUyNAvd6%=t4>z-x{GOxNdV=V^g_W9IL{
z^X5P5b+A33BrW4*^H)k~*|8Ka;ka%-e@GLiVVEZY4MXqZwwooSvh06Dx)@~6kKWBQ
z0nzLoRB67#vJ70`Pxa$f{;+H-B}z?_nM$c#lYVWjkvnRuc8YSt<J`sb`G3!GyLq|c
zvC=p@l^kr8eb&|*In4LCGGKB1vTqW!c5$3V#PA`%4w^K-`<O3QVJGRZ>y>%eUgF+H
zi^jQI{N_v>|KJIa@4|n(TOB$NEM&vO=vOGU_h<|raLElREyLx5CVuS{H&1PH)gE)(
zQQW_Gnxn_7TwB^;<-z;~>dT(#ze+^mt;fA7NH0vI0gKK&YgvTQuQ?bSjc0NL#e6{y
z&r?bfq|GUd;rhH?I|Hf|#|j}B705FH6f)mg<Z#le0ES^=mpp&^-8Pk4<GJ%s;z*y{
z(^h4cZR3|p2sGDznDOlm1BAd3f*^`g^j)GCl{5pdcWbTPZdo>Q9AyOH^!Lhq2M17@
z0thL>Fn^XNWet<zaHNGq3l;^TZY+_~ii?;Jn4tM!682};wzs?7d2kcYns$^Q{pkJt
zK7dB~+1CQSc+7trfAza>=i|?r66?B$b=Bd~cF3u47kL(Hqf0EVfORDKb;ZJQu2Xvq
z;g2NmZVS%52jQ?wc`HJ$Rk^fv6WLhDjGpjCC82ry67uQ;K6M1&`Q=*-E<EAF@)0HT
zh%Y{0$Gfyi>C_qnrtNo0=)tQa3j2YW!uHqtG3}beYBYbz59C~cH2g1S`7<jf{Bl@v
z06PamYEr?>y#QoffTCp|{>+My-pr9_qkt^Ir<Cqe6UT85cF909MW;VW5r7CsRBLr=
zjh23M;)o=UQq*0N&p!^v^bhyx9_}&h^+`m!@WoN?Od{nzWPJQgc|{}%qh6cd;U43D
z7soGCZJmF@v@8a_E{(-ST1%&BE-g`SEl_JVsWn?v>rJZlI+a?LYQ09i*`&3&Nc&)a
zl1MdR=g~t}*Uz$YW}W8JGS%h+m3os(t)7mrQ>oRc)M`{4O_~dfj0e*@RCe~yoVw`z
zUZaU=M|h1Up$Pcw=H@fI`>TxaZtvvxJ-+b{Kfix?7V+5*cWcYkTX1y0$<nxky?PIC
zWU+d52m9#)n{PuYuJg;c0-{5>-9F9di(~HoW*HW)u^SF?PHoV*cbd)fcd_nVWOd)<
zm*?-3JSky5h0Z~fQ<v*(sv1FMdJey<^Jn%dkwCT+XU72BH0FYSiq~d202vP;TO79b
zhn#;-Dfg{ml1BpVik<(Ce$8R2R?!haFo$}2oD~s)nN`Z=`8U6ez4i#eU~BUMl}Z(-
zRA$`oY4D?|k1UQ~LP^1(bBJMkDImy17$D-9{q3hLuB>Skpsg3dBnmN<ffO;e>tX_>
zauvfsFC+)MV1N_}51u^ct+VIIw9^!G(3pRjiUWGbUv27sf}`OO!!UT~(iJ_@b6;w_
zVZf7}=b!V-4KH_IfOD5td3f^(&+=JtUQ8g(#%H$DJjGG^8FtF8{JONS^WJYEc&ox6
z-S6>f;)2t`TXGpccnj&@rCfsHPKdw0%KG*pcel#i*ch?2uthY6g|jzs)fL`x4EldJ
zHVNvWdhl0QZ}SHa;n7<QL~BPpJpfhe;8+dTygu%)R`Ol?t8)I#=0yU<ub}e>OSK9I
z{UN&V^0duM5W)n`Tk%TR!wK<+IACpQnZaO^^vfy?algZA+9^vX5CiU1!2bB-kH7RJ
z7nhd!i@*4bFFhX6JMrK9d#~;5FaCf0&-1!Iz<4yoFO>kD@fUGKlEg?M@Kd6Yl#*~X
zpi!^!fB*Hrp|QAxWjh+7Cj`NuixdLOaVb^nQwwG|9uh|(uIJ-dYW)2F_*eY=72mSa
zP=7F5ON;#D|KT4~u2fzy;`rCd%x~2SrMij5!#&ndU%_`gyoRKAw1ZPV|IB}V$Bp+I
zP1e>-eCHHLk9H|}CcE7Z7aBTGu)hfBYS7*sVt#Ora41;0`II9oVjLdAvSKBI!AitP
z?(neR;*YF0pIGOxOvTb-hx@-=#VOt9(z^}95^O~^{`UQty~;U0JstDI2M^ej@V&R-
zvztq_H#WKO0DdcWDRKHMcm99OW)}gNha;%--doGhkb8=jIeQlR7oUUAFw`Z#4DI*e
zpVab2pypeI>B1YvL7@uZvl{W`^#DL?0(|)4hhKI$AAkJuYu5w#&$b>>E>|>3$D1I-
zY+pw;BGD4vC@r=y9*uHw&QCu3jB6Lp>Xv4y0*hr?c%F-8nHeO4LHmCY)3m59oFYjg
zIy+kg;~}>m@9;nV*`Iys_wT>^NB@Zb<{$h6pji1=GtaddGv96R?eS;-^q;;^4*;|i
zhiPU%d;ThV0NI#K4`6LcmmLBA<-haS{E=Da{!Wir)v(r<@ZG0eTrKhQ&v&?Xd6jXc
zLhTp#kmnb;*&A}Y9}<6^bFl{(Iehw%Q}qott2cS?2yP~4shxSu!f+jP^$C@+$N1rC
zI$n>}a|4=t2@kBdc@hO&?8mJC`hDQ_=>e>jw{j@&t;aof+=N;`rs9>R^Z|z9m=7+k
zu(dzTp}-$pTH!bM_j0X(cE#rV^#wld9kCke^j^)kIOq>^%z%H|?6Op=aQak*t^J`s
z0(ibZsZ;0WDm6C=nC)g(;Y>dqji!E9O!O61b?lT4XPV|j*7`L^0LkMAShhp0Rz)g>
zS8e3;mQrH5lldElf$f(x(k~3~JYQ%24FlWrCx}ARLK>+CyOQ|zmIhhbHlFL!SUFAi
z*5{1-y1qM-LZg2tlLS#H*A)RuhGAe@x~=(mIN;36ilzet4<A3K*3|t9lQ_{;f<huu
zC;tpA+rhSN9M@rOd4ht`z@Paa{7?kY?GTCp&+-XHz_~ek0M8rmSw6j^9qJ3K&qNSE
zS|5^FeU|zQY*kx`!&^kE&Lg$MxoZ|pwSzf=PbHLFN0fhjFizK54SGcEa;kO#+ZfZ|
zgQw><U@4+~zs1IKo9!|@9EF@cJtTI)I12fz@ETQX$c5o1gLmPR|5;G0)xJ_HaAvcS
z#k?cHl^^MHU$$ElKy;x(xY^~_W2O>>vr)p<{xA>cvqfNYDP%RW8HV~;AI65>_4`BO
zeka!h$c}#(&q{(7!qwseP)q>MO9B?J6-#|t0<gFsoFpXR^71miU#7aSGzADsl4Odw
zWLs&sm301|=jlF$r5cX!=TKjzWR8A>bkTF%srg&BjpKThYjyleh21BQ$;d-8#|LDK
zkV*-eS_WDQNu@q5>(yLbq<wIZ0+}WtAC+PpOv``7kY)-ZiV4Gj<ptfYyvXODt=rGj
z1Gsu_CBJW058$}*Fwq0JeBtVpp1@9Ar%Z!K7dDBGj<DqgO6MQY3*m=1SJ=DSpqkvk
zco(8im#Mh>EXz8B@jA;_uk+AYrLwYz_@u$Oy-5;+**=5syO>8qRuZ@)_fY0K<<Vs}
zM!SEUX&mtjyUcgXD{R*^HTxv#0UV{7`y?C#rTqFVytilzOBK|xi@OyP#zB71FdVbf
z9kAM{=8=Q02&6FW;*0pMOUZTd94G(2;(7S4n{(pl=>dRVI4ZtR+4m`X9=_w?JC5en
zTNb`;Q%>o!Q{ztn60q9R&X5EnO0J7-nwWn|;n_A-&%<*ZT*sN3e^zcY(_Vb0X;OAw
zN}f-}_n$w1)5J6_Ov}!9dZiSmHNhZQrb($>#<eYM)539V-5eqpAt{t6Gv0xvONy3h
zWPo2C-3f`IB#!H(#}^%8WL6XbnbiZxxcr$OKxXsw0FE19)B~8+6R3qfR(qR_#}|Kj
zr&i-aWs}|k_-cWVuhuxYahuR+Bnv!k001BWNkl<ZaVY@r$|2rWMbCah`;V@(X~W>~
zItxb@4X=wd7Fa!c2Wh%Ic(Tj+QyY|=HNIbJae36H)xX2J@)3K{GH+ifaVvQ+^%;I0
zdH`7+KdaM6r@cIUw@rg#I3|n(DqeqSE(37ZvYkJ>C*u(8bO%%NU>O#`gh{C`Z&F!!
zLBlYxQ+~UZhN81dK}CLiRwXcI(1jvp!~rJ?2Vl7+hTWs7`R8m#Q#a>8=uSP^{Dshs
zIxvhJ=wzn6e>1(uFeiw~+4)<Rh3onHh){ShGf<C^65IC}kA?^-u^bx_$GU%ma2lOt
z4y-%J$Xrh#Nn+wSAxaV)zeKOwC5j^?Fd7Ys(h_Y3cYbv5;aoj{Vx521UZe-`D&qs=
z6py;AT<b?XP=fxc7N<?PI%u$BKH+NIVrjEYX?KP1Mm09B!|J&v2iL(8VANo66mziB
zz+F7z;@Wkty#Iim?_J|p`(1w)_Cs!r+U%{Y5}$*_@Mt6kou?hHs0+{hZC|$@Kvo8f
zPJ8UQ3GUVec$Mw)MIFFdO~A~G@ZZ_!AhRsFm@NYBiai|xWMRIQp4GGNGysNW=|{?d
zD_U0j*Mt=#Z$+J}+hhwz`XQYX1UUf_Kz%`<hwIISeEyE(==qu^mTi9{0cB+5AjNnz
zL@9;ix+GKc&o~6;vGbQwVYw~_M#=;fngu8|WY;T|84U&qAu%1BU_3@B%}kU+P78ua
zMHIyZVUW^_6JnuXqu=QeCkbZCCXAw(FpLPIFkg7C{^*YY4GCUpoPCD!o7t=C0le(^
z)0;IOv|FrPc+3y(j~IWdfCI<pk@1uRXUM_X9-nPoWSs1A=b*#wa)tkA+sA*$p%<4~
zFGJlKQ#QL?Jb<oqh0(7T_}-%%7#khb@)7U#;cf38%UcUv|8B_RYrCk60{`}WA=j@{
z51?JK*>Sa${P*h%xpNntbr_C0=nq+KRP%9J(l9#~WP+jDxMDDbFv|+e?rRN`2^3hS
zJ5-+RW8%!f6!UHN2#_)SWU31wGU3nEnQTid<Jj|nM6a8Z<fJ75Ig<*dMhm|8`3)XC
z+U3dCZIfH28GmKQ$BBvaL62V;u)A`a?;H+!Z}1k*#Y_Cbeb`!U@=p04iPzwrx0X0n
z8S#U+Y6QQIxp?67$ufK#E^;Y=P7e<117i1xQtuke!)t7{TYPbO1Mm7fw3|m<x_^cB
zrzX3%p?6_Y*_gGjOAnwm)LH+H$m7C))z5`Mvz<P3)|2z4Kmn7JG^Qp2&XZfFQGZ6s
zXPzEFk<Xv$0nCoi?s?Jpn{{aQpR&3QiwlC!uK65Xx=!V~<gtR4UnG3C36;R-o@moF
z>Wuf>Ts~joPIHm>KZo~CgUu#1UFcY4*4~5U{TrO`8g$JzKk7VYlk1GmgSC2_PrN1G
zwjk*~UuNs;&;tO?^82)Rl-KX)g_A3%I01;0WTzzo?vskAMSnBv>%^lrPPsXy<TE+L
zKcCNkX8j$)1FZy<)%IUy{KofgV^>$W<?ga#>{8!+hakMe>iL^2`fp*0$EZeweRqd7
ztHI|+munU99>aF^4v!jVxGdpt4>lrrXRt?j6B1{G(eicHFRaqO2g9h#Xmd=`fj_L2
z`1IT*-u>+s6C=6I`S$zP1IWsEiBx=wuHR>};90F6e8|K+!wG6P0|Wi${*!U2Fagq&
zqNpSSJUf%fs5XB&ckz7A3Vc;Qe>VQy#q%#UK3f>F@%!h%8JGD%yTOyu2JJJ~d9r+#
zT@!-jKKJW&?(eN}c@dU&x-7Zy;I6@6UuvNo=&V;c+JDN`2JAV&osi$W3!T~~jpQ9V
zT}2r0pf3BIJ#e`o7ck%1<b$KT?A1>{caC3&9>DC`J=+(>vk-n(-KXM}@<$Qmqc*#=
zhDrW#E;N&rsW1Ualf|hm0nd~3sWX4BzY?E68xOpc9zc;XIO>MPU%;)$4`8#);c$l!
zZo|9V_i?vC#2$fn2;oicB=E1+Rv56tVO8-%Rp$F!m-t)afWsEt@Gju3z$aJEaJ~eO
zR#$m?^qA$)<&bNfYuC74irD<_5$Y*)9Fq&{caNRl*QEz=T*f}zp^J>aY&RI!@ZO0y
zXhsu0zqXv8?bT)%=Rz|dd-_z9y{a(*A(QW_XMfo#KL3}|1Nh$6jeJpfUNlf{c&s|m
z>6vuS!P!cSyLC`!;b|LgbV82GaG};@X|RBQdl%0fP<|U4cEIlY2lRImhQ=a)_#|R?
z2R63u(~=vUb9Pu$5q?w9{lN|D13_iEK`VqUvB9WY<5#8mf7jQk2T&B~%;3DmGk#GU
zunHK;XJtI+LX-GGli#Z@2A=@{Wp)CS6Rbc1Gm})TAb-!wfX(CcXFPyeJ%Hl5KYNYi
z^aP4}0G~ORSZ{8!zb*;(c6ir@|7!={yYMz&bOb*d-sOvZn@g=Fe)!H2UpzMX&b<}3
z-|ygm783s9CBjjgTZT>R?h@|#7OI!9V#D1Q#Ksm&MwutkQzB=LASm<1+hk$q0_VFh
zt-$y7>ly*TH0v+R2LMx~phT)Xl+TiTtzp6uLu$aolMSsd0n(E^ts?=LlVGhk0iu(b
ztuKEZpC6!iv@^x$&&IZDr>2eq#l_=!dI0Z-cUg^n&VN!Sxes=IjUTMSUD@Gn>wwQx
zol;A3%ai=S_cv&dhVcF_<Hr~2%F}d}4F_YQ_BMOI#53+tvv;^zdW(1&%FT1^+#R8=
zT;!c*3DMo=oiPMe@Q-Gk<2C33z%;+Vs01fm)CL5dA1G$_v#24ntcy?<Q4}S{ZawZz
z9Rso|z*o{8_{%Z^PXd!|t|bfg%{#hzh-LGgD;JZUt{fDbckc4{|I7b^OXoIT`aR1|
z^gsQR&8{AQ?&d@O@}K{2g#Dd7gnwRl;FU&`-L%Q)<qKD*ItINAn{aK-<l)Vu{CRfF
z_&@)>e@SckZMboZ4F@W3!{Lo(cB(NedyCxqz+m||TbvUL@9Kz$_s+6^{xQRcZ*#f)
zkOliJyW%d7MpyZ_E<VK{^torQG1#fIztm+xHRyC8ZgFvagUUmn!MR&3L}&Sh4B4<N
z^#5V_d(i^`xP1BYlZvk!f0+d0JQU&Yqz91M@AMk4nGN`>fA-Hb$Z6(uQfwJ6MS^MB
zh$KmofE`Me8n$gAgyhD9N1(tkpX6h5;M7dgPZe?~re*P$fAP=x%P;xXwU!ony0yih
z{^_57$yd-OMW6E0>A8G<r?Sj~qqM`P8)iIeLqnJRM%|D`*?%cLe*mwcI}H~FMgEpr
z<^J_2G@Kgk(|xwbSLv<a<a=%CiZ*T+;wxuxqL}V*#OQlA-lr@40T#cybedK35taL^
zToXeg$L79-z0o#{!)?qpuoiY8TBZ?h(x^bC^ENm3ws0F2D)9sQuUQWuI=w*c!5E4J
zpF-j<bMkqXGYAW1f5IZsr<g#TJfB`5jQ{?>{fBBC3mh|-^q;a><X+Zb@@VfVjcSF#
zc+Aq7OF2_*o|%@JRs^Q6A3VLwzyBZoCvy@5U!Q&S(MMle58<n@pZ)A-U;F$&`skxS
z2L1&2aeC<|z)yenv!DHoulsNL-~aq4Dh?xt;}MN|9U&!yf58CXb*WaXgi(a&x@_<6
zvaql~5QJ2#6?&Zx)moKaZ$Q0P!>~+*5SSQ5Nvu0M0dbTNMj_Q|72EL`40>3WNgPJB
zS_^#mAN>8-`uY1^^fbN-GZP`Gl*_nYSu5d~4zA;-j!(`h&vMgo5@VVsjiogP<1q`T
zFESnt2!;cqe{f731^GiHk^Vj$BSoBFn};NPjrNmQeE$3V-M@F6<NUAHG-A=ib6uiX
zH#cduT7*$d7{??+(&_c6rm9EHW`pr~Olz@)l!|J#LKy0uP9`FUMUR63&-d~D5}xZ5
zM+uJ~ZDJargrweVP9@B~t!9JHT8p&VglQ-eAprx!f5^&Xq+d13Cr)CrnAtQ8eAgk2
zLS4E>*UT-`L>l@`ok#=Q*2zSv3=lDv?aujgUW@%S{aSR0pUn9=Gxz<3XPs!CL;v`g
z>+@dwTW3m0aM0{a!(ccZ0SeD`==b|H>UEUTCD`$B3`$`c24SF+l2H_4n6SUU&-$4&
z93JW1e@n^t2!a3u6UTLkqlgP{U7+1=Q}R7X7m9DY*}z1>*LE>XUE0!6R(&q8Eh`7R
z2$=xJlp>I3!D$MuloC5FLjhnIlzg99DC{&$vrKEAa^-8WpZ)A-|Kg*MJ}O?y9QLQj
z{5-Rt9yjI%_fGxpSN(f`PxfPgk3Rb7YyX=h9VU+-Kj!?oa}390Y|BB4gdmRbT^A`6
zcDDCfKeLlUvpfN}lYg@{f4pv+<K$E4;o|q%eJ>hQy#E9_`iV2!wpm+SBa9+~aX__f
z6UGs?<Ird}8I49PEo#A*vg;B6gTVmD^JpI(5yvt0MwM|eLL_7AwJP1Hhv%0Vk47M2
zp|yZig27-&9LHFOf$NvCj_2HbYi!aO1g-NYGg&DqGLQfm1|kuufAp8$`CZ51FpBey
z+_Y>g$3uz~I-8PbWR9cPBpO3$S#2p5gW;HyVwsb^$YJL#49^>LlAM3${6Fsq^R-(L
zjPN{H<1mC^G#+Xsre!i3>$AOO>(6Hp#|*|Hi2_SO7{v%QC7Zy+bxlm$rdqC&$OHq3
zl8A8-&}ueOC~VtCe+mt8PsFR|qCWia!^PQaAAkJu;qUrBye`YT1EVBT>K!|KTePyR
zLZn)C6CAstap!IdT~z{^NGvOj5KIfpa&*Z{XeArNP^fghi4&azh)>`d?8`XpNpkX6
zu-ESVkS3Xh)L^Gdg?_(}<9Q5veJsml6pVEQU>F>=J0wYhe_@)0VTkYhByqyllWnT?
z8vXu|AV}~^9=2^0MG?(rlij_2Ff~Kf_dS9@_rkEuXCyJ7YxA7{xa;4PMIqM%$m-r1
zj9jU-qpea{sl1iKK;$<t(UntRq{%}iC59A85hInr^Gn#SkLh?|FeSRNzWNgVncvt~
zX6ZupQ|4DXe_l%&(D$`8+Gsc;Nfga`9m}+6EiNF0VrglKQ4rGW4M>uNYPE{zy7<0N
z97dR?LA74PGz~-|ab1@ris<)rhJQ2;ux(pwBBZkKp63zAF~0wDIe-s8{BZF&=YQUq
zS9~j8i{%l3nc)BcWoU=aDWg&oPE12#r7?dL$7v%<f5^fHLrEPiWc>h5lPC&xL||GP
z5jP>C<-G{s*tge`D8jHTs+AJmewU===Z@Z7XwYu=2*zU^&t)8hM6tm0Tt=e+%eDym
z0e;D*<hyt!7a?LC&n1jwf<Q;4wr$btv~fI7Yb=^3%~tcJ^3XGmymHKKyYnu7_~D0(
zCp{9de-o*2Q&9=iax~$ja5OSg=2#Z|3#PdPTIWt52Mo(578*Zq8%8dz?byyl4^Ih9
z<4yMEjcGG13)glC<A_SxXE+YAOiS<hBEc|BM&l5|5X&%l`gD(R7|?7q2!oI~5qO@*
z`Hj`Qd5cmI1_4g3fig^d$EDS3(QdbKQ@zU|7Yv`_w7{`DchT|x&M{N@Idc|*lfDSp
zlT5cdf5zTeZiZ!2^~&@IIw^eA>EfpR3Bxq0)G9oDyp2o}4%%IWl#GK^*U$hrh}iw*
zA>X-nAt$3X8VxWk!tt2la7byKHm`A9O0MqX5Tp%lGAlU$yq!LC{A<Td;~MZk@eNx9
zv>=FS<chwIqdSdeIRPoP?!0M&R0fWzMI{nBe`zNk#W99qVWx~XC1s9zH*E*Y@h~k1
z3^S$LKHJm$jeR|KOdjCJz@Ma5g0Iz-&>}4T-heoa7!QZ|u7hJ+Sf;_<`;WML{}H3X
zkall~VOk6ZW7^$5-TshHcfju6J_^ZiuHR!cj`3Vyt0qMew&h}*Hilsm1`}<9IE=8}
zf0qKI{T-fl{)=-S0RK719}`ZbnV^9{N=lT734$?U6p|!y3ImpyD3T<`kReG*?e!g-
zqfQUgGVwhRr37&l=1D#&r53OZMg-#_aX3cAVVWCwa|C!@RwxCY2pf)uDFxc1(P-k8
z%UHIR)5o)oXc&YfaYC;*$boB0$y|uFf8W=;`DdTs;upXE0yjmPCPLtOKAz)JF8fFk
z(;svxmCDod^b<SIfs4*R&x(t{fBcGX!)vn~&ZjW)4l};z<TqqJ?hV6CA3Ecg2*E<L
zjuetGiZBc-ZGI7>WQ<Jfu%>BgC7dEFPHBSBNx}hq8|<X<000&jmguxQNFnGAe|iiC
zLrPvr1J9Be-}5*;>Y=0}PP7D@<=7~t7z_ity#f8f2&okP!5Aq8?M|OBZrnjAfkMl<
z2Z62z_@0OBdh`dqsb;V*u;ar1^}+)ti@-I$A&Y<sx+QiLju1(V6bWGv5a;sO(;^`n
z0z92O@k&*^QiV#jfnP}<<vL!ee}e0maa=!tShkDpI!Ga@R*unRdSkyAn+gAC7lGGu
z3=k^e^xB$MRK}oIt1}KmghGp&gkwz8z_u+0!!YkZ(d!L#GCCDt=?_LoDd_fe!<K_i
zmpk_#;g?F-o=vr0#c@5rBoP9~b?J6y^?+Vz#od2>=4ao?MZg}kb<V<fe_aMMWx0h`
zi=%cse_rx^20_4h98xNIlzoqzpZ|)bg~r?$?+-@Qs%4t>I$;zcgy68<rB*Hf{$}*X
zj<u5*0mO04C>WC@37u{arF8N*%g{TPtx<x8iDTOcsS&A`ZIdJk{r-S@Rd-1qjYDd+
z3bt(#h9S0P)9VeWluIbbf5EgZf;b{c5`5psb)Dz`aW7|QfvhLmI`CxX=PMjjCOipd
zH<nIoHC!pF&h#3LfNE=UB(f|Mt0bwm^z%V`m-82|9Q)$geF@-{%UDXWUSHBemqHTu
z55C&jys>Yf8H~qcOv9jFuhZ=hbXz%F3$R2<f?p~jrKIjUv^)AZe;}3ad|a!PbBVb|
zy_)JY>h8@^q<bh1heHyP=;Wg7qNHRz9#bm6@<w!zXLA6L3*XN=e{LtW5@1Rxu^b=A
z)$Oh)=X_lqKq*|uK}kUp$GY)FeiYCq;s6l`^oAiK4v|Sj5QZQVWD=o7f=FT@MHX5*
z!#hu5_>FxnHjkeCTUyY7mSIsUmC^<$3CoKu4cJK%-B!)Esg(Q_Kc@dlC8?JEydQ-S
zf@)bGC#x0xTCU^brnxNJv9T?iTD3~I+eIoxsZ=5e<~A>#w_D$sb8Xhyv*-7|)En`d
zlV7|u9}~j@{I*#k2XJCcqN_!Y<KWs3LMcXrKEZg5OcKtnld-%wRYLoD`ZZewiVpsy
z@R<GCH^NM%Cf#Km*T?r<9LK?STx{FT6L+R*W11F1Xu0Z4x>!g>9LE|PpbRX>#j;(L
zp`pKqX=$dQY2&y)hH;EM_#1nj_S%y^y%+-N0+U$1AOm-<5|ewq8xMK<n70UI&u6dQ
zV6u3eSd*o_H-8&@E%qEj&}*?Mj;U4aL{Uf(hLlU1;a4kHsFZz7EZXfh^=eH!f3t>x
z!O}vLdc8ucq2<g?%c4=Qu-Iy_yx5!^WAoPRTAIC4YhYRy%~o^n-!roaJnuMgk7phK
zM&WVX>z*hxg`D7WwObotSQ?yR8hK}1!!!{};khoh<9}kAM$V>^GC|4&AywKtAjJ%r
zX(I|lmku)&;CM8e-zMyhy)JugNWgZd!+1QRR&8Kf4l)t=z7EZ8%cfLzsnzNviD2ba
z3n3&6tvby{l~YR#EG{%yT5Ph^s$-`OYJ`+5G^>m=Jpt3gcU_L!9op?9-NrtS>38RA
z_RlzLaeomg9tY+<m~-!mHq$bVybF#@;)!gvLWk>_lPZu(_o$B(eNUJw1evDB|C>ez
z1e$cOHBDRR6!M;e8c0-B5PD-@pPjT);OgosjyHki`o52WNwZOBFdU+k#I_Vd=@#sl
zE}Z4e+6u1g>A(_`Fw~4fsWjdE^y(6x@8eh&wp(psJ2sdmgTV;b_o&sYShh{AaeUXF
z7c2rVa_-{KPizSg(j0)1cD>D<T`8%x@Y5;)86z-d44H<m40vfBHB1DiX=$>Lsh!+5
z(V74<$)gAiBfk$cPT-AwyOXrPBoaNd%-PeY(9PK)i4)GBU1Rywlj^@A4V*;)<}U=r
zYsVcSPLz`vz%_q<!wLAdn`=85mX0iilvr5o?C!8}ZUd<#{i6Yx;8%Q_NrF@o%h2St
zL<r8GT_cKPT*m<v^;(r?qfW1{QGQ_*&}uda;{eAg)9-g_)T%^DoNHCSg6;AwS72T=
zFy;6s_52TD>YnrhnJWP+gh(b0Kn(-aNc-GdX*0nYK5u^z#b7`fi?p9!+FUaY{Y#~C
znouNfVFhq%Y2l^*$d5ky=#O8=`SkyfcH)wNNkXUH!S_p4D-{gO;PREr3<f<s*JJJU
z3iVo*qr)Tol8<Q^EG{h&jK?4qVWj&^BtnqH0@t>Pq7ch8v22T0L+k(7YEAn6F11>N
z!B7K_)O>$3(3E}r@yCaAB7x`a?B5vYhrBO<gGj|Zm6Qmj+hHpyF-#MgrU6Vexd#Je
z;mxxQwCD$Bn)lZVLZk~p97PyFA|~uE(=h10pfN+i>Hj2s{-yQzve){C>i2zRcG7YH
z)oO(#j#G_4k2s7;ycnsJmihK=DwPtJb&B>;mui2#N*G488g+yO*VS@gN(iDP!FD}t
z+aSoAg(wrp@!8+sr`2i!igI;YffN7$18PY`K~$xz+ugr{F2%<me|$J27INal`<F2-
z2__|0>X?>gVPTOZx<jsIkVXdzW$NRCZuXJBfMt=$M0aN~owWRyH4!n>Mj@nSM4QoA
zV3{eCMwOX;^wCFuoJwsMclwOB`s2cV6z`jn?9Rs?_gY0+?=SnNeN*kElXt>S3<d}A
zBFlF3m(}|_>66jIRewdV^+vD%WSDK+7=}e0gor4{wseU(NfIiR3J1eO;y6Ys-N3cq
z?czHQj_2w!wG@;q6->*d)9FyHRInX`gWWx<)iSNtB7;F6Fc2!iwk%xN1;fx?iN1st
z9s8TC2n^{0AeC<95hqDX49a=|P85S($1L;+)LH&S2;DZ!vVRdG!89#A&m#;&;y9k@
z3mWOsAscJkM3Eo}!+E>Xi*~2y-8Xl^;92z>;LRdXu-AqJOp=6B$;YacF$|l7{R1}6
zpJqG^=yW<Xnhl~jAqYmewyh!P5?se64kLmnpj7e+f-$vfg(OL6HJ0%Ga@q`Jpp)83
z#M06dolXbOb$@yI=n<z*{qCyN-y~<BXSQJ&BvFXSx&SLM%t=S!3?~pvaI}axC>V5h
zSv$4JpuJ1AwSr;Ulu9MW<1v^vCEsH>4m6=CHOn+egd_^XqNKp9IDck8KIZ#ZxhK2!
ztyutOx*45_V}NZs*tS6u!+1QTQLmw-UKo-jq1)@?`+t6(D{x#Fkw^yp9_4CPSDR3H
zj)f55mp$S*q}T6b*%l?gL=*)WmcgLk$F*&ODB|qdvuKIiZ@1a~qa6mr@sv16rBq@#
zepaogST(KJYAm!GsQp7SO@YBgI)K^q-gq1`4nh`M_1Twwogc&>1OMr3{QY0MowP+j
zH|R8o!deK+)YRZcvxZQTIE*-TN>|+mgFb%QPmhscSkUix@SHMI2!xV=Nf<}?rc0yQ
v(DHOb;kusYs>FgM<pMa4LqQPhTWkLxC8{@(`;EPM00000NkvXXu0mjfcs(R0

diff --git a/maps/submaps/_readme.dm b/maps/submaps/_readme.dm
new file mode 100644
index 0000000000..1608dfe5b1
--- /dev/null
+++ b/maps/submaps/_readme.dm
@@ -0,0 +1,27 @@
+/*
+	This file will explain what a 'submap' is.  Basically, they are smallish maps which are loaded on top of
+the main map, using the dmm suite's map loading functionality.  Generally this will be done by the game
+automatically to sprinkle the play area with hidden buildings and treasure, baddies, or something along
+those lines.  Admins can also manually place these down where-ever and whenever they want, potentially
+loading it into a new Z-level, for events and such.
+
+	Submaps have two parts, the map .dmm file itself, and a /datum/map_template object which describes the map.
+Both should be included inside the correct places.  Submaps are divided based on where the game expects to place
+them, and the folder containing them also has their map template file.  The divisions are mainly based around
+thematic and location differences (e.g. space, caves, outdoors, asteroid, etc).
+
+	When a submap is loading, the game will 'lock' certain parts of itself, disallowing the loading of a second map until the first
+finishes.  When this is happening, atmospherics is also disabled, to prevent ZAS from displacing things and
+venting unfinished rooms.  There is some noticable lag if the loading takes awhile, but it remains playable
+and it doesn't lock up the came entirely.  Small submaps should load in less than a second, while loading, say, polaris3.dmm
+generally takes the server a minute or two, so try to not make your submap too large if possible.
+
+	You can use /area/template_noop and /turf/template_noop to act as 'void' areas/tiles, which won't be applied to the
+main map.
+
+	Map template datums can have the 'annihilate' var set to TRUE if you need to clear everything where the submap
+is being loaded (to clear trees, etc).  Be sure to not load the map on top of anything valuable to you when using that, like
+irreplacable objects or players, as they will all get deleted if annihilate is on.  If you load the submap before
+other objects have a chance to spawn (before random map gen), you shouldn't need to use annihilate.
+
+*/
\ No newline at end of file
diff --git a/maps/submaps/cave_submaps/cave.dm b/maps/submaps/cave_submaps/cave.dm
new file mode 100644
index 0000000000..cf063c85aa
--- /dev/null
+++ b/maps/submaps/cave_submaps/cave.dm
@@ -0,0 +1,5 @@
+/datum/map_template/cave
+	name = "Cave Content"
+	desc = "Don't dig too deep!"
+
+// To be added: Templates for cave exploration when they are made.
\ No newline at end of file
diff --git a/maps/submaps/space_submaps/space.dm b/maps/submaps/space_submaps/space.dm
new file mode 100644
index 0000000000..cfa45b6965
--- /dev/null
+++ b/maps/submaps/space_submaps/space.dm
@@ -0,0 +1,5 @@
+/datum/map_template/space
+	name = "Space Content"
+	desc = "A map template base.  In space."
+
+// To be added: Templates for space exploration when they are made.
\ No newline at end of file
diff --git a/maps/submaps/surface_submaps/forest.dm b/maps/submaps/surface_submaps/forest.dm
new file mode 100644
index 0000000000..dd02c1b204
--- /dev/null
+++ b/maps/submaps/surface_submaps/forest.dm
@@ -0,0 +1,5 @@
+/datum/map_template/surface
+	name = "Surface Content"
+	desc = "Used to make the surface by 17% less boring."
+
+// To be added: Templates for surface exploration when they are made.
\ No newline at end of file
diff --git a/polaris.dme b/polaris.dme
index c9e64f810f..60b1e67867 100644
--- a/polaris.dme
+++ b/polaris.dme
@@ -171,6 +171,7 @@
 #include "code\controllers\Processes\vote.dm"
 #include "code\controllers\ProcessScheduler\core\process.dm"
 #include "code\controllers\ProcessScheduler\core\processScheduler.dm"
+#include "code\controllers\subsystems\creation.dm"
 #include "code\controllers\subsystems\garbage.dm"
 #include "code\datums\ai_law_sets.dm"
 #include "code\datums\ai_laws.dm"
@@ -1136,6 +1137,7 @@
 #include "code\modules\admin\verbs\dice.dm"
 #include "code\modules\admin\verbs\getlogs.dm"
 #include "code\modules\admin\verbs\grief_fixers.dm"
+#include "code\modules\admin\verbs\map_template_loadverb.dm"
 #include "code\modules\admin\verbs\mapping.dm"
 #include "code\modules\admin\verbs\massmodvar.dm"
 #include "code\modules\admin\verbs\modifyvariables.dm"
@@ -1503,10 +1505,9 @@
 #include "code\modules\lore_codex\lore_data\orgs.dm"
 #include "code\modules\lore_codex\lore_data\political_parties.dm"
 #include "code\modules\lore_codex\lore_data\species.dm"
-#include "code\modules\maps\dmm_suite.dm"
-#include "code\modules\maps\reader.dm"
-#include "code\modules\maps\swapmaps.dm"
-#include "code\modules\maps\writer.dm"
+#include "code\modules\maps\tg\dmm_suite.dm"
+#include "code\modules\maps\tg\map_template.dm"
+#include "code\modules\maps\tg\reader.dm"
 #include "code\modules\materials\fifty_spawner_mats.dm"
 #include "code\modules\materials\material_recipes.dm"
 #include "code\modules\materials\material_sheets.dm"
@@ -2277,5 +2278,9 @@
 #include "interface\interface.dm"
 #include "interface\skin.dmf"
 #include "maps\northern_star\northern_star.dm"
+#include "maps\submaps\_readme.dm"
+#include "maps\submaps\cave_submaps\cave.dm"
+#include "maps\submaps\space_submaps\space.dm"
+#include "maps\submaps\surface_submaps\forest.dm"
 #include "maps\~map_system\maps.dm"
 // END_INCLUDE