Binary Accounts... The Easy Way

[Obsidian]

Yeah, for those of you wondering what dave was talking about... you can (in the Save/Load subs) simply just add this to it

on the save player add this...

Code:

dim i as byte ' assuming you don't allow them to have more than 255 characters

then change the Put #f, , Player(index) to this...

Code:

Put #f, , Trim$(Player(Index).Name)
Put #f, , Trim$(Player(Index).Password)
For i = 1 to max_chars
    Put #f, , Player(index).Char(i)
next i

Do the same thing for the Load Sub, but use the Get Function, not put. Fairly simple, and it'll save you an extra like... 10-30 bytes per account... not a huge deal... but if you know dave.... every byte counts.