type Player = record
    login: string[30];
    password: string[30];
    type: byte;
    level: byte;
end;