Feature-Rich Version

[Labmonkey]

Found a small bug in drawing player names.

find

Code:

' draw player names
        For i = 1 To PlayersOnMapHighIndex
            If CurX = MapNpc(i).X Then
                If CurY = MapNpc(i).Y Then
                    Call DrawPlayerName(PlayersOnMap(i))
                End If
            End If
        Next

replace with

Code:

' draw player names
        For i = 1 To PlayersOnMapHighIndex
            If CurX = Player(i).X Then
                If CurY = Player(i).Y Then
                    Call DrawPlayerName(PlayersOnMap(i))
                End If
            End If
        Next

I will do a update of the version in a little bit with some more features.


Also, nean and I and maybe a few others are gana make a little game on the test server. If you wana help out, or just play it, remember the ip is 98.109.137.143