export def main [] {
	let named_colors = [
		[ name value ];
		[ "black" "30;40" ]
		[ "red" "31;41" ]
		[ "green" "32;42" ]
		[ "yellow" "33;43" ]
		[ "blue" "34;44" ]
		[ "magenta" "35;45" ]
		[ "cyan" "36;46" ]
		[ "white" "37;47" ]
		[ "bright_black" "90;100" ]
		[ "bright_red" "91;101" ]
		[ "bright_green" "92;102" ]
		[ "bright_yellow" "93;103" ]
		[ "bright_blue" "94;104" ]
		[ "bright_magenta" "95;105" ]
		[ "bright_cyan" "96;106" ]
		[ "bright_white" "97;107" ]
	]

	def print_color_box [name: string, code: string] {
			let box = $"\e[($code)m    \e[0m"
			print $"($name): ($box)"
	}

	print "\n=== Named Colors ==="
	$named_colors | each { |color|
			print_color_box $color.name $color.value
	}

	print "\n=== 0-255 Color Range ==="
	for i in 0..255 {
			let code = $"48;5;($i)"
			let box = $"\e[($code)m    \e[0m"
			print $"Color ($i): ($box)"
			if ($i + 1) mod 8 == 0 { print "" }
	}
}