Seamless Scrolling Maps & Paperdolling.

[Matt]

Put this:

Code:

ReDim SMaps(7)
    
    ReDim BlankMap.Tile(0 To MAX_MAPX, 0 To MAX_MAPY)

In:

Code:

Sub LoadSurroundingMaps

Also add:

Code:

ReDim SMaps(7)

For a = 0 To 7
ReDim SMaps(a).Tile(0 To MAX_MAPX, 0 To MAX_MAPY)
Next a
ReDim Map.Tile(0 To MAX_MAPX, 0 To MAX_MAPY)

In:

Code:

Sub Main

That should be all you need. Test it and let me know.