DD2-monitor/core/mklut.pl

10 lines
113 B
Perl
Raw Normal View History

2019-01-14 03:20:54 +01:00
#!/usr/bin/perl
my $foo;
print "LUT1024F\n";
for ($foo=0; $foo<1024; $foo++) {
print rand()*3.30, "\n";
}
0;