naomi/dots
1
0
Fork 0
mirror of https://github.com/NaomiAmethyst/dots.git synced 2025-08-05 16:48:38 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Merge branch 'master' of gitosis@majnematic.com:davesdots

Browse source
This commit is contained in:
David Alexander Majnemer 2008-12-20 02:11:41 -06:00
commit 0c1ced50b7
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
colortest.pl
View file

@ -19,7 +19,7 @@ for my $num (16 .. 231) {
# Gray scale # Gray scale
for my $num (232 .. 255) { for my $num (232 .. 255) {
my $hex = sprintf '%02x', 0x08 + 0x0a * ($num - $GRAY_BASE); my $hex = sprintf '%02x', 0x08 + 0x0a * ($num - 232);
push @arr, join '/', ($hex) x 3; push @arr, join '/', ($hex) x 3;
} }
@ -27,8 +27,8 @@ print "This is your standard text color.\n";
my $width = 6; my $width = 6;
for my $num (0 .. $#arr) { for my $num (0 .. $#arr) {
print '[38;5;', $num, 'm'; print '[38;5;', $num, 'm';
printf '%02x: ', $num; printf '%03d: ', $num;
print "$arr[$num]  "; print "$arr[$num] ";
print "\n" if ($num + 1) % $width == 0; print "\n" if ($num + 1) % $width == 0;
} }
print "\n"; print "\n";