Serial Communication help

mitchell2345 · 03-20-2009, 02:50 PM

Hi,

I have a projector that has a RS232 port. I am working on building a script so my HTPC can control it.

I have basic functionality working. I wrote this basic scirpt:

Code:

#set baud rate
stty -F /dev/ttyUSB0 115200

echo "* 0 IR "$1"\r" > /dev/ttyUSB0

i can call it with:
pj_chan cmd#

there are many cmd's but to list a couple:
002 --> power off
017 --> SrcHDMI_1

So when i send

echo "* 0 IR 002\r" > /dev/ttyUSB0

it powers off. All cmd's are in the format of "* 0 IR ###" except for power on which is OKOKOKOKOK

Here are my list of issues i need help with:

1. I cant see the ACK return from the serial port. I can in Secure CRT on windows. What do i need to do so i can view the ACK statement. This isnt so important for setters but for my Get'ers it is a requirement.

2. How can i build an array or the like so instead of sending the cmd ### i can just say "pj_chan poweroff" and the script translates that to 002.

PJ is a Optoma HD80. Manual is located at http://marketing.optomausa.com/PDFs/...D80_Manual.PDF

RS232 cmd are near end.

Thanks,
Mitchell

theNbomr · 03-20-2009, 07:18 PM

On the one hand, you're using a terminal emulator to send/view data, but on the other you're using a series of (unknown) shell commands. I suggest that you use either a good, scriptable terminal emulator, such as C-Kermit, or a more full functioned programming language that potentially has a ready-made package of functions and tools for the purpose, such as Perl and the Device::SerialPort module. Then you will be able to get around the issues of redirecting both stdin and stdout concurrently to/from a single device.
--- rod.

mitchell2345 · 03-20-2009, 08:41 PM

i know nothing about perl scripts. would some one give me a clue or a start on how to begin this script?

Thanks,
Mitchell