Source position: crt.pp line 30
type TCharAttr = packed record
ch: Char;
Character code
attr: Byte;
Attributes
end;