+- Mirage Engine (https://mirage-engine.uk/forums)
+-- Forum: Mirage Source (Nostalgia) (https://mirage-engine.uk/forums/forumdisplay.php?fid=61)
+--- Forum: Archive (2006-2011) (https://mirage-engine.uk/forums/forumdisplay.php?fid=18)
+---- Forum: Resources (https://mirage-engine.uk/forums/forumdisplay.php?fid=49)
+---- Thread: something about the sign tut (/showthread.php?tid=403)
- Obsidian - 05-11-2006
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
- Misunderstood - 06-11-2006
Geee, lets think about this.
There is a problem when you press a /, so you trace it from the start, to where you think it ends. The start is the mouse_down, which goes to I think the handlekeypress, which in it has a bunch of ifs. One of those ifs contains a '/' and draws the sign. Look for that code.
If you don't want to think logically, you will have a hard time programing.
- DarkX - 06-11-2006
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 this
Code:
' Editing sign request
If Mid(MyText, 1, 10) = "/editsign" Then
Call SendRequestEditSign
MyText = ""
Exit Sub
End If
End IfCode:
If frmMapEditor.optSign.Value = True Then
.Type = TILE_TYPE_SIGN
.Data1 = SignNum
.Data2 = 0
.Data3 = 0
End IfCode:
' 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- Misunderstood - 06-11-2006
The last two snippets you posted seem irrelevant. The first deals with placing signs, the second deals with requesting the sign.
by:
Quote:brings up the thing and the thing for reading placed signs.Does he mean it brings up the sign editor, or the actual sign?
Saying the 'thing and the thing' isn't very helpful.
- DarkX - 06-11-2006
He installed this tut http://ms.shannaracorp.com/backup-forum ... asp?TID=56 And supposedly, haven't seen it myself, but he says "It brings up the picSign part, every time you type /w-e's desired" he confused me to.