Simba Code:
function getchat(const line:integer):string;
var
texttpas, textatpa:t2dpointarray;
texttpa:tpointarray;
textcolors:tintegerarray;
i:integer;
begin
textcolors := [128, 16711680, 0, 255, 16711935, 16776960, 16777215, 8388736];
setLength(texttpas, length(textcolors));
for i := 0 to high(textcolors) do
findColors(texttpas[i], textcolors[i], 7, 402 + (line * 14), 495, 413 + (line * 14));
texttpa := mergeAtpa(texttpas);
textatpa := splittpaex(texttpa, 1, 10);
SortATPAFromFirstPointX(textatpa, Point(0, 0));
result := getTextATPA(textatpa, 3, 'smallchars07');
end;