Na frmServer em algum lugar no console crie uma ListBox, e renomeie com "MapList" sem aspas.

Procure na modGeneral por:

Código:

If Not FileExist("data\accounts\charlist.txt") Then
        F = FreeFile
        Open App.Path & "\data\accounts\charlist.txt" For Output As #F
        Close #F
    End If


Embaixo do End if adicione:

Código:

frmServer.MapList.Clear
    For i = 1 To MAX_MAPS
        frmServer.MapList.AddItem i & ": " & Map(i).Name
    Next

Bem simples porem util, na EO não tem como "padrão" esse sistema, e para quem é acostumado com a elysium já se encontra esse sistema na engine...