бредОМГTclprogramming
...
if [expr [string index $text $x] = "?"] {set correct_text "$correct_text$minus"} else {if [expr [string index $text $x] = ":"] {set correct_text "$correct_text$dots"} else {set correct_text "$correct_text$x_char"}}
...
И всё в одну строку ... Только ради такого стоит покупать FullHD монитор
бред#1165447programming
Очередное допиливание закончил, теперь софтина умеет следить за активностью юзера и выключать свет если оной не наблюдается в N-ный промежуток времени. Видимо мозг не работает, раз угрохал на это полтора часа)
P.S. Надо что-то вместо реле поставить, ибо его щёлканье уже утомило
бредсамоделки#1165447programming
по #1165447: ну вот софт написал и пришёл к выводу что включение лампы по таймеру не слишком хорошая идея, ощущение будто на допрос будят =\