+- Mirage Source (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: General (https://mirage-engine.uk/forums/forumdisplay.php?fid=17)
+---- Thread: About signs.... (/showthread.php?tid=2358)
About signs.... - Avarit - 08-11-2008
I followed the tutorial in the archive for adding signs,
Everything compiled with no errors. I can add the sign attribute and even edit the signs...
The only thing not working is when I walk on the sign and press enter nothing happens... :?
Also I would like to know how I would go about making it so I don't have to walk on the signs to read them.
Thanks
Re: About signs.... - William - 08-11-2008
What source are you using?
Url to the tutorial?
Re: About signs.... - Avarit - 08-11-2008
Umm the tutorial was ....http://web.miragesource.com/old-tutorials/approved_tutorials/Signs.html
And Im using a source that I got from Robin (winds whisper source)...
Re: About signs.... - genusis - 09-11-2008
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 Ifthat 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 Ifjust make sure you add
Code:
Dim SignPacket As String