-
Notifications
You must be signed in to change notification settings - Fork 3
Expand file tree
/
Copy pathcolortest
More file actions
executable file
·72 lines (68 loc) · 9.44 KB
/
colortest
File metadata and controls
executable file
·72 lines (68 loc) · 9.44 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
#!/usr/bin/perl
# Prints out an entire color palette of terminal color codes.
if($ARGV[0] eq "-h" or $ARGV[0] eq "--help")
{
print STDERR "usage: colortest\n\nPrints out table of terminal color codes.\n";
exit 1;
}
push(@arr, [( "[38;5;16m 16: [38;5;16m", "[38;5;17m 17: [38;5;17m", "[38;5;18m 18: [38;5;18m", "[38;5;19m 19: [38;5;19m", "[38;5;20m 20: [38;5;20m", "[38;5;21m 21: [38;5;21m")] );
push(@arr, [( "[38;5;22m 22: [38;5;22m", "[38;5;23m 23: [38;5;23m", "[38;5;24m 24: [38;5;24m", "[38;5;25m 25: [38;5;25m", "[38;5;26m 26: [38;5;26m", "[38;5;27m 27: [38;5;27m")] );
push(@arr, [( "[38;5;28m 28: [38;5;28m", "[38;5;29m 29: [38;5;29m", "[38;5;30m 30: [38;5;30m", "[38;5;31m 31: [38;5;31m", "[38;5;32m 32: [38;5;32m", "[38;5;33m 33: [38;5;33m")] );
push(@arr, [( "[38;5;34m 34: [38;5;34m", "[38;5;35m 35: [38;5;35m", "[38;5;36m 36: [38;5;36m", "[38;5;37m 37: [38;5;37m", "[38;5;38m 38: [38;5;38m", "[38;5;39m 39: [38;5;39m")] );
push(@arr, [( "[38;5;40m 40: [38;5;40m", "[38;5;41m 41: [38;5;41m", "[38;5;42m 42: [38;5;42m", "[38;5;43m 43: [38;5;43m", "[38;5;44m 44: [38;5;44m", "[38;5;45m 45: [38;5;45m")] );
push(@arr, [( "[38;5;46m 46: [38;5;46m", "[38;5;47m 47: [38;5;47m", "[38;5;48m 48: [38;5;48m", "[38;5;49m 49: [38;5;49m", "[38;5;50m 50: [38;5;50m", "[38;5;51m 51: [38;5;51m")] );
push(@arr, [( "[38;5;52m 52: [38;5;52m", "[38;5;53m 53: [38;5;53m", "[38;5;54m 54: [38;5;54m", "[38;5;55m 55: [38;5;55m", "[38;5;56m 56: [38;5;56m", "[38;5;57m 57: [38;5;57m")] );
push(@arr, [( "[38;5;58m 58: [38;5;58m", "[38;5;59m 59: [38;5;59m", "[38;5;60m 60: [38;5;60m", "[38;5;61m 61: [38;5;61m", "[38;5;62m 62: [38;5;62m", "[38;5;63m 63: [38;5;63m")] );
push(@arr, [( "[38;5;64m 64: [38;5;64m", "[38;5;65m 65: [38;5;65m", "[38;5;66m 66: [38;5;66m", "[38;5;67m 67: [38;5;67m", "[38;5;68m 68: [38;5;68m", "[38;5;69m 69: [38;5;69m")] );
push(@arr, [( "[38;5;70m 70: [38;5;70m", "[38;5;71m 71: [38;5;71m", "[38;5;72m 72: [38;5;72m", "[38;5;73m 73: [38;5;73m", "[38;5;74m 74: [38;5;74m", "[38;5;75m 75: [38;5;75m")] );
push(@arr, [( "[38;5;76m 76: [38;5;76m", "[38;5;77m 77: [38;5;77m", "[38;5;78m 78: [38;5;78m", "[38;5;79m 79: [38;5;79m", "[38;5;80m 80: [38;5;80m", "[38;5;81m 81: [38;5;81m")] );
push(@arr, [( "[38;5;82m 82: [38;5;82m", "[38;5;83m 83: [38;5;83m", "[38;5;84m 84: [38;5;84m", "[38;5;85m 85: [38;5;85m", "[38;5;86m 86: [38;5;86m", "[38;5;87m 87: [38;5;87m")] );
push(@arr, [( "[38;5;88m 88: [38;5;88m", "[38;5;89m 89: [38;5;89m", "[38;5;90m 90: [38;5;90m", "[38;5;91m 91: [38;5;91m", "[38;5;92m 92: [38;5;92m", "[38;5;93m 93: [38;5;93m")] );
push(@arr, [( "[38;5;94m 94: [38;5;94m", "[38;5;95m 95: [38;5;95m", "[38;5;96m 96: [38;5;96m", "[38;5;97m 97: [38;5;97m", "[38;5;98m 98: [38;5;98m", "[38;5;99m 99: [38;5;99m")] );
push(@arr, [( "[38;5;100m 100: [38;5;100m", "[38;5;101m 101: [38;5;101m", "[38;5;102m 102: [38;5;102m", "[38;5;103m 103: [38;5;103m", "[38;5;104m 104: [38;5;104m", "[38;5;105m 105: [38;5;105m")] );
push(@arr, [( "[38;5;106m 106: [38;5;106m", "[38;5;107m 107: [38;5;107m", "[38;5;108m 108: [38;5;108m", "[38;5;109m 109: [38;5;109m", "[38;5;110m 110: [38;5;110m", "[38;5;111m 111: [38;5;111m")] );
push(@arr, [( "[38;5;112m 112: [38;5;112m", "[38;5;113m 113: [38;5;113m", "[38;5;114m 114: [38;5;114m", "[38;5;115m 115: [38;5;115m", "[38;5;116m 116: [38;5;116m", "[38;5;117m 117: [38;5;117m")] );
push(@arr, [( "[38;5;118m 118: [38;5;118m", "[38;5;119m 119: [38;5;119m", "[38;5;120m 120: [38;5;120m", "[38;5;121m 121: [38;5;121m", "[38;5;122m 122: [38;5;122m", "[38;5;123m 123: [38;5;123m")] );
push(@arr, [( "[38;5;124m 124: [38;5;124m", "[38;5;125m 125: [38;5;125m", "[38;5;126m 126: [38;5;126m", "[38;5;127m 127: [38;5;127m", "[38;5;128m 128: [38;5;128m", "[38;5;129m 129: [38;5;129m")] );
push(@arr, [( "[38;5;130m 130: [38;5;130m", "[38;5;131m 131: [38;5;131m", "[38;5;132m 132: [38;5;132m", "[38;5;133m 133: [38;5;133m", "[38;5;134m 134: [38;5;134m", "[38;5;135m 135: [38;5;135m")] );
push(@arr, [( "[38;5;136m 136: [38;5;136m", "[38;5;137m 137: [38;5;137m", "[38;5;138m 138: [38;5;138m", "[38;5;139m 139: [38;5;139m", "[38;5;140m 140: [38;5;140m", "[38;5;141m 141: [38;5;141m")] );
push(@arr, [( "[38;5;142m 142: [38;5;142m", "[38;5;143m 143: [38;5;143m", "[38;5;144m 144: [38;5;144m", "[38;5;145m 145: [38;5;145m", "[38;5;146m 146: [38;5;146m", "[38;5;147m 147: [38;5;147m")] );
push(@arr, [( "[38;5;148m 148: [38;5;148m", "[38;5;149m 149: [38;5;149m", "[38;5;150m 150: [38;5;150m", "[38;5;151m 151: [38;5;151m", "[38;5;152m 152: [38;5;152m", "[38;5;153m 153: [38;5;153m")] );
push(@arr, [( "[38;5;154m 154: [38;5;154m", "[38;5;155m 155: [38;5;155m", "[38;5;156m 156: [38;5;156m", "[38;5;157m 157: [38;5;157m", "[38;5;158m 158: [38;5;158m", "[38;5;159m 159: [38;5;159m")] );
push(@arr, [( "[38;5;160m 160: [38;5;160m", "[38;5;161m 161: [38;5;161m", "[38;5;162m 162: [38;5;162m", "[38;5;163m 163: [38;5;163m", "[38;5;164m 164: [38;5;164m", "[38;5;165m 165: [38;5;165m")] );
push(@arr, [( "[38;5;166m 166: [38;5;166m", "[38;5;167m 167: [38;5;167m", "[38;5;168m 168: [38;5;168m", "[38;5;169m 169: [38;5;169m", "[38;5;170m 170: [38;5;170m", "[38;5;171m 171: [38;5;171m")] );
push(@arr, [( "[38;5;172m 172: [38;5;172m", "[38;5;173m 173: [38;5;173m", "[38;5;174m 174: [38;5;174m", "[38;5;175m 175: [38;5;175m", "[38;5;176m 176: [38;5;176m", "[38;5;177m 177: [38;5;177m")] );
push(@arr, [( "[38;5;178m 178: [38;5;178m", "[38;5;179m 179: [38;5;179m", "[38;5;180m 180: [38;5;180m", "[38;5;181m 181: [38;5;181m", "[38;5;182m 182: [38;5;182m", "[38;5;183m 183: [38;5;183m")] );
push(@arr, [( "[38;5;184m 184: [38;5;184m", "[38;5;185m 185: [38;5;185m", "[38;5;186m 186: [38;5;186m", "[38;5;187m 187: [38;5;187m", "[38;5;188m 188: [38;5;188m", "[38;5;189m 189: [38;5;189m")] );
push(@arr, [( "[38;5;190m 190: [38;5;190m", "[38;5;191m 191: [38;5;191m", "[38;5;192m 192: [38;5;192m", "[38;5;193m 193: [38;5;193m", "[38;5;194m 194: [38;5;194m", "[38;5;195m 195: [38;5;195m")] );
push(@arr, [( "[38;5;196m 196: [38;5;196m", "[38;5;197m 197: [38;5;197m", "[38;5;198m 198: [38;5;198m", "[38;5;199m 199: [38;5;199m", "[38;5;200m 200: [38;5;200m", "[38;5;201m 201: [38;5;201m")] );
push(@arr, [( "[38;5;202m 202: [38;5;202m", "[38;5;203m 203: [38;5;203m", "[38;5;204m 204: [38;5;204m", "[38;5;205m 205: [38;5;205m", "[38;5;206m 206: [38;5;206m", "[38;5;207m 207: [38;5;207m")] );
push(@arr, [( "[38;5;208m 208: [38;5;208m", "[38;5;209m 209: [38;5;209m", "[38;5;210m 210: [38;5;210m", "[38;5;211m 211: [38;5;211m", "[38;5;212m 212: [38;5;212m", "[38;5;213m 213: [38;5;213m")] );
push(@arr, [( "[38;5;214m 214: [38;5;214m", "[38;5;215m 215: [38;5;215m", "[38;5;216m 216: [38;5;216m", "[38;5;217m 217: [38;5;217m", "[38;5;218m 218: [38;5;218m", "[38;5;219m 219: [38;5;219m")] );
push(@arr, [( "[38;5;220m 220: [38;5;220m", "[38;5;221m 221: [38;5;221m", "[38;5;222m 222: [38;5;222m", "[38;5;223m 223: [38;5;223m", "[38;5;224m 224: [38;5;224m", "[38;5;225m 225: [38;5;225m")] );
push(@arr, [( "[38;5;226m 226: [38;5;226m", "[38;5;227m 227: [38;5;227m", "[38;5;228m 228: [38;5;228m", "[38;5;229m 229: [38;5;229m", "[38;5;230m 230: [38;5;230m", "[38;5;231m 231: [38;5;231m")] );
push(@arr, [( "[38;5;232m 232: [38;5;232m", "[38;5;233m 233: [38;5;233m", "[38;5;234m 234: [38;5;234m", "[38;5;235m 235: [38;5;235m", "[38;5;236m 236: [38;5;236m", "[38;5;237m 237: [38;5;237m")] );
push(@arr, [( "[38;5;238m 238: [38;5;238m", "[38;5;239m 239: [38;5;239m", "[38;5;240m 240: [38;5;240m", "[38;5;241m 241: [38;5;241m", "[38;5;242m 242: [38;5;242m", "[38;5;243m 243: [38;5;243m")] );
push(@arr, [( "[38;5;244m 244: [38;5;244m", "[38;5;245m 245: [38;5;245m", "[38;5;246m 246: [38;5;246m", "[38;5;247m 247: [38;5;247m", "[38;5;248m 248: [38;5;248m", "[38;5;249m 249: [38;5;249m")] );
push(@arr, [( "[38;5;250m 250: [38;5;250m", "[38;5;251m 251: [38;5;251m", "[38;5;252m 252: [38;5;252m", "[38;5;253m 253: [38;5;253m", "[38;5;254m 254: [38;5;254m", "[38;5;255m 255: [38;5;255m")] );
for($dimone = 0; $dimone < scalar @arr; $dimone++)
{
$seed = ($dimone % 6) * -1;
for($dimtwo = 0; $dimtwo < 6; $dimtwo++)
{
$movone = $seed;
$movtwo = $seed * -1;
$newone = $dimone+$movone;
$newtwo = $dimtwo+$movtwo;
if($newone < scalar @arr)
{
print $arr[$newone][$newtwo] . " ";
}
$seed = $seed+1;
}
print "\n";
}
print "\n";
print "\n";
print "0m";
exit;