14 lines
180 B
Tcl
14 lines
180 B
Tcl
namespace eval avs45 {} {
|
|
}
|
|
|
|
proc stdConfig::avs45 {} {
|
|
controller std sendterminator=\r
|
|
# attention: baud rate 4800
|
|
|
|
obj AVS45 rd
|
|
prop readcmd "D"
|
|
prop readfmt "%g"
|
|
|
|
}
|
|
|