1::proc ::preload_maps {} {
2	set start [clock seconds]
3	#set t0 [clock clicks -milliseconds]
4	set maps [lsort [smm::map::get maps]]
5	foreach map $maps {
6		#smm::showme "[lindex $map 0]\n"
7		#_sleep [::expr ([clock clicks -milliseconds] - $t0) / 10]
8		#set t0 [clock clicks -milliseconds]
9		smm::map::exists room [lindex $map 0] [lindex $map 1] 0 0}
10	smm::showme "scanned [llength $maps] maps in [expr [clock seconds] - $start] seconds\n"}
11