Compiler construction TCL和TCL串行端口(COM1)命令的免费编译器或解释器
1) 有没有结合tcl编辑器和编译器(或Intercenter)的免费软件 2) 使用fconfigure打开串行连接(COM1)后,如何通过连接发送一个由多个单词组成的字符串?我需要连接到一些硬件,我希望能够在其CLI上运行脚本 谢谢Compiler construction TCL和TCL串行端口(COM1)命令的免费编译器或解释器,compiler-construction,serial-port,tcl,interpreter,Compiler Construction,Serial Port,Tcl,Interpreter,1) 有没有结合tcl编辑器和编译器(或Intercenter)的免费软件 2) 使用fconfigure打开串行连接(COM1)后,如何通过连接发送一个由多个单词组成的字符串?我需要连接到一些硬件,我希望能够在其CLI上运行脚本 谢谢 有没有结合tcl编辑器和编译器(或Intercenter)的免费软件 Tcl源代码是完全公开的。下载并构建一个“解释器”(实际上,它是字节码在内部编译所有内容)。您可以使用大多数Linux发行版(我忘了它是默认安装的)获得一个预构建的Tcl发行版,或者通过查找一
open
(duh!)打开的,配置为fconfigure
(或者chan configure
,如果你有足够新的Tcl;它实际上是同一个命令)并用put
写入。我警告您,我不知道串行设备的正确设置是什么:
set serPort [open "COM1" r+]
fconfigure $serPort -mode 9600,n,8,1
puts $serPort "Yo there, serial device!"
然后从设备上读取一行,如下所示:
set line [gets $serPort]
close $serPort
完成以下操作后关闭端口:
set line [gets $serPort]
close $serPort
你可能还需要知道更多的事情。只要在这个网站上进一步提问,就会有人来帮助你
open
(duh!)打开的,配置为fconfigure
(或者chan configure
,如果你有足够新的Tcl;它实际上是同一个命令)并用put
写入。我警告您,我不知道串行设备的正确设置是什么:
set serPort [open "COM1" r+]
fconfigure $serPort -mode 9600,n,8,1
puts $serPort "Yo there, serial device!"
然后从设备上读取一行,如下所示:
set line [gets $serPort]
close $serPort
完成以下操作后关闭端口:
set line [gets $serPort]
close $serPort
你可能还需要知道更多的事情。只要在这个网站上进一步提问,就会有人来帮忙。虽然我还没有尝试过完整的IDE,但我非常喜欢Active State的Komodo Edit的免费版本,并将其与Windows上的可执行文件结合使用 我很幸运地使用Expect和串行端口来编程Cisco交换机。Expect的模式匹配功能使它非常简单。。。以下示例适用于Windows,我还没有在*nix框上尝试过同样的方法:
package require Expect
set com "COM1"
if { [ catch { set serial [ open "$com:" "RDWR" ] } ] } then {
puts "Error! Cannot open $com!"
exit 1
}
fconfigure $serial -mode 9600,n,8,1
spawn -leaveopen $serial
send "somecommand\r"
expect "someprompt"
close $serial
虽然我还没有尝试过完整的IDE,但我非常喜欢Active State的Komodo Edit的免费版本,并将其与Windows上的可执行文件结合使用 我很幸运地使用Expect和串行端口来编程Cisco交换机。Expect的模式匹配功能使它非常简单。。。以下示例适用于Windows,我还没有在*nix框上尝试过同样的方法:
package require Expect
set com "COM1"
if { [ catch { set serial [ open "$com:" "RDWR" ] } ] } then {
puts "Error! Cannot open $com!"
exit 1
}
fconfigure $serial -mode 9600,n,8,1
spawn -leaveopen $serial
send "somecommand\r"
expect "someprompt"
close $serial
在一个“问题”中问很多问题通常被认为是糟糕的。一次问一个问题作为单独的问题;在一个“问题”中问很多问题通常被认为是糟糕的。一次问一个问题