From: ian Date: Sat, 26 Apr 2008 13:52:32 +0000 (+0000) Subject: make inter-letter morse gap be real short gap (3 units) X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=ba8ff802675ea44ebff8769c11435199b1d675a9;p=trains.git make inter-letter morse gap be real short gap (3 units) --- diff --git a/cebpic/morse-generator b/cebpic/morse-generator index 590f5e4..335d892 100755 --- a/cebpic/morse-generator +++ b/cebpic/morse-generator @@ -120,7 +120,7 @@ while (<>) { @data= (); - $morse= join '00000', map { $morse{$_} } @morse; + $morse= join '000', map { $morse{$_} } @morse; $morse .= '0' x 7; # padding to fill any partial byte while ($morse =~ s/^([01]{8})//) { push @data, "$&b";