jacinda-3.2.0.1: lib/color.jac
{. https://stackoverflow.com/a/33206814/11296354
{. https://stackoverflow.com/a/75985833/11296354
fn code(begin, str) :=
'\ESC[' + begin + 'm' + str + '\ESC[0m';
fn underline :=
code '4';
fn bold :=
code '1';
fn black := code '30';
fn red := code '31';
fn green := code '32';
fn yellow := code '33';
fn blue := code '34';
fn magenta := code '35';
fn cyan := code '36';
fn white := code '37';
fn boldred := code '31;1';
fn boldyellow := code '33;1';
fn boldblue := code '34;1';
fn boldmagenta := code '37;1';