From 78b22dc724c726a4372e8216ad008841d21e4db4 Mon Sep 17 00:00:00 2001 From: "Bradley M. Kuhn" Date: Sun, 25 Aug 2013 16:34:57 -0400 Subject: [PATCH] Output extended forecast. --- conky-mythtv-weather-build.plx | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/conky-mythtv-weather-build.plx b/conky-mythtv-weather-build.plx index 54f8570..c78dc2c 100755 --- a/conky-mythtv-weather-build.plx +++ b/conky-mythtv-weather-build.plx @@ -70,11 +70,13 @@ my $x = Delta_Format(DateCalc(ParseDate($data{forecast}{updatetime}), $now), 0, $data{forecast}{updatetime} = $x if defined $x; $data{forecast}{updatetime} = "as of $data{forecast}{updatetime}"; +my %doneDays; foreach my $ii (qw/0 1 2 3 4 5/) { my $time = ParseDate($data{forecast}{"time-${ii}"}); if (defined $time) { $time = DateCalc($time, "+ 1 day") if ($time lt $now); $data{forecast}{"time-${ii}"} = UnixDate($time, $HOUR_FORMAT); + $doneDays{UnixDate($time, '%A')} = 'forecast'; } } my($xpos, $vpos) = ($FONT_SIZE * (3 + length($data{forecast}{"time-0"})), @@ -91,6 +93,16 @@ foreach my $ii (qw/0 1 2 3 4 5/) { print "\${font :size=${FONT_SIZE}px} $time: $temp $degree \${image $mythIconPath/$icon -p $xpos,$vpos -s 25x18} $pop chance\n\n"; $vpos += ($FONT_SIZE * 2) + 15; } +($xpos, $vpos) = ($FONT_SIZE * 26, + $VOFFSET_IMAGE + 37 + 230); +foreach my $ii (qw/0 1 2 3 4 5/) { + next if defined $doneDays{$data{extended}{"date-${ii}"}}; + my($day, $high, $low, $icon) = + ($data{extended}{"date-${ii}"}, $data{extended}{"high-${ii}"}, + $data{extended}{"low-${ii}"}, $data{extended}{"icon-${ii}"}); + print "\${font :size=${FONT_SIZE}px} $day:\${goto 120}High: $high $degree Low: $low $degree \${image $mythIconPath/$icon -p $xpos,$vpos -s 25x18}\n\n"; + $vpos += ($FONT_SIZE * 2) + 15; +} ############################################################################### #