[jawsscripts] "Need your consultancy"

  • From: mostafa almahdy <mostafa.almahdy@xxxxxxxxx>
  • To: jawsscripts <jawsscripts@xxxxxxxxxxxxx>
  • Date: Fri, 21 Aug 2009 07:37:58 +0300

Hey folks:
Recently, I've copied the following script document from JAWS-users
scripts section, and attempted to compile but  there's  unexpected
word has shown below.
is there anyway to review the particular inspection to fix that up?
the following passage is the  exact text of this script:
; This is a container file, structured with conventions to support
merging by the JAWS Script Exchange program.
; Rather than code of its own, the file contains a sequence of Use
statements, followed by a dummy function to satisfy the JAWS script
compiler.

Use "default_fs.Jsb"
Use "bhmerge.jsb"

Void Function _Filler()
SayString("This is to complete a container .jss so that it compiles to
a valid .jsb")
EndFunction










;21-8-2009










 () <BR>Var ;create a couple variables to hold the
text. <BR>string Char, ; will hold the current character at the cursor.
<BR>string Word, ;will hold the current word. <BR>string Line, ;will hold the
current line. <BR>string Window, ;will hold current window's text. <BR>String
MyMenu, ;text for menu display. <BR>Int index ; will hold menu item number.
<BR>;First, assign the text at the current active cursor's position <BR>;to the
appropriate variables. <BR>let Char=GetCharacter() <BR>let Word=GetWord()
<BR>let Line=GetLine() <BR>let Window=GetWindowText(GetFocus(),FALSE) <BR>;Now,
create menu. <BR>let MyMenu="|Character" + <BR>"|Word" + <BR>"|Line" +
<BR>"|Current window" <BR>Let index=DlgSelectItemInList (MyMenu, "Copy
text from
screen menu", False) <BR>;Ok, take the menu item you selected and run
it through
these condition <BR>;statements to execute the appropriate associated tasks!
<BR>If (index==1) then ;You want to save just a single character?
<BR>CopyToClipboard (Char) ;Ok, put that character onto the clipboard.
<BR>Say(Char,ot_string) ;Announce what you just saved! <BR>ElIf
(index==2 ) then
;You want to save just the current word? <BR>CopyToClipboard (Word) ;Ok, place
it onto the clipboard, <BR>Say(Word,ot_string) ;and announce that
word. <BR>ElIf
(index==3 ) then ;You want to save the current line? <BR>CopyToClipboard (Line)
;Ok, place that line onto the clipboard, <BR>Say(Line,ot_string) ;and announce
the line. <BR>ElIf (index==4 ) then ;So you want the entire window?
<BR>CopyToClipboard (Window) ;Ok, place it onto the clipboard,
<BR>Say(Window,ot_string) ;and announce the window. <BR>EndIf <BR>EndScript
<BR>***</P>
<P>4) While in this script, hit Control+D to edit it's properties.<BR>5) Tab

Script Copyselectiontoclipboard ()
 () <BR>Var ;create a couple variables to hold the
text. <BR>string Char, ; will hold the current character at the cursor.
<BR>string Word, ;will hold the current word. <BR>string Line, ;will hold the
current line. <BR>string Window, ;will hold current window's text. <BR>String
MyMenu, ;text for menu display. <BR>Int index ; will hold menu item number.
<BR>;First, assign the text at the current active cursor's position <BR>;to the
appropriate variables. <BR>let Char=GetCharacter() <BR>let Word=GetWord()
<BR>let Line=GetLine() <BR>let Window=GetWindowText(GetFocus(),FALSE) <BR>;Now,
create menu. <BR>let MyMenu="|Character" + <BR>"|Word" + <BR>"|Line" +
<BR>"|Current window" <BR>Let index=DlgSelectItemInList (MyMenu, "Copy
text from
screen menu", False) <BR>;Ok, take the menu item you selected and run
it through
these condition <BR>;statements to execute the appropriate associated tasks!
<BR>If (index==1) then ;You want to save just a single character?
<BR>CopyToClipboard (Char) ;Ok, put that character onto the clipboard.
<BR>Say(Char,ot_string) ;Announce what you just saved! <BR>ElIf
(index==2 ) then
;You want to save just the current word? <BR>CopyToClipboard (Word) ;Ok, place
it onto the clipboard, <BR>Say(Word,ot_string) ;and announce that
word. <BR>ElIf
(index==3 ) then ;You want to save the current line? <BR>CopyToClipboard (Line)
;Ok, place that line onto the clipboard, <BR>Say(Line,ot_string) ;and announce
the line. <BR>ElIf (index==4 ) then ;So you want the entire window?
<BR>CopyToClipboard (Window) ;Ok, place it onto the clipboard,
<BR>Say(Window,ot_string) ;and announce the window. <BR>EndIf <BR>EndScript
<BR>***</P>
<P>4) While in this script, hit Control+D to edit it's properties.<BR>5) Tab
SayTextBetween ("Copying", selection to clip board, "Copied")





PerformScript AnnounceLastAlert()








EndScript

any suggest or recommend, that's tremendously would be appreciated!!!!.
mostafa muhammad taric almahdy.
Egyptian  Citizen.
skype account:
my_speaker











-- 
Sincerely.
best regard
It's always hope that give's meaning to life.
___________
__________�
Visit and contribute to The JAWS Script Repository http://jawsscripts.com

View the list's information and change your settings at 
http://www.freelists.org/list/jawsscripts

Other related posts: