Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Respawn class ?
#10
Well I just did something really easy...

Code:
Public Function START_MAP(ByVal Index As Long) As Long

    START_MAP = Class(Player(Index).Char(Player(Index).CharNum).Class).Map

End Function

Public Function START_X(ByVal Index As Long) As Long

    START_X = Class(Player(Index).Char(Player(Index).CharNum).Class).x
    
End Function

Public Function START_Y(ByVal Index As Long) As Long

    START_Y = Class(Player(Index).Char(Player(Index).CharNum).Class).y

End Function

Simply add this under Type ClassRec:

Code:
Map As Long
    x As Integer
    y As Integer

And then you just need to go to where the classes are loaded and copy what everything else does and change it to Map and X and Y and so on...pretty simple.

Also you need to change all START_MAP / X / Y's to have (index) after them.
Reply


Messages In This Thread

Forum Jump:


Users browsing this thread: 1 Guest(s)