MENU "Global Commands" { STATE "Global Commands" GLOBAL { COMMAND "Train That" { SCRIPT { SendKeys "{Ctrl+c}{Alt+n}ot" Wait 10 SendKeys "{Ctrl+v}{Enter}" } } COMMAND "Add to Pad" { SCRIPT { SendKeys "{Ctrl+x}" AppBringUp "Notepad","C:\WINDOWS\Notepad.exe",1,"C:\WINDOWS" SendKeys "{Space}{Ctrl+v}" SendSystemKeys "{Alt+Esc}" } } COMMAND "Two Lines" { KEYS { {Enter}{Enter\} } } COMMAND "Vocabulary Editor" { SCRIPT { SendKeys "{Alt+t}" Wait 100 SendKeys "e" } } COMMAND "Clear Copy Notepad Now" { SCRIPT { AppBringUp "Notepad","C:\WINDOWS\NOTEPAD.EXE",1,"C:\WINDOWS" MenuPick "Edit" MenuPick "Select All" SendKeys "{Ctrl+x}" SendSystemKeys "{Alt+F4}" } } COMMAND "Double Enter" { KEYS { {Enter}{Enter\} } } COMMAND "Clear Notepad Now" { SCRIPT { AppBringUp "Notepad" Wait 10 SendKeys "{Alt+f}a" Wait 10 SendKeys "Backup{Enter}" Wait 100 SendKeys "y" Wait 10 SendSystemKeys "{Alt+F4}" } } COMMAND "Clear Whole Notepad Now" { SCRIPT { AppBringUp "Notepad" Wait 10 SendSystemKeys "{Alt+F4}" Wait 10 SendKeys "n" } } COMMAND "Paste Quote" { KEYS { "{Ctrl+v}{Backspace}"{Enter\} } } COMMAND "Space" { KEYS " " } COMMAND "Space <1to100>" { SCRIPT { SendKeys "{Space " + _arg1 + "}" } } COMMAND "Scratch <1To20>" { SCRIPT { loop& = Val(_arg1) while ( loop& ) HeardWord "Scratch","That" loop& = loop& - 1 wend } } COMMAND "Line Back" { KEYS { {Enter}{Up}{End\} } } COMMAND "Remove Ends" { KEYS { {Ctrl+Right}{Left}{Backspace}{Ctrl+Left}{Del}{Ctrl+R ight\} } } COMMAND "Word <1To20> Delete <1To10>" { SCRIPT { SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Right " + _arg1 + "}" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Shift+Ctrl+Right " + _arg2 + "}" Wait 300 SendKeys "{Del}" } } COMMAND "Skip Delete <1To10>" { SCRIPT { SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Left}" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Shift+Ctrl+Left " + _arg1 + "}" Wait 300 SendKeys "{Del}" } } COMMAND " Before" { SCRIPT { SendKeys "{Right}" if _arg1 = "Single Quote" then SendKeys "'" if _arg1 = "Angle Bracket" then SendKeys "<" if _arg1 = "Quote" then SendKeys """" if _arg1 = "Paren" then SendKeys "(" if _arg1 = "Star" then SendKeys "*" if _arg1 = "Brace" then SendKeys "{" if _arg1 = "Bracket" then SendKeys "[" if _arg1 = "Angle" then SendKeys "<" } } COMMAND " After" { SCRIPT { SendKeys "{Left}" if _arg1 = "Single Quote" then SendKeys "'" if _arg1 = "Angle Bracket" then SendKeys "<" if _arg1 = "Quote" then SendKeys """" if _arg1 = "Paren" then SendKeys "(" if _arg1 = "Star" then SendKeys "*" if _arg1 = "Brace" then SendKeys "{" if _arg1 = "Bracket" then SendKeys "[" if _arg1 = "Angle" then SendKeys "<" } } COMMAND "Space Delete Space" { SCRIPT { SendKeys "{Space}" SendKeys "{Ctrl+Left}{Backspace}{Ctrl+Right}" } } COMMAND " <1To40>" { SCRIPT { loop& = Val(_arg2) while ( loop& ) if _arg1 = "Next" then SendKeys "{Shift+Right}" if _arg1 = "Last" then SendKeys "{Shift+Left}" loop& = loop& - 1 wend } } COMMAND "Press <1To40>" { SCRIPT { SendSystemKeys MID$(_arg1,0,1) SendKeys "{" + _arg2 + " " + _arg3 + "}" } } COMMAND "Press <1To40>" { SCRIPT { SendSystemKeys MID$(_arg1,0,1) if _arg2 = "Scroll Down" then loop& = Val(_arg3) while ( loop& ) SendKeys "{Down}" Wait 15 loop& = loop& - 1 wend end if if _arg2 = "Scroll Up" then loop& = Val(_arg3) while ( loop& ) SendKeys "{Up}" Wait 15 loop& = loop& - 1 wend end if } } COMMAND "Drop List" { KEYS { {Alt+ExtDown\} } } COMMAND "Up Paragraph" { SCRIPT { SendKeys "{Ctrl+Up}{Home}" SendKeys "{Enter 2}{Up 2}" } } COMMAND "Tab Back <1to100>" { SCRIPT { loop& = Val(_arg1) while ( loop& ) SendKeys "{Shift+Tab}" loop& = loop& - 1 wend } } COMMAND "Tab Back" { KEYS { {Shift+Tab\} } } COMMAND "Get Help" { SCRIPT { WinHelp "Dragon.hlp", 11 } } COMMAND "Form Address" { SCRIPT { SendKeys "22 Conway Street" SendKeys "{Tab}" SendKeys "Roslindale" SendKeys "{Tab}" SendKeys "MA" SendKeys "{Tab}" SendKeys "02131" } } COMMAND "Small Tray <1To10>" { SCRIPT { if _arg1 = "1" then SetMousePosition 0, 726, 584 if _arg1 = "2" then SetMousePosition 0, 710, 584 if _arg1 = "3" then SetMousePosition 0, 690, 584 if _arg1 = "4" then SetMousePosition 0, 675, 584 if _arg1 = "5" then SetMousePosition 0, 658, 584 if _arg1 = "6" then SetMousePosition 0, 643, 584 if _arg1 = "7" then SetMousePosition 0, 625, 584 if _arg1 = "8" then SetMousePosition 0, 608, 584 if _arg1 = "9" then SetMousePosition 0, 590, 584 if _arg1 = "10" then SetMousePosition 0, 773, 584 ButtonClick 1 } } COMMAND "Tray <1To10>" { SCRIPT { if _arg1 = "1" then SetMousePosition 0, 940, 750 if _arg1 = "2" then SetMousePosition 0, 918, 750 if _arg1 = "3" then SetMousePosition 0, 895, 750 if _arg1 = "4" then SetMousePosition 0, 875, 750 if _arg1 = "5" then SetMousePosition 0, 854, 750 if _arg1 = "6" then SetMousePosition 0, 834, 750 if _arg1 = "7" then SetMousePosition 0, 812, 750 if _arg1 = "8" then SetMousePosition 0, 792, 750 if _arg1 = "9" then SetMousePosition 0, 772, 750 if _arg1 = "10" then SetMousePosition 0, 752, 750 ButtonClick 1 } } COMMAND "Replace This Line" { KEYS { {Home}{Shift+End}{Ctrl+v\} } } COMMAND "Quote Delete" { SCRIPT { SendKeys """" SendKeys "{Shift+End}{Del}" } } COMMAND "Delete <1To40> " { SCRIPT { if _arg1 = "Home" then SendKeys "{Home}" if _arg1 = "Top" then SendKeys "{Ctrl+Home}" if _arg3 = "Words" then loop& = Val(_arg2) while ( loop& ) SendKeys "{Ctrl+Shift+Right}" loop& = loop& - 1 wend end if if _arg3 = "Lines" then loop& = Val(_arg2) while ( loop& ) SendKeys "{Shift+Down}" loop& = loop& - 1 wend end if if _arg3 = "Word" then loop& = Val(_arg2) while ( loop& ) SendKeys "{Ctrl+Shift+Right}" loop& = loop& - 1 wend end if if _arg3 = "Line" then loop& = Val(_arg2) while ( loop& ) SendKeys "{Shift+Down}" loop& = loop& - 1 wend end if SendKeys "{Del}" } } COMMAND "Delete <1To40> " { SCRIPT { if _arg1 = "End" then SendKeys "{End}" if _arg1 = "Bottom" then SendKeys "{Ctrl+End}" if _arg3 = "Words" then loop& = Val(_arg2) while ( loop& ) SendKeys "{Ctrl+Shift+Left}" loop& = loop& - 1 wend end if if _arg3 = "Lines" then loop& = Val(_arg2) while ( loop& ) SendKeys "{Shift+Up}" loop& = loop& - 1 wend end if if _arg3 = "Word" then loop& = Val(_arg2) while ( loop& ) SendKeys "{Ctrl+Shift+Left}" loop& = loop& - 1 wend end if if _arg3 = "Line" then loop& = Val(_arg2) while ( loop& ) SendKeys "{Shift+Up}" loop& = loop& - 1 wend end if SendKeys "{Del}" } } COMMAND "Bottom " { SCRIPT { if _arg1 = "Line" then SendKeys "{Ctrl+End}{Down}{End}{Enter}" if _arg1 = "Home" then SendKeys "{Ctrl+End}{Home}" if _arg1 = "Paragraph" then SendKeys "{Ctrl+End}{Enter}{Enter}" } } COMMAND "Top " { SCRIPT { SendKeys "{Ctrl+Home}" if _arg1 = "End" then SendKeys "{End}" if _arg1 = "Line" then SendKeys "{Enter}{Up}" if _arg1 = "Paragraph" then SendKeys "{Enter}{Enter}{Up}{Up}" } } COMMAND " <1To40> " { SCRIPT { if _arg1 = "Next" then _dirv$ = "Down" if _arg1 = "Last" then _dirv$ = "Up" if _dirv$ = "Up" then _dirh$ = "Left" if _dirv$ = "Down" then _dirh$ = "Right" SendKeys "{Left}{Ctrl+Down}" loop& = Val(_arg2) while ( loop& ) SendKeys "{Shift+" + _dirh$ + "}{Shift+Ctrl+" + _dirv$ + "}" loop& = loop& - 1 wend } } COMMAND " <1To10> " { SCRIPT { loop& = Val(_arg2) while ( loop& ) SendKeys "{Ctrl+t}{Left}" loop& = loop& - 1 wend SendKeys "{Right}" if _arg1 = "Single Quote" then SendKeys "'" if _arg1 = "Angle Bracket" then SendKeys "<" if _arg1 = "Quote" then SendKeys """" if _arg1 = "Paren" then SendKeys "(" if _arg1 = "Star" then SendKeys "*" if _arg1 = "Brace" then SendKeys "{" if _arg1 = "Bracket" then SendKeys "[" if _arg1 = "Angle" then SendKeys "<" SendKeys "{End}" if _arg1 = "Single Quote" then SendKeys "'" if _arg1 = "Angle Bracket" then SendKeys ">" if _arg1 = "Quote" then SendKeys """" if _arg1 = "Paren" then SendKeys ")" if _arg1 = "Star" then SendKeys "*" if _arg1 = "Brace" then SendKeys "}" if _arg1 = "Bracket" then SendKeys "]" if _arg1 = "Angle" then SendKeys ">" } } COMMAND "Last <1To40> Phrases" { SCRIPT { loop& = Val(_arg1) while ( loop& ) SendKeys "{Ctrl+t}{Left}" loop& = loop& - 1 wend SendKeys "{Shift+Ctrl+End}" } } COMMAND " " { SCRIPT { if _arg1 = "." then SendKeys "." if _arg1 = "Period" then SendKeys "." if _arg1 = "," then SendKeys "," if _arg1 = "Comma" then SendKeys "," if _arg1 = "?" then SendKeys "?" if _arg1 = "Question" then SendKeys "?" if _arg1 = "Question Mark" then SendKeys "?" if _arg2 = "Single Quote" then SendKeys "'" if _arg2 = "Angle Bracket" then SendKeys ">" if _arg2 = "Quote" then SendKeys """" if _arg2 = "Paren" then SendKeys ")" if _arg2 = "Star" then SendKeys "*" if _arg2 = "Brace" then SendKeys "}" if _arg2 = "Bracket" then SendKeys "]" if _arg2 = "Angle" then SendKeys ">" } } COMMAND " " { SCRIPT { if _arg1 = "." then SendKeys "." if _arg1 = "Period" then SendKeys "." if _arg1 = "," then SendKeys "," if _arg1 = "Comma" then SendKeys "," if _arg1 = "?" then SendKeys "?" if _arg1 = "Question" then SendKeys "?" if _arg1 = "Question Mark" then SendKeys "?" if _arg2 = "Single Quote" then SendKeys "'" if _arg2 = "Angle Bracket" then SendKeys ">" if _arg2 = "Quote" then SendKeys """" if _arg2 = "Paren" then SendKeys ")" if _arg2 = "Star" then SendKeys "*" if _arg2 = "Brace" then SendKeys "}" if _arg2 = "Bracket" then SendKeys "]" if _arg2 = "Angle" then SendKeys ">" if _arg3 = "Line" then SendKeys "{Home}" if _arg3 = "Graph" then SendKeys "{Ctrl+Up}" if _arg3 = "Paragraph" then SendKeys "{Ctrl+Up}" if _arg3 = "Phrase" then SendKeys "{Left}{Left}{Ctrl+t}{Left}{Right}" if _arg2 = "Single Quote" then SendKeys "'" if _arg2 = "Angle Bracket" then SendKeys "<" if _arg2 = "Quote" then SendKeys """" if _arg2 = "Paren" then SendKeys "(" if _arg2 = "Star" then SendKeys "*" if _arg2 = "Brace" then SendKeys "{" if _arg2 = "Bracket" then SendKeys "[" if _arg2 = "Angle" then SendKeys "<" SendKeys "{Ctrl+Down}" } } COMMAND " <1To20>" { SCRIPT { if _arg1 = "." then SendKeys "." if _arg1 = "Period" then SendKeys "." if _arg1 = "," then SendKeys "," if _arg1 = "Comma" then SendKeys "," if _arg1 = "?" then SendKeys "?" if _arg1 = "Question" then SendKeys "?" if _arg1 = "Question Mark" then SendKeys "?" if _arg2 = "Single Quote" then SendKeys "'" if _arg2 = "Angle Bracket" then SendKeys ">" if _arg2 = "Quote" then SendKeys """" if _arg2 = "Paren" then SendKeys ")" if _arg2 = "Star" then SendKeys "*" if _arg2 = "Brace" then SendKeys "}" if _arg2 = "Bracket" then SendKeys "]" if _arg2 = "Angle" then SendKeys ">" loop& = Val(_arg3) while ( loop& ) SendKeys "{Left}{Left}{Ctrl+t}{Left}{Right}" loop& = loop& - 1 wend if _arg2 = "Single Quote" then SendKeys "'" if _arg2 = "Angle Bracket" then SendKeys "<" if _arg2 = "Quote" then SendKeys """" if _arg2 = "Paren" then SendKeys "(" if _arg2 = "Star" then SendKeys "*" if _arg2 = "Brace" then SendKeys "{" if _arg2 = "Bracket" then SendKeys "[" if _arg2 = "Angle" then SendKeys "<" SendKeys "{Ctrl+Down}" } } COMMAND "Middle <1To10>" { SCRIPT { if _arg2 = "Next" then SendKeys "{Right}{Ctrl+Right}{Ctrl+Left}" if _arg1 = "Single Quote" then SendKeys "'" if _arg1 = "Angle Bracket" then SendKeys "<" if _arg1 = "Quote" then SendKeys """" if _arg1 = "Paren" then SendKeys "(" if _arg1 = "Star" then SendKeys "*" if _arg1 = "Brace" then SendKeys "{" if _arg1 = "Bracket" then SendKeys "[" if _arg1 = "Angle" then SendKeys "<" loop& = Val(_arg3) while ( loop& ) SendKeys "{Ctrl+Right}" loop& = loop& - 1 wend SendKeys "{Left}" if _arg1 = "Single Quote" then SendKeys "'" if _arg1 = "Angle Bracket" then SendKeys ">" if _arg1 = "Quote" then SendKeys """" if _arg1 = "Paren" then SendKeys ")" if _arg1 = "Star" then SendKeys "*" if _arg1 = "Brace" then SendKeys "}" if _arg1 = "Bracket" then SendKeys "]" if _arg1 = "Angle" then SendKeys ">" end if if _arg2 = "Last" then SendKeys "{Left}{Ctrl+Left}{Ctrl+Right}{Left}" if _arg1 = "Single Quote" then SendKeys "'" if _arg1 = "Angle Bracket" then SendKeys "<" if _arg1 = "Quote" then SendKeys """" if _arg1 = "Paren" then SendKeys ")" if _arg1 = "Star" then SendKeys "*" if _arg1 = "Brace" then SendKeys "}" if _arg1 = "Bracket" then SendKeys "]" if _arg1 = "Angle" then SendKeys ">" loop& = Val(_arg3) while ( loop& ) SendKeys "{Ctrl+Left}" loop& = loop& - 1 wend SendKeys "{Ctrl+Left}" if _arg1 = "Single Quote" then SendKeys "'" if _arg1 = "Angle Bracket" then SendKeys "<" if _arg1 = "Quote" then SendKeys """" if _arg1 = "Paren" then SendKeys "(" if _arg1 = "Star" then SendKeys "*" if _arg1 = "Brace" then SendKeys "{" if _arg1 = "Bracket" then SendKeys "[" if _arg1 = "Angle" then SendKeys "<" loop& = Val(_arg3) while ( loop& ) SendKeys "{Ctrl+Right}" loop& = loop& - 1 wend end if } } COMMAND " Clean Line" { SCRIPT { SendKeys "{Home}" if _arg1 = "Next" then SendKeys "{Shift+Down}" if _arg1 = "Last" then SendKeys "{Shift+Up}" } } COMMAND "Word <1To20>" { SCRIPT { loop& = Val(_arg2) while ( loop& ) if _arg1 = "Left" then SendKeys "{Ctrl+Left}" if _arg1 = "Back" then SendKeys "{Ctrl+Left}" if _arg1 = "Right" then SendKeys "{Ctrl+Right}" loop& = loop& - 1 wend } } COMMAND "Word " { SCRIPT { if _arg1 = "Right" then SendKeys "{Ctrl+Right}" if _arg1 = "Left" then SendKeys "{Ctrl+Left}" } } COMMAND "Space <1To20> " { SCRIPT { loop& = Val(_arg1) while ( loop& ) SendKeys "{Space}" loop& = loop& - 1 wend if _arg2 = "Single Quotes" then SendKeys "'" if _arg2 = "Angle Brackets" then SendKeys "<" if _arg2 = "Quotes" then SendKeys """" if _arg2 = "Parens" then SendKeys "(" if _arg2 = "Stars" then SendKeys "*" if _arg2 = "Braces" then SendKeys "{" if _arg2 = "Brackets" then SendKeys "[" if _arg2 = "Angles" then SendKeys "<" if _arg2 = "Single Quotes" then SendKeys "'" if _arg2 = "Angle Brackets" then SendKeys ">" if _arg2 = "Quotes" then SendKeys """" if _arg2 = "Parens" then SendKeys ")" if _arg2 = "Stars" then SendKeys "*" if _arg2 = "Braces" then SendKeys "}" if _arg2 = "Brackets" then SendKeys "]" if _arg2 = "Angles" then SendKeys ">" SendKeys "{Left}" } } COMMAND " Word" { SCRIPT { if _arg1 = "First" then SendKeys "{Home}{Shift+Ctrl+Right}" if _arg1 = "End" then SendKeys "{End}{Shift+Ctrl+Left}" if _arg1 = "Second" then SendKeys "{Home}{Ctrl+Right}{Shift+Ctrl+Right}" if _arg1 = "Third" then SendKeys "{Home}{Ctrl+Right 2}{Shift+Ctrl+Right}" if _arg1 = "Fourth" then SendKeys "{Home}{Ctrl+Right 3}{Shift+Ctrl+Right}" if _arg1 = "Fifth" then SendKeys "{Home}{Ctrl+Right 4}{Shift+Ctrl+Right}" if _arg1 = "Sixth" then SendKeys "{Home}{Ctrl+Right 5}{Shift+Ctrl+Right}" if _arg1 = "Seventh" then SendKeys "{Home}{Ctrl+Right 6}{Shift+Ctrl+Right}" if _arg1 = "Eighth" then SendKeys "{Home}{Ctrl+Right 7}{Shift+Ctrl+Right}" if _arg1 = "Ninth" then SendKeys "{Home}{Ctrl+Right 8}{Shift+Ctrl+Right}" if _arg1 = "Tenth" then SendKeys "{Home}{Ctrl+Right 9}{Shift+Ctrl+Right}" } } COMMAND "Delete Word" { SCRIPT { if _arg1 = "First" then SendKeys "{Home}{Shift+Ctrl+Right}" if _arg1 = "End" then SendKeys "{End}{Shift+Ctrl+Left}" if _arg1 = "Second" then SendKeys "{Home}{Ctrl+Right}{Shift+Ctrl+Right}" if _arg1 = "Third" then SendKeys "{Home}{Ctrl+Right 2}{Shift+Ctrl+Right}" if _arg1 = "Fourth" then SendKeys "{Home}{Ctrl+Right 3}{Shift+Ctrl+Right}" if _arg1 = "Fifth" then SendKeys "{Home}{Ctrl+Right 4}{Shift+Ctrl+Right}" if _arg1 = "Sixth" then SendKeys "{Home}{Ctrl+Right 5}{Shift+Ctrl+Right}" if _arg1 = "Seventh" then SendKeys "{Home}{Ctrl+Right 6}{Shift+Ctrl+Right}" if _arg1 = "Eighth" then SendKeys "{Home}{Ctrl+Right 7}{Shift+Ctrl+Right}" if _arg1 = "Ninth" then SendKeys "{Home}{Ctrl+Right 8}{Shift+Ctrl+Right}" if _arg1 = "Tenth" then SendKeys "{Home}{Ctrl+Right 9}{Shift+Ctrl+Right}" SendKeys "{Del}" } } COMMAND "Down <1To20> " { SCRIPT { SendKeys "{Down " + _arg1 + "}" if _arg2 = "Enter" then SendKeys "{Home}{Enter}{Up}" if _arg2 = "Home" then SendKeys "{Home}" if _arg2 = "End" then SendKeys "{End}" if _arg2 = "Line" then SendKeys "{Home}{Enter}{Up}" if _arg2 = "Space " then SendKeys "{Home}{Space}" if _arg2 = "Left" then SendKeys "{End}{Left}" } } COMMAND "Down " { SCRIPT { SendKeys "{Down}" if _arg1 = "Enter" then SendKeys "{Home}{Enter}{Up}" if _arg1 = "Home" then SendKeys "{Home}" if _arg1 = "End" then SendKeys "{End}" if _arg1 = "Line" then SendKeys "{Home}{Enter}{Up}" if _arg1 = "Space " then SendKeys "{Home}{Space}" if _arg1 = "Left" then SendKeys "{End}{Left}" } } COMMAND "Paragraph " { SCRIPT { if _arg1 = "End" then SendKeys "{Ctrl+Down}" if _arg1 = "End Left" then SendKeys "{Ctrl+Down}{Left}" if _arg1 = "Home" then SendKeys "{Ctrl+Up}" } } COMMAND "Page " { SCRIPT { if _arg1 = "Up" then SendKeys "{PgUp}" if _arg1 = "Down" then SendKeys "{PgDn}" } } COMMAND "End Delete <1To10> Spaces" { SCRIPT { loop& = Val(_arg1) while ( loop& ) SendKeys "{Ctrl+Left}{Backspace}{Ctrl+Right}" loop& = loop& - 1 wend } } COMMAND "Delete <1To40>" { SCRIPT { if _arg1 = "End" then SendKeys "{End}{Shift+Left " + _arg2 + "}" if _arg1 = "Bottom" then SendKeys "{Ctrl+End}{Shift+Left " + _arg2 + "}" if _arg1 = "Top" then SendKeys "{Ctrl+Home}{Shift+Right " + _arg2 + "}" if _arg1 = "Home" then SendKeys "{Home}{Shift+Right " + _arg2 + "}" Wait 4 SendKeys "{Del}" } } COMMAND "Down Paragraph" { SCRIPT { SendKeys "{Ctrl+Down}{End}{Enter 2}{Up}" } } COMMAND "Enter " { SCRIPT { if _arg1 = "Clean" then SendKeys "{Enter}{Del}" if _arg1 = "Key" then SendKeys "{Enter}" } } COMMAND " " { SCRIPT { if _arg2 = "After" then SendKeys "{Right}" if _arg2 = "Right" then SendKeys "{Right}" if _arg2 = "Before" then SendKeys "{Left}" if _arg2 = "Left" then SendKeys "{Left}" if _arg2 = "Home" then SendKeys "{Home}" if _arg2 = "Top" then SendKeys "{Ctrl+Home}" if _arg2 = "End" then SendKeys "{End}" if _arg2 = "Bottom" then SendKeys "{Ctrl+End}" } } COMMAND "Help " { SCRIPT { WinHelp "Dragon.hlp", 11 Wait 10 if _arg1 = "Contents" then HeardWord "Click","Contents" Wait 10 SendKeys "{Tab}" end if if _arg1 = "Search" then HeardWord "Click", "Index" Wait 4 SendKeys "{Alt+t}" end if if _arg1 = "Index" then HeardWord "Click", "Index" Wait 4 SendKeys "{Alt+c}" end if if _arg1 = "Strategies" then HeardWord "Click", "Contents" Wait 4 SendKeys "{Tab}" Wait 4 HeardWord "strategies" Wait 10 SendKeys "{Enter}" end if if _arg1 = "Tips" then HeardWord "Click", "Contents" Wait 4 SendKeys "{Tab}" Wait 4 HeardWord "strategies" Wait 10 SendKeys "{Enter}" end if if _arg1 = "Scripting" then HeardWord "Click", "Contents" Wait 4 SendKeys "{Tab}" Wait 4 HeardWord "scripting" Wait 10 SendKeys "{Enter}" end if if _arg1 = "What" then HeardWord "Click", "Contents" Wait 4 SendKeys "{Tab}" Wait 4 HeardWord "what" Wait 10 SendKeys "{Enter}" end if if _arg1 = "How" then HeardWord "Click", "Contents" Wait 4 SendKeys "{Tab}" Wait 4 SendKeys "{Down 3}" Wait 10 SendKeys "{Enter}" Wait 4 SendKeys "{Down 5}" end if } } COMMAND " " { SCRIPT { if _arg2 = "Word" then SendKeys "{Shift+Ctrl+Left}{Del}" if _arg2 = "Line" then SendKeys "{Home}{Shift+Up}{Del}" if _arg2 = "Tab" then SendKeys "{Shift+Tab}" if _arg2 = "Delete" then SendKeys "{Backspace}{Del}" } } COMMAND " <1To40>" { SCRIPT { if _arg2 = "Word" then SendKeys "{Left}{Ctrl+Right}" if _arg2 = "Delete" then SendKeys "{Backspace}" loop& = Val(_arg3) while ( loop& ) if _arg2 = "Word" then SendKeys "{Shift+Ctrl+Left}" if _arg2 = "Line" then SendKeys "{Home}{Shift+Up}" if _arg2 = "Tab" then SendKeys "{Shift+Tab}" if _arg2 = "Delete" then SendKeys "{Shift+Right}" loop& = loop& - 1 wend SendKeys "{Del}" } } COMMAND "Clear Desktop" { SCRIPT "ClearDesktop" } COMMAND "Copy Notepad" { SCRIPT { AppBringUp "Notepad","C:\WINDOWS\NOTEPAD.EXE",1,"C:\WINDOWS" Wait 10 MenuPick "Edit" MenuPick "Select All" SendKeys "{Ctrl+c}{Down}" SendSystemKeys "{Alt+Esc}" } } COMMAND "Copy To Pad" { SCRIPT { SendKeys "{Ctrl+c}" AppBringUp "Notepad","C:\WINDOWS\Notepad.exe" Wait 10 SendKeys "{Ctrl+End}{Enter}{Enter}" SendKeys "{Ctrl+v}" } } COMMAND "Move <1To20> " { SCRIPT { if _arg1 = "Back" then _arg1 = "Up" if _arg1 = "Forward" then _arg1 = "Down" if _arg1 = "Up" then _dir$ = "Left" if _arg1 = "Down" then _dir$ = "Right" loop& = Val(_arg2) while ( loop& ) SendKeys "{" + _dir$ + "}{Ctrl+" + _arg1 + "}" loop& = loop& - 1 wend } } COMMAND "Move <1To20> " { SCRIPT { if _arg1 = "Back" then _arg1 = "Up" if _arg1 = "Forward" then _arg1 = "Down" SendKeys "{" + _arg1 + " " + _arg2 + "}" } } COMMAND "Move <1To20>" { SCRIPT { if _arg1 = "Back" then _arg1 = "Left" if _arg1 = "Forward" then _arg1 = "Right" SendKeys "{" + _arg1 + " " + _arg2 + "}" } } COMMAND "Move <1To20> " { SCRIPT { if _arg1 = "Back" then _arg1 = "Left" if _arg1 = "Forward" then _arg1 = "Right" SendKeys "{Ctrl+" + _arg1 + " " + _arg2 + "}" } } COMMAND "Select Again <1To10>" { SCRIPT { loop& = Val(_arg1) while ( loop& ) HeardWord "Select", "Again" loop& = loop& - 1 wend } } COMMAND "Move <1To40>" { SCRIPT { loop& = Val(_arg2) while ( loop& ) if _arg1 = "Over" then SendKeys "{Home}{Space}{Down}" if _arg1 = "Back" then SendKeys "{Home}{Del}{Down}" if _arg1 = "Tab" then SendKeys "{Home}{Tab}{Down}" loop& = loop& - 1 wend SendKeys "{Up}" } } COMMAND "Move <1To20> by <1To20>" { SCRIPT { loop& = Val(_arg3) while ( loop& ) if _arg1 = "Over" then SendKeys "{Home}{Space " + _arg2 + "}{Down}" if _arg1 = "Back" then SendKeys "{Home}{Del " + _arg2 + "}{Down}" if _arg1 = "Tab" then SendKeys "{Home}{Tab " + _arg2 + "}{Down}" loop& = loop& - 1 wend SendKeys "{Up}" } } COMMAND "Print " { SCRIPT { if _arg1 = "Pages" then SendKeys "{Alt+f}p{Alt+g}" if _arg1 = "Current Page" then SendKeys "{Alt+f}p{Alt+e}{Enter}" if _arg1 = "That" then SendKeys "{Alt+f}p" if _arg1 = "Now" then SendKeys "{Alt+f}p{Alt+n}{Enter}" if _arg1 = "Change" then SendKeys "{Alt+f}p{Alt+ExtDown}{Alt+n}{Up}" if _arg1 = "Selection" then SendKeys "{Ctrl+c}{Right}" AppBringUp "NOTEPAD" Wait 100 SendKeys "{Ctrl+v}" Wait 100 SendKeys "{Alt+f}p" Wait 2000 SendKeys "{Enter}" Wait 1000 SendKeys "{Alt+F4}" Wait 100 SendKeys "{Alt+n}" end if } } COMMAND "Run Program" { SCRIPT { SendSystemKeys "{Ctrl+Esc}" Wait 4 HeardWord "Run" } } COMMAND "Copy That" { KEYS { {Ctrl+c\} } } COMMAND "Paste Notepad" { SCRIPT { AppBringUp "Notepad","C:\WINDOWS\NOTEPAD.EXE",1,"C:\WINDOWS" SendKeys "{Alt+e}" SendKeys "a" Wait 10 SendKeys "{Ctrl+c}{Down}" SendSystemKeys "{Alt+Esc}" SendKeys "{Ctrl+v}" } } COMMAND "Move <1To20>" { SCRIPT { if _arg1 = "Back" then _arg1 = "Left" if _arg1 = "Forward" then _arg1 = "Right" SendKeys "{" + _arg1 + " " + _arg2 + "}" } } COMMAND "Scratch That <1To10>" { SCRIPT { loop& = Val(_arg1) while ( loop& ) HeardWord "Scratch","That" loop& = loop& - 1 wend } } COMMAND "Space " { SCRIPT { SendKeys "{Space}" if _arg1 = "Single Quotes" then SendKeys "'" if _arg1 = "Angle Brackets" then SendKeys "<" if _arg1 = "Quotes" then SendKeys """" if _arg1 = "Parens" then SendKeys "(" if _arg1 = "Stars" then SendKeys "*" if _arg1 = "Braces" then SendKeys "{" if _arg1 = "Brackets" then SendKeys "[" if _arg1 = "Angles" then SendKeys "<" if _arg1 = "Single Quotes" then SendKeys "'" if _arg1 = "Angle Brackets" then SendKeys ">" if _arg1 = "Quotes" then SendKeys """" if _arg1 = "Parens" then SendKeys ")" if _arg1 = "Stars" then SendKeys "*" if _arg1 = "Braces" then SendKeys "}" if _arg1 = "Brackets" then SendKeys "]" if _arg1 = "Angle" then SendKeys ">" if _arg1 = "Angles" then SendKeys ">" SendKeys "{Left}" if _arg1 = "Right" then SendKeys "{Right}{Right}" } } COMMAND "Clean Scratch <1To20>" { SCRIPT { loop& = Val(_arg1) while ( loop& ) HeardWord "Scratch","That" loop& = loop& - 1 wend SendKeys "{Backspace}" } } COMMAND "Cap Initial" { SCRIPT { SendKeys "{Ctrl+t}" SendKeys "{Left}{Right}" SendKeys "{Ctrl+Right}" Wait 10 HeardWord "Cap", "That" } } COMMAND "Triple " { SCRIPT { SendKeys "{Space}" if _arg1 = "x" then SendKeys "xxx" if _arg1 = "w" then SendKeys "www" } } COMMAND "Page <1to100>" { SCRIPT { loop& = Val(_arg1) while ( loop& ) SendKeys "{PgDn}" loop& = loop& - 1 wend } } COMMAND "Run " { SCRIPT { SendSystemKeys "{Ctrl+Esc}" Wait 4 HeardWord "Run" Wait 10 SendKeys "" + _arg1 + "" Wait 10 SendKeys "{Enter}" } } COMMAND "Clean " { SCRIPT { if _arg1 = "Touch" then ButtonClick 1,1 SendKeys "{Home}{Shift+End}{Del}" end if if _arg1 = "Line" then SendKeys "{Enter}{Del}" if _arg1 = "Paste" then SendKeys "{Ctrl+v}{Backspace}" } } COMMAND "Look In" { KEYS { SendKeys "{Alt+i}"\nWait 4\nSendKeys "{Down}" } } COMMAND " Cursor" { SCRIPT { SendKeys "{Shift+Right 4}" Wait 600 SendKeys "{Left 4}" } } COMMAND " " { SCRIPT { if _arg2 = "Files" then HeardWord "Switch", "to", "Windows Explorer" } } COMMAND "Delete Word" { SCRIPT { if _arg1 = "Next" then SendKeys "{Shift+Ctrl+Right}" if _arg1 = "Last" then SendKeys "{Shift+Ctrl+Left}" SendKeys "{Del}" } } COMMAND "Apostrophe " { SCRIPT { if _arg1 = "Selected" then SendKeys "{Right}" SendKeys "{Left}'{Right}" } } COMMAND "Tray Right <1To10>" { SCRIPT { if _arg1 = "1" then SetMousePosition 0, 940, 750 if _arg1 = "2" then SetMousePosition 0, 918, 750 if _arg1 = "3" then SetMousePosition 0, 895, 750 if _arg1 = "4" then SetMousePosition 0, 875, 750 if _arg1 = "5" then SetMousePosition 0, 854, 750 if _arg1 = "6" then SetMousePosition 0, 834, 750 if _arg1 = "7" then SetMousePosition 0, 812, 750 if _arg1 = "8" then SetMousePosition 0, 792, 750 if _arg1 = "9" then SetMousePosition 0, 772, 750 if _arg1 = "10" then SetMousePosition 0, 752, 750 ButtonClick 2,1 } } COMMAND "Mouse " { SCRIPT { if _arg1 = "Click" then ButtonClick 1,1 if _arg1 = "Double Click" then ButtonClick 1,2 if _arg1 = "Left Click" then ButtonClick 1,1 if _arg1 = "Right Click" then ButtonClick 2,1 if _arg1 = "Mark" then RememberPoint MouseGrid 0 end if if _arg1 = "Go" then MouseGrid 0 if _arg1 = "Drag" then DragToPoint 1 if _arg1 = "Shift Drag" then ShiftKey 1,1 DragToPoint 1 ShiftKey 1,0 end if if _arg1 = "Control Drag" then ShiftKey 2,1 DragToPoint 1 ShiftKey 2,0 end if } } COMMAND "Start Menu" { SCRIPT { SendSystemKeys "{Ctrl+Esc}" } } COMMAND "Start Menu " { SCRIPT { SendSystemKeys "{Ctrl+Esc}" Wait 4 SendKeys "{Up 9}" SendKeys "{Enter}" HeardWord "" + _arg1 + "" Wait 4 SendKeys "{Down}" } } COMMAND "Show " { SCRIPT { HeardWord "House", "Notepad" Wait 300 SendKeys "{F5}" } } COMMAND " <1-10>" { SCRIPT { HeardWord "Fix", "That" Wait 100 loop& = Val(_arg1) while ( loop& ) SendKeys "{Down}" loop& = loop& - 1 wend SendKeys "{Enter}" } } COMMAND " <1to100>" { SCRIPT { if _arg1 = "New Pren" then SendKeys "{Enter}" if _arg1 = "New Number" then SendKeys "{Enter}" SendKeys "" + _arg2 + "" if _arg1 = "Number" then SendKeys ".{Space}" if _arg1 = "Pren" then SendKeys "){Space}" if _arg1 = "New Number" then SendKeys ".{Space}" if _arg1 = "New Pren" then SendKeys "){Space}" } } COMMAND " " { SCRIPT { if _arg1 = "New Letter" then SendKeys "{Enter}" if _arg1 = "New Pren" then SendKeys "{Enter}" SendKeys "" + _arg2 + "" if _arg1 = "Pren" then SendKeys "){Space}" if _arg1 = "New Pren" then SendKeys "){Space}" if _arg1 = "Letter" then SendKeys ".{Space}" if _arg1 = "New Letter" then SendKeys ".{Space}" } } COMMAND "Toggle NaturalWord" { SCRIPT { SendSystemKeys "{ScrollLock}" } } COMMAND "Small Tray Right <1To10>" { SCRIPT { if _arg1 = "1" then SetMousePosition 0, 726, 584 if _arg1 = "2" then SetMousePosition 0, 710, 584 if _arg1 = "3" then SetMousePosition 0, 690, 584 if _arg1 = "4" then SetMousePosition 0, 675, 584 if _arg1 = "5" then SetMousePosition 0, 658, 584 if _arg1 = "6" then SetMousePosition 0, 643, 584 if _arg1 = "7" then SetMousePosition 0, 625, 584 if _arg1 = "8" then SetMousePosition 0, 608, 584 if _arg1 = "9" then SetMousePosition 0, 590, 584 if _arg1 = "10" then SetMousePosition 0, 773, 584 ButtonClick 2,1 } } COMMAND "Please " { SCRIPT { if _arg1 = "Expand" then SendSystemKeys "{NumKey+}" if _arg1 = "Expand Last" then SendSystemKeys "{NumKey-}{Up}{NumKey+}" if _arg1 = "Expand Up" then SendSystemKeys "{NumKey-}{Up}{NumKey+}" if _arg1 = "Expand Next" then SendSystemKeys "{NumKey-}{Down}{NumKey+}" if _arg1 = "Expand Down" then SendSystemKeys "{NumKey-}{Down}{NumKey+}" if _arg1 = "Contract" then SendSystemKeys "{NumKey-}" } } COMMAND "Please Find" { KEYS { {Ctrl+f\} } } COMMAND "Close Now" { SCRIPT { SendSystemKeys "{Ctrl+Esc}" Wait 4 HeardWord "" + _arg1 + "" Wait 600 HeardWord "Please", "Disconnect" } } COMMAND " <1To40> Words" { SCRIPT { if _arg1 = "Home" then SendKeys "{Home}" if _arg1 = "End" then SendKeys "{End}" if _arg1 = "Bottom" then SendKeys "{Ctrl+End}" if _arg1 = "Top" then SendKeys "{Ctrl+Home}" if _arg2 = "Select" then SendKeys "{Shift+Ctrl+Right " + _arg3 + "}" if _arg2 = "Next" then SendKeys "{Shift+Ctrl+Right " + _arg3 + "}" if _arg2 = "Last" then SendKeys "{Shift+Ctrl+Left " + _arg3 + "}" } } COMMAND " <1To40>" { SCRIPT { if _arg1 = "Home" then SendKeys "{Home}" if _arg1 = "End" then SendKeys "{End}" if _arg1 = "Bottom" then SendKeys "{Ctrl+End}" if _arg1 = "Top" then SendKeys "{Ctrl+Home}" if _arg2 = "Select" then SendKeys "{Shift+Right " + _arg3 + "}" if _arg2 = "Next" then SendKeys "{Shift+Right " + _arg3 + "}" if _arg2 = "Last" then SendKeys "{Shift+Left " + _arg3 + "}" } } COMMAND " <1To40> Words" { SCRIPT { if _arg1 = "End" then SendKeys "{End}{Ctrl+Left " + _arg2 + "}" if _arg1 = "Home" then SendKeys "{Home}{Ctrl+Right " + _arg2 + "}" if _arg1 = "Bottom" then SendKeys "{Ctrl+End}{Ctrl+Left " + _arg2 + "}" if _arg1 = "Top" then SendKeys "{Ctrl+Home}{Ctrl+Right " + _arg2 + "}" } } COMMAND " <1To40> Lines" { SCRIPT { if _arg1 = "End" then SendKeys "{End}{Ctrl+Up " + _arg2 + "}" if _arg1 = "Home" then SendKeys "{Home}{Ctrl+Down " + _arg2 + "}" if _arg1 = "Bottom" then SendKeys "{Ctrl+End}{Ctrl+Up " + _arg2 + "}" if _arg1 = "Top" then SendKeys "{Ctrl+Home}{Ctrl+Down " + _arg2 + "}" } } COMMAND " <1To40> Lines" { SCRIPT { if _arg1 = "Home" then SendKeys "{Home}" if _arg1 = "End" then SendKeys "{End}" if _arg1 = "Bottom" then SendKeys "{Ctrl+End}" if _arg1 = "Top" then SendKeys "{Ctrl+Home}" if _arg2 = "Select" then SendKeys "{Shift+Ctrl+Down " + _arg3 + "}" if _arg2 = "Next" then SendKeys "{Shift+Ctrl+Down " + _arg3 + "}" if _arg2 = "Last" then SendKeys "{Shift+Ctrl+Up " + _arg3 + "}" } } COMMAND " <1To10> " { SCRIPT { if _arg1 = "Next" then loop& = Val(_arg2) while ( loop& ) if _arg3 = "Pane" then SendKeys "{Tab}{Down}{Up}" if _arg3 = "Document" then SendKeys "{Ctrl+F6}" if _arg3 = "Window" then SendSystemKeys "{Alt+Esc}" if _arg3 = "Panes" then SendKeys "{Tab}{Down}{Up}" if _arg3 = "Documents" then SendKeys "{Ctrl+F6}" if _arg3 = "Windows" then SendSystemKeys "{Alt+Esc}" loop& = loop& - 1 wend end if if _arg1 = "Last" then loop& = Val(_arg2) while ( loop& ) if _arg3 = "Pane" then SendKeys "{Shift+Tab}{Down}{Up}" if _arg3 = "Document" then SendKeys "{Shift+Ctrl+F6}" if _arg3 = "Window" then SendSystemKeys "{Alt+Shift+Esc}" if _arg3 = "Panes" then SendKeys "{Shift+Tab}{Down}{Up}" if _arg3 = "Documents" then SendKeys "{Shift+Ctrl+F6}" if _arg3 = "Windows" then SendSystemKeys "{Alt+Shift+Esc}" loop& = loop& - 1 wend end if } } COMMAND " <1To40> <1To40>" { SCRIPT { loop& = Val(_arg2) while ( loop& ) if _arg1 = "Page Up" then SendKeys "{PgUp}" if _arg1 = "Page Down" then SendKeys "{PgDn}" loop& = loop& - 1 wend loop& = Val(_arg4) while ( loop& ) if _arg3 = "Up" then SendKeys "{Up}" if _arg3 = "Down" then SendKeys "{Down}" loop& = loop& - 1 wend } } COMMAND " <1To40>" { SCRIPT { if _arg1 = "Page Up" then SendKeys "{PgUp}" if _arg1 = "Page Down" then SendKeys "{PgDn}" loop& = Val(_arg3) while ( loop& ) if _arg2 = "Up" then SendKeys "{Up}" if _arg2 = "Down" then SendKeys "{Down}" loop& = loop& - 1 wend } } COMMAND "Macro Window" { SCRIPT { AppBringUp "WordPad", "C:\Progra~1\Accessories\Wordpad.exe Macrowin.txt",1,"C:\My Documents\Store " } } COMMAND "Close Next" { SCRIPT { SendKeys "{Alt+F4}" Wait 100 SendSystemKeys "{Alt+Esc}" } } COMMAND " Code" { SCRIPT { IF _arg1 = "Web" then SendKeys "www..com" else SendKeys "www.." + _arg1 + "" end if SendKeys "{Left 4}" HeardWord "\No-Space-On" } } COMMAND " " { SCRIPT { if _arg2 = "Document" then SendKeys "{Alt+-}" IF _arg2 = "Page" then SendKeys "{Alt+-}" IF _arg2 = "Window" then SendKeys "{Alt+Space}" Wait 10 IF _arg1 = "Minimize" XOR _arg1 = "Tiny" then SendKeys "n" IF _arg1 = "Maximize" XOR _arg1 = "Bigger" then SendKeys "x" IF _arg1 = "Restore" then SendKeys "r" } } COMMAND "Close " { SCRIPT { HeardWord "Switch to", "" + _arg2 + "" Wait 100 SendKeys "{Alt+f}a" Wait 10 if _arg1 = "Erase" then SendKeys "Backup" Wait 10 SendKeys "{Enter}y" Wait 10 SendKeys "{Alt+F4}" } } COMMAND "<1To10> " { SCRIPT { loop& = Val(_arg1) while ( loop& ) if _arg2 = "Pane" then SendKeys "{Tab}{Down}{Up}" if _arg2 = "Document" then SendKeys "{Ctrl+F6}" if _arg2 = "Window" then SendSystemKeys "{Alt+Esc}" if _arg2 = "Panes" then SendKeys "{Tab}{Down}{Up}" if _arg2 = "Documents" then SendKeys "{Ctrl+F6}" if _arg2 = "Windows" then SendSystemKeys "{Alt+Esc}" if _arg2 = "Word" then SendKeys "{Ctrl+Shift+Left}" if _arg2 = "Words" then SendKeys "{Ctrl+Shift+Left}" if _arg2 = "Line" then SendKeys "{Shift+Down}" if _arg2 = "Lines" then SendKeys "{Shift+Down}" loop& = loop& - 1 wend if _arg2 = "Clean Lines" then SendKeys "{Home}" loop& = Val(_arg1) while ( loop& ) SendKeys "{Shift+Down}" loop& = loop& - 1 wend end if if _arg2 = "Clean Line" then SendKeys "{Home}" loop& = Val(_arg1) while ( loop& ) SendKeys "{Shift+Down}" loop& = loop& - 1 wend end if } } COMMAND "Go <1To40>" { SCRIPT { if _arg1 = "End" then SendKeys "{End}{Left " + _arg2 + "}" if _arg1 = "Home" then SendKeys "{Home}{Right " + _arg2 + "}" if _arg1 = "Bottom" then SendKeys "{Ctrl+End}{Left " + _arg2 + "" IF _arg1 = "Top" then SendKeys "{Ctrl+Home}{Right " + _arg2 + "}" } } COMMAND "Use <1To10>" { SCRIPT { HeardWord "Oops" Wait 10 HeardWord "Choose", "" + _arg1 + "" } } COMMAND " To" { SCRIPT { IF _arg1 = "Send" then SendKeys "{Ctrl+Home}{Shift+Ctrl+End}{Ctrl+c}" IF _arg1 = "Send All" then SendKeys "{Ctrl+Home}{Shift+Ctrl+End}{Ctrl+c}" IF _arg1 = "Send This" then SendKeys "{Ctrl+c}" IF _arg1 = "Send Selection" then SendKeys "{Ctrl+c}" AppBringUp "Eudora","C:\EUDORA\EUDORA.EXE",1,"C:\EUDORA" Wait 2000 SendKeys "{Alt+m}m" } } COMMAND "Macro Window Two" { SCRIPT { AppBringUp "WordPad", "C:\Progra~1\Accessories\Wordpad.exe Macrowin2.txt",1,"C:\My Documents\Store" } } COMMAND "Press Enter <1To40> Times" { SCRIPT { loop& = Val(_arg1) while ( loop& ) SendKeys "{Enter}" loop& = loop& - 1 wend } } COMMAND "Delete <1To40> " { SCRIPT { loop& = Val(_arg1) while ( loop& ) if _arg2 = "Words" then SendKeys "{Ctrl+Shift+Right}" if _arg2 = "Lines" then SendKeys "{Shift+Down}" if _arg2 = "Spaces" then SendKeys "{Ctrl+Left}{Backspace}{Ctrl+Right}" IF _arg2 = "Now" then SendKeys "{Shift+Right}" loop& = loop& - 1 wend Wait 100 if _arg2 = "Words" then SendKeys "{Del}" if _arg2 = "Lines" then SendKeys "{Del}" IF _arg2 = "Now" then SendKeys "{Del}" } } COMMAND "Add Line" { SCRIPT { SendKeys "{Home}{Shift+End}" IF _arg1 = "Caps" then HeardWord "Add", "Caps" IF _arg1 = "Cap" then HeardWord "Add", "Caps" IF _arg1 = "All Caps" then HeardWord "Add", "\All-Caps" SendKeys "{Right}" } } COMMAND "Next " { SCRIPT { IF _arg1 = "Braces" then _arg1 = "{" IF _arg2 = "Braces" then _arg2 = "}" IF _arg1 = "Parens" then _arg1 = "(" IF _arg2 = "Parens" then _arg2 = ") " IF _arg1 = "Brackets" then _arg2 = "[" IF _arg2 = "Brackets" then _arg2 = "]" IF _arg1 = "Angle Brackets" then _arg1 = "<" IF _arg1 = "Angles" then _arg1 = "<" IF _arg2 = "Angle Brackets" then _arg2 = ">" IF _arg2 = "Angle" then _arg2 = ">" IF _arg1 = "Stars" then _arg1 = "*" IF _arg2 = "Stars" then _arg2 = "*" IF _arg1 = "Quote" then _arg1 = """" IF _arg2 = "Quote" then _arg2 = """" IF _arg1 = "Single Quotes" then _arg1 = "'" IF _arg2 = "Single Quotes" then _arg2 = "'" HeardWord "Select", _arg1, "Through",_arg2 } } COMMAND "Delete Line " { KEYS { {Home}{Shift+End}{Del}{Backspace\} } } COMMAND "Next " { SCRIPT { if _arg1 = "Word" then SendKeys "{Ctrl+Shift+Right}" if _arg1 = "Line" then SendKeys "{Shift+Down}" if _arg1 = "Page" then SendKeys "{Shift+PgDn}" if _arg1 = "Paragraph" then SendKeys "{Ctrl+Down}{End}{Down}{Down}{Home}{Shift+Ctrl+Down}" if _arg1 = "Pane" then SendKeys "{Tab}{Down}{Up}" if _arg1 = "Cell" then SendKeys "{Tab}{Down}{Up}" if _arg1 = "Document" then SendKeys "{Ctrl+F6}" if _arg1 = "Window" then SendSystemKeys "{Alt+Esc}" } } COMMAND "Last " { SCRIPT { if _arg1 = "Word" then SendKeys "{Ctrl+Shift+Left}" if _arg1 = "Line" then SendKeys "{Shift+Up}" if _arg1 = "Page" then SendKeys "{Shift+PgUp}" if _arg1 = "Document " then SendKeys "{Shift+Ctrl+F6}" if _arg1 = "Pane" then SendKeys "{Shift+Tab}{Down}{Up}" if _arg1 = "Cell" then SendKeys "{Shift+Tab}{Down}{Up}" if _arg1 = "Paragraph" then SendKeys "{Ctrl+Up}{Home}{Up 2}{End}{Shift+Ctrl+Up}" if _arg1 = "Phrase" then SendKeys "{Ctrl+t}" if _arg1 = "Window" then SendSystemKeys "{Alt+Shift+Esc}" } } COMMAND "Half " { SCRIPT { IF _arg1 = "Up" XOR _arg1 = "Page Up" then SendKeys "{Up 30}{Down 15}" ELSE SendKeys "{Down 30}{Up 15}" END IF } } COMMAND " " { SCRIPT { IF _arg1 = "Top of" XOR _arg1 = "Select Top of" THEN if _arg2 = "Line" then SendKeys "{Shift+Home}" if _arg2 = "Paragraph" then SendKeys "{Shift+Ctrl+Up}" if _arg2 = "Document" then SendKeys "{Shift+Ctrl+Home}" ELSE if _arg2 = "Line" then SendKeys "{Shift+End}" if _arg2 = "Paragraph" then SendKeys "{Ctrl+Shift+Down}" if _arg2 = "Document" then SendKeys "{Ctrl+Shift+End}" END IF } } COMMAND " " { SCRIPT { HeardWord "Select", "" + _arg2 + "" Wait 100 SendKeys "{Ctrl+x}" HeardWord "Add", "" + _arg1 + "s" Wait 100 SendKeys "{Ctrl+v}" IF _arg2 = "Paragraph" THEN SendKeys "{Right}{Enter}{Left 2}{Backspace}" IF _arg2 = "Line" THEN SendKeys "{Right}{Space}{Left 2}{Backspace}" IF _arg2 = "Rest of Line" THEN SendKeys "{Right}{Space}{Left 2}{Backspace}" IF _arg3 = "Out" THEN IF _arg2 = "Word" THEN SendKeys "{Right}{Space}{Left 2}{Backspace}{Right}" ELSE SendKeys "{Right}" END IF IF _arg2 = "Word" AND _arg3 = "Plus" THEN SendKeys "{Backspace}{Right}" HeardWord "Add", "" + _arg1 + "s" Wait 10 SendKeys "{Del}{Del}{Right}" END IF IF _arg2 = "Word" AND _arg3 = "In" THEN SendKeys "{Right}{Space}{Left 2}{Backspace}" } } COMMAND " Wrap " { SCRIPT { IF _arg1 = "Open" THEN AppBringUp "Notepad" IF _arg1 = "New Open" THEN HeardWord "House", "Notepad" Wait 60 SendKeys "{Alt+e}w" SendKeys "{Alt+f}a" Wait 10 SendKeys "C:\My Documents\Store\Backup{Enter}" Wait 10 SendKeys "y" Wait 10 SendKeys "{Alt+f}o" Wait 10 SendKeys "C:\My Documents\Store\" + _arg2 + "" SendKeys "{Alt+o}" } } COMMAND " " { SCRIPT { SendKeys "{" + _arg1 + "}" IF _arg2 = "Back" THEN SendKeys "{Shift+Left}" IF _arg2 = "Backspace" THEN SendKeys "{Shift+Left}" IF _arg2 = "Delete" THEN SendKeys "{Shift+Right}" Wait 200 SendKeys "{Del}" } } COMMAND " <1To20> Paragraphs" { SCRIPT { if _arg1 = "Up" then SendKeys "{Ctrl+Down}" loop& = Val(_arg1) while ( loop& ) SendKeys "{Shift+Ctrl+Up}" loop& = loop& - 1 wend end if if _arg1 = "Down " then SendKeys "{Ctrl+Up}" loop& = Val(_arg1) while ( loop& ) SendKeys "{Shift+Ctrl+Down}" loop& = loop& - 1 wend end if } } COMMAND " <1To20> <1To20>" { SCRIPT { loop& = Val(_arg2) while ( loop& ) IF _arg1 = "Left" THEN SendKeys "{Left}" IF _arg1 = "Right" THEN SendKeys "{Right}" IF _arg1 = "Up" THEN SendKeys "{Up}" IF _arg1 = "Down" THEN SendKeys "{Down}" loop& = loop& - 1 wend loop& = Val(_arg4) while ( loop& ) IF _arg3 = "Back" THEN SendKeys "{Backspace}" IF _arg3 = "Backspace" THEN SendKeys "{Shift+Left}" IF _arg3 = "Delete" THEN SendKeys "{Shift+Right}" loop& = loop& - 1 wend SendKeys "{Del}" } } COMMAND "Close <1To5> " { SCRIPT { loop& = Val(_arg1) while ( loop& ) if _arg2 = "Documents" then SendKeys "{Ctrl+F4}" if _arg2 = "Pages" then SendKeys "{Ctrl+F4}" if _arg2 = "Windows" then SendKeys "{Alt+F4}" loop& = loop& - 1 wend } } COMMAND "Add Location" { SCRIPT { SendKeys "{Ctrl+c}" Wait 4 AppBringUp "NatSpeak" Wait 100 HeardWord "Edit","Netscape", "Macro" Wait 1000 SendKeys "{PgUp 30}{Down}" Wait 10 SendKeys "{Enter}{Enter}{Down 3}{Enter}{Up}" Wait 10 SendKeys "if _arg2 = ""Name"" then key$ = """"" Wait 10 SendKeys "{Left}{Ctrl+v}" SendKeys "{Home}{Right 12}{Shift+Right 4}" } } COMMAND "Remove " { SCRIPT { if _arg1 = "Ends" then SendKeys "{Ctrl+Right}{Left}{Backspace}{Ctrl+Left}{Del}{Ctrl+Right}" if _arg1 = "Space" then SendKeys "{Ctrl+Left}{Backspace}{Ctrl+Right}{Backspace}{Ctrl+Right}" IF _arg1 = "Apostrophe" THEN SendKeys "{Left}{Backspace}{Right}" IF _arg1 = "Right Space" THEN SendKeys "{Right}{Del}{Left}" IF _arg1 = "Left Space" THEN SendKeys "{Left}{Del}{Right}" } } COMMAND " <1To10>" { SCRIPT { IF _arg2 = "Left" THEN SendKeys "{Left}{Space " + _arg3 + "}{Right}" IF _arg2 = "Right" THEN SendKeys "{Right}{Space " + _arg3 + "}{Left}{Left " + _arg3 + "}" } } COMMAND "Backspace " { SCRIPT { IF _arg1 = "Right" THEN SendKeys "{Right}{Del}{Left}" IF _arg1 = "Left" THEN SendKeys "{Left}{Backspace}{Right}" } } COMMAND "Find Another" { SCRIPT { SendKeys "{Ctrl+f}" SendKeys "{Enter}" Wait 10 SendKeys "{Tab}{Enter}" } } COMMAND " " { SCRIPT { IF _arg1 = "Another" THEN SendKeys "{End}{Enter}" IF _arg1 = "New" THEN SendKeys "{Enter}" IF _arg1 = "Next" THEN SendKeys "{Down}{Home}" IF _arg1 = "Insert" THEN SendKeys "{Home}{Enter}{Up}" IF _arg1 = "Last" THEN SendKeys "{Up}{Home}" if _arg2 = "Single Quotes" then SendKeys "'" if _arg2 = "Angle Brackets" then SendKeys "<" if _arg2 = "Quotes" then SendKeys """" if _arg2 = "Parens" then SendKeys "(" if _arg2 = "Stars" then SendKeys "*" if _arg2 = "Braces" then SendKeys "{" if _arg2 = "Brackets" then SendKeys "[" if _arg2 = "Angles" then SendKeys "<" if _arg2 = "Single Quotes" then SendKeys "'" if _arg2 = "Angle Brackets" then SendKeys ">" if _arg2 = "Quotes" then SendKeys """" if _arg2 = "Parens" then SendKeys ")" if _arg2 = "Stars" then SendKeys "*" if _arg2 = "Braces" then SendKeys "}" if _arg2 = "Brackets" then SendKeys "]" if _arg2 = "Angle" then SendKeys ">" if _arg2 = "Angles" then SendKeys ">" SendKeys "{Left}" } } COMMAND "This " { SCRIPT { if _arg1 = "Word" then SendKeys "{Ctrl+Right}{Shift+Ctrl+Left}" IF _arg1 = "Line" THEN SendKeys "{End}{Shift+Home}" if _arg1 = "Paragraph" then SendKeys "{Ctrl+Down}{Shift+Ctrl+Up}" if _arg1 = "Document" then SendKeys "{Ctrl+Home}{Shift+Ctrl+End}" } } COMMAND " Insert" { SCRIPT { IF _arg1 = "Top" then SendKeys "{Ctrl+Home}{Enter}{Up}" IF _arg1 = "Go Top " then SendKeys "{Ctrl+Home}{Enter}{Up}" IF _arg1 = "Bottom" then SendKeys "{Ctrl+End}{Enter}" IF _arg1 = "Go Bottom" then SendKeys "{Ctrl+End}{Enter}" } } COMMAND " Space <1to100>" { SCRIPT { IF _arg2 = "Hundred" THEN _arg2 = "100" IF _arg2 = "One Hundred" THEN _arg2 = "100" if _arg1 = "Up" then SendKeys "{Up}" if _arg1 = "Down" then SendKeys "{Down}" SendKeys "{Home}" loop& = Val(_arg2) while ( loop& ) SendKeys "{Space}" loop& = loop& - 1 wend } } COMMAND " " { SCRIPT { IF _arg1 = "Short" AND _arg2 = "Control" then HeardWord "Ctrl" IF _arg1 = "Short" AND _arg2 = "Page Down" then SendKeys "PgDn" IF _arg1 = "Short" AND _arg2 = "Page Up" then SendKeys "PgUp" IF _arg1 = "Short" AND _arg2 = "To" XOR _arg2 = "Too" THEN HeardWord "to" IF _arg1 = "Short" AND _arg2 = "Cap To" XOR _arg2 = "Cap Too" THEN HeardWord "To" IF _arg1 = "Long" AND _arg2 = "Control" THEN SendKeys "Control" IF _arg1 = "Long" AND _arg2 = "Page Down" THEN SendKeys " page down" IF _arg1 = "Long" AND _arg2 = "Cap Page Down" THEN SendKeys "Page Down" IF _arg1 = "Long" AND _arg2 = "Page Up" THEN SendKeys " page up" IF _arg1 = "Long" AND _arg2 = "Cap Page Up" THEN SendKeys "Page Up" IF _arg1 = "Long" AND _arg2 = "Too" XOR _arg2 = "To" THEN HeardWord "too" IF _arg1 = "Long" AND _arg2 = "Cap Too" XOR _arg2 = "Cap To" THEN SendKeys "Too" } } COMMAND " " { SCRIPT { IF _arg2 = "Apostrophe" THEN SendKeys "{Left}'{Right}" IF _arg2 = "Pren s" THEN SendKeys "(s){Right}" IF _arg2 = "Plural" THEN SendKeys "(s){Right}" IF _arg2 = "Left" THEN SendKeys "{Left}{Space}{Right}" IF _arg2 = "Right" THEN SendKeys "{Right}{Space}{Left 2}" } } COMMAND "Written " { SCRIPT { SendKeys " " + _arg1 + "" } } COMMAND "Switch " { SCRIPT { if _arg1 = "Now" then SendKeys "{Ctrl+a}{Ctrl+x}{Down}" if _arg1 = "All" then SendKeys "{Ctrl+a}{Ctrl+x}{Down}" if _arg1 = "Selection" then SendKeys "{Ctrl+x}" if _arg1 = "This" then SendKeys "{Ctrl+x}" AppBringUp "Natspeak" Wait 100 SendKeys "{Alt+f}" Wait 100 SendKeys "{Down}{Down}{Down}{Enter}" Wait 10 SendKeys "{Tab}" Wait 10 SendKeys "{Enter}" Wait 10 SendKeys "backup" SendKeys "{Enter}" Wait 100 SendKeys "{Tab}" SendKeys "{Enter}" Wait 10 SendKeys "{Ctrl+a}" SendKeys "{Ctrl+v}" } } COMMAND " <1to100> Show" { SCRIPT { IF _arg2 = "Hundred" THEN _arg2 = "100" IF _arg2 = "One Hundred" THEN _arg2 = "100" SendKeys "{" + _arg1 + " " + _arg2 + "}" Wait 100 SendKeys "{Shift+Left 2}" Wait 100 SendKeys "{Right}" } } COMMAND "Copy " { SCRIPT { IF _arg1 = "As Bitmap" THEN SendKeys "{PrtSc}" IF _arg1 = "Window As Bitmap" THEN SendKeys "{Alt+PrtSc}" } } COMMAND " " { SCRIPT { SendKeys "{Space}" } } COMMAND " Menu" { SCRIPT { IF _arg1 = "System" THEN SendKeys "{Alt+Space}" IF _arg1 = "Window System" THEN SendKeys "{Alt+Space}" IF _arg1 = "Window" THEN SendKeys "{Alt+Space}" IF _arg1 = "Document" THEN SendKeys "{Alt+-}" IF _arg1 = "Document System" THEN SendKeys "{Alt+-}" } } COMMAND " Tab" { SCRIPT { IF _arg1 = "Next" THEN SendSystemKeys "{Ctrl+Tab}" IF _arg1 = "Last" THEN SendSystemKeys "{Shift+Ctrl+Tab}" } } COMMAND "Global Find" { SCRIPT { SetMousePosition 0, 30, 750 ButtonClick 2, 1 Wait 10 SendKeys "f" } } COMMAND "Start " { SCRIPT { SetMousePosition 0, 30, 750 ButtonClick 2, 1 } } COMMAND " " { SCRIPT { IF _arg1 = "Desktop" THEN SetMousePosition 0, 1020, 720 IF _arg1 = "Screen" THEN SetMousePosition 0, 1020, 720 IF _arg1 = "Taskbar" THEN SetMousePosition 0, 1013, 763 IF _arg1 = "Taskbar" XOR _arg1 = "Desktop" XOR _arg1 = "Screen" THEN ButtonClick 2, 1 IF _arg1 = "Item" THEN SendKeys "{Shift+F10}" IF _arg1 = "Local" THEN SendKeys "{Shift+F10}" IF _arg1 = "Icon" THEN SendKeys "{Alt+Enter}" SendKeys "{Down 5}" } } COMMAND " " { SCRIPT { IF _arg1 = "Desktop" THEN SetMousePosition 0, 1020, 720 IF _arg1 = "Screen" THEN SetMousePosition 0, 1020, 720 IF _arg1 = "Taskbar" THEN SetMousePosition 0, 1013, 763 ButtonClick 2, 1 SendKeys "r" } } COMMAND " <1To10> " { SCRIPT { loop& = Val(_arg2) while ( loop& ) IF _arg1 = "Next" THEN SendSystemKeys "{Ctrl+Tab}" IF _arg1 = "Last" THEN SendSystemKeys "{Shift+Ctrl+Tab}" loop& = loop& - 1 wend } } COMMAND "Dummy " { SCRIPT { IF _arg1 = "Text" XOR _arg1 = "Paragraph" XOR _arg1 = "Graph" THEN SendKeys "I want to make a Macro that puts a whole paragraph on-screen with a couple words from me. I'm going to just keep talking until I get a paragraph that runs a few lines long. That means I have to keep talking because I'm not there yet. And here's another line and I think this is about enough." SendKeys "{Enter}" IF _arg1 = "Text" THEN SendKeys "{Enter}" IF _arg1 = "Text" XOR _arg1 = "Line" THEN SendKeys "And here's a smaller line; just a short line." SendKeys "{Enter}" IF _arg1 = "Text" THEN SendKeys "{Enter}" IF _arg1 = "Text" THEN SendKeys "And I want a two-line paragraph here so I'll just keep talking for a few lines. Here are more words and more words and more words." IF _arg1 = "Text" THEN SendKeys "{Up 7}" IF _arg1 = "Line" THEN SendKeys "{Home}{Up}" IF _arg1 = "Graph" THEN SendKeys "{Up 4}" IF _arg1 = "Paragraph" THEN SendKeys "{Up 4}" SendKeys "{Home}" } } COMMAND "Select " { SCRIPT { if _arg1 = "All" then SendKeys "{Ctrl+Home}{Shift+Ctrl+End}" if _arg1 = "All Now" then SendKeys "{Ctrl+Home}{Shift+Ctrl+End}" if _arg1 = "Document" then SendKeys "{Ctrl+Home}{Shift+Ctrl+End}" if _arg1 = "Line" then SendKeys "{Home}{Shift+End}" if _arg1 = "Word" then SendKeys "{Ctrl+Right}{Shift+Ctrl+Left}" if _arg1 = "Paragraph" then SendKeys "{Ctrl+Down}{Shift+Ctrl+Up}" } } COMMAND " <1To10> " { SCRIPT { HeardWord "House", "WordPad" Wait 600 SendKeys "{Alt+f}o" Wait 4 SendKeys "\\Eric\Eric common\Store\" + _arg2 + _arg3 + ".txt" Wait 10 SendKeys "{Enter}" Wait 50 HeardWord "No", "Wrap" Wait 50 IF _arg4 = "All" THEN SendKeys "{Ctrl+a}" IF _arg4 = "Head" THEN SendKeys "{Ctrl+Home}{Down}{Shift+End}" IF _arg4 = "Headline" THEN SendKeys "{Ctrl+Home}{Down}{Shift+End}" IF _arg4 = "Byline" THEN SendKeys "{Ctrl+Home}{Down 3}{Shift+End}" IF _arg4 = "Categories" THEN SendKeys "{Ctrl+End}{End}{Shift+Up 6}" IF _arg4 = "Full TRN" THEN SendKeys "{Ctrl+Home}{Shift+End}{Del}" SendKeys "{Ctrl+a}" END IF IF _arg4 = "Update" THEN SendKeys "{Ctrl+Home}{Shift+End}{Del}" SendKeys "{Ctrl+End}{End}{Shift+Up 6}{Del}" SendKeys "{Ctrl+a}" END IF IF _arg4 = "Story" XOR _arg4 = "Update Story" THEN SendKeys "{Ctrl+Home}{Shift+Down 5}{Del}" SendKeys "{Ctrl+End}{End}{Shift+Up 6}{Del}" SendKeys "{Ctrl+a}" END IF IF _arg4 = "TRN" THEN SendKeys "{Ctrl+Home}{Shift+Down 5}{Del}" SendKeys "{Ctrl+a}" END IF Wait 10 SendKeys "{Ctrl+c}{Down}" SendKeys "{Alt+F4}" IF _arg4 = "TRN" XOR _arg4 = "Update" XOR _arg4 = "Story" XOR _arg4 = "TRN Story" THEN Wait 100 SendKeys "n" END IF Wait 100 SendKeys "{Ctrl+v}" } } COMMAND " <1to100, 110to200>" { SCRIPT { IF _arg2 = "Hundred" THEN _arg2 = "100" IF _arg2 = "One Hundred" THEN _arg2 = "100" IF _arg2 = "Two Hundred" THEN _arg2 = "200" SendKeys "{" + _arg1 + " " + _arg2 + "}" IF _arg1 = "Up" THEN SendKeys "{Down}{Up}" IF _arg1 = "Down" THEN SendKeys "{Up}{Down}" IF _arg1 = "Right" THEN SendKeys "{Left}{Right}" IF _arg1 = "Left" THEN SendKeys "{Right}{Left}" } } COMMAND " <1To20> " { SCRIPT { IF _arg1 = "Another" THEN SendKeys "{End}{Enter}" IF _arg1 = "New" THEN SendKeys "{Enter}" IF _arg1 = "New Back" THEN SendKeys "{Enter}{Left}" IF _arg1 = "Next" THEN SendKeys "{Down}{Home}" IF _arg1 = "Insert" THEN SendKeys "{Home}{Enter}{Up}" IF _arg1 = "Last" THEN SendKeys "{Up}{Home}" Wait 3 IF _arg1 = "Another" XOR _arg1 = "New" XOR _arg1 = "New Back "XOR _arg1 = "Insert" THEN _arg1 = Val (_arg2) - 1 SendKeys "{Enter " + _arg2 + "}" Wait 3 SendKeys "{" + _arg3 + "}" } } COMMAND " <1To20> <1To20>" { SCRIPT { IF _arg1 = "Another" THEN SendKeys "{End}{Enter}" IF _arg1 = "New" THEN SendKeys "{Enter}" IF _arg1 = "New Back" THEN SendKeys "{Enter}{Left}" IF _arg1 = "Next" THEN SendKeys "{Down}{Home}" IF _arg1 = "Insert" THEN SendKeys "{Home}{Enter}{Up}" IF _arg1 = "Last" THEN SendKeys "{Up}{Home}" Wait 3 IF _arg1 = "Another" XOR _arg1 = "New" XOR _arg1 = "New Back "XOR _arg1 = "Insert" THEN _arg1 = Val (_arg2) - 1 SendKeys "{Enter " + _arg2 + "}" Wait 3 SendKeys "{" + _arg3 + " " + _arg4 + "}" } } COMMAND " <1To20> " { SCRIPT { SendKeys "{" + _arg1 + " " + _arg2 + "}" IF _arg3 = "Another" THEN SendKeys "{End}{Enter}" IF _arg3 = "New" THEN SendKeys "{Enter}" IF _arg3 = "New Back" THEN SendKeys "{Enter}{Left}" IF _arg3 = "Insert" THEN SendKeys "{Home}{Enter}{Up}" } } COMMAND " " { SCRIPT { SendKeys "{" + _arg1 + "}" IF _arg2 = "Another" THEN SendKeys "{End}{Enter}" IF _arg2 = "New" THEN SendKeys "{Enter}" IF _arg2 = "New Back" THEN SendKeys "{Enter}{Left}" IF _arg2 = "Insert" THEN SendKeys "{Home}{Enter}{Up}" } } COMMAND " <1To20>" { SCRIPT { IF _arg1 = "Another" THEN SendKeys "{End}{Enter}" IF _arg1 = "New" THEN SendKeys "{Enter}" IF _arg1 = "New Back" THEN SendKeys "{Enter}{Left}" IF _arg1 = "Insert" THEN SendKeys "{Home}{Enter}{Up}" Wait 3 IF _arg1 = "Another" XOR _arg1 = "New" XOR _arg1 = "New Back "XOR _arg1 = "Insert" THEN _arg1 = Val (_arg2) - 1 SendKeys "{Enter " + _arg2 + "}" } } COMMAND "Copy All" { SCRIPT { SendKeys "{Ctrl+Home}{Shift+Ctrl+End}{Ctrl+c}" Wait 10 SendKeys "{Right}" } } COMMAND " <1To20> " { SCRIPT { SendKeys "{" + _arg1 + " " + _arg2 + "}" Wait 10 HeardWord "" + _arg4 + "" IF _arg3 = "Delete" THEN Wait 100 IF _arg3 = "Delete" THEN SendKeys "{Del}" } } COMMAND " " { SCRIPT { SendKeys "{" + _arg1 + "}" Wait 10 HeardWord "" + _arg3 + "" IF _arg2 = "Delete" THEN Wait 100 IF _arg2 = "Delete" THEN SendKeys "{Del}" } } COMMAND " " { SCRIPT { SendKeys "{" + _arg1 + "}" Wait 10 HeardWord "" + _arg2 + "" } } COMMAND " <1To20> " { SCRIPT { SendKeys "{" + _arg1 + " " + _arg2 + "}" Wait 10 HeardWord "" + _arg3 + "" } } COMMAND " <1To20> " { SCRIPT { SendKeys "{" + _arg1 + " " + _arg2 + "}" HeardWord "Select", "" + _arg3 + "" } } COMMAND "Up " { SCRIPT { SendKeys "{Up}" if _arg1 = "Enter" then SendKeys "{End}{Enter}{Up}{Up}" if _arg1 = "Home" then SendKeys "{Home}" if _arg1 = "End" then SendKeys "{End}" if _arg1 = "New Line" then SendKeys "{End}{Enter}{Up}{Up}" if _arg1 = "Space " then SendKeys "{Home}{Space}" if _arg1 = "Left" then SendKeys "{End}{Left}" } } COMMAND "New Line Stay" { KEYS { {Enter}{Left\} } } COMMAND "New Back" { KEYS { {Enter}{Left\} } } COMMAND " <1To40> " { SCRIPT { IF _arg3 = "Line" XOR _arg3 = "Lines" THEN _arg2 = Val(_arg2)-1 if _arg1 = "Last" then loop& = Val(_arg2) while ( loop& ) if _arg3 = "Lines" then SendKeys "{Shift+Up}" if _arg3 = "Line" then SendKeys "{Shift+Up}" if _arg3 = "Word" then SendKeys "{Ctrl+Shift+Left}" if _arg3 = "Words" then SendKeys "{Ctrl+Shift+Left}" if _arg3 = "Page" then SendKeys "{Shift+PgUp}" if _arg3 = "Pages" then SendKeys "{Shift+PgUp}" loop& = loop& - 1 wend end if if _arg1 = "Next" then loop& = Val(_arg2) while ( loop& ) if _arg3 = "Line" then SendKeys "{Shift+Down}" if _arg3 = "Lines" then SendKeys "{Shift+Down}" if _arg3 = "Word" then SendKeys "{Ctrl+Shift+Right}" if _arg3 = "Words" then SendKeys "{Ctrl+Shift+Right}" if _arg3 = "Page" then SendKeys "{Shift+PgDn}" if _arg3 = "Pages" then SendKeys "{Shift+PgDn}" loop& = loop& - 1 wend end if IF _arg1 = "Next" AND _arg3 = "Line" THEN SendKeys "{Shift+End}" IF _arg1 = "Next" AND _arg3 = "Lines" THEN SendKeys "{Shift+End}" IF _arg1 = "Last" AND _arg3 = "Line" THEN SendKeys "{Shift+Home}" IF _arg1 = "Last" AND _arg3 = "Lines" THEN SendKeys "{Shift+Home}" } } COMMAND "Select <1To40> " { SCRIPT { SendKeys "{Left}{Ctrl+Up}" loop& = Val(_arg1) while ( loop& ) SendKeys "{Shift+Left}{Shift+Ctrl+Down}" loop& = loop& - 1 wend } } COMMAND "Open " { SCRIPT { SendSystemKeys "{Ctrl+Esc}" Wait 4 HeardWord "" + _arg1 + "" } } COMMAND " to " { SCRIPT { IF _arg2 = "Macro Window" THEN _arg2 = "Macrowin" IF _arg2 = "Macrowin 2" XOR _arg2 = "Macrowin Two" XOR _arg2 = "Macro Window 2" XOR _arg2 = "Macro Window Two" THEN _arg2 = "Macrowin2" if _arg1 = "Copy" then SendKeys "{Ctrl+c}" ELSE if _arg1 = "Cut" then SendKeys "{Ctrl+x}" ELSE HeardWord "" + _arg1 + "" END IF END IF Wait 10 HeardWord "House", "WordPad" Wait 100 SendKeys "{Ctrl+o}" Wait 10 SendKeys "C:\My Documents\Store\" + _arg2 + ".txt" Wait 10 SendKeys "{Enter}" Wait 200 SendKeys "{Ctrl+Home}{Shift+Ctrl+End}" SendKeys "{Del}" SendKeys "{Ctrl+v}" } } COMMAND " to " { SCRIPT { IF _arg2 = "Macro Window" THEN _arg2 = "Macrowin" IF _arg2 = "Macrowin 2" XOR _arg2 = "Macrowin Two" XOR _arg2 = "Macro Window 2" XOR _arg2 = "Macro Window Two" THEN _arg2 = "Macrowin2" if _arg1 = "Add This" XOR _arg1 = "Add Selection" XOR _arg1 = "Add" then SendKeys "{Ctrl+c}" ELSE IF _arg1 = "Add Line" THEN SendKeys "{Home}{Shift+End}{Ctrl+c}" ELSE IF _arg1 = "Add Paragraph" THEN SendKeys "{Ctrl+Down}{Shift+Ctrl+Up}{Ctrl+c}" ELSE if _arg1 = "Add All" then SendKeys "{Ctrl+Home}{Shift+Ctrl+End}{Ctrl+c}" END IF END IF END IF END IF Wait 10 HeardWord "House", "WordPad" Wait 100 SendKeys "{Ctrl+o}" Wait 10 SendKeys "C:\My Documents\Store\" + _arg2 + ".txt" Wait 10 SendKeys "{Enter}" Wait 200 SendKeys "{Ctrl+End}{Enter 2}" Wait 10 SendKeys "{Ctrl+v}" } } COMMAND " to <1-20StoreFiles> Stay" { SCRIPT { if _arg1 = "Add This" XOR _arg1 = "Add Selection" XOR _arg1 = "Add" then SendKeys "{Ctrl+c}" ELSE IF _arg1 = "Add Line" THEN SendKeys "{Home}{Shift+End}{Ctrl+c}" ELSE IF _arg1 = "Add Paragraph" THEN SendKeys "{Ctrl+Down}{Shift+Ctrl+Up}{Ctrl+c}" ELSE if _arg1 = "Add All" then SendKeys "{Ctrl+Home}{Shift+Ctrl+End}{Ctrl+c}" END IF END IF END IF END IF Wait 10 HeardWord "Open", "" + _arg2 + "" Wait 100 SendKeys "{Ctrl+End}" SendKeys "{Enter 2}" Wait 10 SendKeys "{Ctrl+v}" } } COMMAND " <1To20> " { SCRIPT { if _arg2 = "Previous" then _dirv$ = "Up" if _arg2 = "Next" then _dirv$ = "Down" if _arg2 = "Back" then _dirv$ = "Up" if _arg2 = "Forward" then _dirv$ = "Down" if _arg2 = "Last" then _dirv$ = "Up" if _dirv$ = "Up" then _dirh$ = "Left" if _dirv$ = "Down" then _dirh$ = "Right" SendKeys "{Left}{Ctrl+Down}" loop& = Val(_arg3) while ( loop& ) SendKeys "{Shift+" + _dirh$ + "}{Shift+Ctrl+" + _dirv$ + "}" loop& = loop& - 1 wend if _arg1 = "Delete" then SendKeys "{Del}" IF _arg1 = "Cut" THEN SendKeys "{Ctrl+x}" IF _arg1 = "Copy" THEN SendKeys "{Ctrl+c}" } } COMMAND " <1To40> Clean " { SCRIPT { IF _arg1 = "Next" THEN SendKeys "{Home}" IF _arg1 = "Last" THEN SendKeys "{Right}{Left}{End}" loop& = Val(_arg2) while ( loop& ) if _arg1 = "Next" then SendKeys "{Shift+Down}" if _arg1 = "Last" then SendKeys "{Shift+Up}" loop& = loop& - 1 wend } } COMMAND " <1To20> Times" { SCRIPT { loop& = Val(_arg2) while ( loop& ) IF _arg1 = "Touch" THEN ButtonClick 1,1 IF _arg1 = "Enter" THEN SendKeys "{Enter}" loop& = loop& - 1 wend } } COMMAND "WordPad Save " { SCRIPT { if _arg1 = "To" then SendKeys "{Ctrl+Home}{Shift+Ctrl+End}{Ctrl+c}" if _arg1 = "Selection To" then SendKeys "{Ctrl+c}" if _arg1 = "This To" then SendKeys "{Ctrl+c}" Wait 100 HeardWord "House", "WordPad" Wait 200 SendKeys "{Ctrl+v}" Wait 10 IF _arg2 = "Eric Edit" XOR _arg2 = "Kim Edit" then SendKeys "" ELSE SendKeys "{Ctrl+Home}" SendKeys "{Enter 2}{Up 2}" END IF SendKeys "{Alt+f}a" Wait 10 SendKeys "{Alt+n}" Wait 10 if _arg2 = "Background" then SendKeys "\\Eric\eric common\Background" if _arg2 = "Fodder" then SendKeys "\\Eric\eric common\Fodder" if _arg2 = "Library" then SendKeys "\\Eric\eric common\Library" if _arg2 = "Health" then SendKeys "\\Eric\eric common\Library\Health" if _arg2 = "Food" then SendKeys "\\Eric\eric common\Library\Food" if _arg2 = "Environment" then SendKeys "\\Eric\eric common\Library\Environment" if _arg2 = "Science" then SendKeys "\\Eric\eric common\Library\Science" if _arg2 = "General" then SendKeys "\\Eric\eric common\Library\General" if _arg2 = "Internet" then SendKeys "\\Eric\eric common\Library\Internet" if _arg2 = "Media" then SendKeys "\\Eric\eric common\Library\Media" if _arg2 = "Eric Edit" then SendKeys "\\Eric\eric common\To Edit" if _arg2 = "Kim Edit" then SendKeys "\\Kim\Kim common\To Edit" Wait 10 SendKeys "{Enter}" Wait 10 SendKeys "{Right}\" } } COMMAND " <1To20> Lines" { SCRIPT { IF _arg1 = "Another" THEN SendKeys "{End}{Enter}" IF _arg1 = "New" THEN SendKeys "{Enter}" IF _arg1 = "New Back" THEN SendKeys "{Enter}{Left}" IF _arg1 = "Insert" THEN SendKeys "{Home}{Enter}{Up}" Wait 3 SendKeys "{Enter " + _arg2 + "}" SendKeys "{Backspace}" } } COMMAND " " { SCRIPT { if _arg1 = "Switch" then HeardWord "Switch","to", "" + _arg2 + "" if _arg1 = "Switch to" then HeardWord "Switch to", "" + _arg2 + "" if _arg1 = "Start" then if _arg2 = "Word" then AppBringUp "WinWord" ELSE AppBringUp "" + _arg2 + "" Wait 1500 END IF IF _arg2 = "Notepad" XOR _arg2 = "WordPad" then wait 200 ELSE Wait 1500 END IF END IF if _arg3 = "Open" then SendKeys "{Alt+f}o" Wait 10 SendKeys "{Shift+Tab}{Down 5}" ELSE if _arg3 = "Open File" then SendKeys "{Alt+f}o" Wait 10 SendKeys "{Shift+Tab}{Down 5}" ELSE IF _arg3 = "Recent" XOR _arg3 = "Files" XOR _arg3 = "Recent Files" then SendKeys "{Alt+f}" Wait 10 SendKeys "{Down 12}" ELSE IF _arg3 = "Last" then SendKeys "{Alt+f}1" ELSE IF _arg3 = "Last File" then SendKeys "{Alt+f}1" ELSE HeardWord "Go", "" + _arg3 + "" END IF END IF END IF END IF END IF } } COMMAND "Copy Clipboard to " { SCRIPT { HeardWord "Open", "" + _arg1 + "" Wait 100 SendKeys "{Ctrl+Home}{Shift+Ctrl+End}{Del}" SendKeys "{Ctrl+v}" SendKeys "{Alt+F4}" Wait 100 SendKeys "y" } } COMMAND "Copy Clipboard to " { SCRIPT { HeardWord "Open", "" + _arg1 + "" Wait 100 SendKeys "{Ctrl+End}{Enter}" SendKeys "{Ctrl+v}" SendKeys "{Alt+F4}" Wait 100 SendKeys "y" } } COMMAND "Add Hyphen" { SCRIPT { HeardWord "Hyphenate", "That" } } COMMAND " Left" { SCRIPT { IF _arg1 = "Quote" THEN SendKeys """{Left}" IF _arg1 = "Period" THEN SendKeys ".{Left}" IF _arg1 = "Comma" THEN SendKeys ",{Left}" IF _arg1 = "Semicolon" THEN SendKeys ";{Left}" IF _arg1 = "Colon" THEN SendKeys ":{Left}" } } COMMAND "Select <1To40> " { SCRIPT { IF _arg2 = "Word" XOR _arg2 = "Words" THEN SendKeys "{Right}{Ctrl+Right}" IF _arg2 = "Line" XOR _arg2 = "Lines" THEN _arg1 = Val(_arg1)-1 loop& = Val(_arg1) while ( loop& ) if _arg2 = "Line" then SendKeys "{Home}{Shift+Down}" if _arg2 = "Lines" then SendKeys "{Home}{Shift+Down}" if _arg2 = "Word" then SendKeys "{Ctrl+Shift+Right}" if _arg2 = "Words" then SendKeys "{Ctrl+Shift+Right}" if _arg2 = "Page" then SendKeys "{Shift+PgDn}" if _arg2 = "Pages" then SendKeys "{Shift+PgDn}" loop& = loop& - 1 wend IF _arg2 = "Line" THEN SendKeys "{Shift+End}" IF _arg2 = "Lines" THEN SendKeys "{Shift+End}" } } COMMAND " <1To10> Words" { SCRIPT { IF _arg2 = "Last" XOR _arg2 = "Back" THEN SendKeys "{Left}{Ctrl+Right}" IF _arg2 = "Last" XOR _arg2 = "Back" THEN HeardWord "Last", "" + _arg3 + "", "Words" IF _arg2 = "Next" XOR _arg2 = "Forward" THEN HeardWord "Select", "" + _arg3 + "", "Words" Wait 200 SendKeys "{Ctrl+x}" HeardWord "Add", "" + _arg1 + "s" Wait 10 SendKeys "{Ctrl+v}{Right}{Space}" } } COMMAND " <1To10>" { SCRIPT { IF _arg2 = "Last" XOR _arg2 = "Back" THEN SendKeys "{Left}{Ctrl+Right}" IF _arg2 = "Last" XOR _arg2 = "Back" THEN HeardWord "Last", "" + _arg3 + "", "Words" IF _arg2 = "Next" XOR _arg2 = "Forward" THEN HeardWord "Select", "" + _arg3 + "", "Words" Wait 200 SendKeys "{Ctrl+x}" HeardWord "Add", "" + _arg1 + "s" Wait 10 SendKeys "{Ctrl+v}{Right}{Space}" } } COMMAND " <1To10> Words" { SCRIPT { HeardWord "Select", "" + _arg2 + "", "Words" Wait 200 SendKeys "{Ctrl+x}" HeardWord "Add", "" + _arg1 + "s" Wait 10 SendKeys "{Ctrl+v}{Right}{Space}" } } COMMAND "Backspace " { SCRIPT { SendKeys "{Backspace}" IF _arg1 = "Period" THEN SendKeys "." IF _arg1 = "Quote" THEN SendKeys """" IF _arg1 = "Semicolon" THEN SendKeys ";" IF _arg1 = "Comma" THEN SendKeys "," IF _arg1 = "Colon" THEN SendKeys ":" IF _arg1 = "Space" THEN SendKeys " " IF _arg1 = "New Line" XOR _arg1 = "New" XOR _arg1 = "Enter" THEN SendKeys "{Enter}" IF _arg1 = "Another Line" THEN SendKeys "{End}{Enter}" IF _arg1 = "Period Quote" THEN SendKeys ".""" IF _arg1 = "Comma Quote" THEN SendKeys ",""" IF _arg1 = "Semicolon Quote" THEN SendKeys ";""" } } COMMAND " <1To20>" { SCRIPT { IF _arg1 = "Word" THEN SendKeys "{Ctrl+Right " + _arg2 + "}" IF _arg1 = "Letter" THEN SendKeys "{Shift+Right " + _arg2 + "}" IF _arg1 = "Line" THEN SendKeys "{Down " + _arg2 + "}" } } COMMAND "Skip <1To20> Delete Letter" { SCRIPT { SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Left " + _arg1 + "}" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Shift+Left}" Wait 300 SendKeys "{Del}" } } COMMAND " <1To20> Delete <1To10> " { SCRIPT { IF _arg1 = "Word" THEN SendKeys "{Ctrl+Right " + _arg2 + "}" IF _arg1 = "Letter" THEN SendKeys "{Right " + _arg2 + "}" IF _arg1 = "Line" THEN SendKeys "{Down " + _arg2 + "}" IF _arg4 = "Letter" THEN SendKeys "{Shift+Right " + _arg3 + "}" IF _arg4 = "Word" THEN SendKeys "{Ctrl+Right " + _arg3 + "}" IF _arg4 = "Line" THEN SendKeys "{Home}{Shift+Down " + _arg3 + "}" Wait 300 SendKeys "{Del}" } } COMMAND "Skip <1To20> Delete" { SCRIPT { IF _arg2 = "Words" THEN SendKeys "{Ctrl+Left " + _arg1 + "}" IF _arg2 = "Letters" THEN SendKeys "{Left " + _arg1 + "}" IF _arg2 = "Lines" THEN SendKeys "{Up " + _arg1 + "}" IF _arg2 = "Letters" THEN SendKeys "{Shift+Left}" IF _arg2 = "Words" THEN SendKeys "{Ctrl+Left}" IF _arg2 = "Lines" THEN SendKeys "{Home}{Shift+Up}" Wait 300 SendKeys "{Del}" } } COMMAND "Skip <1To20> Delete <1To10>" { SCRIPT { IF _arg2 = "Words" THEN SendKeys "{Ctrl+Left " + _arg1 + "}" IF _arg2 = "Letters" THEN SendKeys "{Left " + _arg1 + "}" IF _arg2 = "Lines" THEN SendKeys "{Up " + _arg1 + "}" IF _arg2 = "Letters" THEN SendKeys "{Shift+Left " + _arg3 + "}" IF _arg2 = "Words" THEN SendKeys "{Ctrl+Left " + _arg3 + "}" IF _arg2 = "Lines" THEN SendKeys "{Home}{Shift+Up " + _arg3 + "}" Wait 300 SendKeys "{Del}" } } COMMAND "Skip <1To20> Delete <1To10> " { SCRIPT { SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Left " + _arg1 + "}" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Shift+Left " + _arg2 + "}" Wait 300 SendKeys "{Del}" } } COMMAND "Skip <1To20> Delete <1To10> " { SCRIPT { IF _arg2 = "Words" THEN SendKeys "{Ctrl+Left " + _arg1 + "}" IF _arg2 = "Letters" THEN SendKeys "{Left " + _arg1 + "}" IF _arg2 = "Lines" THEN SendKeys "{Up " + _arg1 + "}" IF _arg4 = "Letters" THEN SendKeys "{Shift+Left " + _arg3 + "}" IF _arg4 = "Words" THEN SendKeys "{Ctrl+Left " + _arg3 + "}" IF _arg4 = "Lines" THEN SendKeys "{Home}{Shift+Up " + _arg3 + "}" Wait 300 SendKeys "{Del}" } } COMMAND "Delete Next Space" { KEYS { {Ctrl+Right}{Backspace\} } } COMMAND "Delete Next <1To10> Spaces" { SCRIPT { loop& = Val(_arg1) while ( loop& ) SendKeys "{Ctrl+Right}{Backspace}" loop& = loop& - 1 wend } } COMMAND " Key" { SCRIPT { IF _arg1 = "Home" THEN SendKeys "{Home}" IF _arg1 = "End" THEN SendKeys "{End}" } } COMMAND "End Paragraph" { SCRIPT { SendKeys "{Ctrl+End}{Shift+Ctrl+Up}" } } COMMAND " Pane" { SCRIPT { if _arg1 = "Right" then SendKeys "{Tab}{Down}{Up}" if _arg1 = "Left" then SendKeys "{Shift+Tab}{Down}{Up}" } } COMMAND " <1To10>" { SCRIPT { IF _arg1 = "End" THEN SendKeys "{End}" IF _arg1 = "Home" THEN SendKeys "{Home}" loop& = Val(_arg3) while ( loop& ) if _arg2 = "Delete" then SendKeys "{Del}" if _arg2 = "Left" then SendKeys "{Left}" if _arg2 = "Right" then SendKeys "{Right}" if _arg2 = "Space" then SendKeys "{Space}" IF _arg2 = "Backspace" THEN SendKeys "{Backspace}" loop& = loop& - 1 wend } } COMMAND " " { SCRIPT { IF _arg1 = "End" THEN SendKeys "{End}" IF _arg1 = "Home" THEN SendKeys "{Home}" if _arg2 = "Delete" then SendKeys "{Del}" if _arg2 = "Left" then SendKeys "{Left}" if _arg2 = "Right" then SendKeys "{Right}" if _arg2 = "Space" then SendKeys "{Space}" IF _arg2 = "Backspace" THEN SendKeys "{Backspace}" IF _arg2 = "Quote" THEN SendKeys """" IF _arg2 = "Period" THEN SendKeys "." IF _arg2 = "Comma" THEN SendKeys "," IF _arg2 = "Semicolon" THEN SendKeys ";" IF _arg2 = "Colon" THEN SendKeys ":" IF _arg2 = "Period Quote" THEN SendKeys ".""" IF _arg2 = "Comma Quote" THEN SendKeys ",""" } } COMMAND " <1To10> " { SCRIPT { IF _arg3 = "Fifty" then _arg3 = "5" IF _arg3 = "Hundred" then _arg3 = "0" SendKeys "{" + _arg1 + " " + _arg2 + "" + _arg3 + "0}" } } COMMAND " <1To10> " { SCRIPT { loop& = Val(_arg2) while ( loop& ) SendKeys "{" + _arg1 + "}" loop& = loop& - 1 wend SendKeys "{" + _arg3 + "}" if _arg4 = "Delete" then SendKeys "{Del}" if _arg4 = "Left" then SendKeys "{Left}" if _arg4 = "Right" then SendKeys "{Right}" if _arg4 = "Space" then SendKeys "{Space}" IF _arg4 = "Backspace" THEN SendKeys "{Backspace}" IF _arg4 = "Quote" THEN SendKeys """" IF _arg4 = "Period" THEN SendKeys "." IF _arg4 = "Comma" THEN SendKeys "," IF _arg4 = "Semicolon" THEN SendKeys ";" IF _arg4 = "Colon" THEN SendKeys ":" IF _arg4 = "Period Quote" THEN SendKeys ".""" IF _arg4 = "Comma Quote" THEN SendKeys ",""" } } COMMAND "Up <1To10> " { SCRIPT { SendKeys "{Up " + _arg1 + "}" if _arg2 = "Enter" then SendKeys "{End}{Enter}{Up}{Up}" if _arg2 = "Home" then SendKeys "{Home}" if _arg2 = "End" then SendKeys "{End}" if _arg2 = "New Line" then SendKeys "{End}{Enter}{Up}{Up}" if _arg2 = "Space " then SendKeys "{Home}{Space}" if _arg2 = "Left" then SendKeys "{End}{Left}" } } COMMAND " <1To10> <1To10>" { SCRIPT { loop& = Val(_arg2) while ( loop& ) SendKeys "{" + _arg1 + "}" loop& = loop& - 1 wend SendKeys "{" + _arg3 + "}" loop& = Val(_arg5) while ( loop& ) if _arg4 = "Delete" then SendKeys "{Del}" if _arg4 = "Left" then SendKeys "{Left}" if _arg4 = "Right" then SendKeys "{Right}" if _arg4 = "Space" then SendKeys "{Space}" IF _arg4 = "Backspace" THEN SendKeys "{Backspace}" loop& = loop& - 1 wend } } COMMAND " <1To10>" { SCRIPT { SendKeys "{" + _arg1 + "}" SendKeys "{" + _arg2 + "}" loop& = Val(_arg4) while ( loop& ) if _arg3 = "Delete" then SendKeys "{Del}" IF _arg3 = "Left" then SendKeys "{Left}" if _arg3 = "Right" then SendKeys "{Right}" if _arg3 = "Space" then SendKeys "{Space}" IF _arg3 = "Backspace" THEN SendKeys "{Backspace}" loop& = loop& - 1 wend } } COMMAND " " { SCRIPT { SendKeys "{" + _arg1 + "}" SendKeys "{" + _arg2 + "}" if _arg3 = "Delete" then SendKeys "{Del}" if _arg3 = "Left" then SendKeys "{Left}" if _arg3 = "Right" then SendKeys "{Right}" if _arg3 = "Space" then SendKeys "{Space}" IF _arg3 = "Backspace" THEN SendKeys "{Backspace}" IF _arg3 = "Quote" THEN SendKeys """" IF _arg3 = "Period" THEN SendKeys "." IF _arg3 = "Comma" THEN SendKeys "," IF _arg3 = "Semicolon" THEN SendKeys ";" IF _arg3 = "Colon" THEN SendKeys ":" IF _arg3 = "Period Quote" THEN SendKeys ".""" IF _arg3 = "Comma Quote" THEN SendKeys ",""" } } COMMAND " <1To10> " { SCRIPT { IF _arg1 = "Delete" THEN _arg1 = "Del" IF _arg1 = "Backspace" XOR _arg1 = "Del" THEN loop& = Val(_arg2) while ( loop& ) IF _arg1 = "Backspace" THEN SendKeys "{Shift+Left}" IF _arg1 = "Del" THEN SendKeys "{Shift+Right}" loop& = loop& - 1 wend SendKeys "{Del}" END IF IF _arg1 = "Right" XOR _arg1 = "Left" XOR _arg1 = "Space" THEN loop& = Val(_arg2) while ( loop& ) SendKeys "{" + _arg1 + "}" loop& = loop& - 1 wend Wait 100 SendKeys "{Del}" END IF Wait 300 SendSystemKeys MID$(_arg3,0,1) SendSystemKeys MID$(_arg4,0,1) } } COMMAND " <1To10> " { SCRIPT { IF _arg1 = "Delete" THEN _arg1 = "Del" IF _arg1 = "Backspace" XOR _arg1 = "Del" THEN loop& = Val(_arg2) while ( loop& ) IF _arg1 = "Backspace" THEN SendKeys "{Shift+Left}" IF _arg1 = "Del" THEN SendKeys "{Shift+Right}" loop& = loop& - 1 wend SendKeys "{Del}" END IF IF _arg1 = "Right" XOR _arg1 = "Left" XOR _arg1 = "Space" THEN loop& = Val(_arg2) while ( loop& ) SendKeys "{" + _arg1 + "}" loop& = loop& - 1 wend Wait 100 SendKeys "{Del}" END IF Wait 300 SendSystemKeys MID$(_arg3,0,1) SendSystemKeys MID$(_arg4,0,1) SendSystemKeys MID$(_arg5,0,1) } } COMMAND " <1To10> <1To10>" { SCRIPT { IF _arg1 = "Delete" THEN _arg1 = "Del" IF _arg1 = "Backspace" XOR _arg1 = "Del" THEN loop& = Val(_arg2) while ( loop& ) IF _arg1 = "Backspace" THEN SendKeys "{Shift+Left}" IF _arg1 = "Del" THEN SendKeys "{Shift+Right}" loop& = loop& - 1 wend SendKeys "{Del}" END IF IF _arg1 = "Right" XOR _arg1 = "Left" XOR _arg1 = "Space" THEN loop& = Val(_arg2) while ( loop& ) SendKeys "{" + _arg1 + "}" loop& = loop& - 1 wend Wait 100 END IF IF _arg3 = "Backspace" XOR _arg3 = "Del" THEN loop& = Val(_arg4) while ( loop& ) IF _arg3 = "Backspace" THEN SendKeys "{Shift+Left}" IF _arg3 = "Del" THEN SendKeys "{Shift+Right}" loop& = loop& - 1 wend SendKeys "{Del}" END IF IF _arg3 = "Right" XOR _arg3 = "Left" XOR _arg3 = "Space" THEN loop& = Val(_arg4) while ( loop& ) SendKeys "{" + _arg3 + "}" loop& = loop& - 1 wend Wait 100 END IF } } COMMAND " <1To20> <1To20>" { SCRIPT { IF _arg1 = "Another Line" THEN SendKeys "{End}{Enter}" IF _arg1 = "New Line" THEN SendKeys "{Enter}" IF _arg1 = "New Back" THEN SendKeys "{Enter}{Left}" IF _arg1 = "Next Line" THEN SendKeys "{Down}{Home}" IF _arg1 = "Insert Line" THEN SendKeys "{Home}{Enter}{Up}" IF _arg1 = "Last Line" THEN SendKeys "{Up}{Home}" Wait 3 IF _arg1 = "Another Line" XOR _arg1 = "New Line" XOR _arg1 = "New Back "XOR _arg1 = "Insert Line" THEN _arg1 = Val (_arg3) - 1 SendKeys "{Enter " + _arg3 + "}" SendKeys "{Up " + _arg3 + "}" SendKeys "{Down " + _arg2 + "}" } } COMMAND " <1To20> Times" { SCRIPT { loop& = Val(_arg3) while ( loop& ) SendKeys _arg2 loop& = loop& - 1 wend } } COMMAND " <1To20> Times" { SCRIPT { loop& = Val(_arg3) while ( loop& ) SendKeys MID$(_arg2,0,1) loop& = loop& - 1 wend } } COMMAND " Cap <1To20> Times" { SCRIPT { loop& = Val(_arg3) while ( loop& ) SendSystemKeys "{Shift+"+MID$(_arg2,0,1)+"}" loop& = loop& - 1 wend } } COMMAND " <1To20> Times" { SCRIPT { if _arg2 = "Space" then _arg2 = "{Space}" if _arg2 = "space-bar" then _arg2 = "{Space}" if _arg2 = "Tab" then _arg2 = "{Tab}" if _arg2 = "tab-key" then _arg2 = "{Tab}" if _arg2 = "Escape" then _arg2 = "{Esc}" if _arg2 = "escape-key" then _arg2 = "{Esc}" if _arg2 = "Backspace" then _arg2 = "{BackSpace}" if _arg2 = "backspace-key" then _arg2 = "{BackSpace}" if _arg2 = "Enter" then _arg2 = "{Enter}" if _arg2 = "enter-key" then _arg2 = "{Enter}" if _arg2 = "Up" then _arg2 = "{Up}" if _arg2 = "up-arrow" then _arg2 = "{Up}" if _arg2 = "Down" then _arg2 = "{Down}" if _arg2 = "down-arrow" then _arg2 = "{Down}" if _arg2 = "Left" then _arg2 = "{Left}" if _arg2 = "left-arrow" then _arg2 = "{Left}" if _arg2 = "Right" then _arg2 = "{Right}" if _arg2 = "right-arrow" then _arg2 = "{Right}" if _arg2 = "page-up" then _arg2 = "{PgUp}" if _arg2 = "page-down" then _arg2 = "{PgDn}" if _arg2 = "Delete" then _arg2 = "{Del}" if _arg2 = "delete-key" then _arg2 = "{Del}" loop& = Val(_arg3) while ( loop& ) SendKeys "" + _arg2 + "" loop& = loop& - 1 wend } } COMMAND "Size <1to100> Line" { SCRIPT { loop& = Val(_arg1) while ( loop& ) SendKeys "_" loop& = loop& - 1 wend SendKeys "{Enter}" } } COMMAND " <1to100> <1to100>" { SCRIPT { IF _arg2 = "One Hundred" THEN _arg2 = "100" IF _arg2 = "Hundred" THEN _arg2 = "100" if _arg1 = "Up" then SendKeys "{Up " + _arg2 + "}" if _arg1 = "Down" then SendKeys "{Down " + _arg2 + "}" if _arg1 = "Left" then SendKeys "{Left " + _arg2 + "}" if _arg1 = "Right" then SendKeys "{Right " + _arg2 + "}" IF _arg4 = "One Hundred" THEN _arg4 = "100" IF _arg4 = "Hundred" THEN _arg4 = "100" if _arg3 = "Up" then SendKeys "{Up " + _arg4 + "}" if _arg3 = "Down" then SendKeys "{Down " + _arg4 + "}" if _arg3 = "Left" then SendKeys "{Left " + _arg4 + "}" if _arg3 = "Right" then SendKeys "{Right " + _arg4 + "}" IF _arg3 = "Up" THEN SendKeys "{Down}{Up}" IF _arg3 = "Down" THEN SendKeys "{Up}{Down}" IF _arg3 = "Right" THEN SendKeys "{Left}{Right}" IF _arg3 = "Left" THEN SendKeys "{Right}{Left}" } } COMMAND "Copy to Clipboard" { SCRIPT { HeardWord "Open", "" + _arg1 + "" Wait 100 SendKeys "{Ctrl+Home}{Shift+Ctrl+End}{Ctrl+c}" SendKeys "{Alt+F4}" } } COMMAND "Cap " { SCRIPT { IF _arg1 = "Next" THEN SendKeys "{Ctrl+Right}" IF _arg1 = "Home" THEN SendKeys "{Home}" IF _arg1 = "Word" XOR _arg1 = "Last" THEN SendKeys "{Ctrl+Left}" SendKeys "{Del}" SendKeys "" + _arg2 + "" } } COMMAND "Backspace <1To10> " { SCRIPT { IF _arg2 = "Space" THEN _arg2 = "{Space}" IF _arg2 = "zero" THEN _arg2 = "0" IF _arg2 = "Tab" THEN _arg2 = "{Tab}" loop& = Val(_arg1) while ( loop& ) SendKeys "{Backspace}" loop& = loop& - 1 wend SendKeys _arg2 } } COMMAND "Find Screen <1to100>" { SCRIPT { SendKeys "{Ctrl+Home}" Wait 10 SendKeys "{PgDn " + _arg1 + "}" } } COMMAND "Find Line <1To1000>" { SCRIPT { IF _arg1 = "Hundred" THEN _arg1 = "100" IF _arg1 = "One Hundred" THEN _arg1 = "100" IF _arg1 = "Two Hundred" THEN _arg1 = "200" IF _arg1 = "Three Hundred" THEN _arg1 = "300" IF _arg1 = "Four Hundred" THEN _arg1 = "400" IF _arg1 = "Five Hundred" THEN _arg1 = "500" IF _arg1 = "Six Hundred" THEN _arg1 = "600" IF _arg1 = "Seven Hundred" THEN _arg1 = "700" IF _arg1 = "Eight Hundred" THEN _arg1 = "800" IF _arg1 = "Nine Hundred" THEN _arg1 = "900" IF _arg1 = "One Thousand" THEN _arg1 = "1000" SendKeys "{Ctrl+Home}" Wait 10 SendKeys "{Down " + _arg1 + "}" Wait 10 SendKeys "{Down 10}{Up 10}" } } COMMAND "Enter Down <1To20>" { SCRIPT { SendKeys "{Enter}" loop& = Val(_arg1) while ( loop& ) SendKeys "{Down}" loop& = loop& - 1 wend } } COMMAND "Open File" { KEYS { {Ctrl+o}{Shift+Tab}{Down}{Up\} } } COMMAND " <1To10>" { SCRIPT { IF _arg2 = "Intro" THEN _arg2 = "Introduction" IF _arg2 = "General" XOR _arg2 = "Global Macros" THEN _arg2 = "General Global Macros" IF _arg2 = "Cursor" THEN _arg2 = "Moving the Cursor" IF _arg2 = "Selecting" XOR _arg2 = "Deleting" XOR _arg2 = "Selecting Deleting" THEN _arg2 = "Selecting and Deleting" IF _arg2 = "Copying Cutting Pasting" XOR _arg2 = "Copying" XOR _arg2 = "Cutting" XOR _arg2 = "Pasting" THEN _arg2 = "Copying Cutting and Pasting" IF _arg2 = "Keys and Multiple Keys" XOR _arg2 = "Pressing Keys" XOR _arg2 = "Keys" XOR _arg2 = "Multiple Keys" THEN _arg2 = "Pressing Keys and Multiple Keys" IF _arg2 = "Spaces" XOR _arg2 = "Punctuation" THEN _arg2 = "Spaces and Punctuation" IF _arg2 = "Mouse" XOR _arg2 = "Mouse Arrow" XOR _arg2 = "Dragging Objects" XOR _arg2 = "Dragging" THEN _arg2 = "Moving the Mouse" IF _arg2 = "Moving Windows" XOR _arg2 = "Sizing Windows" XOR _arg2 = "Moving" XOR _arg2 = "Sizing" XOR _arg2 = "Moving and Sizing" THEN _arg2 = "Moving and Sizing Windows" IF _arg2 = "Help" THEN _arg2 = "Getting Help" IF _arg2 = "Common Commands Open Save As Find Replace Font" XOR _arg2 = "Open" XOR _arg2 = "Save As" XOR _arg2 = "Find" XOR _arg2 = "Replace" XOR _arg2 = "Font" THEN _arg2 = "Common Commands" IF _arg2 = "NatSpeak" XOR _arg2 = "General NatSpeak" THEN _arg2 = "NatSpeak General" IF _arg2 = "Correction" XOR _arg2 = "NatSpeak Correction" THEN _arg2 = "Correction Box" IF _arg2 = "Explorer" XOR _arg2 = "Files" THEN _arg2 = "Windows Explorer" IF _arg2 = "Quick View" THEN _arg2 = "Quick View Plus" IF _arg2 = "IE" THEN _arg2 = "Internet Explorer" IF _arg2 = "Paint Shop" THEN _arg2 = "Paint Shop Pro" IF _arg2 = "ACDSee" THEN _arg2 = "ACDSee Browser" IF _arg2 = "HTML" THEN _arg2 = "Cute HTML" IF _arg2 = "FTP" THEN _arg2 = "Cute FTP" IF _arg2 = "Macros Explanation" XOR _arg2 = "Macros Explanations" XOR _arg2 = "Macro Explanation" XOR _arg2 = "About Macros" XOR _arg2 = "Macros for Making Macros" XOR _arg2 = "Macros Examples" XOR _arg2 = "Macro Example" XOR _arg2 = "Macro Examples" XOR _arg2 = "Macros Example" XOR _arg2 = "Macros" THEN _arg2 = "Macros for Making Macros Explanation" IF _arg2 = "Three" XOR _arg2 = "Step 3" XOR _arg2 = "Command Wizard 3" THEN _arg2 = "Three of Seven" IF _arg2 = "Four" XOR _arg2 = "Step 4" XOR _arg2 = "Command Wizard 4" XOR _arg2 = "Edit Four" XOR _arg2 = "Edit Four of Seven" THEN _arg2 = "Four of Seven" IF _arg2 = "Five" XOR _arg2 = "Step 5" XOR _arg2 = "Command Wizard 5" THEN _arg2 = "Five of Seven" IF _arg2 = "Six" XOR _arg2 = "Step 6" XOR _arg2 = "Command Wizard 6" XOR _arg2 = "New Six" XOR _arg2 = "New Six of Seven" THEN _arg2 = "Six of Seven" IF _arg2 = "Writing Macros" THEN _arg2 = "About Writing Macros" IF _arg2 = "Fixing" THEN _arg2 = "Fixing Macros" IF _arg2 = "Changes" XOR _arg2 = "Oops" XOR _arg2 = "Please" XOR _arg2 = "Capitalization" THEN _arg2 = "Other Changes" IF _arg2 = "About Speech" XOR _arg2 = "Using Speech" XOR _arg2 = "Using Speech Recognition" XOR _arg2 = "Speech Recognition" XOR _arg2 = "Voice" THEN _arg2 = "About Speech Recognition" IF _arg2 = "Resources" THEN _arg2 = "Further Resources" IF _arg1 = "Show Macros" XOR _arg1 = "Show Macro" XOR _arg1 = "Show Help On" XOR _arg1 = "Show Macro Help" XOR _arg1 = "Netscape Macros" THEN AppSwapWith "Netscape" IF _arg1 = "New Macro" XOR _arg1 = "New Macros" XOR _arg1 = "Show Help On" XOR _arg1 = "New Macro Help" XOR _arg1 = "New Netscape "XOR _arg1 = "New Netscape Macros" THEN HeardWord "House", "Netscape" IF _arg1 = "IE Macros" XOR _arg1 = "Internet Explorer Macros" XOR _arg1 = "Explorer Macros" THEN AppSwapWith "Internet Explorer" IF _arg1 = "New IE" XOR _arg1 = "New Internet" XOR _arg1 = "New Internet Explorer" THEN HeardWord "House", "Internet Explorer" Wait 3000 IF _arg1 = "IE Macros" XOR _arg1 = "Internet Explorer Macros" XOR _arg1 = "Explorer Macros" XOR _arg1 = "New IE" XOR _arg1 = "New Internet" XOR _arg1 = "New Internet Explorer " THEN SendKeys "{Alt+d}" ELSE SendKeys "{Ctrl+o}" END IF Wait 20 SendKeys "file:///C|/My Documents\Store\Kims Macros Help\" IF _arg2 = "Internet Locations" XOR _arg2 = "Web Locations" XOR _arg2 = "Locations" THEN SendKeys "Netscape\Netscape#Locations" ELSE IF _arg2 = "Four and Five" XOR _arg2 = "New Four and Edit Five" XOR _arg2 = "Edit Five" THEN SendKeys "Four of Seven\Four of Seven#New Four and Edit Five" ELSE IF _arg2 = "Macro Control" XOR _arg2 = "Six and List" XOR _arg2 = "Six Macro Control" XOR _arg2 = "List Macro Control" XOR _arg2 = "Six and List Macro Control" THEN SendKeys "Six of Seven\Six of Seven#Macro Control" ELSE SendKeys "" + _arg2 + "\" + _arg2 + "" END IF END IF END IF SendKeys ".html" Wait 10 SendKeys "{Enter}" Wait 100 _arg3 = "_arg3 - 1" SendKeys "{PgDn " + _arg3 + "}" } } COMMAND "Start Capture Now" { SCRIPT { HeardWord "House", "Paint Shop" Wait 200 SendKeys "{Shift+c}" Wait 100 ButtonClick 2,1 } } COMMAND " " { SCRIPT { IF _arg2 = "Intro" THEN _arg2 = "Introduction" IF _arg2 = "General" XOR _arg2 = "Global Macros" XOR _arg2 = "General Global Macros" THEN _arg2 = "General_Global_Macros" IF _arg2 = "Cursor" XOR _arg2 = "Moving the Cursor" THEN _arg2 = "Moving_the_Cursor" IF _arg2 = "Selecting" XOR _arg2 = "Deleting" XOR _arg2 = "Selecting Deleting" XOR _arg2 = "Selecting and Deleting" THEN _arg2 = "Selecting_and_Deleting" IF _arg2 = "Copying Cutting Pasting" XOR _arg2 = "Copying" XOR _arg2 = "Cutting" XOR _arg2 = "Pasting" XOR _arg2 = "Copying Cutting and Pasting" THEN _arg2 = "Copying_Cutting_and_Pasting" IF _arg2 = "Keys and Multiple Keys" XOR _arg2 = "Pressing Keys" XOR _arg2 = "Keys" XOR _arg2 = "Multiple Keys" XOR _arg2 = "Pressing Keys and Multiple Keys" THEN _arg2 = "Pressing_Keys_and_Multiple_Keys" IF _arg2 = "Spaces" XOR _arg2 = "Punctuation" XOR _arg2 = "Spaces and Punctuation" THEN _arg2 = "Spaces_and_Punctuation" IF _arg2 = "Mouse" XOR _arg2 = "Mouse Arrow" XOR _arg2 = "Dragging Objects" XOR _arg2 = "Dragging" XOR _arg2 = "Moving the Mouse" THEN _arg2 = "Moving_the_Mouse" IF _arg2 = "Moving Windows" XOR _arg2 = "Sizing Windows" XOR _arg2 = "Moving" XOR _arg2 = "Sizing" XOR _arg2 = "Moving and Sizing" XOR _arg2 = "Moving and Sizing Windows" THEN _arg2 = "Moving_and_Sizing_Windows" IF _arg2 = "Help" XOR _arg2 = "Getting Help" THEN _arg2 = "Getting_Help" IF _arg2 = "Common Commands Open Save As Find Replace Font" XOR _arg2 = "Open" XOR _arg2 = "Save As" XOR _arg2 = "Find" XOR _arg2 = "Replace" XOR _arg2 = "Font" XOR _arg2 = "Common Commands" THEN _arg2 = "Common_Commands" IF _arg2 = "NatSpeak" XOR _arg2 = "General NatSpeak" XOR _arg2 = "NatSpeak General" THEN _arg2 = "NatSpeak_General" IF _arg2 = "Correction" XOR _arg2 = "NatSpeak Correction" XOR _arg2 = "Correction Box" THEN _arg2 = "Correction_Box" IF _arg2 = "Explorer" XOR _arg2 = "Files" XOR _arg2 = "Windows Explorer" THEN _arg2 = "Windows_Explorer" IF _arg2 = "Quick View" XOR _arg2 = "Quick View Plus" THEN _arg2 = "Quick_View_Plus" IF _arg2 = "IE" XOR _arg2 = "Internet Explorer" THEN _arg2 = "Internet_Explorer" IF _arg2 = "Paint Shop" XOR _arg2 = "Paint Shop Pro" THEN _arg2 = "Paint_Shop_Pro" IF _arg2 = "ACDSee" XOR _arg2 = "ACDSee Browser" THEN _arg2 = "ACDSee_Browser" IF _arg2 = "HTML" XOR _arg2 = "Cute HTML" THEN _arg2 = "Cute_HTML" IF _arg2 = "FTP" XOR _arg2 = "Cute FTP" THEN _arg2 = "Cute_FTP" IF _arg2 = "Macros Explanation" XOR _arg2 = "Macros Explanations" XOR _arg2 = "Macro Explanation" XOR _arg2 = "About Macros" XOR _arg2 = "Macros for Making Macros" XOR _arg2 = "Macros Examples" XOR _arg2 = "Macro Example" XOR _arg2 = "Macro Examples" XOR _arg2 = "Macros Example" XOR _arg2 = "Macros" XOR _arg2 = "Macros for Making Macros Explanation" THEN _arg2 = "Macros_for_Making_Macros_Explanation" IF _arg2 = "Three" XOR _arg2 = "Step 3" XOR _arg2 = "Command Wizard 3" XOR _arg2 = "Three of Seven" THEN _arg2 = "Three_of_Seven" IF _arg2 = "Four" XOR _arg2 = "Step 4" XOR _arg2 = "Command Wizard 4" XOR _arg2 = "Edit Four" XOR _arg2 = "Edit Four of Seven" XOR _arg2 = "Four of Seven" THEN _arg2 = "Four_of_Seven" IF _arg2 = "Five" XOR _arg2 = "Step 5" XOR _arg2 = "Command Wizard 5" XOR _arg2 = "Five of Seven" THEN _arg2 = "Five_of_Seven" IF _arg2 = "Six" XOR _arg2 = "Step 6" XOR _arg2 = "Command Wizard 6" XOR _arg2 = "New Six" XOR _arg2 = "New Six of Seven" XOR _arg2 = "Six of Seven" THEN _arg2 = "Six_of_Seven" IF _arg2 = "Writing Macros" XOR _arg2 = "About Writing Macros" THEN _arg2 = "About_Writing_Macros" IF _arg2 = "Fixing" XOR _arg2 = "Fixing Macros" THEN _arg2 = "Fixing_Macros" IF _arg2 = "Changes" XOR _arg2 = "Oops" XOR _arg2 = "Please" XOR _arg2 = "Capitalization" XOR _arg2 = "Other Changes" THEN _arg2 = "Other_Changes" IF _arg2 = "About Speech" XOR _arg2 = "Using Speech" XOR _arg2 = "Using Speech Recognition" XOR _arg2 = "Speech Recognition" XOR _arg2 = "Voice" XOR _arg2 = "About Speech Recognition" THEN _arg2 = "About_Speech_Recognition" IF _arg2 = "Resources" XOR _arg2 = "Further Resources" THEN _arg2 = "Further_Resources" IF _arg2 = "Kim and Eric" XOR _arg2 = "Kim and Eric Macros" XOR _arg2 = "Kim Eric" THEN SendKeys "Kim_and_Eric_Macros" Wait 500 AppBringUp " + _arg2 + ","Dreamweaver \\Eric\eric data\Scriven\Scriven Site\RSI\RSIdata\Patch_Macros\Macro_Documentation\" + _arg2 + "\" + _arg2 + ".html", 3 } } COMMAND "Skip <1To20>" { SCRIPT { SendKeys "{Ctrl+Left " + _arg1 + "}" } } COMMAND "Show Resources" { SCRIPT { HeardWord "House", "Notepad" Wait 50 SendKeys "{Alt+h}" Wait 10 SendKeys "a" } } COMMAND " " { SCRIPT { if _arg2 = "Word" then SendKeys "{Right}{Ctrl+Left}{Ctrl+Shift+Right}" if _arg2 = "Line" then SendKeys "{Home}{Shift+End}" if _arg2 = "Paragraph" then SendKeys "{Ctrl+Up}{Shift+Ctrl+Down}" if _arg2 = "Top of Document" then SendKeys "{Shift+Ctrl+Home}" if _arg2 = "Rest of Document" then SendKeys "{Shift+Ctrl+End}" if _arg2 = "Top of Line" then SendKeys "{Shift+Home}" if _arg2 = "Rest of Line" then SendKeys "{Shift+End}" if _arg1 = "Cut" then SendSystemKeys "{Ctrl+x}" if _arg1 = "Copy" then SendSystemKeys "{Ctrl+c}" } } COMMAND "TRN Address" { KEYS " Technology Research News (www.TRNmag.com)" } COMMAND "Paste That" { SCRIPT { SendKeys "{Ctrl+v}" } } COMMAND "Print Now" { SCRIPT { HeardWord "Open", "" + _arg1 + "" Wait 100 SendSystemKeys "{Ctrl+p}" Wait 10 SendSystemKeys "{Enter}" } } COMMAND "Skip <1To10> Stay" { SCRIPT { SendKeys "{Left " + _arg1 + "}" SendKeys "{Backspace}" SendSystemKeys MID$(_arg3,0,1) } } COMMAND "Skip <1To10> " { SCRIPT { SendKeys "{Left " + _arg1 + "}" SendKeys "{Backspace}" SendSystemKeys MID$(_arg3,0,1) Wait 10 SendKeys "{Right " + _arg1 + "}" } } COMMAND " <0To20> <0To20> " { SCRIPT { if _arg4 = "Clean Lines" then SendKeys "{Home}" if _arg4 = "Clean Line" then SendKeys "{Home}" loop& = Val(_arg2) while ( loop& ) if _arg4 = "Words" then SendKeys "{Ctrl+Left}" if _arg4 = "Word" then SendKeys "{Ctrl+Left}" if _arg4 = "Lines" then SendKeys "{Up}" if _arg4 = "Line" then SendKeys "{Up}" if _arg4 = "Clean Line" then SendKeys "{Up}" if _arg4 = "Clean Lines" then SendKeys "{Up}" loop& = loop& - 1 wend loop& = Val(_arg2) while ( loop& ) if _arg4 = "Words" then SendKeys "{Shift+Ctrl+Right}" if _arg4 = "Word" then SendKeys "{Shift+Ctrl+Right}" if _arg4 = "Lines" then SendKeys "{Shift+Down}" if _arg4 = "Line" then SendKeys "{Shift+Down}" if _arg4 = "Clean Lines" then SendKeys "{Shift+Down}" if _arg4 = "Clean Line" then SendKeys "{Shift+Down}" loop& = loop& - 1 wend loop& = Val(_arg3) while ( loop& ) if _arg4 = "Words" then SendKeys "{Shift+Ctrl+Right}" if _arg4 = "Word" then SendKeys "{Shift+Ctrl+Right}" if _arg4 = "Lines" then SendKeys "{Shift+Down}" if _arg4 = "Line" then SendKeys "{Shift+Down}" if _arg4 = "Clean Lines" then SendKeys "{Shift+Down}" if _arg4 = "Clean Line" then SendKeys "{Shift+Down}" loop& = loop& - 1 wend if _arg1 = "Delete" then SendKeys "{Del}" IF _arg1 = "Cut" THEN SendKeys "{Ctrl+x}" IF _arg1 = "Copy" THEN SendKeys "{Ctrl+c}" } } COMMAND "Train This Word" { SCRIPT { AppBringUp "NatSpeak" SendKeys "{Ctrl+Right}{Shift+Ctrl+Left}" SendKeys "{Ctrl+c}{Alt+t}t" Wait 100 SendKeys "{Ctrl+v}" SendKeys "{Enter}" wait 100 SendKeys "{Enter}" } } COMMAND "Open File " { SCRIPT { SendKeys "{Ctrl+o}" Wait 100 SendKeys "{Shift+Tab}" Wait 20 Wait 40 SendKeys MID$(_arg1,0,1) } } COMMAND "Delete " { SCRIPT { if _arg1 = "Line" then SendKeys "{Home}{Shift+End}{Del}" if _arg1 = "Last Line" then SendKeys "{Up}{Home}{Shift+End}{Del}" if _arg1 = "Next Line" then SendKeys "{Down}{Home}{Shift+End}{Del}" if _arg1 = "Right" then SendKeys "{Shift+Right}{Del}" if _arg1 = "Left" then SendKeys "{Shift+Left}{Del}" if _arg1 = "Skip" then SendKeys "{Shift+Ctrl+Left}{Del}" if _arg1 = "Space" then SendKeys "{Ctrl+Left}{Backspace}{Ctrl+Right}" if _arg1 = "That Now" then SendKeys "{Del}" if _arg1 = "Word" then SendKeys "{Ctrl+Right}{Left}{Shift+Ctrl+Left}{Del}" if _arg1 = "Rest of Document" then SendKeys "{Shift+Ctrl+End}{Del}" if _arg1 = "Rest of Line" then SendKeys "{Shift+End}{Del}" if _arg1 = "Rest of Paragraph" then SendKeys "{Ctrl+Shift+Down}{Del}" if _arg1 = "Top of Document" then SendKeys "{Shift+Ctrl+Home}{Del}" if _arg1 = "Top of Line" then SendKeys "{Shift+Home}{Del}" if _arg1 = "Top of Line Clean" then SendKeys "{Shift+Home}{Del}{Del}" if _arg1 = "Top of Paragraph" then SendKeys "{Ctrl+Shift+Up}{Del}" if _arg1 = "Top of Paragraph Clean" then SendKeys "{Ctrl+Shift+Up}{Del}{Del}" if _arg1 = "Paragraph" then SendKeys "{Ctrl+Down}{Shift+Ctrl+Up}{Del}" if _arg1 = "Home" then SendKeys "{Home}{Del}" if _arg1 = "End" then SendKeys "{End}{Backspace}" if _arg1 = "Top" then SendKeys "{Ctrl+Home}{Del}" if _arg1 = "Bottom" then SendKeys "{Ctrl+End}{End}{Backspace}" IF _arg1 = "Last" THEN SendKeys "{Left}{Right}{Shift+Ctrl+Left}{Del}" IF _arg1 = "Next" THEN SendKeys "{Right}{Left}{Shift+Ctrl+Right}{Del}" } } COMMAND "Open File " { SCRIPT { HeardWord "Open", "File" Wait 10 SetMousePosition 1, 1,1 ButtonClick 1,1 Wait 10 IF _arg1 = "Big" XOR _arg1 = "Bigger" THEN HeardWord "Drag", "Up", "Left", "10" IF _arg1 = "Wide" THEN HeardWord "Drag", "Left", "10" IF _arg1 = "Tall" THEN HeardWord "Drag", "Up", "10" IF _arg1 = "Very Big" THEN HeardWord "Drag", "Up", "Left", "20" IF _arg1 = "Very Wide" THEN HeardWord "Drag", "Left", "20" IF _arg1 = "Very Tall" THEN HeardWord "Drag", "Up", "20" } } COMMAND "Insert Hyphen" { KEYS { -{Del\} } } COMMAND " Go " { SCRIPT { if _arg1 = "Switch" then HeardWord "Switch","to", "" + _arg2 + "" if _arg1 = "Switch to" then HeardWord "Switch to", "" + _arg2 + "" if _arg1 = "Start" then if _arg2 = "Word" XOR _arg2 = "Word 7" then AppBringUp "WinWord" else AppBringUp "" + _arg2 + "" end if end if Wait 100 if _arg3 = "Open" then SendKeys "{Alt+f}o" else if _arg3 = "Open File" then SendKeys "{Alt+f}o" else SendKeys "{Alt+f}o" Wait 50 HeardWord "Go", "" + _arg3 + "" end if end if } } COMMAND "Copy All to Clipboard" { KEYS { {Ctrl+a}{Ctrl+c\} } } COMMAND "Scratch That <2To10> Times" { SCRIPT { loop& = Val(_arg1) while ( loop& ) HeardWord "Scratch","That" loop& = loop& - 1 wend } } COMMAND " " { SCRIPT { if _arg2 = "zero" then _arg2 = "0" SendSystemKeys _arg2 } } COMMAND "Control " { SCRIPT { IF _arg1 = "Up" THEN SendKeys "{Ctrl+Up}" IF _arg1 = "Down" THEN SendKeys "{Ctrl+Down}" } } COMMAND "Control <1To40>" { SCRIPT { loop& = Val(_arg2) while ( loop& ) IF _arg1 = "Up" THEN SendKeys "{Ctrl+Up}" IF _arg1 = "Down" THEN SendKeys "{Ctrl+Down}" loop& = loop& - 1 wend } } COMMAND " Menu" { SCRIPT { SendKeys "{Shift+F10}" } } COMMAND "Change Start Menu" { SCRIPT { SendSystemKeys "{Ctrl+Esc}" Wait 15 SendSystemKeys "s" Wait 15 SendSystemKeys "t" Wait 4 HeardWord "Advanced" Wait 10 HeardWord "Advanced" Wait 30 SendSystemKeys "{Tab}" SendSystemKeys "{Space}" } } COMMAND "Control Panel" { SCRIPT { SendSystemKeys "{Ctrl+Esc}" SendSystemKeys "{s}" SendSystemKeys "{c}" } } COMMAND " <1To20> " { SCRIPT { if _arg2 = "Previous" then _arg2 = "Shift+Left" if _arg2 = "Next" then _arg2 = "Shift+Right" if _arg2 = "Back" then _arg2 = "Shift+Left" if _arg2 = "Forward" then _arg2 = "Shift+Right" if _arg2 = "Last" then _arg2 = "Shift+Left" SendKeys "{" + _arg2 + " " + _arg3 + "}" IF _arg1 = "Delete" THEN SendKeys "{Del}" IF _arg1 = "Copy" THEN SendKeys "{Ctrl+c}" IF _arg1 = "Cut" THEN SendKeys "{Ctrl+x}" } } COMMAND " <1To20> " { SCRIPT { if _arg2 = "Previous" then SendKeys "{Left}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}" if _arg2 = "Next" then SendKeys "{Right}{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right " +_arg3+ "}" if _arg2 = "Back" then SendKeys "{Left}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}" if _arg2 = "Forward" then SendKeys "{Right}{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right " +_arg3+ "}" if _arg2 = "Last" then SendKeys "{Left}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}" if _arg1 = "Delete" then SendKeys "{Del}" IF _arg1 = "Cut" THEN SendKeys "{Ctrl+x}" IF _arg1 = "Copy" THEN SendKeys "{Ctrl+c}" } } COMMAND " <1To20>" { SCRIPT { loop& = Val(_arg3) while ( loop& ) SendKeys _arg2 loop& = loop& - 1 wend } } COMMAND " <1To20>" { SCRIPT { loop& = Val(_arg3) while ( loop& ) SendKeys MID$(_arg2,0,1) loop& = loop& - 1 wend } } COMMAND " <1To20>" { SCRIPT { if _arg2 = "Space" then _arg2 = "{Space}" if _arg2 = "space-bar" then _arg2 = "{Space}" if _arg2 = "Tab" then _arg2 = "{Tab}" if _arg2 = "tab-key" then _arg2 = "{Tab}" if _arg2 = "Escape" then _arg2 = "{Esc}" if _arg2 = "escape-key" then _arg2 = "{Esc}" if _arg2 = "Backspace" then _arg2 = "{BackSpace}" if _arg2 = "backspace-key" then _arg2 = "{BackSpace}" if _arg2 = "Enter" then _arg2 = "{Enter}" if _arg2 = "enter-key" then _arg2 = "{Enter}" if _arg2 = "Up" then _arg2 = "{Up}" if _arg2 = "up-arrow" then _arg2 = "{Up}" if _arg2 = "Down" then _arg2 = "{Down}" if _arg2 = "down-arrow" then _arg2 = "{Down}" if _arg2 = "Left" then _arg2 = "{Left}" if _arg2 = "left-arrow" then _arg2 = "{Left}" if _arg2 = "Right" then _arg2 = "{Right}" if _arg2 = "right-arrow" then _arg2 = "{Right}" if _arg2 = "page-up" then _arg2 = "{PgUp}" if _arg2 = "page-down" then _arg2 = "{PgDn}" if _arg2 = "Delete" then _arg2 = "{Del}" if _arg2 = "delete-key" then _arg2 = "{Del}" loop& = Val(_arg3) while ( loop& ) SendKeys "" + _arg2 + "" loop& = loop& - 1 wend } } COMMAND " <0To20> <0To20> " { SCRIPT { loop& = Val(_arg2) while ( loop& ) SendKeys "{Left}" loop& = loop& - 1 wend loop& = Val(_arg2) while ( loop& ) SendKeys "{Shift+Right}" loop& = loop& - 1 wend loop& = Val(_arg3) while ( loop& ) SendKeys "{Shift+Right}" loop& = loop& - 1 wend IF _arg1 = "Delete" THEN SendKeys "{Del}" IF _arg1 = "Copy" THEN SendKeys "{Ctrl+c}" IF _arg1 = "Cut" THEN SendKeys "{Ctrl+x}" } } COMMAND "Last Categories" { SCRIPT { HeardWord "Edit", "" + _arg1 + "", "Macro" Wait 10 SendKeys "{Alt+b}{Alt+n}" if _arg1 = "App" XOR _arg1 = "Application" then SendKeys "{Alt+n}" } } COMMAND "NatSpeak Options" { SCRIPT { HeardWord "NaturallySpeaking" Wait 10 SendKeys "a" Wait 10 SendKeys "o" } } COMMAND " " { SCRIPT { IF _arg3 = "7" THEN _arg3 = "7 of 8" IF _arg3 = "6" THEN _arg3 = "6 of 8" IF _arg3 = "5" THEN _arg3 = "5 of 8" IF _arg3 = "4" THEN _arg3 = "4 of 8" IF _arg3 = "3" THEN _arg3 = "3 of 8" HeardWord "NaturallySpeaking" Wait 15 HeardWord "Custom Commands" Wait 15 IF _arg1 = "Edit" XOR _arg1 = "Change" THEN HeardWord "Edit" IF _arg1 = "New" THEN HeardWord "Create" Wait 40 SendKeys "{Alt+a}" SendKeys "{Enter}" IF _arg2 = "ACDSee" THEN SendKeys "ACDSEE" if _arg2 = "CuteFTP" then SendKeys "CuteFTP32" if _arg2 = "Cute FTP" then SendKeys "CuteFTP32" IF _arg2 = "EditPad" THEN SendKeys "EDITPAD" if _arg2 = "FTP" then SendKeys "CuteFTP" if _arg2 = "HTML" then SendKeys "CUTEHTML" if _arg2 = "Cute HTML" then SendKeys "CUTEHTML" if _arg2 = "Dreamweaver" then SendKeys "Dreamweaver" if _arg2 = "Eudora" then SendKeys "Eudora" if _arg2 = "Explorer" then SendKeys "Windows Explorer" if _arg2 = "Internet Explorer" then SendKeys "Microsoft Internet Explorer" if _arg2 = "Internet" then SendKeys "Microsoft Internet Explorer" if _arg2 = "NatSpeak" then SendKeys "Dragon NaturallySpeaking" if _arg2 = "Netscape" then SendKeys "Netscape" if _arg2 = "Notepad" then SendKeys "Notepad" IF _arg2 = "Paint Shop Pro" XOR _arg2 = "Paint Shop" THEN SendKeys "Paint Shop Pro" if _arg2 = "Photoshop" then SendKeys "Photoshp" IF _arg2 = "Quick View" THEN SendKeys "QVP32" if _arg2 = "Quicken" then SendKeys "Quicken" if _arg2 = "Word" then SendKeys "Microsoft Word" if _arg2 = "WordPad" then SendKeys "Microsoft WordPad" if _arg2 = "WordPerfect" then SendKeys "WPWIN9" SendKeys "{Enter}" Wait 800 IF _arg2 = "ACDSee" THEN SendKeys "KimACDSEE" if _arg2 = "CuteFTP" then SendKeys "KimCuteFTP" if _arg2 = "Cute FTP" then SendKeys "KimCuteFTP" IF _arg2 = "EditPad" THEN SendKeys "KimEDITPAD" if _arg2 = "FTP" then SendKeys "KimCUTEFTP" if _arg2 = "HTML" XOR _arg2 = "Cute HTML" then SendKeys "KimCUTEHTML" if _arg2 = "Dreamweaver" then SendKeys "KimDREAMWEAVER" if _arg2 = "Eudora" then SendKeys "KimEUDORA" if _arg2 = "Explorer" then SendKeys "KimEXPLORER" if _arg2 = "Internet Explorer" XOR _arg2 = "Internet" then SendKeys "KimINTERNETEXPLORER" if _arg2 = "NatSpeak" then SendKeys "KimNATSPEAK" if _arg2 = "Netscape" then SendKeys "KimNETSCAPE" if _arg2 = "Notepad" then SendKeys "KimNOTEPAD" IF _arg2 = "Paint Shop Pro" XOR _arg2 = "Paint Shop" THEN SendKeys "KimPAINTSHOPPRO" if _arg2 = "Photoshop" then SendKeys "KimPHOTOSHOP" IF _arg2 = "Quick View" THEN SendKeys "QVP32" if _arg2 = "Quicken" then SendKeys "KimQUICKEN" if _arg2 = "Word" then SendKeys "KimWINWORD2000" if _arg2 = "WordPad" then SendKeys "KimWORDPAD" if _arg2 = "WordPerfect" then SendKeys "WPWIN9" Wait 10 IF _arg1 = "New" THEN Wait 500 SendKeys "{Enter}" Wait 10 SendKeys "" + _arg3 + "" Wait 10 SendKeys "{Enter}" Wait 10 IF _arg1 = "New" THEN HeardWord "\Caps-On" } } COMMAND " " { SCRIPT { if _arg1 = "Next" then SendKeys "{Ctrl+Shift+Right}" if _arg1 = "Last" then SendKeys "{Left}{Right}{Ctrl+Shift+Left}" Wait 10 IF _arg1 = "Delete" THEN SendKeys "{Del}" IF _arg1 = "Copy" THEN SendKeys "{Ctrl+c}" IF _arg1 = "Cut" THEN SendKeys "{Ctrl+x}" } } COMMAND "" { SCRIPT { SendSystemKeys "{Ctrl+Esc}" Wait 4 HeardWord "Run" Wait 10 SendKeys "taskmgr" SendKeys "{Enter}" Wait 20 HeardWord "" + _arg2 + "" IF _arg2 = "Resources" THEN HeardWord "Processes" } } COMMAND " " { SCRIPT { HeardWord "NaturallySpeaking" Wait 10 IF _arg2 = "NatSpeak Advanced" XOR _arg2 = "Advanced" THEN SendKeys "a" IF _arg2 = "NatSpeak Options" THEN SendKeys "a" Wait 10 SendKeys "o" END IF IF _arg2 = "NatSpeak Custom" XOR _arg2 = "Custom Commands" XOR _arg2 = "Custom" XOR _arg2 = "NatSpeak Import" XOR _arg2 = "Import" THEN SendKeys "c" IF _arg2 = "NatSpeak Words" XOR _arg2 = "Words" THEN SendKeys "w" IF _arg2 = "Train Words" XOR _arg2 = "Train" THEN SendKeys "w" Wait 10 SendKeys "t" END IF IF _arg2 = "Dictation Shortcuts" XOR _arg2 = "NatSpeak Shortcuts" XOR _arg2 = "Shortcuts" XOR _arg2 = "Dictation" THEN SendKeys "w" Wait 10 SendKeys "s" END IF IF _arg2 = "Commands" XOR _arg2 = "NatSpeak Commands" THEN SendKeys "v" IF _arg2 = "Import" XOR _arg2 = "NatSpeak Import" THEN SendKeys "i" Wait 10 SendKeys "{Shift+Tab}{Down 6}" END IF IF _arg2 = "Exit Now" THEN SendKeys "e" } } COMMAND "Words " { SCRIPT { IF _arg1 = "Off" THEN SetNaturalText 0 IF _arg1 = "On" THEN SetNaturalText 1 } } COMMAND " " { SCRIPT { IF _arg2 = "Add Hardware" XOR _arg2 = "Remove Hardware" THEN _arg2 = "Add/Remove Hardware" IF _arg2 = "Add Programs" XOR _arg2 = "Remove Programs" THEN _arg2 = "Add/Remove Programs" IF _arg2 = "Cameras" THEN _arg2 = "Scanners and Cameras" IF _arg2 = "Modem" THEN _arg2 = "Phone and Modem" IF _arg2 = "Passwords" THEN _arg2 = "Users and Passwords" IF _arg2 = "Multimedia" THEN _arg2 = "Sounds and Multimedia" IF _arg2 = "Connections" THEN _arg2 = "Network" SendSystemKeys "{Ctrl+Esc}" Wait 10 SendSystemKeys "{ss}{Enter}" Wait 10 SendSystemKeys "{c}" Wait 400 SendKeys "{Down}{Up}" Wait 200 SendKeys "" + _arg2 + "" Wait 4 SendKeys "{Enter}" } } COMMAND "Connect " { SCRIPT { SendSystemKeys "{Ctrl+Esc}" Wait 4 HeardWord "" + _arg1 + "" Wait 1600 SendKeys "{Enter}" } } COMMAND " <0To20> <0To20>" { SCRIPT { loop& = Val(_arg2) while ( loop& ) SendKeys "{Ctrl+Left}" loop& = loop& - 1 wend loop& = Val(_arg2) while ( loop& ) SendKeys "{Shift+Ctrl+Right}" loop& = loop& - 1 wend loop& = Val(_arg3) while ( loop& ) SendKeys "{Shift+Ctrl+Right}" loop& = loop& - 1 wend if _arg1 = "Delete" then SendKeys "{Del}" IF _arg1 = "Cut" THEN SendKeys "{Ctrl+x}" IF _arg1 = "Copy" THEN SendKeys "{Ctrl+c}" } } COMMAND " <1To20>" { SCRIPT { loop& = Val(_arg3) while ( loop& ) if _arg2 = "Previous" then SendKeys "{Left}{Ctrl+Right}{Shift+Ctrl+Left}" if _arg2 = "Next" then SendKeys "{Right}{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}" if _arg2 = "Back" then SendKeys "{Left}{Ctrl+Right}{Shift+Ctrl+Left}" if _arg2 = "Forward" then SendKeys "{Right}{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}" if _arg2 = "Last" then SendKeys "{Left}{Ctrl+Right}{Shift+Ctrl+Left}" if _arg1 = "Delete" then SendKeys "{Del}" loop& = loop& - 1 wend IF _arg1 = "Cut" THEN SendKeys "{Ctrl+x}" IF _arg1 = "Copy" THEN SendKeys "{Ctrl+c}" } } COMMAND "Backspace <1To40>" { SCRIPT { loop& = Val(_arg1) while ( loop& ) SendKeys "{Backspace}" loop& = loop& - 1 wend } } COMMAND " <1To10> Times" { SCRIPT { loop& = Val(_arg2) while ( loop& ) IF _arg1 = "Backspace" THEN SendKeys "{Backspace}" IF _arg1 = "Delete" THEN SendKeys "{Del}" loop& = loop& - 1 wend } } COMMAND "Skip <1To20> Delete <1To10> " { SCRIPT { IF _arg3 = "Delete" THEN _arg3 = "Del" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Left " + _arg1 + "}" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Shift+Ctrl+Left " + _arg2 + "}" Wait 300 SendKeys "{Del}" SendKeys "{" + _arg3 + "}" } } COMMAND "Skip <1To20> Delete " { SCRIPT { SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Left " + _arg1 + "}" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Shift+Left}" Wait 200 SendKeys "{Del}" SendKeys "{" + _arg2 + "}" } } COMMAND "Skip Delete <1To10> " { SCRIPT { SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Left}" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Shift+Ctrl+Left " + _arg1 + "}" Wait 300 SendKeys "{Del}" SendKeys "{" + _arg2 + "}" } } COMMAND "Skip Delete <1To10> <1To10>" { SCRIPT { SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Left}" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Shift+Ctrl+Left " + _arg1 + "}" Wait 300 SendKeys "{Del}" SendKeys "{" + _arg2 + " " + _arg3 + "}" } } COMMAND "Skip <1To20> Delete <1To10>" { SCRIPT { SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Left " + _arg1 + "}" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Shift+Left}" Wait 200 SendKeys "{Del}" SendKeys "{" + _arg2 + " " + _arg3 + "}" } } COMMAND "Skip <1To20> Delete <1To10> <1To10>" { SCRIPT { IF _arg3 = "Delete" THEN _arg3 = "Del" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Ctrl+Left " + _arg1 + "}" SendKeys "{Ctrl+Left}{Ctrl+Right}" SendKeys "{Shift+Ctrl+Left " + _arg2 + "}" Wait 300 SendKeys "{Del}" SendKeys "{" + _arg3 + " " + _arg4 + "}" } } COMMAND "Skip Delete <1To10>" { SCRIPT { SendKeys "{Ctrl+Left}{Ctrl+Left}{Ctrl+Shift+Right}{Shift+Left}{Del}" SendKeys "{" + _arg1 + " " + _arg2 + "}" } } COMMAND " <1To10>" { SCRIPT { IF _arg1 = "Undo" THEN SendKeys "{Ctrl+z}" IF _arg1 = "Redo" THEN SendKeys "{Ctrl+y}" Wait 5 loop& = Val(_arg3) while ( loop& ) if _arg2 = "Backspace" XOR _arg2 = "That Backspace" then SendKeys "{Backspace}" if _arg2 = "Delete" XOR _arg2 = "That Delete" XOR _arg2 = "Delete That" then SendKeys "{Del}" if _arg2 = "Back Delete" then SendKeys "{Backspace}{Del}" IF _arg2 = "Right" XOR _arg2 = "That Right" THEN SendKeys "{Right}" IF _arg2 = "Left" XOR _arg2 = "That Left" THEN SendKeys "{Left}" IF _arg2 = "Home" XOR _arg2 = "That Home" THEN SendKeys "Home" IF _arg2 = "End" XOR _arg2 = "That End" THEN SendKeys "{End}" loop& = loop& - 1 wend } } COMMAND " " { SCRIPT { IF _arg1 = "Undo" THEN SendKeys "{Ctrl+z}" IF _arg1 = "Redo" THEN SendKeys "{Ctrl+y}" Wait 5 if _arg2 = "Backspace" XOR _arg2 = "That Backspace" then SendKeys "{Backspace}" if _arg2 = "Delete" XOR _arg2 = "That Delete" XOR _arg2 = "Delete That" then SendKeys "{Del}" if _arg2 = "Back Delete" then SendKeys "{Backspace}{Del}" IF _arg2 = "Right" XOR _arg2 = "That Right" THEN SendKeys "{Right}" IF _arg2 = "Left" XOR _arg2 = "That Left" THEN SendKeys "{Left}" IF _arg2 = "Home" XOR _arg2 = "That Home" THEN SendKeys "Home" IF _arg2 = "End" XOR _arg2 = "That End" THEN SendKeys "{End}" } } COMMAND " That <1To20>" { SCRIPT { loop& = Val(_arg1) while ( loop& ) SendKeys "{Ctrl+z}" loop& = loop& - 1 wend } } COMMAND "That" { SCRIPT { IF _arg1 = "Undo" THEN SendKeys "{Ctrl+z}" IF _arg1 = "Redo" THEN SendKeys "{Ctrl+y}" } } COMMAND " That <1To20> Times" { SCRIPT { loop& = Val(_arg2) while ( loop& ) IF _arg1 = "Undo" THEN SendKeys "{Ctrl+z}" IF _arg1 = "Redo" THEN SendKeys "{Ctrl+y}" loop& = loop& - 1 wend } } COMMAND " <1To10>" { SCRIPT { IF _arg2 = "Intro" THEN _arg2 = "Introduction" IF _arg2 = "General" XOR _arg2 = "Global Macros" XOR _arg2 = "General Global Macros" THEN _arg2 = "General_Global_Macros" IF _arg2 = "Cursor" XOR _arg2 = "Moving the Cursor" THEN _arg2 = "Moving_the_Cursor" IF _arg2 = "Selecting" XOR _arg2 = "Deleting" XOR _arg2 = "Selecting Deleting" XOR _arg2 = "Selecting and Deleting" THEN _arg2 = "Selecting_and_Deleting" IF _arg2 = "Copying Cutting Pasting" XOR _arg2 = "Copying" XOR _arg2 = "Cutting" XOR _arg2 = "Pasting" XOR _arg2 = "Copying Cutting and Pasting" THEN _arg2 = "Copying_Cutting_and_Pasting" IF _arg2 = "Keys and Multiple Keys" XOR _arg2 = "Pressing Keys" XOR _arg2 = "Keys" XOR _arg2 = "Multiple Keys" XOR _arg2 = "Pressing Keys and Multiple Keys" THEN _arg2 = "Pressing_Keys_and_Multiple_Keys" IF _arg2 = "Spaces" XOR _arg2 = "Punctuation" XOR _arg2 = "Spaces and Punctuation" THEN _arg2 = "Spaces_and_Punctuation" IF _arg2 = "Mouse" XOR _arg2 = "Mouse Arrow" XOR _arg2 = "Dragging Objects" XOR _arg2 = "Dragging" XOR _arg2 = "Moving the Mouse" THEN _arg2 = "Moving_the_Mouse" IF _arg2 = "Moving Windows" XOR _arg2 = "Sizing Windows" XOR _arg2 = "Moving" XOR _arg2 = "Sizing" XOR _arg2 = "Moving and Sizing" XOR _arg2 = "Moving and Sizing Windows" THEN _arg2 = "Moving_and_Sizing_Windows" IF _arg2 = "Help" XOR _arg2 = "Getting Help" THEN _arg2 = "Getting_Help" IF _arg2 = "Common Commands Open Save As Find Replace Font" XOR _arg2 = "Open" XOR _arg2 = "Save As" XOR _arg2 = "Find" XOR _arg2 = "Replace" XOR _arg2 = "Font" XOR _arg2 = "Common Commands" THEN _arg2 = "Common_Commands" IF _arg2 = "NatSpeak" XOR _arg2 = "General NatSpeak" XOR _arg2 = "NatSpeak General" THEN _arg2 = "NatSpeak_General" IF _arg2 = "Correction" XOR _arg2 = "NatSpeak Correction" XOR _arg2 = "Correction Box" THEN _arg2 = "Correction_Box" IF _arg2 = "Explorer" XOR _arg2 = "Files" XOR _arg2 = "Windows Explorer" THEN _arg2 = "Windows_Explorer" IF _arg2 = "Quick View" XOR _arg2 = "Quick View Plus" THEN _arg2 = "Quick_View_Plus" IF _arg2 = "IE" XOR _arg2 = "Internet Explorer" THEN _arg2 = "Internet_Explorer" IF _arg2 = "Paint Shop" XOR _arg2 = "Paint Shop Pro" THEN _arg2 = "Paint_Shop_Pro" IF _arg2 = "ACDSee" XOR _arg2 = "ACDSee Browser" THEN _arg2 = "ACDSee_Browser" IF _arg2 = "HTML" XOR _arg2 = "Cute HTML" THEN _arg2 = "Cute_HTML" IF _arg2 = "FTP" XOR _arg2 = "Cute FTP" THEN _arg2 = "Cute_FTP" IF _arg2 = "Macros Explanation" XOR _arg2 = "Macros Explanations" XOR _arg2 = "Macro Explanation" XOR _arg2 = "About Macros" XOR _arg2 = "Macros for Making Macros" XOR _arg2 = "Macros Examples" XOR _arg2 = "Macro Example" XOR _arg2 = "Macro Examples" XOR _arg2 = "Macros Example" XOR _arg2 = "Macros" XOR _arg2 = "Macros for Making Macros Explanation" THEN _arg2 = "Macros_for_Making_Macros_Explanation" IF _arg2 = "Three" XOR _arg2 = "Step 3" XOR _arg2 = "Command Wizard 3" XOR _arg2 = "Three of Seven" THEN _arg2 = "Three_of_Seven" IF _arg2 = "Four" XOR _arg2 = "Step 4" XOR _arg2 = "Command Wizard 4" XOR _arg2 = "Edit Four" XOR _arg2 = "Edit Four