📄 mkbitmap16
字号:
#!/usr/bin/perl@lines = <>;shift @lines;shift @lines;shift @lines;$rcycle = 0;$wcycle = 0;$wstr = '';foreach $line (@lines) { $line =~ s/[ ,]//g; while ($line =~ /^0x(..)/) { $line = substr($line, 4); $wstr = $1 . $wstr; if ((++$rcycle) == 2) { ++$wcycle; if ($wcycle == 1) { print "\t"; } print "0x$wstr, "; $wstr = ''; if ($wcycle == 8) { print "\\\n"; $wcycle = 0; } $rcycle = 0; } }}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -