+- 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: Question about a packet.. (/showthread.php?tid=1414)
Question about a packet.. - jsventor - 22-11-2007
I'm making a custom job system, and its going good, I made 90% of the code fine, but I'm having problems thinking of a way to do this, Basically, When you join the game, if your level one, no experience, a picturebox pops up asking what job you want, nothing to serious, just a part of your title, Example, NAME: Xolor JOB: Blacksmith etc.. now, I'm going to have about 4 or five options on the picbox, when I choose one and hit OK it saves me as that, heres my server packet and my client one.. What I need help understanding and with is if I choose option 1 then the packet makes me Job #1 if I pick Option 2 then the packet makes me job #2 etc...
Client
Code:
Sub SendSetJob(ByVal Name As String, ByVal Job As Byte)
Dim Packet As String
Packet = "SETJOB" & SEP_CHAR & Name & SEP_CHAR & Job & SEP_CHAR & END_CHAR
Call SendData(Packet)
End SubServer in Handle data
[code] ' :::::::::::::::::::::::
' :: Set Race Job ::
' :::::::::::::::::::::::
If LCase(Parse(0)) = "setjob" Then
' The index
n = FindPlayer(Parse(1))
' The race
i = Val(Parse(2))
If i >= 0 Or i