1
0
mirror of git://projects.qi-hardware.com/ben-blinkenlights.git synced 2024-07-01 02:37:18 +03:00

ubb-patgen/table/: generate a PNG with a table of MMC bus clock frequencies

This commit is contained in:
Werner Almesberger 2013-01-15 16:14:48 -03:00
parent 1aedd4b57b
commit 3c9443294d
2 changed files with 182 additions and 0 deletions

142
ubb-patgen/table/FREQ Normal file
View File

@ -0,0 +1,142 @@
41015.625000
42338.709677
43750.000000
45258.620690
46875.000000
48611.111111
50480.769231
52500.000000
54687.500000
57065.217391
59659.090909
62500.000000
65625.000000
69078.947368
72916.666667
77205.882353
82031.250000
84677.419355
87500.000000
90517.241379
93750.000000
97222.222222
100961.538462
105000.000000
109375.000000
114130.434783
119318.181818
125000.000000
131250.000000
138157.894737
145833.333333
154411.764706
164062.500000
169354.838710
175000.000000
181034.482759
187500.000000
194444.444444
201923.076923
210000.000000
218750.000000
228260.869565
238636.363636
250000.000000
262500.000000
276315.789474
291666.666667
308823.529412
328125.000000
338709.677419
350000.000000
362068.965517
375000.000000
388888.888889
403846.153846
420000.000000
437500.000000
456521.739130
477272.727273
500000.000000
525000.000000
552631.578947
583333.333333
617647.058824
656250.000000
677419.354839
700000.000000
724137.931034
750000.000000
777777.777778
807692.307692
840000.000000
875000.000000
913043.478261
954545.454545
1000000.000000
1050000.000000
1105263.157895
1166666.666667
1235294.117647
1312500.000000
1354838.709677
1400000.000000
1448275.862069
1500000.000000
1555555.555556
1615384.615385
1680000.000000
1750000.000000
1826086.956522
1909090.909091
2000000.000000
2100000.000000
2210526.315789
2333333.333333
2470588.235294
2625000.000000
2709677.419355
2800000.000000
2896551.724138
3000000.000000
3111111.111111
3230769.230769
3360000.000000
3500000.000000
3652173.913043
3818181.818182
4000000.000000
4200000.000000
4421052.631579
4666666.666667
4941176.470588
5250000.000000
5419354.838710
5600000.000000
5793103.448276
6000000.000000
6222222.222222
6461538.461538
6720000.000000
7000000.000000
7304347.826087
7636363.636364
8000000.000000
8400000.000000
8842105.263158
9333333.333333
9882352.941176
10500000.000000
11200000.000000
12000000.000000
12923076.923077
14000000.000000
15272727.272727
16800000.000000
18666666.666667
21000000.000000
24000000.000000
28000000.000000
33600000.000000
42000000.000000
56000000.000000

40
ubb-patgen/table/mktab Executable file
View File

@ -0,0 +1,40 @@
#!/usr/bin/perl
while (<>) {
chop;
push @a, $_;
}
#print "set term x11 size 500, 1000\n";
print "set term png lw 2 font \"Sans, 8\" size 500, 1000\n";
#print "set size 0.5, 1\n";
print "set logscale y\n";
print "set xrange [-0.5:4]\n";
print "set yrange [0.95:11]\n";
print "set ytics (1, 2, 3, 4, 5, 6, 7, 8, 9, 10)\n";
print "unset xtics\n";
print "set title \"BEN NANONOTE MMC BUS CLOCK SPEEDS\"".
" font \"Helvetica, 10\"\n";
$x = 0;
for $b (10000, 100000, 1000000, 10000000) {
print "set arrow from $x, 1 to $x, 10 nohead\n";
if ($b >= 1e6) {
$si = "M";
$div = 1e6;
} elsif ($b >= 1e3) {
$si = "k";
$div = 1e3;
} else {
$si = "";
$div = 1;
}
print "set label \"${si}Hz\" at $x, 10.6 center\n";
print "set arrow from $x-0.2, 10.3 to $x+0.2, 10.3 nohead\n";
for (@a) {
next if $_ < $b || $_ >= $b*10;
$y = $_/$b;
print "set arrow from $x-0.1, $y to $x+0.1, $y nohead\n";
print "set label \"".sprintf("%g", $_/$div).
"\" at $x+0.2, $y\n";
}
$x++;
}
print "plot 0 notitle\n";