[BedaZzle]

Добавление точек в начало каждой строки оригинала.

// Add dotted line. Made by Bedazzle.

program AddDottedLine;

// ---------------------------------------------

const 
 symboltoadd = '.';

var
 n: Integer;
 i: Integer;

 txt:  String;
begin
 n := GetSubtitleCount;

 for i := 0 to n-1 do
 begin
	txt := symboltoadd + ''#13''#10 + GetSubtitleText(i);
	SetSubtitleText(i, txt);
 end;
end.