52             HatVisibility: GLfloat;

    52             HatVisibility: GLfloat;

    53             stats: TStatistics;

    53             stats: TStatistics;

    54             Hat: shortstring;

    54             Hat: shortstring;

    55             King: boolean;  // Flag for a bunch of hedgehog attributes

    55             King: boolean;  // Flag for a bunch of hedgehog attributes

    56             Unplaced: boolean;  // Flag for hog placing mode

    56             Unplaced: boolean;  // Flag for hog placing mode

    57             end;

    58             end;

    58 

    59 

    59     TTeam = record

    60     TTeam = record

    60             Clan: PClan;

    61             Clan: PClan;

    61             TeamName: string[MAXNAMELEN];

    62             TeamName: string[MAXNAMELEN];