About signs....

[genusis]

ok see this part

Code:

Dim SignPacket As String
        If Map.Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex)).Type = TILE_TYPE_SIGN Then
              SignNum = Map.Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex)).Data1
              SignPacket = "requestsign" & SEP_CHAR & SignNum & SEP_CHAR & END_CHAR
              Call SendData(SignPacket)
       End If

that is what calls the sign it is not set right to call the sign so you will get no sign. here is how to make it appear on click enter.

Code:

If KeyCode = vbKeyReturn Then
        If Map.Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex)).Type = TILE_TYPE_SIGN Then
              SignNum = Map.Tile(GetPlayerX(MyIndex), GetPlayerY(MyIndex)).Data1
              SignPacket = "requestsign" & SEP_CHAR & SignNum & SEP_CHAR & END_CHAR
              Call SendData(SignPacket)
       End If
    End If

just make sure you add

Code:

Dim SignPacket As String

after the sub name ^^ liek for instance sub Form_keyUp