Greetings Lawrence,
-=[ Quoting Lawrence Gordon to Tom Phillips ]=-
:L: Quoting Tom Phillips to All:
TP>> BTW - Thanks to those that helped me with the LORD IGM structs..Got it
TP>> working and just waiting for Seth Able's seal of approval before
TP>> releasing it :-)
:L: Will you please post the LORD IGM structs here, Tom?  Thanks.
OK.. These are the adjustments for BASIC from the Pascal structs ...
    TYPE PlayerDat
        Handle AS STRING * 21
        RealName AS STRING * 51
        HitPoints AS INTEGER
        Bad AS INTEGER
        Rate AS INTEGER
        HitMax AS INTEGER
        WeaponNum AS INTEGER
        Weapon AS STRING * 21
        SeenMaster AS INTEGER
        FightsLeft AS INTEGER
        HumanLeft  AS INTEGER
        Gold AS LONG
        Bank AS LONG
        Defense AS INTEGER
        Strength AS INTEGER
        Charm AS INTEGER
        SeenDragon AS INTEGER
        SeenViolet AS INTEGER
        Level AS INTEGER
        Time AS INTEGER
        Arm AS STRING * 19
        ArmNum AS INTEGER
        Dead AS INTEGER
        Inn AS INTEGER
        Gem AS INTEGER
        Experience AS LONG
        Sex AS INTEGER
        SeenBard AS INTEGER
        LastAlive AS INTEGER
        Lays AS INTEGER
        Why AS INTEGER
        OnNow AS INTEGER
        Mtime AS INTEGER
        TimeOn AS STRING * 5
        Class AS INTEGER
        Horse AS INTEGER
        Love AS STRING * 11       'From here down is untested ....
        Married AS INTEGER        'but I had enough above this point ...
        Kids AS INTEGER           'and the RecordLength works out :)
        King AS INTEGER
        SkillW AS INTEGER
        SkillM AS INTEGER
        SkillT AS INTEGER
        LevelW AS INTEGER
        LevelM AS INTEGER
        LevelT AS INTEGER
        InnRandom AS INTEGER
        MarriedTo AS INTEGER
        V1 AS LONG
        V2 AS INTEGER
        V3 AS INTEGER
        V4 AS INTEGER
        V5 AS INTEGER
        NewStat1 AS INTEGER
        NewStat2 AS INTEGER
        NewStat3 AS INTEGER
    END TYPE
DIM PlyRec AS PlayerDat
You may need the following later on if you plan on rewritting a string to 
Player.Dat : Because the first character of a STRING Type in the Player.Dat 
is the ascii char num that defines the string length .. sorta :-)
N = ASC(A$)             ' Gives you the length of the string
New$ = MID$(A$, 2, N)   ' Read the string after the pointer char
L = LEN(New$)           ' This is the new length (for later writes)
P$ = CHR$(L)            ' This is the char for the pointer
NewDat$ = P$ + New$     ' This is what would go back into Player.Dat
'INTEGER and LONG Type records need no such adjustments...only STRING Type..
... Tom Phillips
Internet: T.Phillips@phil.node99.com
--- -=[RA 2.02/pro]=-
---------------