[jawsscripts] Re: Any such utility available for JAWS 11?
- From: Saybro <saybro@xxxxxxxxx>
- To: jawsscripts@xxxxxxxxxxxxx
- Date: Thu, 03 Jun 2010 06:28:28 -0400
Thanks so much for the below script. I'll put it to good use.
At 09:02 AM 6/2/2010, you wrote:
>Hi Sadro,
>
>- the below script can be modified to suit what you are after, & placed in
>either the applications .jss, or perhaps the default.jss. Test it
>carefully, as I made some quick modifications for it to more closely suit
>your description.
>
>
>Note, that any color obtained at a specific X, Y coordinate, will be either,
>the color of the text character at that point, the color of the text
>background at that point, or the screen color at that point if there is no
>character there.
>
>You can not obtain both the text and background colors from a specific
>screen coordinate.
>
>However, the GetColorText, and GetColorBackground functions, obtain these
>colors from the character under the cursor.
>
>
>Script GetColorInfo ()
>
>VAR
>
>INT XCoOrd,
>
>INT YCoOrd,
>
>INT ColorAtPoint,
>
>INT TextColor,
>
>INT BackgroundColor,
>
>STRING ColorAtPointLine,
>
>STRING TextColorLine,
>
>STRING BackgroundColorLine,
>
>STRING CharacterAtPoint,
>
>STRING DisplayText
>
>
>
>LET XCoOrd = GetCursorCol ()
>
>LET YCoOrd = GetCursorRow ()
>
>LET ColorAtPoint = GetColorAtPoint (XCoOrd, YCoOrd)
>
>LET TextColor = GetColorText ()
>
>LET BackgroundColor = GetColorBackground ()
>
>LET CharacterAtPoint = GetCharacter ()
>
>LET ColorAtPointLine = IntToString (ColorAtPoint) + ", " + ColorToRGBString
>(ColorAtPoint)
>
>LET TextColorLine = IntToString (TextColor) + ", " + ColorToRGBString
>(TextColor)
>
>LET BackgroundColorLine = IntToString (BackgroundColor) + ", " +
>ColorToRGBString (BackgroundColor)
>
>IF (CharacterAtPoint == "") THEN ; there was no character at the point
>
>LET CharacterAtPoint = "no character under cursor"
>
>LET TextColorLine = "not available"
>
>LET BackgroundColorLine = "not available"
>
>ENDIF
>
>LET DisplayText = "Color information for the screen coordinate, " +
>IntToString (XCoOrd) + ", " + IntToString (YCoOrd) + ", shown as integer,
>RGB. \R\N"
>
>+ "Color at the specific point: " + ColorAtPointLine + "\R\N"
>
>+ "Colors for the character, " + CharacterAtPoint + ", at the point, " +
>"\R\N"
>
>+ "Text: " + TextColorLine + "\R\N"
>
>+ "Background: " + BackgroundColorLine + "\R\N\R\N"
>
>CopyToClipboard (DisplayText)
>
>SayString ("Color information copied to clipboard")
>
>EndScript
>
>
>
>Hope this helps.
>
>
>
>Regards,
>
>Paul from Aust
>
>
>
>----- Original Message -----
>From: "Saybro" <saybro@xxxxxxxxx>
>
>
>Hi,
>
>I'm curious about the availability of a utility for JAWS 11.0.1447
>that will copy details like:
>
>1. Foreground and background color
>2. Screen X and Y coordinance
>
>Meaning wherever the mouse pointer (JAWS cursor) is sitting on the
>screen, you could simply press a key combination to instantly copy
>the above details to the clipboard.
>
>Then I could paste it to notepad and procede with creating a script
>that needs this info.
>
>Any suggestions? I'm using Windows Vista home edition with JAWS
>11.0.1447 and a TripleTalk USB synth.
>
>__________�
>
>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
Other related posts:
