I'm not a script writer, but I have some notions, I'll wait until other better scripter's have spoken, but if you don't get an answer that works, give me a "tap on the shoulder" so to say, and I'll pass along my ideas, good luck, inthane . For Blind Programming assistance, Information, Useful Programs, and Links to Jamal Mazrui's Text tutorial packages and Applications, visit me at: http://grabbag.alacorncomputer.com . to be able to view a simple programming project in several programming languages, visit the Fruit basket demo site at: http://fruitbasketdemo.alacorncomputer.com . for a blind user friendly Chat, go take a look at: http://www.icedirc.com/ ----- Original Message ----- From: "The dark Count" <darkcount1@xxxxxxxxx> To: <jawsscripts@xxxxxxxxxxxxx> Sent: Thursday, July 24, 2008 11:49 AM Subject: [jawsscripts] chat client > Hello all. > I have been working with a little chat client which does not read messages > as they come in. > > I have been able to make the messages speak by modifying the say non > highlighted text event. Now I am running into the problem of messages at > times being repeated so that the last message repeats before the newest > reads. > > The second problem is that when I alt tab away from the application and > switch back to it the function triggers and the whole message window > starts being read. > > Here is the function in hopes somebody has suggestions as to how to solve > these problems. > > tia > > D C > ;globals > string prevstatus, > string ms1 > > Void Function SayNonHighlightedText (handle hwnd, string buffer) > var > int mycontrol > let mycontrol=GetControlID (hwnd) > If ClearSuppression () == 1 Then > return > EndIf > ;read nonhighlighted text in other echo modes > If (GetScreenEcho ()> 1) Then > Say (buffer, OT_buffer) > EndIf > ;intercept and speak messages in chat window > ;window where text is > if (mycontrol == 1204) Then > ;code to capture and compare messages as they come in > If (prevstatus != buffer) Then > Say (buffer, OT_buffer) > let prevstatus =buffer > ;saving text of last message to be used in another script > let ms1 = buffer > EndIf > EndIf > EndFunction > > Code ends. > > > __________ > View the list's information and change your settings at > //www.freelists.org/list/jawsscripts > > __________ View the list's information and change your settings at //www.freelists.org/list/jawsscripts