Изменение цвета шрифта и выделение текста в TCL

Question

Можно ли изменить цвет текста и сделать его полужирным шрифтом из сценария TCL и вывести его в консоли/терминале?

Я нашел this on example на форуме, но я получаю следующее сообщение об ошибке:

ОШИБКА: не удалось выполнить «tput»: нет такого файла или каталога процедура «цвет» строка 4:

ЗАДУМЫВАЛИСЬ если кто-то может посоветовать.

Заранее спасибо,

Пример из опорного поста (ссылка выше), например, обеспечивается Donal Fellows

proc color {foreground text} { 
    # tput is a little Unix utility that lets you use the termcap database 
    # *much* more easily... 
    return [exec tput setaf $foreground]$text[exec tput sgr0] 
} 

puts "Why not [color 4 G][color 1 o][color 3 o][color 4 g][color 2 l][color 1 e] first?" 
# Hmm, that's clearer than using those escapes directly too! 

Answer 1

tput является командой Linux, которая является частью пакета ncurses. если вы не используете какие-либо linux-пакеты или пакет ncurses установлен неправильно, вы получите эту ошибку. Так что, если вы используете

linux- установлена ​​или нет проверки библиотеки Ncurses.

окна: -

Его лучше использовать twapi пакет.

Установить twapi.

teacup install twapi 

Попробуйте ниже в tclsh.

# Import package twapi 
package require twapi 

# Get handler of console 
set hndl [twapi::get_console_handle stdout] 

# Set console foreground color to red 
twapi::_set_console_default_attr $hndl fgred 1 

см это link1link2