Basically the same way, except use two dimensions...

Assuming Map is an integer array:

Bytes = 41 *101 *2 'number of elements times two (including zero elements)
DEF SEG = VARSEG(Map(0, 0))
BSAVE "Maparray.BSV", VARPTR(Map(0, 0)), Bytes
DEF SEG

...and to BLOAD it again, just use:

DEF SEG = VARSEG(Map(0, 0))
BLOAD "Maparray.BSV", VARPTR(Map(0, 0))
DEF SEG

-Bob