feat: add STM32 four-channel weighing firmware
This commit is contained in:
@@ -0,0 +1,13 @@
|
||||
#!/usr/bin/env perl
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
my $project = shift @ARGV or die "usage: $0 Project.uvprojx\n";
|
||||
open my $fh, '<', $project or die "cannot open $project: $!\n";
|
||||
while (my $line = <$fh>) {
|
||||
next unless $line =~ m{<FilePath>\.\.\\(.+\.c)</FilePath>};
|
||||
my $path = $1;
|
||||
$path =~ s{\\}{/}g;
|
||||
print "../src/$path ";
|
||||
}
|
||||
close $fh;
|
||||
Reference in New Issue
Block a user