06-11-2006, 01:05 PM
Ok I was asked to post this in a phone call by Shadow Dragon(poor guys grounded for 3months, he said me might sneak on every now and again), but he is confused by what you said earlier obsidian [qoute]look in handlekeypress (i think...) and it should have like if map.tile(x,y).type = tile_type_sign then
blah blah blah (basically where it displays the strings (1,2,3) when you hit enter, before that just do a
if MyText = vbnullstring then
sign code goes in here
end if[/qoute] The part that he is confused about is he thinks by the if MyText = that your talking about thisBut he thinks that you could also be talking about this or this anyway he would appreciate it if someone could help out.
blah blah blah (basically where it displays the strings (1,2,3) when you hit enter, before that just do a
if MyText = vbnullstring then
sign code goes in here
end if[/qoute] The part that he is confused about is he thinks by the if MyText = that your talking about this
Code:
' Editing sign request
If Mid(MyText, 1, 10) = "/editsign" Then
Call SendRequestEditSign
MyText = ""
Exit Sub
End If
End If
Code:
If frmMapEditor.optSign.Value = True Then
.Type = TILE_TYPE_SIGN
.Data1 = SignNum
.Data2 = 0
.Data3 = 0
End If
Code:
' Sign
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