Solved

RS-232 Control of Gateway 46" Plasma TV

Posted on 2003-10-28
8
616 Views
Last Modified: 2013-12-25
Hello,

I am attempting (with no success) to write a VB app to turn on and off a Gateway 46" plasma tv via the rs-232 serial port.

I found the manufacture specs for the RS-232 protocol if the 42" here:
[url]http://support.gateway.com/s/Manuals/Desktops/8508947/8508947.htm[/url]

It states the port settings are 9600,N,8,1
Basic Format for Command Parameters:
In order to transmit data from the computer to the plasma TV, the data must be sent in 1 byte hex format. The command code must first be sent to the plasma TV, followed by the value (in hexadecimal format).

Sample sequence to change the plasma TV's input to RGB:

Step 1:  Send 1 byte for command 91 (input select) to the plasma TV in hex format 0x91.
 
Step 2:  Send 1 byte for the value of the RGB input. In this example, send 0x06.
 
Step 3:  The plasma TV then responds to the PC with a 1 byte value to confirm the setting.
 
The following RS-232 remote control commands are available:
--------------------------------------
Item               Cmd  Data      Details  
Read               80    81-A7    Reads the plasma TV's current settings for command 81 through A7
Volume            81    01-64H   Set between 01-64H
Power On/Off    83    00-01    00 = Off 01 = On
ect...
--------------------------------------
Here is the code I wrote (which does not work) to turn off the TV:
   
    MSComm1.CommPort = 1
    MSComm1.Settings = "9600,N,8,1"
    MSComm1.PortOpen = True
    MSComm1.DTREnable = True
    MSComm1.RTSEnable = True

    MSComm1.Output = Chr$(83) & Chr$(0)
I even tried...
    MSComm1.Output = Chr$(131) & Chr$(0)
I even tried...
    MSComm1.Output = Chr$(2) & Chr$(83) &  Chr$(0) Chr$(3)
I even tried...
    MSComm1.Output = Chr$(2) & Chr$(131) &  Chr$(0) Chr$(3)

I am very frustrated with Gateway because they cant help me with this...

Please could someone give me some help? (130 points)
Thank you,
Gregory Foster
0
Comment
Question by:gregoryafoster
8 Comments
 

Expert Comment

by:mshieh
ID: 9637949
Are you using a null modem cable?
0
 
LVL 85

Expert Comment

by:Mike Tomlinson
ID: 9638121
It looks like the codes in the specs are not ascii values, but actual hex values.

Try this:

Private Sub Form_Load()
    Const power As String = "0x83"
    Const powerOff As String = "0x00"
    Const powerOn As String = "0x01"
   
    MSComm1.CommPort = 1
    MSComm1.Settings = "9600,N,8,1"
    MSComm1.PortOpen = True
    MSComm1.DTREnable = True
    MSComm1.RTSEnable = True

    MSComm1.Output = power & powerOn ' Turn the tv On?
    'MSComm1.Output = power & powerOff ' Turn the tv Off?
End Sub
0
 
LVL 5

Expert Comment

by:fantasy1001
ID: 9648327
Try this also,
Private Sub Form_Load()
    with mscomm1
       MSComm1.CommPort = 1
       MSComm1.Settings = "9600,N,8,1"
       MSComm1.PortOpen = True

       MSComm1.Output = chr(131) & chr(13)
       mscomm1.output = chr(0) & chr(13) 'turn off
       mscomm1.portopen = false
    end with
End Sub

Regards,
~fantasy~
0
Best Practices: Disaster Recovery Testing

Besides backup, any IT division should have a disaster recovery plan. You will find a few tips below relating to the development of such a plan and to what issues one should pay special attention in the course of backup planning.

 
LVL 85

Expert Comment

by:Mike Tomlinson
ID: 9828335
Did you ever get your program to work?
0
 

Author Comment

by:gregoryafoster
ID: 9831554
Well, I was way off here... Gateway really came through for me... I just had to be presistant.

I got in tough with an engineer for Gateway and he had all the information I needed.
I got the program to work and it is really neat! I can control anything on the Plasma tv I want.

I wrote a program that (from a wireless laptop) using winsock to connect to the laptop connected via rs232 to the plasma tv that I can play any dvd or music from any computer (or hard drive) on the plasma. If I can help anyone with this please feel free to email me gaf@gregoryfoster.com

Thanks for all of the support here!
0
 
LVL 85

Expert Comment

by:Mike Tomlinson
ID: 9832351
Very cool.  Let us know specifically what you need help with and we can throw in our two cents.

Idle_Mind
0
 

Accepted Solution

by:
SpazMODic earned 0 total points
ID: 10420040
PAQed, with points refunded (130)

SpazMODic
EE Moderator
0

Featured Post

Problems using Powershell and Active Directory?

Managing Active Directory does not always have to be complicated.  If you are spending more time trying instead of doing, then it's time to look at something else. For nearly 20 years, AD admins around the world have used one tool for day-to-day AD management: Hyena. Discover why

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

If you have ever used Microsoft Word then you know that it has a good spell checker and it may have occurred to you that the ability to check spelling might be a nice piece of functionality to add to certain applications of yours. Well the code that…
Most everyone who has done any programming in VB6 knows that you can do something in code like Debug.Print MyVar and that when the program runs from the IDE, the value of MyVar will be displayed in the Immediate Window. Less well known is Debug.Asse…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

831 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question