export ExtraStrings;

export function ShowTimer;
var AllStrings;
begin
  AllStrings:= ['#Multi1x1-Time', tick];
  if (ExtraStrings) then AllStrings:= AllStrings ^ '' ^ ExtraStrings;
  Display_Strings:= AllStrings;
end;

every 0$1 do
begin
  ShowTimer;
  Enable;
end;