for my $t (@timings) {
my $out = "<$bit:$t>";
if ($bit) {
- if ($t >= 8900 && $t <= 9100) {
+ if ($t >= 8900 && $t <= 9200) {
$out = "^";
} elsif ($t >= 100 && $t <= 700) {
$out = "*";
$out = "#";
} elsif ($t >= 400 && $t <= 1000) {
$out = "A";
- } elsif ($t >= 1600 && $t <= 2200) {
+ } elsif ($t >= 1500 && $t <= 2200) {
$out = "B";
}
}