// scaleoutput.psc
// script to send chars to scale
while true do
begin
  wait(100);
  output(#13+#10);
end;