12-06-2008, 04:22 AM
Well I just did something really easy...
Simply add this under Type ClassRec:
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.
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 FunctionSimply add this under Type ClassRec:
Code:
Map As Long
x As Integer
y As IntegerAnd 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.
