Posted to tcl by grummund at Thu Jun 01 17:46:52 GMT 2017view pretty
#!/usr/bin/expect -f set device /dev/ttyUSB0 exp_spawn -open [open $device RDWR] exp_stty 9600 cs8 parenb -cstopb -raw < $device fconfigure stdin -translation binary fconfigure stdout -translation binary send "\xE0\x10\x4E\x74\x00\x02\x04\x42\x78\x00\x00\x4F\x85" expect "\xE0\x10\x4E\x74\x00\x02\x01\x4B" exit