--- emp4/src/lib/common/maps.c	Fri Oct  6 20:19:51 2000
+++ emp4/src/lib/common/maps.c	Sat May 25 18:47:44 2002
@@ -252,6 +252,25 @@
 			wmap[y][x] = (*lchr[(int)land.lnd_type].l_name) & ~0x20;
 		}
     }
+    if (map_flags & MAP_HIGH){
+		register s_char *ptr;
+		struct	sctstr sect;
+
+		snxtsct_rewind(nsp);
+		if ((!player->god || country)) {
+			bzero((s_char *)bitmap, (WORLD_X * WORLD_Y) / 8);
+			bitinit2(nsp, bitmap, country);
+		}
+		while (nxtsct(nsp, &sect) && !player->aborted) {
+			if ((!player->god || country) && !emp_getbit(nsp->x, nsp->y, bitmap)) {
+				if (!player->god)
+					continue;
+			}
+			ptr = &wmap[nsp->dy][nsp->dx];
+			if (sect.sct_own == player->cnum)
+				*ptr |= 0x80;
+		}
+    }
     if (origin)
 		wmap[5][10] = origin & ~0x20;
     for (y=nsp->range.ly, i=0; i < nsp->range.height; y++, i++) {
--- emp4/src/lib/commands/map.c	Sat Mar 11 05:36:42 2000
+++ emp4/src/lib/commands/map.c	Sat May 25 17:36:20 2002
@@ -112,6 +112,8 @@
 			case 'L':	map_flags |= MAP_LAND; break;
 			case 'p':
 			case 'P':	map_flags |= MAP_PLANE; break;
+			case 'H':
+			case 'h':	map_flags |= MAP_HIGH; break;
 			case '*':	map_flags |= MAP_ALL; 	break;
 			case '0':
 			case '1':
--- emp4/include/map.h	Sat Mar 11 05:14:55 2000
+++ emp4/include/map.h	Sat May 25 17:35:38 2002
@@ -52,6 +52,7 @@
 #define MAP_SHIP	bit(0)
 #define MAP_LAND	bit(1)
 #define MAP_PLANE	bit(2)
+#define MAP_HIGH	bit(3)
 #define MAP_ALL		MAP_SHIP | MAP_LAND | MAP_PLANE
 
 struct	mapstr {
--- emp4/info.nr/map	Mon Aug 13 22:24:39 2001
+++ emp4/info.nr/map	Sat May 25 22:02:37 2002
@@ -66,7 +66,10 @@
 MAP FLAGS
 
 If you give an 's' flag, all your ships will be shown on the map.  An 'l' flag
-does the same for land units, and a 'p' for planes.
+does the same for land units, and a 'p' for planes. '*' shows all in this
+order: land units, ships, planes.
+
+To highlight sectors owned by yourself, use the 'h' flag.
 
 SEE ALSO
    census, commodity, radar, realm, route, update, Maps