How to change Upper\lower case in CW editor

In article <abz-3107031818530001 DeleteThis @192.168.1.3>,
abz DeleteThis @videotron.ca (Alain Birtz) wrote:

 > How to change the selected text from Upper case to lower case in CW 8.0
 > text editor ?

Turn on the Scripts Menu (a checkbox in the Preferences dialog box,
IDE Extras panel.

Paste the following into an appleScript document, and save it as:
"Make Lower Case" in the (Scripts) folder in your Metrowerks Codewarrior
folder.

============

--Script to make the selection lower case.
--by David Phillip Oster 7/31/03

-- lower case a single char
on DoLowerCaseChar(local_char)
set upstr to "ABCDEFGHIJKLMNOPWRSTUVWXYZ"
set dnstr to "abcdefghijklmnopqrstuvwxyz"
set i to 1
repeat with c in upstr
if character i of upstr is equal to local_char then
return character i of dnstr
end if
set i to i + 1
end repeat
return local_char
end DoLowerCaseChar

-- lower case a string
on DoLowerCaseString(local_text)
set result_text to ""
set i to 1
repeat with c in local_text
set myC to DoLowerCaseChar(character i of local_text)
set result_text to result_text & myC
set i to i + 1
end repeat
return result_text
end DoLowerCaseString

on run
-- setup
tell application "CodeWarrior IDE"
-- get the text to lowercase
set the_text to selection of document 1
set the_val to DoLowerCaseString(the_text) of me
set selection of document 1 to the_val
end tell
end run

============
You now have a command that will lower case the current selection.

If you like it, please e-mail me a "thank you".<!-- ~MESSAGE_AFTER~ -->
 >> Stay informed about: How to change Upperlower case in CW editor 

In article
<oster-F58ABC.23204831072003.TakeThisOut@newssvr21-ext.news.prodigy.com>,
David Phillip Oster <oster.TakeThisOut@ieee.org> wrote:
....
 > set upstr to "ABCDEFGHIJKLMNOPWRSTUVWXYZ"
^ should be 'Q'

sigh.<!-- ~MESSAGE_AFTER~ -->
 >> Stay informed about: How to change Upperlower case in CW editor 

David Phillip Oster wrote:

 > In article <abz-3107031818530001 RemoveThis @192.168.1.3>,
 > abz RemoveThis @videotron.ca (Alain Birtz) wrote:
 >
 >
  >>How to change the selected text from Upper case to lower case in CW 8.0
  >>text editor ?
 >
 >
 > Turn on the Scripts Menu (a checkbox in the Preferences dialog box,
 > IDE Extras panel.
 >
 > Paste the following into an appleScript document, and save it as:
 > "Make Lower Case" in the (Scripts) folder in your Metrowerks Codewarrior
 > folder.

Cool... I forgot that the Mac OS editor has that nice AppleScript
integration. We have to resort to more desperate measures to do the
same thing on the Windows version of the CW IDE.
--
Ben Combee <bcombee RemoveThis @metrowerks.com>
CodeWarrior for Palm OS technical lead
Palm OS programming help at <a style='text-decoration: underline;' href="http://www.palmoswerks.com/" target="_blank">http://www.palmoswerks.com/</a><!-- ~MESSAGE_AFTER~ -->
 >> Stay informed about: How to change Upperlower case in CW editor 

In article <z3GWa.1578$jp.1216@newsread4.news.pas.earthlink.net>,
Ben Combee <combee DeleteThis @techwood.org> wrote:

 > David Phillip Oster wrote:
 >
  > > Paste the following into an appleScript document, and save it as:
  > > "Make Lower Case" in the (Scripts) folder in your Metrowerks Codewarrior
  > > folder.
 >
 > Cool... I forgot that the Mac OS editor has that nice AppleScript
 > integration. We have to resort to more desperate measures to do the
 > same thing on the Windows version of the CW IDE.

And I forgot that character <-> asciiValue conversion, although not
documented in the appleScript reference manual is part of the standard
additions, so the script really should look like this:
===============================
global numberOfA
global numberOfZ
on run
set numberOfA to ASCII number "A"
set numberOfZ to ASCII number "Z"
-- setup
tell application "CodeWarrior IDE"
-- get the text to lowercase
set the_text to selection of document 1
set the_val to DoLowerCaseString(the_text) of me
set selection of document 1 to the_val
end tell
end run


-- lower case a single char
-- bugs: ASCII only
on DoLowerCaseChar(local_char)
if (numberOfA ¾ (ASCII number local_char)) and ¬
((ASCII number local_char) ¾ numberOfZ) then
return ASCII character ((ASCII number local_char) + 32)
end if
return local_char
end DoLowerCaseChar

-- lower case a string
on DoLowerCaseString(local_text)
set result_text to ""
set i to 1
repeat with c in local_text
set myC to DoLowerCaseChar(character i of local_text)
set result_text to result_text & myC
set i to i + 1
end repeat
return result_text
end DoLowerCaseString
===============================

Also, you can use the the Key Bindings dialog box on the IDE's Edit menu
to assign a control-key to scripts you want to use frequently.

Also, since appleScript can run other scriptable applications, and Unix
shell scripts, you can easily do some amazing things.<!-- ~MESSAGE_AFTER~ -->
 >> Stay informed about: How to change Upperlower case in CW editor