6 lines
332 B
6 lines
332 B
package require twapi |
|
puts stdout [list stdin [twapi::get_console_input_mode [twapi::get_console_handle stdin]]] |
|
puts stdout [list stdout [twapi::get_console_output_mode [twapi::get_console_handle stdout]]] |
|
puts stdout [list screenbufferinfo [twapi::get_console_screen_buffer_info [twapi::get_console_handle stdout] -all]] |
|
|
|
|
|
|