aboutsummaryrefslogtreecommitdiffstats
path: root/dvb-t/uk-Ferryside
blob: 20315640cf3ea03997ba9bf7f44b287b7a3c70aa (plain) 
1
2
3
4
5
6
7
8

# UK, Ferryside
# Auto-generated from http://www.dtg.org.uk/retailer/dtt_channels.html
# and http://www.ofcom.org.uk/static/reception_advice/index.asp.html
# T freq bw fec_hi fec_lo mod transmission-mode guard-interval hierarchy
T 474167000 8MHz 3/4 NONE QAM16 2k 1/32 NONE
T 545833000 8MHz 2/3 NONE QAM64 2k 1/32 NONE
T 498000000 8MHz 2/3 NONE QAM64 2k 1/32 NONE
T 522000000 8MHz 3/4 NONE QAM16 2k 1/32 NONE
generated by cgit v1.2.3 (git 2.39.1) at 2025-05-15 05:33:51 +0000
ss="ch">#!/usr/bin/perl use strict; use vars qw ($file $DELAY); ########## CONFIG $file = "lcd4linux"; # .png is appended $DELAY = 0; # delay in seconds # if delay is zero, file is sent when modified. ################# use CGI qw/:push -nph/; $| = 1; my ($mtime, $nmtime, $size, $nsize); (undef, undef, undef, undef, undef, undef, undef, $size, undef, $mtime) = stat "$file.png"; print multipart_init(-boundary=>'----------------here we go!'); while (1) { print multipart_start(-type=>'image/png'); undef $/; open(IN, "$file.png") or die("Can't read '$file.png'"); $_ = <IN>; print $_; close(IN); print multipart_end; if ($DELAY) { sleep $DELAY; } else { W: while (1) { # sleep(1); (undef, undef, undef, undef, undef, undef, undef, $nsize, undef, $nmtime) = stat "$file.png"; if($mtime != $nmtime || $size != $nsize) { $mtime = $nmtime; $size = $nsize; last W; } } } }
generated by cgit v1.2.3 (git 2.39.1) at 2025-05-15 05:33:49 +0000