MENU "Global Commands" {
	STATE "Global Commands" GLOBAL {
		COMMAND "Go to Sleep" {
			SCRIPT "GoToSleep"
		}

		COMMAND "Microphone Off" {
			SCRIPT "SetMicrophone 0"
		}

		COMMAND "Copy All to Clipboard" {
			KEYS {
				{Ctrl+a}{Ctrl+c}
			}
		}

		COMMAND "Paste That" {
			SCRIPT {
				SendKeys "{Ctrl+v}"
			}
		}

		COMMAND "Undo That" {
			SCRIPT {
				SendKeys "{Ctrl+z}"
			}
		}

		COMMAND "Undo Last Action" {
			SCRIPT {
				SendKeys "{Ctrl+z}"
			}
		}

		COMMAND "Scratch That <2To10> Times" {
			SCRIPT {
				loop& = Val(_arg1)
				while ( loop& )
				HeardWord "Scratch","That"
				loop& = loop& - 1
				wend
			}
		}

		COMMAND "Switch to <AppList>" {
			SCRIPT {
				if _arg1 = "NatSpeak" then AppBringUp "NatSpeak"
				if _arg1 = "NaturallySpeaking" then AppBringUp "NatSpeak"
				if _arg1 = "Next Window" then SendSystemKeys "{Shift+Alt+Tab}"
				if _arg1 = "Previous Window" then SendSystemKeys "{Alt+Tab}"
			}
		}

		COMMAND "Move <Direction> 1" {
			SCRIPT {
				SendKeys "{" + _arg1 + "}"
			}
		}

		COMMAND "Move <DirLeftRight> <One> Character" {
			SCRIPT {
				if _arg1 = "Back"     then _arg1 = "Left"
				if _arg1 = "Forward"  then _arg1 = "Right"
				SendKeys "{" + _arg1 + "}"
			}
		}

		COMMAND "Move <DirUpDown> <One> Line" {
			SCRIPT {
				if _arg1 = "Back"     then _arg1 = "Up"
				if _arg1 = "Forward"  then _arg1 = "Down"
				SendKeys "{" + _arg1 + "}"
			}
		}

		COMMAND "Move <Direction> <2To20>" {
			SCRIPT {
				SendKeys "{" + _arg1 + " " + _arg2 + "}"
			}
		}

		COMMAND "Move <DirLeftRight> <2To20> Characters" {
			SCRIPT {
				if _arg1 = "Back"     then _arg1 = "Left"
				if _arg1 = "Forward"  then _arg1 = "Right"
				SendKeys "{" + _arg1 + " " + _arg2 + "}"
			}
		}

		COMMAND "Move <DirUpDown> <2To20> Lines" {
			SCRIPT {
				if _arg1 = "Back"     then _arg1 = "Up"
				if _arg1 = "Forward"  then _arg1 = "Down"
				SendKeys "{" + _arg1 + " " + _arg2 + "}"
			}
		}

		COMMAND "Select <NextOrPrevious> Character" {
			SCRIPT {
				if _arg1 = "Previous" then _arg1 = "Left"
				if _arg1 = "Next"     then _arg1 = "Right"
				if _arg1 = "Back"     then _arg1 = "Left"
				if _arg1 = "Forward"  then _arg1 = "Right"
				if _arg1 = "Last"     then _arg1 = "Left"
				SendKeys "{Shift+" + _arg1 + "}"
			}
		}

		COMMAND "Select <NextOrPrevious> 1 Character" {
			SCRIPT {
				if _arg1 = "Previous" then _arg1 = "Left"
				if _arg1 = "Next"     then _arg1 = "Right"
				if _arg1 = "Back"     then _arg1 = "Left"
				if _arg1 = "Forward"  then _arg1 = "Right"
				if _arg1 = "Last"     then _arg1 = "Left"
				SendKeys "{Shift+" + _arg1 + "}"
			}
		}

		COMMAND "Select <NextOrPrevious> <2To20> Characters" {
			SCRIPT {
				if _arg1 = "Previous" then _arg1 = "Left"
				if _arg1 = "Next"     then _arg1 = "Right"
				if _arg1 = "Back"     then _arg1 = "Left"
				if _arg1 = "Forward"  then _arg1 = "Right"
				if _arg1 = "Last"     then _arg1 = "Left"
				SendKeys "{Shift+" + _arg1 + " " + _arg2 + "}"
			}
		}

		COMMAND "Delete <NextOrPrevious> Character" {
			SCRIPT {
				if _arg1 = "Previous" then SendKeys "{Backspace}"
				if _arg1 = "Next"     then SendKeys "{Del}"
				if _arg1 = "Back"     then SendKeys "{Backspace}"
				if _arg1 = "Forward"  then SendKeys "{Del}"
				if _arg1 = "Last"     then SendKeys "{Backspace}"
			}
		}

		COMMAND "Delete <NextOrPrevious> 1 Character" {
			SCRIPT {
				if _arg1 = "Previous" then SendKeys "{Backspace}"
				if _arg1 = "Next"     then SendKeys "{Del}"
				if _arg1 = "Back"     then SendKeys "{Backspace}"
				if _arg1 = "Forward"  then SendKeys "{Del}"
				if _arg1 = "Last"     then SendKeys "{Backspace}"
			}
		}

		COMMAND "Go to Bottom" {
			KEYS {
				{Ctrl+End}
			}
		}

		COMMAND "Go to Top" {
			KEYS {
				{Ctrl+Home}
			}
		}

		COMMAND "<MoveTo> <Position> of <Text>" {
			SCRIPT {
				if _arg2 = "Beginning" then _arg2 = "Left"
				if _arg2 = "Start"     then _arg2 = "Left"
				if _arg2 = "End"       then _arg2 = "Right"
				if _arg2 = "Top"       then _arg2 = "Left"
				if _arg2 = "Bottom"    then _arg2 = "Right"
				
				if _arg3 = "Selection" then SendKeys "{"+_arg2+"}"
				if _arg3 = "Line"      and _arg2 = "Left"    then SendKeys "{Home}"
				if _arg3 = "Line"      and _arg2 = "Right"   then SendKeys "{End}{Left}{End}"
				if _arg3 = "Paragraph" and _arg2 = "Left"    then SendKeys "{Ctrl+Up}{Right}{Home}"
				if _arg3 = "Paragraph" and _arg2 = "Right"   then SendKeys "{Ctrl+Down}{Left 2}{End}"
				if _arg3 = "Document"  and _arg2 = "Left"    then SendKeys "{Ctrl+Home}"
				if _arg3 = "Document"  and _arg2 = "Right"   then SendKeys "{Ctrl+End}"
			}
		}

		COMMAND "Move <DirLeftRight> <One> Word" {
			SCRIPT {
				if _arg1 = "Back" then _arg1 = "Left"
				if _arg1 = "Forward" then _arg1 = "Right"
				SendKeys "{Ctrl+" + _arg1 + "}"
			}
		}

		COMMAND "Move <DirUpDown> <One> Paragraph" {
			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"
				SendKeys "{" + _dir$ + "}{Ctrl+" + _arg1 + "}"
			}
		}

		COMMAND "Move <DirLeftRight> <2To20> Words" {
			SCRIPT {
				if _arg1 = "Back" then _arg1 = "Left"
				if _arg1 = "Forward" then _arg1 = "Right"
				SendKeys "{Ctrl+" + _arg1 + " " + _arg2 + "}"
			}
		}

		COMMAND "Move <DirUpDown> <2To20> Paragraphs" {
			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 "Select Paragraph" {
			KEYS {
				{Ctrl+Down}{Shift+Ctrl+Up}
			}
		}

		COMMAND "Select Word" {
			KEYS {
				{Ctrl+Right}{Shift+Ctrl+Left}
			}
		}

		COMMAND "Select Line" {
			KEYS {
				{Home}{Shift+End}
			}
		}

		COMMAND "Select Document" {
			KEYS {
				{Ctrl+a}
			}
		}

		COMMAND "Select All" {
			KEYS {
				{Ctrl+a}
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> Word" {
			SCRIPT {
				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}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> 1 Word" {
			SCRIPT {
				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}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> Paragraph" {
			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}"
				SendKeys "{Shift+" + _dirh$ + "}{Shift+Ctrl+" + _dirv$ + "}"
				if _arg1 = "Delete" then SendKeys "{Del}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> 1 Paragraph" {
			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}"
				SendKeys "{Shift+" + _dirh$ + "}{Shift+Ctrl+" + _dirv$ + "}"
				if _arg1 = "Delete" then SendKeys "{Del}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> <2To20> Words" {
			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}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> <2To20> Paragraphs" {
			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}"
			}
		}

		COMMAND "What Can I Say" {
			SCRIPT {
				offset& = 65536
				id& = 603
				WinHelp "Wcisbase.hlp>(w95sec)", 11
			}
		}

		COMMAND "Give-Me Help" {
			SCRIPT {
				WinHelp "Dragon.hlp", 11
			}
		}

		COMMAND "<MouseGrid>" {
			SCRIPT {
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&
			}
		}

		COMMAND "<Mouse> <1To9>" {
			SCRIPT {
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
			}
		}

		COMMAND "<Mouse> <1To9> <1To9>" {
			SCRIPT {
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9>" {
			SCRIPT {
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9> <1To9>" {
			SCRIPT {
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
				MouseGrid nMouse&, _arg5
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9> <1To9> <1To9>" {
			SCRIPT {
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
				MouseGrid nMouse&, _arg5
				MouseGrid nMouse&, _arg6
			}
		}

		COMMAND "Mouse <MouseAction>" {
			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 "<Mouse> <1To9> <MouseAction>" {
			SCRIPT {
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				Wait 10
				HeardWord "Mouse", _arg3
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <MouseAction>" {
			SCRIPT {
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				Wait 10
				HeardWord "Mouse", _arg4
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9> <MouseAction>" {
			SCRIPT {
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
				Wait 10
				HeardWord "Mouse", _arg5
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9> <1To9> <MouseAction>" {
			SCRIPT {
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
				MouseGrid nMouse&, _arg5
				Wait 10
				HeardWord "Mouse", _arg6
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9> <1To9> <1To9> <MouseAction>" {
			SCRIPT {
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
				MouseGrid nMouse&, _arg5
				MouseGrid nMouse&, _arg6
				Wait 10
				HeardWord "Mouse", _arg7
			}
		}

		COMMAND "Mouse <Direction> <1To10>" {
			SCRIPT {
				MouseGrid 0
				xPos& = 0
				yPos& = 0
				nDistance& = Val( _arg2 ) * 3
				if _arg1 = "Up"     then yPos& = yPos& - nDistance&
				if _arg1 = "Down"   then yPos& = yPos& + nDistance&
				if _arg1 = "Left"   then xPos& = xPos& - nDistance&
				if _arg1 = "Right"  then xPos& = xPos& + nDistance&
				SetMousePosition 2, xPos&, yPos&
			}
		}

		COMMAND "Mouse <Direction> <1To10> <MouseAction>" {
			SCRIPT {
				HeardWord "Mouse", _arg1, _arg2
				Wait 10
				HeardWord "Mouse", _arg3
			}
		}

		COMMAND "<PressKey> <Alphabet>" {
			SCRIPT {
				SendSystemKeys MID$(_arg2,0,1)
			}
		}

		COMMAND "<PressKey> Cap <Alphabet>" {
			SCRIPT {
				SendSystemKeys "{Shift+"+MID$(_arg2,0,1)+"}"
			}
		}

		COMMAND "<PressKey> <ICAlphabet>" {
			SCRIPT {
				SendSystemKeys MID$(_arg2,0,1)
			}
		}

		COMMAND "<PressKey> Cap <ICAlphabet>" {
			SCRIPT {
				SendSystemKeys "{Shift+"+MID$(_arg2,0,1)+"}"
			}
		}

		COMMAND "<PressKey> <HelperAlphabet>" {
			SCRIPT {
				SendSystemKeys MID$(_arg2,0,1)
			}
		}

		COMMAND "<PressKey> Cap <HelperAlphabet>" {
			SCRIPT {
				SendSystemKeys "{Shift+"+MID$(_arg2,0,1)+"}"
			}
		}

		COMMAND "<PressKey> <Numeral>" {
			SCRIPT {
				if _arg2 = "zero" then _arg2 = "0"
				SendSystemKeys _arg2
			}
		}

		COMMAND "<PressKey> <Character>" {
			SCRIPT {
				SendSystemKeys _arg2
			}
		}

		COMMAND "<PressKey> <Cursor>" {
			SCRIPT {
				if _arg2 = "up-arrow" then SendSystemKeys "{Up}"
				if _arg2 = "down-arrow" then SendSystemKeys "{Down}"
				if _arg2 = "left-arrow" then SendSystemKeys "{Left}"
				if _arg2 = "right-arrow" then SendSystemKeys "{Right}"
				if _arg2 = "home-key" then SendSystemKeys "{Home}"
				if _arg2 = "end-key" then SendSystemKeys "{End}"
				if _arg2 = "page-up" then SendSystemKeys "{PgUp}"
				if _arg2 = "page-down" then SendSystemKeys "{PgDn}"
				if _arg2 = "insert-key" then SendSystemKeys "{Ins}"
				if _arg2 = "delete-key" then SendSystemKeys "{Del}"
			}
		}

		COMMAND "<PressKey> <FunctionKey>" {
			SCRIPT {
				if _arg2 = "function-1" then SendSystemKeys "{F1}"
				if _arg2 = "function-2" then SendSystemKeys "{F2}"
				if _arg2 = "function-3" then SendSystemKeys "{F3}"
				if _arg2 = "function-4" then SendSystemKeys "{F4}"
				if _arg2 = "function-5" then SendSystemKeys "{F5}"
				if _arg2 = "function-6" then SendSystemKeys "{F6}"
				if _arg2 = "function-7" then SendSystemKeys "{F7}"
				if _arg2 = "function-8" then SendSystemKeys "{F8}"
				if _arg2 = "function-9" then SendSystemKeys "{F9}"
				if _arg2 = "function-10" then SendSystemKeys "{F10}"
				if _arg2 = "function-11" then SendSystemKeys "{F11}"
				if _arg2 = "function-12" then SendSystemKeys "{F12}"
			}
		}

		COMMAND "<PressKey> <Miscellaneous>" {
			SCRIPT {
				if _arg2 = "space-bar" then SendSystemKeys "{Space}"
				if _arg2 = "tab-key" then SendSystemKeys "{Tab}"
				if _arg2 = "escape-key" then SendSystemKeys "{Esc}"
				if _arg2 = "backspace-key" then SendSystemKeys "{BackSpace}"
				if _arg2 = "enter-key" then SendSystemKeys "{Enter}"
				if _arg2 = "caps-lock" then SendSystemKeys "{CapsLock}"
				if _arg2 = "print-screen" then SendSystemKeys "{Prtsc}"
				if _arg2 = "scroll-lock" then SendSystemKeys "{ScrollLock}"
				if _arg2 = "pause-key" then SendSystemKeys "{Pause}"
				if _arg2 = "num-lock" then SendSystemKeys "{NumLock}"
			}
		}

		COMMAND "<PressKey> <KeyPad> <NumPadKey>" {
			SCRIPT {
				if _arg3 = "0" then SendSystemKeys "{NumKey0}"
				if _arg3 = "1" then SendSystemKeys "{NumKey1}"
				if _arg3 = "2" then SendSystemKeys "{NumKey2}"
				if _arg3 = "3" then SendSystemKeys "{NumKey3}"
				if _arg3 = "4" then SendSystemKeys "{NumKey4}"
				if _arg3 = "5" then SendSystemKeys "{NumKey5}"
				if _arg3 = "6" then SendSystemKeys "{NumKey6}"
				if _arg3 = "7" then SendSystemKeys "{NumKey7}"
				if _arg3 = "8" then SendSystemKeys "{NumKey8}"
				if _arg3 = "9" then SendSystemKeys "{NumKey9}"
				if _arg3 = "." then SendSystemKeys "{NumKey.}"
				if _arg3 = "/" then SendSystemKeys "{NumKey/}"
				if _arg3 = "*" then SendSystemKeys "{NumKey*}"
				if _arg3 = "-" then SendSystemKeys "{NumKey-}"
				if _arg3 = "+" then SendSystemKeys "{NumKey+}"
				if _arg3 = "Enter" then SendSystemKeys "{NumKeyEnter}"
			}
		}

		COMMAND "<PressKey> <ShiftKey> <Alphabet>" {
			SCRIPT {
				tstr = "{"
				if Instr(_arg2, "control-key") > 0 then tstr = tstr + "Ctrl+"
				if Instr(_arg2, "alt-key") > 0 then tstr = tstr + "Alt+"
				if Instr(_arg2, "shift-key") > 0 then tstr = tstr + "Shift+"
				tstr = tstr + MID$(_arg3,0,1) + "}"
				SendSystemKeys tstr
			}
		}

		COMMAND "<PressKey> <ShiftKey> <ICAlphabet>" {
			SCRIPT {
				tstr = "{"
				if Instr(_arg2, "control-key") > 0 then tstr = tstr + "Ctrl+"
				if Instr(_arg2, "alt-key") > 0 then tstr = tstr + "Alt+"
				if Instr(_arg2, "shift-key") > 0 then tstr = tstr + "Shift+"
				tstr = tstr + MID$(_arg3,0,1) + "}"
				SendSystemKeys tstr
			}
		}

		COMMAND "<PressKey> <ShiftKey> <HelperAlphabet>" {
			SCRIPT {
				tstr = "{"
				if Instr(_arg2, "control-key") > 0 then tstr = tstr + "Ctrl+"
				if Instr(_arg2, "alt-key") > 0 then tstr = tstr + "Alt+"
				if Instr(_arg2, "shift-key") > 0 then tstr = tstr + "Shift+"
				tstr = tstr + MID$(_arg3,0,1) + "}"
				SendSystemKeys tstr
			}
		}

		COMMAND "<PressKey> <ShiftKey> <Numeral>" {
			SCRIPT {
				tstr = "{"
				if Instr(_arg2, "control-key") > 0 then tstr = tstr + "Ctrl+"
				if Instr(_arg2, "alt-key") > 0 then tstr = tstr + "Alt+"
				if Instr(_arg2, "shift-key") > 0 then tstr = tstr + "Shift+"
				if _arg3 = "zero" then _arg3 = "0"
				tstr = tstr + _arg3 + "}"
				SendSystemKeys tstr
			}
		}

		COMMAND "<PressKey> <ShiftKey> <Character>" {
			SCRIPT {
				tstr = "{"
				if Instr(_arg2, "control-key") > 0 then tstr = tstr + "Ctrl+"
				if Instr(_arg2, "alt-key") > 0 then tstr = tstr + "Alt+"
				if Instr(_arg2, "shift-key") > 0 then tstr = tstr + "Shift+"
				tstr = tstr + _arg3 + "}"
				SendSystemKeys tstr
			}
		}

		COMMAND "<PressKey> <ShiftKey> <Cursor>" {
			SCRIPT {
				tstr = "{"
				if Instr(_arg2, "control-key") > 0 then tstr = tstr + "Ctrl+"
				if Instr(_arg2, "alt-key") > 0 then tstr = tstr + "Alt+"
				if Instr(_arg2, "shift-key") > 0 then tstr = tstr + "Shift+"
				if _arg3 = "up-arrow" then tstr = tstr + "Up}"
				if _arg3 = "down-arrow" then tstr = tstr + "Down}"
				if _arg3 = "left-arrow" then tstr = tstr + "Left}"
				if _arg3 = "right-arrow" then tstr = tstr + "Right}"
				if _arg3 = "home-key" then tstr = tstr + "Home}"
				if _arg3 = "end-key" then tstr = tstr + "End}"
				if _arg3 = "page-up" then tstr = tstr + "PgUp}"
				if _arg3 = "page-down" then tstr = tstr + "PgDn}"
				if _arg3 = "insert-key" then tstr = tstr + "Ins}"
				if _arg3 = "delete-key" then tstr = tstr + "Del}"
				SendSystemKeys tstr
			}
		}

		COMMAND "<PressKey> <ShiftKey> <FunctionKey>" {
			SCRIPT {
				tstr = "{"
				if Instr(_arg2, "control-key") > 0 then tstr = tstr + "Ctrl+"
				if Instr(_arg2, "alt-key") > 0 then tstr = tstr + "Alt+"
				if Instr(_arg2, "shift-key") > 0 then tstr = tstr + "Shift+"
				if _arg3 = "function-1" then tstr = tstr + "F1}"
				if _arg3 = "function-2" then tstr = tstr + "F2}"
				if _arg3 = "function-3" then tstr = tstr + "F3}"
				if _arg3 = "function-4" then tstr = tstr + "F4}"
				if _arg3 = "function-5" then tstr = tstr + "F5}"
				if _arg3 = "function-6" then tstr = tstr + "F6}"
				if _arg3 = "function-7" then tstr = tstr + "F7}"
				if _arg3 = "function-8" then tstr = tstr + "F8}"
				if _arg3 = "function-9" then tstr = tstr + "F9}"
				if _arg3 = "function-10" then tstr = tstr + "F10}"
				if _arg3 = "function-11" then tstr = tstr + "F11}"
				if _arg3 = "function-12" then tstr = tstr + "F12}"
				SendSystemKeys tstr
			}
		}

		COMMAND "<PressKey> <ShiftKey> <Miscellaneous>" {
			SCRIPT {
				tstr = "{"
				if Instr(_arg2, "control-key") > 0 then tstr = tstr + "Ctrl+"
				if Instr(_arg2, "alt-key") > 0 then tstr = tstr + "Alt+"
				if Instr(_arg2, "shift-key") > 0 then tstr = tstr + "Shift+"
				if _arg3 = "space-bar" then tstr = tstr + "Space}"
				if _arg3 = "tab-key" then tstr = tstr + "Tab}"
				if _arg3 = "escape-key" then tstr = tstr + "Esc}"
				if _arg3 = "backspace-key" then tstr = tstr + "BackSpace}"
				if _arg3 = "enter-key" then tstr = tstr + "Enter}"
				if _arg3 = "caps-lock" then tstr = tstr + "CapsLock}"
				if _arg3 = "print-screen" then tstr = tstr + "Prtsc}"
				if _arg3 = "scroll-lock" then tstr = tstr + "ScrollLock}"
				if _arg3 = "pause-key" then tstr = tstr + "Pause}"
				if _arg3 = "num-lock" then tstr = tstr + "NumLock}"
				SendSystemKeys tstr
			}
		}

		COMMAND "<PressKey> <ShiftKey> <KeyPad> <NumPadKey>" {
			SCRIPT {
				tstr = "{"
				if Instr(_arg2, "control-key") > 0 then tstr = tstr + "Ctrl+"
				if Instr(_arg2, "alt-key") > 0 then tstr = tstr + "Alt+"
				if Instr(_arg2, "shift-key") > 0 then tstr = tstr + "Shift+"
				if _arg4 = "0" then tstr = tstr + "NumKey0}"
				if _arg4 = "1" then tstr = tstr + "NumKey1}"
				if _arg4 = "2" then tstr = tstr + "NumKey2}"
				if _arg4 = "3" then tstr = tstr + "NumKey3}"
				if _arg4 = "4" then tstr = tstr + "NumKey4}"
				if _arg4 = "5" then tstr = tstr + "NumKey5}"
				if _arg4 = "6" then tstr = tstr + "NumKey6}"
				if _arg4 = "7" then tstr = tstr + "NumKey7}"
				if _arg4 = "8" then tstr = tstr + "NumKey8}"
				if _arg4 = "9" then tstr = tstr + "NumKey9}"
				if _arg4 = "." then tstr = tstr + "NumKey.}"
				if _arg4 = "/" then tstr = tstr + "NumKey/}"
				if _arg4 = "*" then tstr = tstr + "NumKey*}"
				if _arg4 = "-" then tstr = tstr + "NumKey-}"
				if _arg4 = "+" then tstr = tstr + "NumKey+}"
				if _arg4 = "Enter" then tstr = tstr + "NumKeyEnter}"
				SendSystemKeys tstr
			}
		}

		COMMAND "Delete <NextOrPrevious> <2To20> Characters" {
			SCRIPT {
				if _arg1 = "Previous" then _arg1 = "Backspace"
				if _arg1 = "Next"     then _arg1 = "Del"
				if _arg1 = "Back"     then _arg1 = "Backspace"
				if _arg1 = "Forward"  then _arg1 = "Del"
				if _arg1 = "Last"     then _arg1 = "Backspace"
				SendKeys "{" + _arg1 + " " + _arg2 + "}"
			}
		}

		COMMAND "big <machine> window" {
			SCRIPT {
				AppBringUp "big "+_arg1, "c:\programs\SecCRT\secure.exe /s "+_arg1+"-big"
			}
		}

		COMMAND "large Emacs window" {
			SCRIPT {
				Appbringup "Emacs","c:\programs\emacs-~1.1\bin\emacs.exe",1, "c:\tmk"
			}
		}

		LIST "AppList" {
			"NatSpeak"
			"NaturallySpeaking"
			"Next Window"
			"Previous Window"
		}

		LIST "MoveTo" {
			"Go to"
			"Move to"
		}

		LIST "Position" {
			"Beginning"
			"Start"
			"Top"
			"Bottom"
			"End"
		}

		LIST "Text" {
			"Selection"
			"Line"
			"Paragraph"
			"Document"
		}

		LIST "DirLeftRight" {
			"Left"
			"Right"
			"Back"
			"Forward"
		}

		LIST "DirUpDown" {
			"Up"
			"Down"
			"Back"
			"Forward"
		}

		LIST "SelectOrDelete" {
			"Select"
			"Delete"
		}

		LIST "NextOrPrevious" {
			"Previous"
			"Next"
			"Back"
			"Forward"
			"Last"
		}

		LIST "One" {
			"a"
			"1"
		}

		LIST "2To20" {
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
			"11"
			"12"
			"13"
			"14"
			"15"
			"16"
			"17"
			"18"
			"19"
			"20"
		}

		LIST "Direction" {
			"Left"
			"Right"
			"Up"
			"Down"
		}

		LIST "2To10" {
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
		}

		LIST "Mouse" {
			"Mouse"
			"MouseGrid"
			"Mouse Window"
			"MouseGrid Window"
		}

		LIST "MouseGrid" {
			"MouseGrid"
			"Mouse Window"
			"MouseGrid Window"
		}

		LIST "1To9" {
			"1"
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
		}

		LIST "1To10" {
			"1"
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
		}

		LIST "MouseAction" {
			"Click"
			"Double Click"
			"Drag"
			"Go"
			"Mark"
			"Left Click"
			"Right Click"
			"Control Drag"
			"Shift Drag"
		}

		LIST "Alphabet" {
			"a\\a"
			"b\\b"
			"c\\c"
			"d\\d"
			"e\\e"
			"f\\f"
			"g\\g"
			"h\\h"
			"i\\i"
			"j\\j"
			"k\\k"
			"l\\l"
			"m\\m"
			"n\\n"
			"o\\o"
			"p\\p"
			"q\\q"
			"r\\r"
			"s\\s"
			"t\\t"
			"u\\u"
			"v\\v"
			"w\\w"
			"x\\x"
			"y\\y"
			"z\\z"
		}

		LIST "ICAlphabet" {
			"a\\alpha"
			"b\\bravo"
			"c\\charlie"
			"d\\delta"
			"e\\echo"
			"f\\foxtrot"
			"g\\golf"
			"h\\hotel"
			"i\\india"
			"j\\juliett"
			"k\\kilo"
			"l\\lima"
			"m\\mike"
			"n\\november"
			"o\\oscar"
			"p\\papa"
			"q\\quebec"
			"r\\romeo"
			"s\\sierra"
			"t\\tango"
			"u\\uniform"
			"v\\victor"
			"w\\whiskey"
			"x\\xray"
			"y\\yankee"
			"z\\zulu"
		}

		LIST "HelperAlphabet" {
			"a\\a as in alpha"
			"a\\a as in Albert"
			"a\\a as in Alice"
			"b\\b as in bravo"
			"b\\b as in Bill"
			"b\\b as in Buffalo"
			"c\\c as in charlie"
			"c\\c as in Cathy"
			"c\\c as in Carl"
			"d\\d as in delta"
			"d\\d as in David"
			"d\\d as in daughter"
			"e\\e as in echo"
			"e\\e as in Edgar"
			"e\\e as in enter"
			"f\\f as in foxtrot"
			"f\\f as in Frank"
			"f\\f as in fancy"
			"g\\g as in golf"
			"g\\g as in George"
			"g\\g as in gopher"
			"h\\h as in hotel"
			"h\\h as in Henry"
			"h\\h as in helmet"
			"i\\i as in india"
			"i\\i as in Iris"
			"i\\i as in Ireland"
			"j\\j as in juliett"
			"j\\j as in John"
			"j\\j as in Justice"
			"k\\k as in kilo"
			"k\\k as in Karen"
			"k\\k as in kitchen"
			"l\\l as in lima"
			"l\\l as in Larry"
			"l\\l as in lemon"
			"m\\m as in mike"
			"m\\m as in Mickey"
			"m\\m as in magic"
			"n\\n as in november"
			"n\\n as in Nancy"
			"n\\n as in nobody"
			"o\\o as in oscar"
			"o\\o as in Otto"
			"o\\o as in over"
			"p\\p as in papa"
			"p\\p as in Paul"
			"p\\p as in people"
			"q\\q as in quebec"
			"q\\q as in Quentin"
			"q\\q as in question"
			"r\\r as in romeo"
			"r\\r as in Rachael"
			"r\\r as in Robert"
			"s\\s as in sierra"
			"s\\s as in Sam"
			"s\\s as in Singapore"
			"t\\t as in tango"
			"t\\t as in Terry"
			"t\\t as in Tyler"
			"t\\t as in teflon"
			"u\\u as in uniform"
			"u\\u as in Ursula"
			"u\\u as in usual"
			"v\\v as in victor"
			"v\\v as in Valerie"
			"v\\v as in visit"
			"w\\w as in whiskey"
			"w\\w as in Wendy"
			"w\\w as in wake"
			"x\\x as in xray"
			"x\\x as in Xavier"
			"x\\x as in Xerxes"
			"y\\y as in yankee"
			"y\\y as in Yolanda"
			"y\\y as in Yvonne"
			"z\\z as in zulu"
			"z\\z as in Zachary"
			"z\\z as in Zookeeper"
		}

		LIST "Numeral" {
			"zero"
			"1"
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
		}

		LIST "Character" {
			"!"
			"@"
			"#"
			"$"
			"%"
			"^"
			"&"
			"*"
			"("
			")"
			"`"
			"~"
			"-"
			"_"
			"="
			"+"
			"\\"
			"|"
			"["
			"{"
			"]"
			"}"
			";"
			":"
			"'"
			"\""
			","
			"<"
			"."
			">"
			"/"
			"?"
		}

		LIST "Cursor" {
			"up-arrow"
			"down-arrow"
			"left-arrow"
			"right-arrow"
			"home-key"
			"end-key"
			"page-up"
			"page-down"
			"insert-key"
			"delete-key"
		}

		LIST "Miscellaneous" {
			"space-bar"
			"tab-key"
			"escape-key"
			"backspace-key"
			"enter-key"
			"caps-lock"
			"print-screen"
			"scroll-lock"
			"pause-key"
			"num-lock"
		}

		LIST "FunctionKey" {
			"function-1"
			"function-2"
			"function-3"
			"function-4"
			"function-5"
			"function-6"
			"function-7"
			"function-8"
			"function-9"
			"function-10"
			"function-11"
			"function-12"
		}

		LIST "NumPadKey" {
			"0"
			"1"
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"."
			"/"
			"*"
			"-"
			"+"
			"Enter"
		}

		LIST "KeyPad" {
			"Key Pad"
			"Num Pad"
		}

		LIST "ShiftKey" {
			"shift-key"
			"control-key"
			"alt-key"
			"shift-key control-key"
			"control-key shift-key"
			"alt-key shift-key"
			"shift-key alt-key"
			"control-key alt-key"
			"alt-key control-key"
			"shift-key control-key alt-key"
			"control-key shift-key alt-key"
			"alt-key shift-key control-key"
			"shift-key alt-key control-key"
			"control-key alt-key shift-key"
			"alt-key control-key shift-key"
		}

		LIST "PressKey" {
			"Press"
			"Press Key"
			"Keystroke"
			"Type"
		}

		LIST "machine" {
			"Gilgamesh"
			"Beowulf"
			"Tolkien"
			"Holmes"
			"Enkidu"
		}
	}
	STATE "Asleep" GLOBAL SLEEPING {
		COMMAND "Wake Up" {
			SCRIPT "WakeUp"
		}
	}
}

MENU "NATSPEAK" {
	STATE "Dragon NaturallySpeaking" {
		COMMAND "Select That" {
			SCRIPT {
				SendKeys "{Ctrl+t}"
			}
		}

		COMMAND "Set Font <FontFace>" {
			SCRIPT {
				if _arg1 = "Times" then _arg1 = "Times New Roman"
				if _arg1 = "Courier" then _arg1 = "Courier New"
				SendKeys "{Alt+o}f{Alt+f}" + _arg1 + "{Enter}"
			}
		}

		COMMAND "Set Font <FontFace> <FontSize>" {
			SCRIPT {
				if _arg1 = "Times" then _arg1 = "Times New Roman"
				if _arg1 = "Courier" then _arg1 = "Courier New"
				SendKeys "{Alt+o}f{Alt+f}" + _arg1 + "{Alt+s}" + _arg2 + "{Enter}"
			}
		}

		COMMAND "Set Font <FontFace> <FontSize> <FontStyle>" {
			SCRIPT {
				if _arg1 = "Times" then _arg1 = "Times New Roman"
				if _arg1 = "Courier" then _arg1 = "Courier New"
				if _arg3 = "Plain" then _arg3 = "Regular"
				if _arg3 = "Plain text" then _arg3 = "Regular"
				if _arg3 = "Underline" then _arg3 = "{Alt+u}"
				if _arg3 = "Italics" then _arg3 = "Italic"
				SendKeys "{Alt+o}f{Alt+f}" + _arg1 + "{Alt+s}" + _arg2 + "{Alt+y}" + _arg3 + "{Enter}"
			}
		}

		COMMAND "Set Font <FontFace> <FontStyle>" {
			SCRIPT {
				if _arg1 = "Times" then _arg1 = "Times New Roman"
				if _arg1 = "Courier" then _arg1 = "Courier New"
				if _arg2 = "Plain" then _arg2 = "Regular"
				if _arg2 = "Plain text" then _arg2 = "Regular"
				if _arg2 = "Underline" then _arg2 = "{Alt+u}"
				if _arg2 = "Italics" then _arg2 = "Italic"
				SendKeys "{Alt+o}f{Alt+f}" + _arg1 + "{Alt+y}" + _arg2 + "{Enter}"
			}
		}

		COMMAND "Set Font <FontStyle>" {
			SCRIPT {
				if _arg1 = "Regular" then _arg1 = "{Alt+o}f{Alt+y}Regular{Enter}"
				if _arg1 = "Plain" then _arg1 = "{Alt+o}f{Alt+y}Regular{Enter}"
				if _arg1 = "Plain Text" then _arg1 = "{Alt+o}f{Alt+y}Regular{Enter}"
				if _arg1 = "Underline" then _arg1 = "{Ctrl+u}"
				if _arg1 = "Italics" then _arg1 = "{Ctrl+i}"
				if _arg1 = "Bold" then _arg1 = "{Ctrl+b}"
				SendKeys _arg1
			}
		}

		COMMAND "Set Size <FontSize>" {
			SCRIPT {
				SendKeys "{Alt+o}f{Alt+s}"
				SendKeys _arg1 
				SendKeys "{Enter}"
			}
		}

		COMMAND "Format That Size <FontSize>" {
			SCRIPT {
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}f{Alt+s}"
				SendKeys _arg1 
				SendKeys "{Enter}"
				SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "Format That <FontSize> Point" {
			SCRIPT {
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}f{Alt+s}"
				SendKeys _arg1 
				SendKeys "{Enter}"
				SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "Format That <FontSize> <FontStyle>" {
			SCRIPT {
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}f{Alt+s}"
				SendKeys _arg1 
				if _arg2 = "Plain" then _arg2 = "Regular"
				if _arg2 = "Plain Text" then _arg2 = "Regular"
				if _arg2 = "Underline" then _arg2 = "{Alt+u}"
				if _arg2 = "Italics" then _arg2 = "Italic"
				SendKeys "{Alt+y}" + _arg2 + "{Enter}"
				SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "Format That <FontSize> Point <FontStyle>" {
			SCRIPT {
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}f{Alt+s}"
				SendKeys _arg1 
				if _arg2 = "Plain" then _arg2 = "Regular"
				if _arg2 = "Plain Text" then _arg2 = "Regular"
				if _arg2 = "Underline" then _arg2 = "{Alt+u}"
				if _arg2 = "Italics" then _arg2 = "Italic"
				SendKeys "{Alt+y}" + _arg2 + "{Enter}"
				SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "Format That <FontStyle>" {
			SCRIPT {
				if _arg1 = "Regular" then _arg1 = "{Alt+o}f{Alt+y}Regular{Enter}"
				if _arg1 = "Plain" then _arg1 = "{Alt+o}f{Alt+y}Regular{Enter}"
				if _arg1 = "Plain Text" then _arg1 = "{Alt+o}f{Alt+y}Regular{Enter}"
				if _arg1 = "Underline" then _arg1 = "{Ctrl+u}"
				if _arg1 = "Italics" then _arg1 = "{Ctrl+i}"
				if _arg1 = "Bold" then _arg1 = "{Ctrl+b}"
				SendKeys "{Ctrl+t}"
				SendKeys _arg1
				SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "Format That <FontFace>" {
			SCRIPT {
				if _arg1 = "Times" then _arg1 = "Times New Roman"
				if _arg1 = "Courier" then _arg1 = "Courier New"
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}f{Alt+f}" + _arg1 + "{Enter}"
				SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "Format That Font <FontFace>" {
			SCRIPT {
				if _arg1 = "Times" then _arg1 = "Times New Roman"
				if _arg1 = "Courier" then _arg1 = "Courier New"
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}f{Alt+f}" + _arg1 + "{Enter}"
				SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "Format That <FontFace> <FontSize>" {
			SCRIPT {
				if _arg1 = "Times" then _arg1 = "Times New Roman"
				if _arg1 = "Courier" then _arg1 = "Courier New"
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}f{Alt+f}" + _arg1 + "{Alt+s}" + _arg2 + "{Enter}"
				SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "Format That <FontFace> <FontSize> Point" {
			SCRIPT {
				if _arg1 = "Times" then _arg1 = "Times New Roman"
				if _arg1 = "Courier" then _arg1 = "Courier New"
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}f{Alt+f}" + _arg1 + "{Alt+s}" + _arg2 + "{Enter}"
				SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "Format That <FontFace> <FontSize> <FontStyle>" {
			SCRIPT {
				if _arg1 = "Times" then _arg1 = "Times New Roman"
				if _arg1 = "Courier" then _arg1 = "Courier New"
				if _arg3 = "Plain" then _arg3 = "Regular"
				if _arg3 = "Plain text" then _arg3 = "Regular"
				if _arg3 = "Underline" then _arg3 = "{Alt+u}"
				if _arg3 = "Italics" then _arg3 = "Italic"
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}f{Alt+f}" + _arg1 + "{Alt+s}" + _arg2 + "{Alt+y}" + _arg3 + "{Enter}"
				SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "Format That <FontFace> <FontStyle>" {
			SCRIPT {
				if _arg1 = "Times" then _arg1 = "Times New Roman"
				if _arg1 = "Courier" then _arg1 = "Courier New"
				if _arg2 = "Plain" then _arg2 = "Regular"
				if _arg2 = "Plain text" then _arg2 = "Regular"
				if _arg2 = "Underline" then _arg2 = "{Alt+u}"
				if _arg2 = "Italics" then _arg2 = "Italic"
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}f{Alt+f}" + _arg1 + "{Alt+y}" + _arg2 + "{Enter}"
				SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "Format That <Formatting>" {
			SCRIPT {
				if _arg1 = "Capitals" then _arg1 = "Cap"
				if _arg1 = "Initial Caps" then _arg1 = "Cap"
				if _arg1 = "Caps" then _arg1 = "Cap"
				if _arg1 = "Uppercase" then _arg1 = "All-Caps"
				if _arg1 = "Lowercase" then _arg1 = "No-Caps"
				if _arg1 = "Cap" then HeardWord "\Cap","That"
				if _arg1 = "All-Caps" then HeardWord "\All-Caps","That"
				if _arg1 = "No-Caps" then HeardWord "\No-Caps","That"
				if _arg1 = "With Hyphens" then HeardWord "Hyphenate","That"
				if _arg1 = "Without Spaces" then HeardWord "Compound","That"
				if _arg1 = "Centered" then 
				SendKeys "{Ctrl+t}" 
				SendKeys "{Ctrl+e}"
				SendKeys "{Shift+Ctrl+r}"
				end if
				if _arg1 = "Center Aligned" then 
				SendKeys "{Ctrl+t}"
				SendKeys "{Ctrl+e}"
				SendKeys "{Shift+Ctrl+r}"
				end if
				if _arg1 = "Left Aligned" then 
				SendKeys "{Ctrl+t}"
				SendKeys "{Ctrl+l}"
				SendKeys "{Shift+Ctrl+r}"
				end if
				if _arg1 = "Right Aligned" then 
				SendKeys "{Ctrl+t}"
				SendKeys "{Ctrl+r}"
				SendKeys "{Shift+Ctrl+r}"
				end if
				if _arg1 = "Bullet Style" then
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}b"
				SendKeys "{Shift+Ctrl+r}"
				end if
			}
		}

		COMMAND "Format That <Formatting> and <FontStyle>" {
			SCRIPT {
				HeardWord "Format","That",_arg2
				if _arg1 = "Capitals" then _arg1 = "Cap"
				if _arg1 = "Initial Caps" then _arg1 = "Cap"
				if _arg1 = "Caps" then _arg1 = "Cap"
				if _arg1 = "Uppercase" then _arg1 = "All-Caps"
				if _arg1 = "Lowercase" then _arg1 = "No-Caps"
				if _arg1 = "Cap" then HeardWord "\Cap","That"
				if _arg1 = "All-Caps" then HeardWord "\All-Caps","That"
				if _arg1 = "No-Caps" then HeardWord "\No-Caps","That"
				if _arg1 = "With Hyphens" then HeardWord "Hyphenate","That"
				if _arg1 = "Without Spaces" then HeardWord "Compound","That"
				if _arg1 = "Centered" then 
				SendKeys "{Ctrl+t}" 
				SendKeys "{Ctrl+e}"
				SendKeys "{Shift+Ctrl+r}"
				end if
				if _arg1 = "Center Aligned" then 
				SendKeys "{Ctrl+t}"
				SendKeys "{Ctrl+e}"
				SendKeys "{Shift+Ctrl+r}"
				end if
				if _arg1 = "Left Aligned" then 
				SendKeys "{Ctrl+t}"
				SendKeys "{Ctrl+l}"
				SendKeys "{Shift+Ctrl+r}"
				end if
				if _arg1 = "Right Aligned" then 
				SendKeys "{Ctrl+t}"
				SendKeys "{Ctrl+r}"
				SendKeys "{Shift+Ctrl+r}"
				end if
				if _arg1 = "Bullet Style" then
				SendKeys "{Ctrl+t}"
				SendKeys "{Alt+o}b"
				SendKeys "{Shift+Ctrl+r}"
				end if
			}
		}

		COMMAND "Format That <FontStyle> and <Formatting>" {
			SCRIPT {
				if _arg1 = "Regular" then _arg1 = "{Alt+o}f{Alt+y}Regular{Enter}"
				if _arg1 = "Plain" then _arg1 = "{Alt+o}f{Alt+y}Regular{Enter}"
				if _arg1 = "Plain Text" then _arg1 = "{Alt+o}f{Alt+y}Regular{Enter}"
				if _arg1 = "Underline" then _arg1 = "{Ctrl+u}"
				if _arg1 = "Italics" then _arg1 = "{Ctrl+i}"
				if _arg1 = "Bold" then _arg1 = "{Ctrl+b}"
				SendKeys "{Ctrl+t}"
				SendKeys _arg1
				SendKeys "{Shift+Ctrl+r}"
				HeardWord "Format","That",_arg2
			}
		}

		COMMAND "<Action> <Selection>" {
			SCRIPT {
				if _arg1 = "Cut" then key$ = "{Ctrl+x}"
				if _arg1 = "Copy" then key$ = "{Ctrl+c}"
				if _arg1 = "Bold" then key$ = "{Ctrl+b}"
				if _arg1 = "Italicize" then key$ = "{Ctrl+i}"
				if _arg1 = "Underline" then key$ = "{Ctrl+u}"
				if _arg1 = "Center" then key$ = "{Ctrl+e}"
				if _arg1 = "Left Align" then key$ = "{Ctrl+l}"
				if _arg1 = "Right Align" then key$ = "{Ctrl+r}"
				if _arg1 = "Delete" then key$ = "{Del}"
				if _arg1 = "Restore" then key$ = "{Alt+o}f{Alt+y}Regular{Enter}"
				if _arg2 = "That" then SendKeys "{Ctrl+t}"
				SendKeys key$
				if _arg2 = "That" then SendKeys "{Shift+Ctrl+r}"
			}
		}

		COMMAND "What Can I Say" {
			SCRIPT {
				offset& = 65536
				id& = 602
				WinHelp "Wcisbase.hlp>(w95sec)", 11
			}
		}

		COMMAND "Play That Back" {
			SCRIPT {
				SendKeys "{Shift+Ctrl+s}"
			}
		}

		COMMAND "<playPlaybackRead> <ReadText>" {
			SCRIPT {
				key$ = "Shift"
				if _arg1 = "Read"       then key$ = "Alt"
				if _arg2 = "That"       or _arg2 = "Selection"      then SendKeys "{Ctrl+"+key$+"+s}"
				if _arg2 = "To Here"    or _arg2 = "Up To Here"     then SendKeys "{Ctrl+"+key$+"+t}"
				if _arg2 = "From Here"  or _arg2 = "Down From Here" then SendKeys "{Ctrl+"+key$+"+f}"
				if _arg2 = "Line"       then SendKeys "{Ctrl+"+key$+"+l}"
				if _arg2 = "Paragraph"  then SendKeys "{Ctrl+Up}{Shift+Ctrl+Down}{Ctrl+"+key$+"+s}"
				if _arg2 = "Screen"     or _arg2 = "Window"         then SendKeys "{Ctrl+"+key$+"+c}"
				if _arg2 = "Document"   then SendKeys "{Ctrl+"+key$+"+d}"
			}
		}

		LIST "FontFace" {
			"Times"
			"Times New Roman"
			"Courier"
			"Courier New"
			"Arial"
		}

		LIST "FontStyle" {
			"Bold"
			"Underline"
			"Italics"
			"Plain"
			"Plain Text"
			"Regular"
		}

		LIST "FontSize" {
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
			"11"
			"12"
			"13"
			"14"
			"15"
			"16"
			"17"
			"18"
			"19"
			"20"
			"22"
			"24"
			"25"
			"26"
			"28"
			"30"
			"36"
			"40"
			"48"
			"60"
			"72"
			"84"
			"96"
			"100"
			"120"
		}

		LIST "Formatting" {
			"Cap"
			"Caps"
			"Initial Caps"
			"Capitals"
			"All-Caps"
			"Uppercase"
			"No-Caps"
			"Lowercase"
			"Centered"
			"Center Aligned"
			"Left Aligned"
			"Right Aligned"
			"Bullet Style"
			"With Hyphens"
			"Without Spaces"
		}

		LIST "Action" {
			"Cut"
			"Copy"
			"Bold"
			"Italicize"
			"Underline"
			"Center"
			"Left Align"
			"Right Align"
			"Delete"
			"Restore"
		}

		LIST "Selection" {
			"Selection"
			"That"
		}

		LIST "playPlaybackRead" {
			"Play"
			"Play Back"
			"Read"
		}

		LIST "ReadText" {
			"That"
			"Line"
			"Paragraph"
			"Document"
			"Screen"
			"Window"
			"From Here"
			"To Here"
			"Selection"
			"Up To Here"
			"Down From Here"
		}
	}
	STATE "Correction" {
		COMMAND "What Can I Say" {
			SCRIPT {
				offset& = 65536
				id& = 601
				WinHelp "Wcisbase.hlp>(w95sec)", 11
			}
		}

		COMMAND "Select Line" {
			KEYS {
				{Home}{Shift+End}
			}
		}

		COMMAND "<ChooseOrSelect> <1To10>" {
			SCRIPT {
				key$ = "Alt+"
				if _arg1 = "Select"    then key$ = "Shift+" + key$
				if _arg2 = "10"        then _arg2 = "0"
				Sendkeys "{" + key$ + _arg2 + "}"
			}
		}

		COMMAND "<MoveTo> <Position> of Line" {
			SCRIPT {
				if _arg2 = "Beginning" then _arg2 = "Home"
				if _arg2 = "Start"     then _arg2 = "Home"
				if _arg2 = "Top"       then _arg2 = "Home"
				if _arg2 = "Bottom"    then _arg2 = "End"
				SendKeys "{" + _arg2 + "}"
			}
		}

		COMMAND "Go to Bottom" {
			KEYS {
				{End}
			}
		}

		COMMAND "Go to Top" {
			KEYS {
				{Home}
			}
		}

		COMMAND "Move <DirLeftRight> <One> Word" {
			SCRIPT {
				if _arg1 = "Back"     then _arg1 = "Left"
				if _arg1 = "Forward"  then _arg1 = "Right"
				SendKeys "{Ctrl+" + _arg1 + "}"
			}
		}

		COMMAND "Move <DirLeftRight> <2To20> Words" {
			SCRIPT {
				if _arg1 = "Back"     then _arg1 = "Left"
				if _arg1 = "Forward"  then _arg1 = "Right"
				SendKeys "{Ctrl+" + _arg1 + " " + _arg2 + "}"
			}
		}

		COMMAND "Move <DirLeftRight> <One> Word and <One> Character" {
			SCRIPT {
				if _arg1 = "Back"     then _arg1 = "Left"
				if _arg1 = "Forward"  then _arg1 = "Right"
				SendKeys "{Ctrl+" + _arg1 + "}"
				if _arg1 = "Left" then SendKeys "{Left}"
			}
		}

		COMMAND "Move <DirLeftRight> <2To20> Words and <One> Character" {
			SCRIPT {
				if _arg1 = "Back"     then _arg1 = "Left"
				if _arg1 = "Forward"  then _arg1 = "Right"
				SendKeys "{Ctrl+" + _arg1 + " " + _arg2 + "}"
				if _arg1 = "Left" then SendKeys "{Left}"
			}
		}

		COMMAND "Move <DirLeftRight> <One> Word and <2To20> Characters" {
			SCRIPT {
				if _arg1 = "Back"     then _arg1 = "Left"
				if _arg1 = "Forward"  then _arg1 = "Right"
				if _arg1 = "Right" then _arg3 = Str$( Val(_arg3) - 1 )
				SendKeys "{Ctrl+" + _arg1 + "}{"+_arg1+" "+_arg3+"}"
			}
		}

		COMMAND "Move <DirLeftRight> <2To20> Words and <2To20> Characters" {
			SCRIPT {
				if _arg1 = "Back"     then _arg1 = "Left"
				if _arg1 = "Forward"  then _arg1 = "Right"
				if _arg1 = "Right" then _arg3 = Str$( Val(_arg3) - 1 )
				SendKeys "{Ctrl+" + _arg1 + " " + _arg2 + "}{"+_arg1+" "+_arg3+"}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> Word" {
			SCRIPT {
				if _arg2 = "Previous" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}"
				if _arg2 = "Next" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}"
				if _arg2 = "Back" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}"
				if _arg2 = "Forward" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}"
				if _arg2 = "Last" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}"
				if _arg1 = "Delete" then SendKeys "{Del}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> 1 Word" {
			SCRIPT {
				if _arg2 = "Previous" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}"
				if _arg2 = "Next" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}"
				if _arg2 = "Back" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}"
				if _arg2 = "Forward" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}"
				if _arg2 = "Last" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}"
				if _arg1 = "Delete" then SendKeys "{Del}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> <2To20> Words" {
			SCRIPT {
				if _arg2 = "Previous" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}"
				if _arg2 = "Next" then SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right " +_arg3+ "}"
				if _arg2 = "Back" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}"
				if _arg2 = "Forward" then SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right " +_arg3+ "}"
				if _arg2 = "Last" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}"
				if _arg1 = "Delete" then SendKeys "{Del}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> Word and Character" {
			SCRIPT {
				if _arg2 = "Previous" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left}"
				if _arg2 = "Next" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}"
				if _arg2 = "Back" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left}"
				if _arg2 = "Forward" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}"
				if _arg2 = "Last" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left}"
				if _arg1 = "Delete" then SendKeys "{Del}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> 1 Word and 1 Character" {
			SCRIPT {
				if _arg2 = "Previous" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left}"
				if _arg2 = "Next" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}"
				if _arg2 = "Back" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left}"
				if _arg2 = "Forward" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}"
				if _arg2 = "Last" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left}"
				if _arg1 = "Delete" then SendKeys "{Del}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> <2To20> Words and 1 Character" {
			SCRIPT {
				if _arg2 = "Previous" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}{Shift+Left}"
				if _arg2 = "Next" then SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right " +_arg3+ "}"
				if _arg2 = "Back" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}{Shift+Left}"
				if _arg2 = "Forward" then SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right " +_arg3+ "}"
				if _arg2 = "Last" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}{Shift+Left}"
				if _arg1 = "Delete" then SendKeys "{Del}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> Word and <2To20> Characters" {
			SCRIPT {
				if _arg2 = "Next" or _arg2 = "Forward" then _arg3 = Str$( Val(_arg3) - 1 )
				if _arg2 = "Previous" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left "+_arg3+"}"
				if _arg2 = "Next" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}{Shift+Right "+_arg3+"}"
				if _arg2 = "Back" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left "+_arg3+"}"
				if _arg2 = "Forward" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}{Shift+Right "+_arg3+"}"
				if _arg2 = "Last" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left "+_arg3+"}"
				if _arg1 = "Delete" then SendKeys "{Del}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> 1 Word and <2To20> Characters" {
			SCRIPT {
				if _arg2 = "Next" or _arg2 = "Forward" then _arg3 = Str$( Val(_arg3) - 1 )
				if _arg2 = "Previous" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left "+_arg3+"}"
				if _arg2 = "Next" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}{Shift+Right "+_arg3+"}"
				if _arg2 = "Back" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left "+_arg3+"}"
				if _arg2 = "Forward" then  SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right}{Shift+Right "+_arg3+"}"
				if _arg2 = "Last" then  SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left}{Shift+Left "+_arg3+"}"
				if _arg1 = "Delete" then SendKeys "{Del}"
			}
		}

		COMMAND "<SelectOrDelete> <NextOrPrevious> <2To20> Words and <2To20> Characters" {
			SCRIPT {
				if _arg2 = "Next" or _arg2 = "Forward" then _arg3 = Str$( Val(_arg3) - 1 )
				if _arg2 = "Previous" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}{Shift+Left "+_arg4+"}"
				if _arg2 = "Next" then SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right " +_arg3+ "}{Shift+Right "+_arg4+"}"
				if _arg2 = "Back" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}{Shift+Left "+_arg4+"}"
				if _arg2 = "Forward" then SendKeys "{Ctrl+Right}{Ctrl+Left}{Shift+Ctrl+Right " +_arg3+ "}{Shift+Right "+_arg4+"}"
				if _arg2 = "Last" then SendKeys "{Left 2}{Ctrl+Right}{Shift+Ctrl+Left " +_arg3+ "}{Shift+Left "+_arg4+"}"
				if _arg1 = "Delete" then SendKeys "{Del}"
			}
		}

		COMMAND "<Action> <Selection>" {
			SCRIPT {
				if _arg1 = "Delete" then key$ = "{Del}"
				if _arg1 = "Cut" then key$ = "{Ctrl+x}"
				Sendkeys key$
			}
		}

		COMMAND "Delete <NextOrPrevious> Character" {
			SCRIPT {
				if _arg1 = "Previous" then SendKeys "{Left}{Right}{Backspace}"
				if _arg1 = "Next"     then SendKeys "{Right}{Left}{Del}"
				if _arg1 = "Back"     then SendKeys "{Left}{Right}{Backspace}"
				if _arg1 = "Forward"  then SendKeys "{Right}{Left}{Del}"
				if _arg1 = "Last"     then SendKeys "{Left}{Right}{Backspace}"
			}
		}

		COMMAND "Delete <NextOrPrevious> <2To20> Characters" {
			SCRIPT {
				if _arg1 = "Previous" then _arg1 = "Backspace"
				if _arg1 = "Next"     then _arg1 = "Del"
				if _arg1 = "Back"     then _arg1 = "Backspace"
				if _arg1 = "Forward"  then _arg1 = "Del"
				if _arg1 = "Last"     then _arg1 = "Backspace"
				if _arg1 = "Backspace" then SendKeys "{Left}{Right}"
				if _arg1 = "Del"       then SendKeys "{Right}{Left}"
				SendKeys "{" + _arg1 + " " + _arg2 + "}"
			}
		}

		COMMAND "<single-random-letter>" {
			SCRIPT {
				if _arg1 = "}" then
				Sendkeys _arg1
				else
				Sendkeys "{" + _arg1 + "}"
				end if
			}
		}

		LIST "ChooseOrSelect" {
			"Choose"
			"Select"
		}

		LIST "Action" {
			"Cut"
			"Delete"
		}

		LIST "Selection" {
			"Selection"
			"That"
		}

		LIST "1To10" {
			"1"
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
		}

		LIST "MoveTo" {
			"Go to"
			"Move to"
		}

		LIST "Position" {
			"Beginning"
			"Start"
			"Top"
			"Bottom"
			"End"
		}

		LIST "DirLeftRight" {
			"Left"
			"Right"
			"Back"
			"Forward"
		}

		LIST "SelectOrDelete" {
			"Select"
			"Delete"
		}

		LIST "NextOrPrevious" {
			"Previous"
			"Next"
			"Back"
			"Forward"
			"Last"
		}

		LIST "One" {
			"a"
			"1"
		}

		LIST "2To20" {
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
			"11"
			"12"
			"13"
			"14"
			"15"
			"16"
			"17"
			"18"
			"19"
			"20"
		}

		LIST "single-random-letter" {
			"0"
			"1"
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"!"
			"@"
			"#"
			"$"
			"%"
			"^"
			"&"
			"*"
			"("
			")"
			"`"
			"~"
			"-"
			"_"
			"="
			"+"
			"\\"
			"|"
			"["
			"{"
			"]"
			"}"
			";"
			":"
			"'"
			"\""
			","
			"<"
			"."
			">"
			"/"
			"?"
		}
	}
	STATE "Mouse Grid" NOGLOBALS {
		COMMAND "Cancel" {
			SCRIPT "MouseGrid 0"
		}

		COMMAND "Undo That" {
			SCRIPT "MouseGrid 1,0"
		}

		COMMAND "<1To9>" {
			SCRIPT {
				MouseGrid 1, _arg1
			}
		}

		COMMAND "<1To9> <1To9>" {
			SCRIPT {
				MouseGrid 1, _arg1
				MouseGrid 1, _arg2
			}
		}

		COMMAND "<1To9> <1To9> <1To9>" {
			SCRIPT {
				MouseGrid 1, _arg1
				MouseGrid 1, _arg2
				MouseGrid 1, _arg3
			}
		}

		COMMAND "<1To9> <1To9> <1To9> <1To9>" {
			SCRIPT {
				MouseGrid 1, _arg1
				MouseGrid 1, _arg2
				MouseGrid 1, _arg3
				MouseGrid 1, _arg4
			}
		}

		COMMAND "<1To9> <1To9> <1To9> <1To9> <1To9>" {
			SCRIPT {
				MouseGrid 1, _arg1
				MouseGrid 1, _arg2
				MouseGrid 1, _arg3
				MouseGrid 1, _arg4
				MouseGrid 1, _arg5
			}
		}

		COMMAND "<MouseAction>" {
			SCRIPT {
				if _arg1 = "Go" then MouseGrid 0
				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 "<1To9> <MouseAction>" {
			SCRIPT {
				HeardWord _arg1
				HeardWord _arg2
			}
		}

		COMMAND "<1To9> <1To9> <MouseAction>" {
			SCRIPT {
				HeardWord _arg1, _arg2
				HeardWord _arg3
			}
		}

		COMMAND "<1To9> <1To9> <1To9> <MouseAction>" {
			SCRIPT {
				HeardWord _arg1, _arg2, _arg3
				HeardWord _arg4
			}
		}

		COMMAND "<1To9> <1To9> <1To9> <1To9> <MouseAction>" {
			SCRIPT {
				HeardWord _arg1, _arg2, _arg3, _arg4
				HeardWord _arg5
			}
		}

		COMMAND "<1To9> <1To9> <1To9> <1To9> <1To9> <MouseAction>" {
			SCRIPT {
				HeardWord _arg1, _arg2, _arg3, _arg4, _arg5
				HeardWord _arg6
			}
		}

		COMMAND "<MouseGrid>" {
			SCRIPT {
				MouseGrid 0
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&
			}
		}

		COMMAND "<Mouse> <1To9>" {
			SCRIPT {
				MouseGrid 0
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
			}
		}

		COMMAND "<Mouse> <1To9> <1To9>" {
			SCRIPT {
				MouseGrid 0
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9>" {
			SCRIPT {
				MouseGrid 0
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9> <1To9>" {
			SCRIPT {
				MouseGrid 0
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
				MouseGrid nMouse&, _arg5
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9> <1To9> <1To9>" {
			SCRIPT {
				MouseGrid 0
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
				MouseGrid nMouse&, _arg5
				MouseGrid nMouse&, _arg6
			}
		}

		COMMAND "Mouse <MouseAction>" {
			SCRIPT {
				HeardWord _arg1
			}
		}

		COMMAND "<Mouse> <1To9> <MouseAction>" {
			SCRIPT {
				MouseGrid 0
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				Wait 10
				HeardWord _arg3
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <MouseAction>" {
			SCRIPT {
				MouseGrid 0
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				Wait 10
				HeardWord _arg4
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9> <MouseAction>" {
			SCRIPT {
				MouseGrid 0
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
				Wait 10
				HeardWord _arg5
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9> <1To9> <MouseAction>" {
			SCRIPT {
				MouseGrid 0
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
				MouseGrid nMouse&, _arg5
				Wait 10
				HeardWord _arg6
			}
		}

		COMMAND "<Mouse> <1To9> <1To9> <1To9> <1To9> <1To9> <MouseAction>" {
			SCRIPT {
				MouseGrid 0
				nMouse& = 1
				if _arg1 = "Mouse Window" then nMouse& = 2
				if _arg1 = "MouseGrid Window" then nMouse& = 2
				MouseGrid nMouse&, _arg2
				MouseGrid nMouse&, _arg3
				MouseGrid nMouse&, _arg4
				MouseGrid nMouse&, _arg5
				MouseGrid nMouse&, _arg6
				Wait 10
				HeardWord _arg7
			}
		}

		COMMAND "<Direction> <1To10>" {
			SCRIPT {
				MouseGrid 0
				xPos& = 0
				yPos& = 0
				nDistance& = Val( _arg2 ) * 3
				if _arg1 = "Up"     then yPos& = yPos& - nDistance&
				if _arg1 = "Down"   then yPos& = yPos& + nDistance&
				if _arg1 = "Left"   then xPos& = xPos& - nDistance&
				if _arg1 = "Right"  then xPos& = xPos& + nDistance&
				SetMousePosition 2, xPos&, yPos&
			}
		}

		COMMAND "<Direction> <1To10> <MouseAction>" {
			SCRIPT {
				HeardWord _arg1, _arg2
				Wait 10
				HeardWord "Mouse",_arg3
			}
		}

		COMMAND "Mouse <Direction> <1To10>" {
			SCRIPT {
				HeardWord _arg1, _arg2
			}
		}

		COMMAND "Mouse <Direction> <1To10> <MouseAction>" {
			SCRIPT {
				HeardWord _arg1, _arg2
				Wait 10
				HeardWord "Mouse",_arg3
			}
		}

		COMMAND "Go to Sleep" {
			SCRIPT "GoToSleep"
		}

		COMMAND "Microphone Off" {
			SCRIPT "SetMicrophone 0"
		}

		COMMAND "What Can I Say" {
			SCRIPT {
				offset& = 65536
				id& = 604
				WinHelp "Wcisbase.hlp>(w95sec)", 11
			}
		}

		COMMAND "Switch to <AppList>" {
			SCRIPT {
				if _arg1 = "NatSpeak" then
				MouseGrid 0
				AppBringUp "NatSpeak"
				end if
				if _arg1 = "NaturallySpeaking" then
				MouseGrid 0
				AppBringUp "NatSpeak"
				end if
				if _arg1 = "Next Window" then SendSystemKeys "{Shift+Alt+Tab}"
				if _arg1 = "Previous Window" then SendSystemKeys "{Alt+Tab}"
			}
		}

		LIST "Direction" {
			"Up"
			"Down"
			"Left"
			"Right"
		}

		LIST "Mouse" {
			"Mouse"
			"MouseGrid"
			"Mouse Window"
			"MouseGrid Window"
		}

		LIST "MouseGrid" {
			"MouseGrid"
			"Mouse Window"
			"MouseGrid Window"
		}

		LIST "MouseAction" {
			"Click"
			"Double Click"
			"Drag"
			"Go"
			"Mark"
			"Left Click"
			"Right Click"
			"Control Drag"
			"Shift Drag"
		}

		LIST "1To9" {
			"1"
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
		}

		LIST "1To10" {
			"1"
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
		}

		LIST "AppList" {
			"NatSpeak"
			"NaturallySpeaking"
			"Next Window"
			"Previous Window"
		}
	}
}

MENU "WINWORD" {
	STATE "Microsoft Word" {
		COMMAND "<Imperative> <Object>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Imperative> <nextLast> <Object>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Imperative> the <nextLast> <Object>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Imperative> <a1> <Object>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Imperative> <theThis> <Object>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Imperative> <nextLast> 1 <Object>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Imperative> <2To20> <Objects>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = ""
				count$ = _arg2
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Imperative> <nextLast> <2To20> <Objects>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Imperative> the <nextLast> <2To20> <Objects>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <Object> <FontStyle>" {
			SCRIPT {
				verb$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <theThis> <Object> <FontStyle>" {
			SCRIPT {
				verb$ = _arg4
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <Object> <FontStyle>" {
			SCRIPT {
				verb$ = _arg4
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <Object> <FontStyle>" {
			SCRIPT {
				verb$ = _arg4
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> 1 <Object> <FontStyle>" {
			SCRIPT {
				verb$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <2To20> <Objects> <FontStyle>" {
			SCRIPT {
				verb$ = _arg4
				direction$ = ""
				count$ = _arg2
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <2To20> <Objects> <FontStyle>" {
			SCRIPT {
				verb$ = _arg5
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <2To20> <Objects> <FontStyle>" {
			SCRIPT {
				verb$ = _arg5
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> Font <FontStyle>" {
			SCRIPT {
				fontname$ = ""
				fontsize$ = ""
				fontstyle$ = _arg2
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + "," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the Font <FontStyle>" {
			SCRIPT {
				fontname$ = ""
				fontsize$ = ""
				fontstyle$ = _arg2
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + "," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItFontSelection> <FontName>" {
			SCRIPT {
				fontname$ = _arg3
				fontsize$ = ""
				fontstyle$ = ""
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + "," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItFontSelection> <FontName> <FontSize>" {
			SCRIPT {
				fontname$ = _arg3
				fontsize$ = _arg4
				fontstyle$ = ""
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + "," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItFontSelection> <FontName> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg3
				fontsize$ = ""
				fontstyle$ = _arg4
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + "," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItFontSelection> <FontName> <FontSize> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg3
				fontsize$ = _arg4
				fontstyle$ = _arg5
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + "," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItSizeSelection> <FontSize>" {
			SCRIPT {
				fontname$ = ""
				fontsize$ = _arg3
				fontstyle$ = ""
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + "," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItColorSelection> <FontColor> on <FontColor>" {
			SCRIPT {
				foreground$ = _arg3
				background$ = _arg4
				arg$ = "Fnt:fore/back," + foreground$ + "," + background$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <background> <FontColor>" {
			SCRIPT {
				foreground$ = ""
				background$ = _arg3
				arg$ = "Fnt:fore/back," + foreground$ + "," + background$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItSelection> <FontStyle>" {
			SCRIPT {
				side$ = _arg2
				verbOne$ = _arg3
				verbTwo$ = ""
				verbThree$ = ""
				arg$ = "Fnt:vrb/vrb/vrb," + verbOne$ + "," + verbTwo$ + "," + verbThree$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItSelection> <FontStyle> and <FontStyle>" {
			SCRIPT {
				verbOne$ = _arg3
				verbTwo$ = _arg4
				verbThree$ = ""
				arg$ = "Fnt:vrb/vrb/vrb," + verbOne$ + "," + verbTwo$ + "," + verbThree$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItSelection> <FontStyle> <FontStyle> and <FontStyle>" {
			SCRIPT {
				verbOne$ = _arg3
				verbTwo$ = _arg4
				verbThree$ = _arg5
				arg$ = "Fnt:vrb/vrb/vrb," + verbOne$ + "," + verbTwo$ + "," + verbThree$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItSelection> <FontStyle> and <FontStyle> and <FontStyle>" {
			SCRIPT {
				verbOne$ = _arg3
				verbTwo$ = _arg4
				verbThree$ = _arg5
				arg$ = "Fnt:vrb/vrb/vrb," + verbOne$ + "," + verbTwo$ + "," + verbThree$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <FontStyle> <onOff>" {
			SCRIPT {
				verb$ = _arg2
				state$ = _arg3
				arg$ = "Fnt:vrb/on," + verb$ + "," + state$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <onOff> <FontStyle>" {
			SCRIPT {
				verb$ = _arg2
				state$ = _arg1
				arg$ = "Fnt:vrb/on," + verb$ + "," + state$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <FontStyle> <onOff>" {
			SCRIPT {
				verb$ = _arg1
				state$ = _arg2
				arg$ = "Fnt:vrb/on," + verb$ + "," + state$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <Object> <FontName>" {
			SCRIPT {
				fontname$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				verb$ = ""
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <theThis> <Object> <FontName>" {
			SCRIPT {
				fontname$ = _arg4
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				verb$ = ""
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <Object> <FontName>" {
			SCRIPT {
				fontname$ = _arg4
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				verb$ = ""
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <Object> <FontName>" {
			SCRIPT {
				fontname$ = _arg4
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				verb$ = ""
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> 1 <Object> <FontName>" {
			SCRIPT {
				fontname$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				verb$ = ""
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <2To20> <Objects> <FontName>" {
			SCRIPT {
				fontname$ = _arg4
				direction$ = ""
				count$ = _arg2
				object$ = _arg3
				verb$ = ""
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <2To20> <Objects> <FontName>" {
			SCRIPT {
				fontname$ = _arg5
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				verb$ = ""
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <2To20> <Objects> <FontName>" {
			SCRIPT {
				fontname$ = _arg5
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				verb$ = ""
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <Object> <FontName> <FontSize>" {
			SCRIPT {
				verb$ = ""
				fontname$ = _arg3
				fontsize$ = _arg4
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <theThis> <Object> <FontName> <FontSize>" {
			SCRIPT {
				verb$ = ""
				fontname$ = _arg4
				fontsize$ = _arg5
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <Object> <FontName> <FontSize>" {
			SCRIPT {
				verb$ = ""
				fontname$ = _arg4
				fontsize$ = _arg5
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <Object> <FontName> <FontSize>" {
			SCRIPT {
				verb$ = ""
				fontname$ = _arg4
				fontsize$ = _arg5
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> 1 <Object> <FontName> <FontSize>" {
			SCRIPT {
				verb$ = ""
				fontname$ = _arg3
				fontsize$ = _arg4
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <2To20> <Objects> <FontName> <FontSize>" {
			SCRIPT {
				verb$ = ""
				fontname$ = _arg4
				fontsize$ = _arg5
				direction$ = ""
				count$ = _arg2
				object$ = _arg3
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <2To20> <Objects> <FontName> <FontSize>" {
			SCRIPT {
				verb$ = ""
				fontname$ = _arg5
				fontsize$ = _arg6
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <2To20> <Objects> <FontName> <FontSize>" {
			SCRIPT {
				verb$ = ""
				fontname$ = _arg5
				fontsize$ = _arg6
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <Object> <FontName> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg3
				fontstyle$ = _arg4
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <theThis> <Object> <FontName> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg4
				fontstyle$ = _arg5
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <Object> <FontName> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg4
				fontstyle$ = _arg5
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <Object> <FontName> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg4
				fontstyle$ = _arg5
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> 1 <Object> <FontName> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg3
				fontstyle$ = _arg4
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <2To20> <Objects> <FontName> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg4
				fontstyle$ = _arg5
				direction$ = ""
				count$ = _arg2
				object$ = _arg3
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <2To20> <Objects> <FontName> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg5
				fontstyle$ = _arg6
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <2To20> <Objects> <FontName> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg5
				fontstyle$ = _arg6
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				fontsize$ = ""
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <Object> <FontName> <FontSize> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg3
				fontstyle$ = _arg5
				fontsize$ = _arg4
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <theThis> <Object> <FontName> <FontSize> <FontStyle>" {
			SCRIPT {
				fontstyle$ = _arg6
				fontname$ = _arg4
				fontsize$ = _arg5
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <Object> <FontName> <FontSize> <FontStyle>" {
			SCRIPT {
				fontstyle$ = _arg6
				fontname$ = _arg4
				fontsize$ = _arg5
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <Object> <FontName> <FontSize> <FontStyle>" {
			SCRIPT {
				fontstyle$ = _arg6
				fontname$ = _arg4
				fontsize$ = _arg5
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> 1 <Object> <FontName> <FontSize> <FontStyle>" {
			SCRIPT {
				fontstyle$ = _arg5
				fontname$ = _arg3
				fontsize$ = _arg4
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <2To20> <Objects> <FontName> <FontSize> <FontStyle>" {
			SCRIPT {
				fontstyle$ = _arg6
				fontname$ = _arg4
				fontsize$ = _arg5
				direction$ = ""
				count$ = _arg2
				object$ = _arg3
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <2To20> <Objects> <FontName> <FontSize> <FontStyle>" {
			SCRIPT {
				fontstyle$ = _arg7
				fontname$ = _arg5
				fontsize$ = _arg6
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <2To20> <Objects> <FontName> <FontSize> <FontStyle>" {
			SCRIPT {
				fontstyle$ = _arg7
				fontname$ = _arg5
				fontsize$ = _arg6
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Fnt:nam/siz/vrb/dir/cnt/obj," + fontname$ + "," + fontsize$ + "," + fontstyle$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Imperative> <thatItSelection>" {
			SCRIPT {
				verbOne$ = _arg1
				verbTwo$ = ""
				verbThree$ = ""
				arg$ = "Fnt:vrb/vrb/vrb," + verbOne$ + "," + verbTwo$ + "," + verbThree$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<moveGo> <MoveDir> <a1> <Object>" {
			SCRIPT {
				moveDir$ = _arg2
				count$ = "1"
				object$ = _arg4
				arg$ = "Mov:dir/cnt/obj," + moveDir$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<MoveDir> <a1> <Object>" {
			SCRIPT {
				moveDir$ = _arg1
				count$ = "1"
				object$ = _arg3
				arg$ = "Mov:dir/cnt/obj," + moveDir$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<moveGo> <MoveDir> <2To20> <Objects>" {
			SCRIPT {
				moveDir$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Mov:dir/cnt/obj," + moveDir$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<MoveDir> <2To20> <Objects>" {
			SCRIPT {
				moveDir$ = _arg1
				count$ = _arg2
				object$ = _arg3
				arg$ = "Mov:dir/cnt/obj," + moveDir$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<moveGo> to <Side> of <Object>" {
			SCRIPT {
				side$ = _arg2
				object$ = _arg3
				arg$ = "Goto:end/obj/sel," + side$ + "," + object$ + "," + "Move"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<moveGo> to <Side>" {
			SCRIPT {
				side$ = _arg2
				object$ = "Document"
				arg$ = "Goto:end/obj/sel," + side$ + "," + object$ + "," + "Move"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Side> of <Object>" {
			SCRIPT {
				side$ = _arg1
				object$ = _arg2
				arg$ = "Goto:end/obj/sel," + side$ + "," + object$ + "," + "Move"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<moveGo> to the <Side> of the <Object>" {
			SCRIPT {
				side$ = _arg2
				object$ = _arg3
				arg$ = "Goto:end/obj/sel," + side$ + "," + object$ + "," + "Move"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<moveGo> to <Side> of <thatItSelection>" {
			SCRIPT {
				side$ = _arg2
				object$ = ""
				arg$ = "Goto:end/obj/sel," + side$ + "," + object$ + "," + "Move"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Side> of <thatItSelection>" {
			SCRIPT {
				side$ = _arg1
				object$ = ""
				arg$ = "Goto:end/obj/sel," + side$ + "," + object$ + "," + "Move"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<moveGo> to the <Side> of the <thatItSelection>" {
			SCRIPT {
				side$ = _arg2
				object$ = ""
				arg$ = "Goto:end/obj/sel," + side$ + "," + object$ + "," + "Move"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <thatItSelection> <MoveDir> <a1> <Object>" {
			SCRIPT {
				direction$ = _arg2
				count$ = "1"
				object$ = _arg4
				arg$ = "MvTht:dir/cnt/obj," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <thatItSelection> <MoveDir> <2To20> <Objects>" {
			SCRIPT {
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "MvTht:dir/cnt/obj," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <thatItSelection> to <Side> of <Object>" {
			SCRIPT {
				side$ = _arg2
				object$ = _arg3
				arg$ = "MvTht:end/obj," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <thatItSelection> to the <Side> of the <Object>" {
			SCRIPT {
				side$ = _arg2
				object$ = _arg3
				arg$ = "MvTht:end/obj," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<ParaVerb> <thatItSelection>" {
			SCRIPT {
				verbOne$ = _arg1
				verbTwo$ = ""
				verbThree$ = ""
				arg$ = "Par:vrb/vrb/vrb," + verbOne$ + "," + verbTwo$ + "," + verbThree$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<ParaVerb> <BigObject>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<ParaVerb> <theThis> <BigObject>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<ParaVerb> <nextLast> <BigObject>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<ParaVerb> the <nextLast> <BigObject>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<ParaVerb> 1 <BigObject>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<ParaVerb> <2To20> <BigObjects>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = ""
				count$ = _arg2
				object$ = _arg3
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<ParaVerb> <nextLast> <2To20> <BigObjects>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<ParaVerb> the <nextLast> <2To20> <BigObjects>" {
			SCRIPT {
				verb$ = _arg1
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItSelection> <ParaStyle>" {
			SCRIPT {
				verbOne$ = _arg3
				verbTwo$ = ""
				verbThree$ = ""
				arg$ = "Par:vrb/vrb/vrb," + verbOne$ + "," + verbTwo$ + "," + verbThree$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <BigObject> <ParaStyle>" {
			SCRIPT {
				verb$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <BigObject> <ParaStyle>" {
			SCRIPT {
				verb$ = _arg4
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> 1 <BigObject> <ParaStyle>" {
			SCRIPT {
				verb$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <theThis> <BigObject> <ParaStyle>" {
			SCRIPT {
				verb$ = _arg4
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> 1 <BigObject> <ParaStyle>" {
			SCRIPT {
				verb$ = _arg4
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <2To20> <BigObjects> <ParaStyle>" {
			SCRIPT {
				verb$ = _arg4
				count$ = _arg2
				object$ = _arg3
				direction$ = ""
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <2To20> <BigObjects> <ParaStyle>" {
			SCRIPT {
				verb$ = _arg5
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <ParaStyle> <onOff>" {
			SCRIPT {
				verb$ = _arg2
				state$ = _arg3
				arg$ = "Par:vrb/on," + verb$ + "," + state$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <onOff> <ParaStyleNoun>" {
			SCRIPT {
				verb$ = _arg2
				state$ = _arg1
				arg$ = "Par:vrb/on," + verb$ + "," + state$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <ParaStyleNoun> <onOff>" {
			SCRIPT {
				verb$ = _arg1
				state$ = _arg2
				arg$ = "Par:vrb/on," + verb$ + "," + state$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <thatItSelection> As <FontStyleType>" {
			SCRIPT {
				style$ = _arg2
				arg$ = "Fnt:sty," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <Object> As <FontStyleType>" {
			SCRIPT {
				style$ = _arg2
				direction$ = ""
				count$ = "1"
				object$ = _arg1
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <theThis> <Object> As <FontStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <nextLast> <Object> As <FontStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format the <nextLast> <Object> As <FontStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format 1 <Object> As <FontStyleType>" {
			SCRIPT {
				style$ = _arg2
				direction$ = ""
				count$ = "1"
				object$ = _arg1
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <2To20> <Objects> As <FontStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = _arg1
				object$ = _arg2
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <nextLast> <2To20> <Objects> As <FontStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format the <nextLast> <2To20> <Objects> As <FontStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItSelection> <FontStyleType>" {
			SCRIPT {
				style$ = _arg3
				arg$ = "Fnt:sty," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <Object> <FontStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <Object> <FontStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> 1 <Object> <FontStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <2To20> <Objects> <FontStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = ""
				count$ = _arg2
				object$ = _arg3
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <2To20> <Objects> <FontStyleType>" {
			SCRIPT {
				style$ = _arg5
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <thatItSelection> Into <FontStyleType>" {
			SCRIPT {
				style$ = _arg2
				arg$ = "Fnt:sty," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <theThis> <Object> Into <FontStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <nextLast> <Object> Into <FontStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn the <nextLast> <Object> Into <FontStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn 1 <Object> Into <FontStyleType>" {
			SCRIPT {
				style$ = _arg2
				direction$ = ""
				count$ = "1"
				object$ = _arg1
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <2To20> <Objects> Into <FontStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = _arg1
				object$ = _arg2
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <nextLast> <2To20> <Objects> Into <FontStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn the <nextLast> <2To20> <Objects> Into <FontStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				arg$ = "Fnt:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <thatItSelection> As <ParaStyleType>" {
			SCRIPT {
				style$ = _arg2
				arg$ = "Par:sty," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <nextLast> <BigObject> As <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format the <nextLast> <BigObject> As <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format 1 <BigObject> As <ParaStyleType>" {
			SCRIPT {
				style$ = _arg2
				direction$ = ""
				count$ = "1"
				object$ = _arg1
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <nextLast> 1 <BigObject> As <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format the <nextLast> 1 <BigObject> As <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <2To20> <BigObjects> As <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = _arg1
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <nextLast> <2To20> <BigObjects> As <ParaStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format the <nextLast> <2To20> <BigObjects> As <ParaStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItSelection> <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				arg$ = "Par:sty," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <BigObject> <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <theThis> <BigObject> <ParaStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <BigObject> <ParaStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <BigObject> <ParaStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = _arg2
				count$ = "1"
				object$ = _arg3
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> 1 <BigObject> <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <2To20> <BigObjects> <ParaStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = ""
				count$ = _arg2
				object$ = _arg3
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <nextLast> <2To20> <BigObjects> <ParaStyleType>" {
			SCRIPT {
				style$ = _arg5
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> the <nextLast> <2To20> <BigObjects> <ParaStyleType>" {
			SCRIPT {
				style$ = _arg5
				direction$ = _arg2
				count$ = _arg3
				object$ = _arg4
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <thatItSelection> Into <ParaStyleType>" {
			SCRIPT {
				style$ = _arg2
				arg$ = "Par:sty," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <BigObject> Into <ParaStyleType>" {
			SCRIPT {
				style$ = _arg2
				direction$ = ""
				count$ = "1"
				object$ = _arg1
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <theThis> <BigObject> Into <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <nextLast> <BigObject> Into <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn the <nextLast> <BigObject> Into <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn 1 <BigObject> Into <ParaStyleType>" {
			SCRIPT {
				style$ = _arg2
				direction$ = ""
				count$ = "1"
				object$ = _arg1
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <2To20> <BigObjects> Into <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = _arg1
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn <nextLast> <2To20> <BigObjects> Into <ParaStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Turn the <nextLast> <2To20> <BigObjects> Into <ParaStyleType>" {
			SCRIPT {
				style$ = _arg4
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Set Font <FontFace>" {
			SCRIPT {
				fontsize$ = ""
				fontname$ = _arg1
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + ","
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Set Font <FontFace> <FontSize>" {
			SCRIPT {
				fontname$ = _arg1
				fontsize$ = _arg2
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + ","
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Set Font <FontFace> <FontSize> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg1
				fontsize$ = _arg2
				fontstyle$ = _arg3
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + "," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Set Font <FontFace> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg1
				fontstyle$ = _arg2
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + ",," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Set Font <FontStyle>" {
			SCRIPT {
				fontstyle$ = _arg1
				arg$ = "Fnt:nam/siz/vrb,,," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Set Size <FontSize>" {
			SCRIPT {
				fontsize$ = _arg1
				arg$ = "Fnt:nam/siz/vrb,," + fontsize$ + ","
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That Size <FontSize>" {
			SCRIPT {
				fontsize$ = _arg1
				arg$ = "Fnt:nam/siz/vrb,," + fontsize$ + ","
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That <FontSize> Point" {
			SCRIPT {
				fontsize$ = _arg1
				arg$ = "Fnt:nam/siz/vrb,," + fontsize$ + ","
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That <FontSize> <FontStyle>" {
			SCRIPT {
				fontsize$ = _arg1
				fontstyle$ = _arg2
				arg$ = "Fnt:nam/siz/vrb,," + fontsize$ + "," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That <FontSize> Point <FontStyle>" {
			SCRIPT {
				fontsize$ = _arg1
				fontstyle$ = _arg2
				arg$ = "Fnt:nam/siz/vrb,," + fontsize$ + "," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That <FontStyle>" {
			SCRIPT {
				fontstyle$ = _arg1
				arg$ = "Fnt:nam/siz/vrb,,," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That <FontFace>" {
			SCRIPT {
				fontname$ = _arg1
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + ",,"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That Font <FontFace>" {
			SCRIPT {
				fontname$ = _arg1
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + ",,"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That <FontFace> <FontSize>" {
			SCRIPT {
				fontname$ = _arg1
				fontsize$ = _arg2
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + ","
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That <FontFace> <FontSize> Point" {
			SCRIPT {
				fontname$ = _arg1
				fontsize$ = _arg2
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + ","
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That <FontFace> <FontSize> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg1
				fontsize$ = _arg2
				fontstyle$ = _arg3
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + "," + fontsize$ + "," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That <FontFace> <FontStyle>" {
			SCRIPT {
				fontname$ = _arg1
				fontstyle$ = _arg2
				arg$ = "Fnt:nam/siz/vrb," + fontname$ + ",," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That <Formatting>" {
			SCRIPT {
				if _arg1 = "With Hyphens" then 
				HeardWord "Hyphenate","That"
				else 
				if _arg1 = "Without Spaces" then 
				HeardWord "Compound","That"
				else
				parastyle$ = _arg1
				arg$ = "Par:vrb/vrb/vrb," + parastyle$ + ",,"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
				end if
				end if
			}
		}

		COMMAND "Format That <Formatting> and <FontStyle>" {
			SCRIPT {
				HeardWord "Format","That",_arg1
				fontstyle$ = _arg2
				arg$ = "Fnt:nam/siz/vrb,,," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format That <FontStyle> and <Formatting>" {
			SCRIPT {
				fontstyle$ = _arg1
				arg$ = "Fnt:nam/siz/vrb,,," + fontstyle$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
				HeardWord "Format","That",_arg2
			}
		}

		COMMAND "<Action> <Selection>" {
			SCRIPT {
				verbOne$ = _arg1
				scr$ = "Fnt"
				if _arg1 = "Center" then scr$ = "Par"
				if _arg1 = "Left Align" then scr$ = "Par"
				if _arg1 = "Right Align" then scr$ = "Par"
				arg$ = scr$ + ":vrb/vrb/vrb," + verbOne$ + ",,"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Remember <thatItSelection> as <FontStyleType>" {
			SCRIPT {
				style$ = _arg2
				arg$ = "SetFnt:sty," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Remember <thatItSelection> as <ParaStyleType>" {
			SCRIPT {
				style$ = _arg2
				arg$ = "SetPar:sty," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <BigObject> As <ParaStyleType>" {
			SCRIPT {
				style$ = _arg2
				direction$ = ""
				count$ = "1"
				object$ = _arg1
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> <1To20> Row Table" {
			SCRIPT {
				rows$ = _arg2
				arg$ = "Tab:rows/cols," + rows$ + ",1"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> <1To20> Column Table" {
			SCRIPT {
				cols$ = _arg2
				arg$ = "Tab:rows/cols,1," + cols$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> <1To20> by <1To20> Table" {
			SCRIPT {
				rows$ = _arg2
				cols$ = _arg3
				arg$ = "Tab:rows/cols," + rows$ + "," + cols$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> <1To20> Row by <1To20> Column Table" {
			SCRIPT {
				rows$ = _arg2
				cols$ = _arg3
				arg$ = "Tab:rows/cols," + rows$ + "," + cols$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> <1To20> Column by <1To20> Row Table" {
			SCRIPT {
				cols$ = _arg2
				rows$ = _arg3
				arg$ = "Tab:rows/cols," + rows$ + "," + cols$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> Table <1To20> Rows by <1To20> Columns" {
			SCRIPT {
				rows$ = _arg2
				cols$ = _arg3
				arg$ = "Tab:rows/cols," + rows$ + "," + cols$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> Table <1To20> Columns by <1To20> Rows" {
			SCRIPT {
				cols$ = _arg2
				rows$ = _arg3
				arg$ = "Tab:rows/cols," + rows$ + "," + cols$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> <InsertObject>" {
			SCRIPT {
				count$ = "1"
				object$ = _arg2
				arg$ = "Ins:cnt/obj," + count$ + "," + object$
				if object$ = "Bullets" or object$ = "Numbers" or object$ = "Border" then arg$ = "Par:vrb/vrb/vrb," + object$ + ",," 
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> Table With <1To20> Rows" {
			SCRIPT {
				rows$ = _arg2
				cols$ = "1"
				arg$ = "Tab:rows/cols," + rows$ + "," + cols$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> Table With <1To20> Columns" {
			SCRIPT {
				cols$ = _arg2
				rows$ = "1"
				arg$ = "Tab:rows/cols," + rows$ + "," + cols$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> Table With <1To20> Columns and <1To20> Rows" {
			SCRIPT {
				cols$ = _arg2
				rows$ = _arg3
				arg$ = "Tab:rows/cols," + rows$ + "," + cols$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> Table With <1To20> Rows and <1To20> Columns" {
			SCRIPT {
				rows$ = _arg2
				cols$ = _arg3
				arg$ = "Tab:rows/cols," + rows$ + "," + cols$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<makeAddInsertCreate> <2To20> <InsertObjects>" {
			SCRIPT {
				count$ = _arg2
				object$ = _arg3
				arg$ = "Ins:cnt/obj," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Print <PrintObject>" {
			SCRIPT {
				arg$ = "Pri:obj," + _arg1
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Print Page <1To100>" {
			SCRIPT {
				arg$ = "Pri:num," + _arg1
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Print Pages <1To100> <toThrough> <1To100>" {
			SCRIPT {
				arg$ = "Pri:num/num," + _arg1 + "," + _arg3
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Imperative> to the <Side> of the <Object>" {
			SCRIPT {
				verb$ = _arg1
				side$ = _arg2
				count$ = "-1"
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + side$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<Imperative> to <Side> of <Object>" {
			SCRIPT {
				verb$ = _arg1
				side$ = _arg2
				count$ = "-1"
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + side$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<moveGo> to <firstLast> <Object>" {
			SCRIPT {
				side$ = _arg2
				object$ = "Document"
				arg$ = "Goto:end/obj/sel," + side$ + "," + object$ + "," + "Move"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<moveGo> to the <firstLast> <Object>" {
			SCRIPT {
				side$ = _arg2
				object$ = "Document"
				arg$ = "Goto:end/obj/sel," + side$ + "," + object$ + "," + "Move"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<moveGo> to Next <Object>" {
			SCRIPT {
				moveDir$ = "Down"
				count$ = "1"
				object$ = _arg2
				arg$ = "Mov:dir/cnt/obj," + moveDir$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<moveGo> to the Next <Object>" {
			SCRIPT {
				moveDir$ = "Down"
				count$ = "1"
				object$ = _arg2
				arg$ = "Mov:dir/cnt/obj," + moveDir$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Format <theThis> <BigObject> As <ParaStyleType>" {
			SCRIPT {
				style$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Par:sty/dir/cnt/obj," + style$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<make> <leftRightTopBottom> Margin <Distance> <Unit>" {
			SCRIPT {
				side$ = _arg2
				size$ = _arg3
				unit$ = _arg4
				arg$ = "Mar:side/size/unit," + side$ + "," + size$ + ","  + unit$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<set> <leftRightTopBottom> Margin to <Distance> <Unit>" {
			SCRIPT {
				side$ = _arg2
				size$ = _arg3
				unit$ = _arg4
				arg$ = "Mar:side/size/unit," + side$ + "," + size$ + ","  + unit$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<make> <leftRightTopBottom> Margin <Distance>" {
			SCRIPT {
				side$ = _arg2
				size$ = _arg3
				unit$ = "None"
				arg$ = "Mar:side/size/unit," + side$ + "," + size$ + ","  + unit$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<set> <leftRightTopBottom> Margin to <Distance>" {
			SCRIPT {
				side$ = _arg2
				size$ = _arg3
				unit$ = "None"
				arg$ = "Mar:side/size/unit," + side$ + "," + size$ + ","  + unit$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <BigObject> <Distance>" {
			SCRIPT {
				count$ = "1"
				direction$ = ""
				object$ = _arg1
				size$ = _arg2
				unit$="None"
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <BigObject> <Distance> <Unit>" {
			SCRIPT {
				count$ = "1"
				direction$ = ""
				object$ = _arg1
				size$ = _arg2
				unit$ = _arg3
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <theThis> <BigObject> <Distance>" {
			SCRIPT {
				count$ = "1"
				direction$ = ""
				object$ = _arg2
				size$ = _arg3
				unit$="None"
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <theThis> <BigObject> <Distance> <Unit>" {
			SCRIPT {
				count$ = "1"
				direction$ = ""
				object$ = _arg2
				size$ = _arg3
				unit$ = _arg4
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <nextLast> <BigObject> <Distance>" {
			SCRIPT {
				count$ = "1"
				direction$ = _arg1
				object$ = _arg2
				size$ = _arg3
				unit$="None"
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <nextLast> <BigObject> <Distance> <Unit>" {
			SCRIPT {
				count$ = "1"
				direction$ = _arg1
				object$ = _arg2
				size$ = _arg3
				unit$ = _arg4
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent the <nextLast> <BigObject> <Distance>" {
			SCRIPT {
				count$ = "1"
				direction$ = _arg1
				object$ = _arg2
				size$ = _arg3
				unit$="None"
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent the <nextLast> <BigObject> <Distance> <Unit>" {
			SCRIPT {
				count$ = "1"
				direction$ = _arg1
				object$ = _arg2
				size$ = _arg3
				unit$ = _arg4
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <2To20> <BigObjects> <Distance>" {
			SCRIPT {
				direction$ = ""
				count$ = _arg1
				object$ = _arg2
				size$ = _arg3
				unit$="None"
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <2To20> <BigObjects> <Distance> <Unit>" {
			SCRIPT {
				direction$ = ""
				count$ = _arg1
				object$ = _arg2
				size$ = _arg3
				unit$ = _arg4
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <nextLast> <2To20> <BigObjects> <Distance>" {
			SCRIPT {
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				size$ = _arg4
				unit$="None"
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <nextLast> <2To20> <BigObjects> <Distance> <Unit>" {
			SCRIPT {
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				size$ = _arg4
				unit$ = _arg5
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent the <nextLast> <2To20> <BigObjects> <Distance>" {
			SCRIPT {
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				size$ = _arg4
				unit$="None"
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent the <nextLast> <2To20> <BigObjects> <Distance> <Unit>" {
			SCRIPT {
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				size$ = _arg4
				unit$ = _arg5
				style$ = ""
				arg$ = "Ind:dir/cnt/obj/size/unit/sty," + direction$ + "," + count$ + "," + object$ + "," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<set> <indentation> to <Distance>" {
			SCRIPT {
				size$ = _arg3
				unit$ = "None"
				style$=""
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <thatItSelection> <Distance>" {
			SCRIPT {
				size$ = _arg2
				unit$ = "None"
				style$=""
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<set> <indentation> to <Distance> <Unit>" {
			SCRIPT {
				size$ = _arg3
				unit$ = _arg4
				style$=""
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Indent <thatItSelection> <Distance> <Unit>" {
			SCRIPT {
				size$ = _arg2
				unit$ = _arg3
				style$=""
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<make> <indentation> <Distance>" {
			SCRIPT {
				size$ = _arg3
				unit$ = "None"
				style$=""
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<make> <indentation> <Distance> <Unit>" {
			SCRIPT {
				size$ = _arg3
				unit$ = _arg4
				style$=""
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Increase <indentation>" {
			SCRIPT {
				arg$ = "Par:vrb/vrb/vrb,indent,,"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Increase <indentation> For <theThis> <BigObject>" {
			SCRIPT {
				verb$ = "indent"
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Increase <indentation> For <2To20> <BigObjects>" {
			SCRIPT {
				verb$ = "indent"
				count$ = _arg2
				object$ = _arg3
				direction$ = ""
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Increase <indentation> For <nextLast> <2To20> <BigObjects>" {
			SCRIPT {
				verb$ = "indent"
				count$ = _arg3
				object$ = _arg4
				direction$ = _arg2
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Increase <indentation> For the <nextLast> <2To20> <BigObjects>" {
			SCRIPT {
				verb$ = "indent"
				count$ = _arg3
				object$ = _arg4
				direction$ = _arg2
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Increase <indentation> <Distance>" {
			SCRIPT {
				size$ = _arg2
				unit$ = "None"
				style$="increase"
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Increase <indentation> <Distance> <Unit>" {
			SCRIPT {
				size$ = _arg2
				unit$ = _arg3
				style$="increase"
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Increase <indentation> to <Distance>" {
			SCRIPT {
				size$ = _arg2
				unit$ = "None"
				style$=""
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Increase <indentation> to <Distance> <Unit>" {
			SCRIPT {
				size$ = _arg2
				unit$ = _arg3
				style$=""
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Increase <indentation> by <Distance>" {
			SCRIPT {
				size$ = _arg2
				unit$ = "None"
				style$="increase"
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Increase <indentation> by <Distance> <Unit>" {
			SCRIPT {
				size$ = _arg2
				unit$ = _arg3
				style$="increase"
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Decrease <indentation> <Distance>" {
			SCRIPT {
				size$ = _arg2
				unit$ = "None"
				style$="decrease"
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Decrease <indentation> to <Distance>" {
			SCRIPT {
				size$ = _arg2
				unit$ = "None"
				style$=""
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Decrease <indentation> to <Distance> <Unit>" {
			SCRIPT {
				size$ = _arg2
				unit$ = _arg3
				style$=""
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Decrease <indentation> by <Distance>" {
			SCRIPT {
				size$ = _arg2
				unit$ = "None"
				style$="decrease"
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Decrease <indentation> by <Distance> <Unit>" {
			SCRIPT {
				size$ = _arg2
				unit$ = _arg3
				style$="decrease"
				arg$ = "Ind:size/unit/sty," + size$ + ","  + unit$ + "," + style$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Decrease <indentation>" {
			SCRIPT {
				arg$ = "Par:vrb/vrb/vrb,outdent,,"
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Decrease <indentation> For <theThis> <BigObject>" {
			SCRIPT {
				verb$ = "outdent"
				direction$ = ""
				count$ = "1"
				object$ = _arg3
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Decrease <indentation> For <2To20> <BigObjects>" {
			SCRIPT {
				verb$ = "outdent"
				count$ = _arg2
				object$ = _arg3
				direction$ = ""
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Decrease <indentation> For <nextLast> <2To20> <BigObjects>" {
			SCRIPT {
				verb$ = "outdent"
				count$ = _arg3
				object$ = _arg4
				direction$ = _arg2
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Decrease <indentation> For the <nextLast> <2To20> <BigObjects>" {
			SCRIPT {
				verb$ = "outdent"
				count$ = _arg3
				object$ = _arg4
				direction$ = _arg2
				arg$ = "Par:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<formatMakeSetTurn> <thatItColorSelection> <FontColor>" {
			SCRIPT {
				foreground$ = _arg3
				background$ = ""
				arg$ = "Fnt:fore/back," + foreground$ + "," + background$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <Object> <MoveDir> <a1> <Object>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = "1"
				sourceobject$ = _arg1
				direction$ = _arg2
				count$ = "1"
				object$ = _arg4
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <a1> <Object> <MoveDir> <a1> <Object>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = "1"
				sourceobject$ = _arg2
				direction$ = _arg3
				count$ = "1"
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <a1> <Object> <MoveDir> <2To20> <Objects>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = "1"
				sourceobject$ = _arg2
				direction$ = _arg3
				count$ = _arg4
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <Object> to <Side> of <Object>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = "1"
				sourceobject$ = _arg1
				side$ = _arg2
				object$ = _arg3
				arg$ = "MvSel:dir/cnt/obj/end/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <theThis> <Object> to the <Side> of the <Object>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = "1"
				sourceobject$ = _arg2
				side$ = _arg3
				object$ = _arg4
				arg$ = "MvSel:dir/cnt/obj/end/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <a1> <Object> to the <Side> of the <Object>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = "1"
				sourceobject$ = _arg2
				side$ = _arg3
				object$ = _arg4
				arg$ = "MvSel:dir/cnt/obj/end/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <nextLast> <Object> <MoveDir> <a1> <Object>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = "1"
				sourceobject$ = _arg2
				direction$ = _arg3
				count$ = "1"
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move the <nextLast> <Object> <MoveDir> <a1> <Object>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = "1"
				sourceobject$ = _arg2
				direction$ = _arg3
				count$ = "1"
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <nextLast> <Object> <MoveDir> <2To20> <Objects>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = "1"
				sourceobject$ = _arg2
				direction$ = _arg3
				count$ = _arg4
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move the <nextLast> <Object> <MoveDir> <2To20> <Objects>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = "1"
				sourceobject$ = _arg2
				direction$ = _arg3
				count$ = _arg4
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <nextLast> <Object> to <Side> of <Object>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = "1"
				sourceobject$ = _arg2
				side$ = _arg3
				object$ = _arg4
				arg$ = "MvSel:dir/cnt/obj/end/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move the <nextLast> <Object> to the <Side> of the <Object>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = "1"
				sourceobject$ = _arg2
				side$ = _arg3
				object$ = _arg4
				arg$ = "MvSel:dir/cnt/obj/end/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <theThis> <Object> <MoveDir> <a1> <Object>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = "1"
				sourceobject$ = _arg2
				direction$ = _arg3
				count$ = "1"
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <theThis> <Object> <MoveDir> <2To20> <Objects>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = "1"
				sourceobject$ = _arg2
				direction$ = _arg3
				count$ = _arg4
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <theThis> <Object> to <Side> of <Object>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = "1"
				sourceobject$ = _arg2
				side$ = _arg3
				object$ = _arg4
				arg$ = "MvSel:dir/cnt/obj/end/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <2To20> <Objects> <MoveDir> <a1> <Object>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = _arg1
				sourceobject$ = _arg2
				direction$ = _arg3
				count$ = "1"
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <2To20> <Objects> <MoveDir> <2To20> <Objects>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = _arg1
				sourceobject$ = _arg2
				direction$ = _arg3
				count$ = _arg4
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <2To20> <Objects> to <Side> of <Object>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = _arg1
				sourceobject$ = _arg2
				side$ = _arg3
				object$ = _arg4
				arg$ = "MvSel:dir/cnt/obj/end/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <2To20> <Objects> to the <Side> of the <Object>" {
			SCRIPT {
				sourcedir$ = ""
				sourcecount$ = _arg1
				sourceobject$ = _arg2
				side$ = _arg3
				object$ = _arg4
				arg$ = "MvSel:dir/cnt/obj/end/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <nextLast> <2To20> <Objects> <MoveDir> <a1> <Object>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = _arg2
				sourceobject$ = _arg3
				direction$ = _arg4
				count$ = "1"
				object$ = _arg6
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move the <nextLast> <2To20> <Objects> <MoveDir> <a1> <Object>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = _arg2
				sourceobject$ = _arg3
				direction$ = _arg4
				count$ = "1"
				object$ = _arg6
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <nextLast> <2To20> <Objects> <MoveDir> <2To20> <Objects>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = _arg2
				sourceobject$ = _arg3
				direction$ = _arg4
				count$ = _arg5
				object$ = _arg6
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move the <nextLast> <2To20> <Objects> <MoveDir> <2To20> <Objects>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = _arg2
				sourceobject$ = _arg3
				direction$ = _arg4
				count$ = _arg5
				object$ = _arg6
				arg$ = "MvSel:dir/cnt/obj/dir/cnt/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move <nextLast> <2To20> <Objects> to <Side> of <Object>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = _arg2
				sourceobject$ = _arg3
				side$ = _arg4
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/end/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Move the <nextLast> <2To20> <Objects> to the <Side> of the <Object>" {
			SCRIPT {
				sourcedir$ = _arg1
				sourcecount$ = _arg2
				sourceobject$ = _arg3
				side$ = _arg4
				object$ = _arg5
				arg$ = "MvSel:dir/cnt/obj/end/obj," + sourcedir$ + "," + sourcecount$ + "," + sourceobject$ + "," + side$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Color <thatItFontSelection> <FontColor> on <FontColor>" {
			SCRIPT {
				foreground$ = _arg2
				background$ = _arg3
				arg$ = "Fnt:fore/back," + foreground$ + "," + background$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Color <background> <FontColor>" {
			SCRIPT {
				foreground$ = ""
				background$ = _arg2
				arg$ = "Fnt:fore/back," + foreground$ + "," + background$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Color <thatItFontSelection> <FontColor>" {
			SCRIPT {
				foreground$ = _arg2
				background$ = ""
				arg$ = "Fnt:fore/back," + foreground$ + "," + background$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Color <Object> <FontColor>" {
			SCRIPT {
				verb$ = _arg2
				direction$ = ""
				count$ = "1"
				object$ = _arg1
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Color <theThis> <Object> <FontColor>" {
			SCRIPT {
				verb$ = _arg3
				direction$ = ""
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Color <nextLast> <Object> <FontColor>" {
			SCRIPT {
				verb$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Color the <nextLast> <Object> <FontColor>" {
			SCRIPT {
				verb$ = _arg3
				direction$ = _arg1
				count$ = "1"
				object$ = _arg2
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Color 1 <Object> <FontColor>" {
			SCRIPT {
				verb$ = _arg2
				direction$ = ""
				count$ = "1"
				object$ = _arg1
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Color <2To20> <Objects> <FontColor>" {
			SCRIPT {
				verb$ = _arg3
				direction$ = ""
				count$ = _arg1
				object$ = _arg2
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Color <nextLast> <2To20> <Objects> <FontColor>" {
			SCRIPT {
				verb$ = _arg4
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Color the <nextLast> <2To20> <Objects> <FontColor>" {
			SCRIPT {
				verb$ = _arg4
				direction$ = _arg1
				count$ = _arg2
				object$ = _arg3
				arg$ = "Fnt:vrb/dir/cnt/obj," + verb$ + "," + direction$ + "," + count$ + "," + object$
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Paste <thatItSelection>" {
			KEYS {
				{Ctrl+v}
			}
		}

		COMMAND "<runDo> <SpellingCommand>" {
			SCRIPT {
				arg$ = "Spe:" 
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Check Spelling" {
			SCRIPT {
				arg$ = "Spe:" 
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "<runDo> <GrammarCommand>" {
			SCRIPT {
				arg$ = "Gra:" 
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "Check Grammar" {
			SCRIPT {
				arg$ = "Gra:" 
				DllCall "w97comp.dll", "DgnWordDllCallIfc", arg$
			}
		}

		COMMAND "What Can I Say" {
			SCRIPT {
				offset& = 65536
				id& = 602
				WinHelp "Wcisbase.hlp>(w95sec)", 11
			}
		}

		COMMAND "Select That" {
			SCRIPT {
				DdeExecute "WinWord", "System", "[ToolsMacro .Name=""WCSelectThat"", .Run]"
			}
		}

		COMMAND "Play That Back" {
			SCRIPT {
				DdeExecute "WinWord", "System", "[ToolsMacro .Name=""CallToolsPlaybackSelection"", .Run]"
			}
		}

		COMMAND "<playPlaybackRead> <ReadText>" {
			SCRIPT {
				if _arg2 = "To Here"    or _arg2 = "Up To Here"     then  DdeExecute "WinWord", "System", "[ToolsMacro .Name=""WCSelectToCursor"", .Run]"
				if _arg2 = "From Here"  or _arg2 = "Down From Here" then  DdeExecute "WinWord", "System", "[ToolsMacro .Name=""WCSelectFromCursor"", .Run]"
				if _arg2 = "Line"       then  DdeExecute "WinWord", "System", "[ToolsMacro .Name=""WCSelectLine"", .Run]"
				if _arg2 = "Paragraph"  then  DdeExecute "WinWord", "System", "[ToolsMacro .Name=""WCSelectParagraph"", .Run]"
				if _arg2 = "Screen"     or _arg2 = "Window"         then  DdeExecute "WinWord", "System", "[ToolsMacro .Name=""WCSelectScreen"", .Run]"
				if _arg2 = "Document"   then  DdeExecute "WinWord", "System", "[ToolsMacro .Name=""WCSelectDocument"", .Run]"
				if _arg2 = "That"       or _arg2 = "Selection" then DdeExecute "WinWord", "System", "[ToolsMacro .Name=""WCSelectThat"", .Run]"
				if _arg1 = "Read" then
				SendKeys "{Ctrl+c}"
				TTSPlayString
				else
				DdeExecute "WinWord", "System", "[ToolsMacro .Name=""CallToolsPlaybackSelection"", .Run]"
				end if
				Wait 500
				if _arg2 = "That"       or _arg2 = "Selection" then DdeExecute "WinWord", "System", "[ToolsMacro .Name=""WCRestoreSelection"", .Run]"
				SendKeys "{Right}"
			}
		}

		LIST "thatItSelection" {
			"That"
			"This"
			"It"
			"Them"
			"Selection"
		}

		LIST "makeAddInsertCreate" {
			"Make"
			"Add"
			"Insert"
			"Create"
			"Start"
			"Make a"
			"Add a"
			"Insert a"
			"Create a"
			"Start a"
			"Make 1"
			"Add 1"
			"Insert 1"
			"Create 1"
		}

		LIST "a1" {
			"a"
			"1"
		}

		LIST "moveGo" {
			"Move"
			"Go"
		}

		LIST "make" {
			"Make"
			"Make the"
			"Make this"
		}

		LIST "set" {
			"Set"
			"Set the"
		}

		LIST "formatMakeSetTurn" {
			"Format"
			"Make"
			"Set"
			"Turn"
		}

		LIST "MoveDir" {
			"Back"
			"Backward"
			"Left"
			"Up"
			"Ahead"
			"Forward"
			"Down"
			"Right"
		}

		LIST "Side" {
			"Top"
			"Bottom"
			"Start"
			"Beginning"
			"End"
		}

		LIST "firstLast" {
			"First"
			"Last"
		}

		LIST "onOff" {
			"On"
			"Off"
		}

		LIST "theThis" {
			"the"
			"This"
		}

		LIST "thatItFontSelection" {
			"That"
			"This"
			"It"
			"Them"
			"Font"
			"Selection"
			"the Font"
			"the Selection"
		}

		LIST "thatItSizeSelection" {
			"That"
			"This"
			"It"
			"Them"
			"Size"
			"Selection"
			"the Size"
			"the Selection"
		}

		LIST "thatItColorSelection" {
			"That"
			"This"
			"It"
			"Them"
			"Color"
			"Selection"
			"the Color"
			"the Selection"
		}

		LIST "FontColor" {
			"Black"
			"Blue"
			"Bright Green"
			"Dark Blue"
			"Dark Red"
			"Dark Yellow"
			"Gray"
			"Green"
			"Pink"
			"Red"
			"Teal"
			"Turquoise"
			"Violet"
			"White"
			"Yellow"
			"Normal"
			"Default"
			"Auto"
		}

		LIST "FontName" {
			"Albertus Extra Bold"
			"Albertus Medium"
			"Antique Olive"
			"Arial"
			"Arial Black"
			"Arial Narrow"
			"Book Antiqua"
			"Bookman Old Style"
			"Century Gothic"
			"Clarendon Condensed"
			"Copperplate Gothic Bold"
			"Copperplate Gothic Light"
			"Coronet"
			"Courier"
			"Courier New"
			"Garamond"
			"Impact"
			"Letter Gothic"
			"Lucida Console"
			"Lucida Handwriting"
			"Marigold"
			"Symbol"
			"Tahoma"
			"Times"
			"Times New Roman"
			"Univers"
			"Univers Condensed"
			"Wingdings"
		}

		LIST "FontSize" {
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
			"11"
			"12"
			"13"
			"14"
			"15"
			"16"
			"17"
			"18"
			"19"
			"20"
			"22"
			"24"
			"25"
			"26"
			"28"
			"30"
			"36"
			"40"
			"48"
			"60"
			"72"
			"84"
			"96"
			"100"
			"120"
		}

		LIST "nextLast" {
			"Next"
			"Forward"
			"Following"
			"Last"
			"Back"
			"Previous"
		}

		LIST "background" {
			"Background"
			"the Background"
		}

		LIST "2To20" {
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
			"11"
			"12"
			"13"
			"14"
			"15"
			"16"
			"17"
			"18"
			"19"
			"20"
		}

		LIST "1To20" {
			"1"
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
			"11"
			"12"
			"13"
			"14"
			"15"
			"16"
			"17"
			"18"
			"19"
			"20"
		}

		LIST "1To100" {
			"1"
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
			"11"
			"12"
			"13"
			"14"
			"15"
			"16"
			"17"
			"18"
			"19"
			"20"
			"21"
			"22"
			"23"
			"24"
			"25"
			"26"
			"27"
			"28"
			"29"
			"30"
			"31"
			"32"
			"33"
			"34"
			"35"
			"36"
			"37"
			"38"
			"39"
			"40"
			"41"
			"42"
			"43"
			"44"
			"45"
			"46"
			"47"
			"48"
			"49"
			"50"
			"51"
			"52"
			"53"
			"54"
			"55"
			"56"
			"57"
			"58"
			"59"
			"60"
			"61"
			"62"
			"63"
			"64"
			"65"
			"66"
			"67"
			"68"
			"69"
			"70"
			"71"
			"72"
			"73"
			"74"
			"75"
			"76"
			"77"
			"78"
			"79"
			"80"
			"81"
			"82"
			"83"
			"84"
			"85"
			"86"
			"87"
			"88"
			"89"
			"90"
			"91"
			"92"
			"93"
			"94"
			"95"
			"96"
			"97"
			"98"
			"99"
			"100"
		}

		LIST "Object" {
			"Character"
			"Word"
			"Line"
			"Sentence"
			"Paragraph"
			"Section"
			"Page"
			"Column"
			"Row"
			"Cell"
			"Table"
			"Document"
			"Entire Document"
			"Whole Document"
			"All"
		}

		LIST "Objects" {
			"Characters"
			"Words"
			"Lines"
			"Sentences"
			"Paragraphs"
			"Sections"
			"Pages"
			"Columns"
			"Rows"
			"Cells"
			"Tables"
		}

		LIST "InsertObject" {
			"Space"
			"Line"
			"Blank Line"
			"Paragraph"
			"Section"
			"Section Break"
			"Row"
			"Column"
			"Page Break"
			"Page"
			"Number"
			"Numbers"
			"Numbering"
			"Bullet"
			"Bullets"
			"Bulleting"
			"Border"
			"Borders"
			"Table"
			"New Section"
			"New Row"
			"New Column"
			"New Page"
			"New Table"
		}

		LIST "InsertObjects" {
			"Spaces"
			"Lines"
			"Blank Lines"
			"Paragraphs"
			"Sections"
			"Section Breaks"
			"Rows"
			"Columns"
			"Page Breaks"
			"Pages"
		}

		LIST "Imperative" {
			"Select"
			"Underline"
			"Bold"
			"Italicize"
			"Delete"
			"Copy"
			"Cut"
			"Capitalize"
		}

		LIST "FontStyle" {
			"Black"
			"Blue"
			"Bright Green"
			"Dark Blue"
			"Dark Red"
			"Dark Yellow"
			"Gray"
			"Green"
			"Pink"
			"Red"
			"Teal"
			"Turquoise"
			"Violet"
			"White"
			"Yellow"
			"No Highlight"
			"Bold"
			"Bolded"
			"Bolding"
			"Double Strike Through"
			"Embossed"
			"Engraved"
			"Hidden"
			"Italics"
			"Italicized"
			"Shadowed"
			"Superscript"
			"Subscript"
			"Underline"
			"Underlined"
			"Double Underlined"
			"Wavy Underlined"
			"Thick Underlined"
			"Strike Through"
			"Bigger"
			"Larger"
			"Smaller"
			"Much Bigger"
			"Much Larger"
			"Much Smaller"
			"a Little Bigger"
			"a Little Larger"
			"a Little Smaller"
			"a Lot Bigger"
			"a Lot Larger"
			"a Lot Smaller"
			"Normal"
			"Default"
			"Plain"
			"Plain Text"
			"Regular"
			"Lowercase"
			"No Caps"
			"Initial Caps"
			"Capitals"
			"Capitalized"
			"Caps"
			"Uppercase"
			"Small Caps"
		}

		LIST "BigObject" {
			"Line"
			"Sentence"
			"Paragraph"
			"Page"
			"Section"
			"Column"
			"Row"
			"Cell"
			"Table"
			"Document"
			"Entire Document"
			"Whole Document"
			"All"
		}

		LIST "BigObjects" {
			"Lines"
			"Sentences"
			"Paragraphs"
			"Pages"
			"Sections"
			"Columns"
			"Rows"
			"Cells"
			"Tables"
		}

		LIST "ParaStyle" {
			"Centered"
			"Center Aligned"
			"Left Aligned"
			"Right Aligned"
			"Left Justified"
			"Right Justified"
			"Justified"
			"Indented"
			"Outdented"
			"Bulleted"
			"Numbered"
			"a Bulleted List"
			"a Numbered List"
			"Bullet Style"
			"Single Spaced"
			"Double Spaced"
			"One Column"
			"Two Column"
			"Two Columns"
			"Three Column"
			"Three Columns"
			"Four Column"
			"Four Columns"
			"Five Column"
			"Five Columns"
		}

		LIST "ParaStyleNoun" {
			"Centering"
			"Left Alignment"
			"Right Alignment"
			"Left Justification"
			"Right Justification"
			"Justification"
			"Indenting"
			"Indentation"
			"Outdenting"
			"Bullets"
			"Numbers"
			"No Numbers"
			"Bulleting"
			"Numbering"
		}

		LIST "ParaVerb" {
			"Center"
			"Left Align"
			"Right Align"
			"Left Justify"
			"Right Justify"
			"Justify"
			"Indent"
			"Outdent"
			"Bullet"
			"Number"
			"Unnumber"
			"AutoFormat"
			"Single Space"
			"Double Space"
		}

		LIST "indentation" {
			"Indent"
			"Indentation"
		}

		LIST "FontStyleType" {
			"Default Text"
			"Emphasized Text"
			"Highlighted Text"
			"Comment Text"
		}

		LIST "ParaStyleType" {
			"Normal Text"
			"Text"
			"Body Text"
			"Body Text 2"
			"Body Text 3"
			"Plain Text"
			"a Quote"
			"Quoted Text"
			"a Caption"
			"a Heading"
			"Heading 1"
			"Heading 2"
			"Heading 3"
			"a Heading 1"
			"a Heading 2"
			"a Heading 3"
			"a Major Heading"
			"a Minor Heading"
			"a List"
			"List 2"
			"List 3"
			"a Bulleted List"
			"Bulleted List 2"
			"Bulleted List 3"
			"a Title"
			"a Subtitle"
			"a Numbered List"
			"Numbered List 2"
			"Numbered List 3"
		}

		LIST "toThrough" {
			"To"
			"2"
			"Through"
		}

		LIST "PrintObject" {
			"Document"
			"All"
			"This Document"
			"the Document"
			"Page"
			"the Page"
			"This Page"
			"the Current Page"
			"Preview"
			"Preview On"
			"Preview Off"
		}

		LIST "runDo" {
			"Run"
			"Do a"
		}

		LIST "SpellingCommand" {
			"Spell Checker"
			"Spelling Checker"
			"Spelling Check"
			"Spell Check"
		}

		LIST "GrammarCommand" {
			"Grammar Checker"
			"Grammar Check"
		}

		LIST "leftRightTopBottom" {
			"Left"
			"Right"
			"Top"
			"Bottom"
		}

		LIST "Distance" {
			"0"
			".1"
			".2"
			".3"
			".4"
			".5"
			"a Half"
			"One Half"
			"Half a"
			"Half an"
			"a Half an"
			".6"
			".7"
			".8"
			".9"
			"1"
			"a"
			"an"
			"1.0"
			"1.1"
			"1.2"
			"1.3"
			"1.4"
			"1.5"
			"One and One Half"
			"One and a Half"
			"an Inch and a Half"
			"a Centimeter and a Half"
			"1.6"
			"1.7"
			"1.8"
			"1.9"
			"2"
			"2.0"
			"2.1"
			"2.2"
			"2.3"
			"2.4"
			"2.5"
			"Two and One Half"
			"Two and a Half"
			"2.6"
			"2.7"
			"2.8"
			"2.9"
			"3"
			"3.0"
			"3.1"
			"3.2"
			"3.3"
			"3.4"
			"3.5"
			"Three and One Half"
			"Three and a Half"
			"3.6"
			"3.7"
			"3.8"
			"3.9"
			"4"
			"4.0"
			"4.1"
			"4.2"
			"4.3"
			"4.4"
			"4.5"
			"Four and One Half"
			"Four and a Half"
			"4.6"
			"4.7"
			"4.8"
			"4.9"
			"5"
			"5.0"
			"5.1"
			"5.2"
			"5.3"
			"5.4"
			"5.5"
			"Five and One Half"
			"Five and a Half"
			"5.6"
			"5.7"
			"5.8"
			"5.9"
			"6"
			"6.0"
			"6.1"
			"6.2"
			"6.3"
			"6.4"
			"6.5"
			"Six and One Half"
			"Six and a Half"
			"6.6"
			"6.7"
			"6.8"
			"6.9"
			"7"
			"7.0"
			"7.1"
			"7.2"
			"7.3"
			"7.4"
			"7.5"
			"Seven and One Half"
			"Seven and a Half"
			"7.6"
			"7.7"
			"7.8"
			"7.9"
			"8"
			"8.0"
			"8.1"
			"8.2"
			"8.3"
			"8.4"
			"8.5"
			"Eight and One Half"
			"Eight and a Half"
			"8.6"
			"8.7"
			"8.8"
			"8.9"
			"9"
			"9.0"
			"9.1"
			"9.2"
			"9.3"
			"9.4"
			"9.5"
			"Nine and One Half"
			"Nine and a Half"
			"9.6"
			"9.7"
			"9.8"
			"9.9"
			"10"
		}

		LIST "Unit" {
			"Inch"
			"Inches"
			"Centimeter"
			"Centimeters"
			"Point"
			"Points"
			"Pica"
			"Picas"
		}

		LIST "Selection" {
			"Selection"
			"That"
		}

		LIST "Action" {
			"Cut"
			"Copy"
			"Bold"
			"Italicize"
			"Underline"
			"Center"
			"Left Align"
			"Right Align"
			"Delete"
			"Restore"
		}

		LIST "Formatting" {
			"Cap"
			"Caps"
			"Initial Caps"
			"Capitals"
			"All-Caps"
			"Uppercase"
			"No-Caps"
			"Lowercase"
			"Centered"
			"Center Aligned"
			"Left Aligned"
			"Right Aligned"
			"Bullet Style"
			"With Hyphens"
			"Without Spaces"
		}

		LIST "FontFace" {
			"Times"
			"Times New Roman"
			"Courier"
			"Courier New"
			"Arial"
		}

		LIST "playPlaybackRead" {
			"Play"
			"Play Back"
			"Read"
		}

		LIST "ReadText" {
			"That"
			"Line"
			"Paragraph"
			"Document"
			"Screen"
			"Window"
			"From Here"
			"To Here"
			"Selection"
			"Up To Here"
			"Down From Here"
		}
	}
}

MENU "exceed" {
	STATE "macs" {
		COMMAND "begin macro" {
			KEYS {
				{Ctrl+x}(
			}
		}

		COMMAND "beginning of buffer" {
			KEYS {
				{Esc}<
			}
		}

		COMMAND "bury buffer" {
			KEYS {
				{esc}xbury-buffer{Enter}
			}
		}

		COMMAND "cancel command" {
			KEYS {
				{ctrl+g}
			}
		}

		COMMAND "capitalize word" {
			KEYS {
				{esc}{b}{esc}{c}
			}
		}

		COMMAND "clear line" {
			KEYS {
				{Ctrl+a}{Ctrl+k} 
			}
		}

		COMMAND "close  frame" {
			KEYS {
				{ctrl+x}k{enter}{Ctrl+x}o{ctrl+x}1
			}
		}

		COMMAND "comment line" {
			KEYS {
				{RightCtrl+a}{Tab}/* {Ctrl+e}*/{RightCtrl+b}{RightCt
				rl+b}
			}
		}

		COMMAND "exit Emacs" {
			KEYS {
				{ctrl+x}{ctrl+c}
			}
		}

		COMMAND "copy region" {
			KEYS {
				{ctrl+w}{ctrl+y}
			}
		}

		COMMAND "cut region" {
			KEYS {
				{ctrl+w}
			}
		}

		COMMAND "editor command" {
			KEYS {
				{esc}x
			}
		}

		COMMAND "editor help" {
			SCRIPT {
				SendKeys "{ctrl+h}"
				NoSpaceNext
			}
		}

		COMMAND "control echo" {
			KEYS {
				{Ctrl+e}
			}
		}

		COMMAND "end macro" {
			KEYS {
				{Ctrl+x})
			}
		}

		COMMAND "end of buffer" {
			KEYS {
				{esc}>
			}
		}

		COMMAND "enter comments" {
			KEYS {
				{Tab}/****/{Ctrl+p}
			}
		}

		COMMAND "equals equals" {
			KEYS "== "
		}

		COMMAND "evaluate buffer" {
			KEYS {
				{Esc}xeval-buffer{Enter}
			}
		}

		COMMAND "execute macro" {
			KEYS {
				{Ctrl+x}e
			}
		}

		COMMAND "fill paragraph" {
			KEYS {
				{esc}{q}
			}
		}

		COMMAND "forward message" {
			KEYS {
				{RightCtrl+c}{RightCtrl+f}
			}
		}

		COMMAND "get file" {
			KEYS {
				{Ctrl+x}{Ctrl+f}
			}
		}

		COMMAND "Gnu zip" {
			SCRIPT {
				sendkeys " gzip " 
			}
		}

		COMMAND "go to line" {
			KEYS {
				{esc}xgoto-line{Enter}
			}
		}

		COMMAND "go to mark" {
			KEYS {
				{Ctrl+x}{Ctrl+x}
			}
		}

		COMMAND "go to scratch buffer" {
			KEYS {
				{Ctrl+x}b*scratch*{Enter}
			}
		}

		COMMAND "control alpha" {
			KEYS {
				{Ctrl+a}
			}
		}

		COMMAND "incorporate mail" {
			KEYS {
				inc{enter}
			}
		}

		COMMAND "indent region" {
			KEYS {
				{Esc}xindent-region
			}
		}

		COMMAND "insert file" {
			KEYS {
				{Ctrl+x}i
			}
		}

		COMMAND "insert register" {
			KEYS {
				{Ctrl+x}ri
			}
		}

		COMMAND "insert registered one" {
			KEYS {
				{Ctrl+x}ri1
			}
		}

		COMMAND "insert signature" {
			KEYS {
				{Ctrl+x}i{Ctrl+a}{Ctrl+k}~/.signature{Enter}
			}
		}

		COMMAND "justify paragraph" {
			KEYS {
				{Esc}q
			}
		}

		COMMAND "kill  buffer" {
			KEYS {
				{Ctrl+x}k
			}
		}

		COMMAND "kill <2to20> words" {
			SCRIPT {
				sendkeys "{Ctrl+u}"+_arg1+"{esc}d"
			}
		}

		COMMAND "kill buffer" {
			KEYS {
				{Ctrl+x}k
			}
		}

		COMMAND "kill line" {
			KEYS {
				{Ctrl+u}
			}
		}

		COMMAND "kill region" {
			KEYS {
				{Ctrl+w} 
			}
		}

		COMMAND "kill that space" {
			KEYS {
				{Ctrl+@}{Ctrl+b}{Ctrl+r} {Ctrl+d}{Ctrl+x}{Ctrl+x}{Ct
				rl+f}
			}
		}

		COMMAND "kill word" {
			KEYS {
				{esc}d
			}
		}

		COMMAND "latex bold" {
			KEYS {
				{\\bf  }{left 2}
			}
		}

		COMMAND "latex citation" {
			KEYS {
				~\\cite{}{left}
			}
		}

		COMMAND "latex e.g." {
			KEYS {
				{\\it e.g.}
			}
		}

		COMMAND "latex emphasize" {
			KEYS {
				{\\em }{left}
			}
		}

		COMMAND "latex et all" {
			KEYS {
				{\\it et al.}
			}
		}

		COMMAND "latex italics" {
			KEYS {
				{\\it }{left}
			}
		}

		COMMAND "latex reference" {
			KEYS {
				~\\ref {}{left}
			}
		}

		COMMAND "latex section reference" {
			KEYS {
				~\\S\\ref {}{left}
			}
		}

		COMMAND "latex space" {
			KEYS {
				\\vspace{1.0in}
			}
		}

		COMMAND "list buffers" {
			KEYS {
				{Ctrl+x}{Ctrl+b}
			}
		}

		COMMAND "lower word" {
			KEYS {
				{esc}b{esc}l
			}
		}

		COMMAND "move message" {
			KEYS "Bm"
		}

		COMMAND "move to next line" {
			KEYS {
				{ctrl+e}{Enter}
			}
		}

		COMMAND "multiple 32" {
			KEYS {
				{Ctrl+u}32
			}
		}

		COMMAND "multiple command" {
			KEYS {
				{Ctrl+u}
			}
		}

		COMMAND "multiple eight" {
			KEYS {
				{Ctrl+u}8
			}
		}

		COMMAND "multiple four" {
			KEYS {
				{Ctrl+u}4
			}
		}

		COMMAND "multiple sixteen" {
			KEYS {
				{Ctrl+u}16
			}
		}

		COMMAND "multiple three" {
			KEYS {
				{Ctrl+u}3
			}
		}

		COMMAND "multiple two" {
			KEYS {
				{Ctrl+u}2
			}
		}

		COMMAND "next brace" {
			KEYS {
				{Esc}{Ctrl+f}
			}
		}

		COMMAND "next buffer" {
			KEYS {
				{Ctrl+x}b
			}
		}

		COMMAND "next word" {
			SCRIPT {
				CapitalizeNext
				NoSpaceNext
			}
		}

		COMMAND "other buffer" {
			KEYS {
				{Ctrl+x}o
			}
		}

		COMMAND "paste selection" {
			KEYS {
				{ctrl+y}
			}
		}

		COMMAND "quit Emacs" {
			KEYS {
				{Ctrl+x}{Ctrl+c}
			}
		}

		COMMAND "redraw screen" {
			KEYS {
				{Ctrl+l}
			}
		}

		COMMAND "refile message" {
			KEYS {
				Bm{Ctrl+a}{Ctrl+k}nnmh+mail:
			}
		}

		COMMAND "register version" {
			KEYS {
				{Esc}xvc-register{Enter}
			}
		}

		COMMAND "remove message" {
			KEYS {
				B{BackSpace}y
			}
		}

		COMMAND "remove next" {
			KEYS {
				qfd {enter}
			}
		}

		COMMAND "query replace" {
			KEYS {
				{Esc}%
			}
		}

		COMMAND "Santa Cruz Domain" {
			KEYS "cse.ucsc.edu"
		}

		COMMAND "save and  quit" {
			KEYS {
				{ctrl+x}{ctrl+s}{ctrl+x}{ctrl+c}
			}
		}

		COMMAND "save file" {
			KEYS {
				{Ctrl+x}{Ctrl+s}
			}
		}

		COMMAND "save register  1" {
			KEYS {
				{Ctrl+x}rs1
			}
		}

		COMMAND "save register" {
			KEYS {
				{Ctrl+x}rs
			}
		}

		COMMAND "save some buffers" {
			KEYS {
				{Ctrl+x}s
			}
		}

		COMMAND "scan  mail" {
			KEYS {
				scan +inbox{enter}
			}
		}

		COMMAND "search again" {
			KEYS {
				{Ctrl+s}{Ctrl+s}{Enter}
			}
		}

		COMMAND "search backward" {
			KEYS {
				{Ctrl+r}
			}
		}

		COMMAND "search forward" {
			KEYS {
				{Ctrl+s}
			}
		}

		COMMAND "see for loop" {
			SCRIPT {
				sendkeys "{Tab}for ( ; ; ) {\n"
				sendkeys "}/* end for ()  */ {Ctrl+a}{Ctrl+p}{Ctrl+p}{Esc}f{Ctrl+f}{Ctrl+f}"
			}
		}

		COMMAND "set mark" {
			KEYS {
				{Ctrl+@}
			}
		}

		COMMAND "short comment" {
			KEYS {
				{Tab}/*{Space}{Space}*/{Ctrl+b}{Ctrl+b}{Ctrl+b}
			}
		}

		COMMAND "short signature" {
			SCRIPT {
				sendkeys "                              tmk{Enter}"
			}
		}

		COMMAND "single window" {
			KEYS {
				{Ctrl+x}1
			}
		}

		COMMAND "split window" {
			KEYS {
				{Ctrl+x}2
			}
		}

		COMMAND "switch buffer" {
			KEYS {
				{Ctrl+x}b{Enter}
			}
		}

		COMMAND "switch chars" {
			KEYS {
				{Ctrl+t}
			}
		}

		COMMAND "switch words" {
			KEYS {
				{esc}t
			}
		}

		COMMAND "toggle version" {
			KEYS {
				{Ctrl+x}{Ctrl+q}
			}
		}

		COMMAND "undo that" {
			KEYS {
				{Ctrl+x}u
			}
		}

		COMMAND "version difference" {
			KEYS {
				{Ctrl+x}v=
			}
		}

		COMMAND "version directory" {
			KEYS {
				{Ctrl+x}vd
			}
		}

		COMMAND "version take action" {
			KEYS {
				%m{Enter}{Ctrl+x}vv
			}
		}

		COMMAND "insert a space" {
			KEYS {
				{Ctrl+@}{esc}b {Ctrl+x}{Ctrl+x}
			}
		}

		COMMAND "write file" {
			KEYS {
				{Ctrl+x}{Ctrl+w}
			}
		}

		COMMAND "back <2to20>" {
			SCRIPT {
				sendkeys "{BackSpace "+_arg1+"}"
			}
		}

		COMMAND "delete that word" {
			KEYS {
				{Esc}{BackSpace}
			}
		}

		COMMAND "<DirLeftRight> <2to20> Words" {
			SCRIPT {
				SendKeys "{Ctrl+" + _arg1 + " " + _arg2 + "}"
			}
		}

		COMMAND "trash next" {
			 SCRIPT {
				SendKeys "BM{Ctrl+a}{Ctrl+k}nnmh+mail:trash{Enter}{Down}{Enter}"
			}
		}

		COMMAND "trash message" {
			KEYS {
				Bm{Ctrl+a}{Ctrl+k}nnmh+mail:trash{Enter}
			}
		}

		COMMAND "voice users mailing list" {
			KEYS "voice-users@voicerecognition.net"
		}

		COMMAND "kill rest" {
			KEYS {
				{Ctrl+k}
			}
		}

		COMMAND "delete char" {
			KEYS {
				{Ctrl+d}
			}
		}

		COMMAND "double sees" {
			KEYS {
				{Ctrl+c}{Ctrl+c}
			}
		}

		COMMAND "back <2to20> words" {
			SCRIPT {
				sendkeys "{Ctrl+u}"+ _arg1+"{esc}{backspace}"
			}
		}

		LIST "2to20" {
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
			"11"
			"12"
			"13"
			"14"
			"15"
			"16"
			"17"
			"18"
			"19"
			"20"
		}

		LIST "DirLeftRight" {
			"Left"
			"Right"
		}
	}
}

MENU "SECURE" {
	STATE "Secure" {
		COMMAND "begin macro" {
			KEYS {
				{Ctrl+x}(
			}
		}

		COMMAND "beginning of buffer" {
			KEYS {
				{Esc}<
			}
		}

		COMMAND "bury buffer" {
			KEYS {
				{esc}xbury-buffer{Enter}
			}
		}

		COMMAND "cancel command" {
			KEYS {
				{ctrl+g}
			}
		}

		COMMAND "capitalize word" {
			KEYS {
				{esc}{b}{esc}{c}
			}
		}

		COMMAND "clear line" {
			KEYS {
				{Ctrl+a}{Ctrl+k}
			}
		}

		COMMAND "close  frame" {
			KEYS {
				{ctrl+x}k{enter}{Ctrl+x}o{ctrl+x}1
			}
		}

		COMMAND "comment line" {
			KEYS {
				{RightCtrl+a}{Tab}/* {Ctrl+e}*/{RightCtrl+b}{RightCt
				rl+b}
			}
		}

		COMMAND "exit Emacs" {
			KEYS {
				{ctrl+x}{ctrl+c}
			}
		}

		COMMAND "copy region" {
			KEYS {
				{ctrl+w}{ctrl+y}
			}
		}

		COMMAND "cut region" {
			KEYS {
				{ctrl+w}
			}
		}

		COMMAND "delete char" {
			KEYS {
				{Ctrl+d}
			}
		}

		COMMAND "double sees" {
			KEYS {
				{Ctrl+c}{Ctrl+c}
			}
		}

		COMMAND "editor command" {
			KEYS {
				{esc}x
			}
		}

		COMMAND "editor help" {
			SCRIPT {
				SendKeys "{ctrl+h}"
				NoSpaceNext
			}
		}

		COMMAND "control echo" {
			KEYS {
				{Ctrl+e}
			}
		}

		COMMAND "end macro" {
			KEYS {
				{Ctrl+x})
			}
		}

		COMMAND "end of buffer" {
			KEYS {
				{esc}>
			}
		}

		COMMAND "enter comments" {
			KEYS {
				{Tab}/****/{Ctrl+p}
			}
		}

		COMMAND "equals equals" {
			KEYS "=="
		}

		COMMAND "evaluate buffer" {
			KEYS {
				{Esc}xeval-buffer{Enter}
			}
		}

		COMMAND "execute macro" {
			KEYS {
				{Ctrl+x}e
			}
		}

		COMMAND "fill paragraph" {
			KEYS {
				{esc}{q}
			}
		}

		COMMAND "forward message" {
			KEYS {
				{RightCtrl+c}{RightCtrl+f}
			}
		}

		COMMAND "get file" {
			KEYS {
				{Ctrl+x}{Ctrl+f}
			}
		}

		COMMAND "Gnu zip" {
			SCRIPT {
				sendkeys " gzip " 
			}
		}

		COMMAND "go to line" {
			KEYS {
				{esc}xgoto-line{Enter}
			}
		}

		COMMAND "go to mark" {
			KEYS {
				{Ctrl+x}{Ctrl+x}
			}
		}

		COMMAND "go to scratch buffer" {
			KEYS {
				{Ctrl+x}b*scratch*{Enter}
			}
		}

		COMMAND "control alpha" {
			KEYS {
				{Ctrl+a}
			}
		}

		COMMAND "incorporate mail" {
			KEYS {
				inc{enter}
			}
		}

		COMMAND "indent region" {
			KEYS {
				{Esc}xindent-region
			}
		}

		COMMAND "insert file" {
			KEYS {
				{Ctrl+x}i
			}
		}

		COMMAND "insert register" {
			KEYS {
				{Ctrl+x}ri
			}
		}

		COMMAND "insert registered one" {
			KEYS {
				{Ctrl+x}ri1
			}
		}

		COMMAND "insert signature" {
			KEYS {
				{Ctrl+x}i{Ctrl+a}{Ctrl+k}~/.signature{Enter}
			}
		}

		COMMAND "justify paragraph" {
			KEYS {
				{Esc}q
			}
		}

		COMMAND "kill  buffer" {
			KEYS {
				{Ctrl+x}k
			}
		}

		COMMAND "kill <2to20> words" {
			SCRIPT {
				sendkeys "{Ctrl+u}"+_arg1+"{esc}d"
			}
		}

		COMMAND "kill buffer" {
			KEYS {
				{Ctrl+x}k
			}
		}

		COMMAND "kill line" {
			KEYS {
				{Ctrl+u}
			}
		}

		COMMAND "kill region" {
			KEYS {
				{Ctrl+w} 
			}
		}

		COMMAND "kill rest" {
			KEYS {
				{Ctrl+k}
			}
		}

		COMMAND "kill that space" {
			KEYS {
				{Ctrl+@}{Ctrl+b}{Ctrl+r} {Ctrl+d}{Ctrl+x}{Ctrl+x}{Ct
				rl+f}
			}
		}

		COMMAND "kill word" {
			KEYS {
				{esc}d
			}
		}

		COMMAND "latex bold" {
			KEYS {
				{\\bf  }{left 2}
			}
		}

		COMMAND "latex citation" {
			KEYS {
				~\\cite{}{left}
			}
		}

		COMMAND "latex e.g." {
			KEYS {
				{\\it e.g.}
			}
		}

		COMMAND "latex emphasize" {
			KEYS {
				{\\em }{left}
			}
		}

		COMMAND "latex et all" {
			KEYS {
				{\\it et al.}
			}
		}

		COMMAND "latex italics" {
			KEYS {
				{\\it }{left}
			}
		}

		COMMAND "latex reference" {
			KEYS {
				~\\ref {}{left}
			}
		}

		COMMAND "latex section reference" {
			KEYS {
				~\\S\\ref {}{left}
			}
		}

		COMMAND "latex space" {
			KEYS {
				\\vspace{1.0in}
			}
		}

		COMMAND "list buffers" {
			KEYS {
				{Ctrl+x}{Ctrl+b}
			}
		}

		COMMAND "lower word" {
			KEYS {
				{esc}b{esc}l
			}
		}

		COMMAND "move message" {
			KEYS "Bm"
		}

		COMMAND "move to next line" {
			KEYS {
				{ctrl+e}{Enter}
			}
		}

		COMMAND "multiple 32" {
			KEYS {
				{Ctrl+u}32
			}
		}

		COMMAND "multiple command" {
			KEYS {
				{Ctrl+u}
			}
		}

		COMMAND "multiple eight" {
			KEYS {
				{Ctrl+u}8
			}
		}

		COMMAND "multiple four" {
			KEYS {
				{Ctrl+u}4
			}
		}

		COMMAND "multiple sixteen" {
			KEYS {
				{Ctrl+u}16
			}
		}

		COMMAND "multiple three" {
			KEYS {
				{Ctrl+u}3
			}
		}

		COMMAND "multiple two" {
			KEYS {
				{Ctrl+u}2
			}
		}

		COMMAND "next brace" {
			KEYS {
				{Esc}{Ctrl+f}
			}
		}

		COMMAND "next buffer" {
			KEYS {
				{Ctrl+x}b
			}
		}

		COMMAND "next word" {
			SCRIPT {
				CapitalizeNext
				NoSpaceNext
			}
		}

		COMMAND "other buffer" {
			KEYS {
				{Ctrl+x}o
			}
		}

		COMMAND "paste selection" {
			KEYS {
				{ctrl+y}
			}
		}

		COMMAND "quit Emacs" {
			KEYS {
				{Ctrl+x}{Ctrl+c}
			}
		}

		COMMAND "redraw screen" {
			KEYS {
				{Ctrl+l}
			}
		}

		COMMAND "refile message" {
			KEYS {
				Bm{Ctrl+a}{Ctrl+k}nnmh+mail:
			}
		}

		COMMAND "register version" {
			KEYS {
				{Esc}xvc-register{Enter}
			}
		}

		COMMAND "remove message" {
			KEYS {
				B{BackSpace}y
			}
		}

		COMMAND "remove next" {
			KEYS {
				qfd {enter}
			}
		}

		COMMAND "query replace" {
			KEYS {
				{Esc}%
			}
		}

		COMMAND "Santa Cruz Domain" {
			KEYS "cse.ucsc.edu"
		}

		COMMAND "save and  quit" {
			KEYS {
				{ctrl+x}{ctrl+s}{ctrl+x}{ctrl+c}
			}
		}

		COMMAND "save file" {
			KEYS {
				{Ctrl+x}{Ctrl+s}
			}
		}

		COMMAND "save register  1" {
			KEYS {
				{Ctrl+x}rs1
			}
		}

		COMMAND "save register" {
			KEYS {
				{Ctrl+x}rs
			}
		}

		COMMAND "save some buffers" {
			KEYS {
				{Ctrl+x}s
			}
		}

		COMMAND "scan  mail" {
			KEYS {
				scan +inbox{enter}
			}
		}

		COMMAND "search again" {
			KEYS {
				{Ctrl+s}{Ctrl+s}{Enter}
			}
		}

		COMMAND "search backward" {
			KEYS {
				{Ctrl+r}
			}
		}

		COMMAND "search forward" {
			KEYS {
				{Ctrl+s}
			}
		}

		COMMAND "see for loop" {
			KEYS {
				sendkeys "{Tab}for ( ; ; ) {\n}/* end for ()  */{Ctr
				l+a}{Ctrl+p}{Ctrl+p}{Esc}f{Ctrl+f}{Ctrl+f}"
			}
		}

		COMMAND "set mark" {
			KEYS {
				{Ctrl+@}
			}
		}

		COMMAND "short comment" {
			KEYS {
				{Tab}/*{Space}{Space}*/{Ctrl+b}{Ctrl+b}{Ctrl+b}
			}
		}

		COMMAND "short signature" {
			SCRIPT {
				sendkeys "                              tmk{Enter}"
			}
		}

		COMMAND "single window" {
			KEYS {
				{Ctrl+x}1
			}
		}

		COMMAND "split window" {
			KEYS {
				{Ctrl+x}2
			}
		}

		COMMAND "switch buffer" {
			KEYS {
				{Ctrl+x}b{Enter}
			}
		}

		COMMAND "switch chars" {
			KEYS {
				{Ctrl+t}
			}
		}

		COMMAND "switch words" {
			KEYS {
				{esc}t
			}
		}

		COMMAND "toggle version" {
			KEYS {
				{Ctrl+x}{Ctrl+q}
			}
		}

		COMMAND "undo that" {
			KEYS {
				{Ctrl+x}u
			}
		}

		COMMAND "version difference" {
			KEYS {
				{Ctrl+x}v=
			}
		}

		COMMAND "version directory" {
			KEYS {
				{Ctrl+x}vd
			}
		}

		COMMAND "version take action" {
			KEYS {
				%m{Enter}{Ctrl+x}vv
			}
		}

		COMMAND "insert a space" {
			KEYS {
				{Ctrl+@}{esc}b {Ctrl+x}{Ctrl+x}
			}
		}

		COMMAND "write file" {
			KEYS {
				{Ctrl+x}{Ctrl+w}
			}
		}

		COMMAND "back <2to20>" {
			SCRIPT {
				sendkeys "{BackSpace "+_arg1+"}"
			}
		}

		COMMAND "delete that word" {
			KEYS {
				{Esc}{BackSpace}
			}
		}

		COMMAND "trash message" {
			KEYS {
				Bm{Ctrl+a}{Ctrl+k}nnmh+mail:trash{Enter}
			}
		}

		COMMAND "bang dollar" {
			KEYS "!$"
		}

		COMMAND "change directory" {
			KEYS "cd  "
		}

		COMMAND "change mode" {
			KEYS "chmod "
		}

		COMMAND "complete message" {
			KEYS {
				{Ctrl+x}{Ctrl+s}{ctrl+x}{ctrl+c}
			}
		}

		COMMAND "compose message" {
			KEYS {
				comp{enter}
			}
		}

		COMMAND "control insert" {
			KEYS {
				{Ctrl+ExtIns}
			}
		}

		COMMAND "copy file" {
			KEYS "cp "
		}

		COMMAND "DOS 2 Unix" {
			KEYS "dos2unix "
		}

		COMMAND "dot dot" {
			KEYS ".."
		}

		COMMAND "finish and send message" {
			SCRIPT {
				SendKeys "{Ctrl+x}{Ctrl+s}{ctrl+x}{ctrl+c}"
				wait 200
				SendKeys "send{enter}"
			}
		}

		COMMAND "grep code" {
			KEYS {
				grep   *.[CHch]{Left 9}
			}
		}

		COMMAND "Gnu plot" {
			KEYS "gnuplot "
		}

		COMMAND "java  compile" {
			SCRIPT {
				sendkeys "javac "
				capitalizenext"
			}
		}

		COMMAND "kill job" {
			KEYS "kill -9 "
		}

		COMMAND "latex bibliography" {
			KEYS "bibtex  "
		}

		COMMAND "long listing" {
			KEYS "ls -l  "
		}

		COMMAND "make directory" {
			KEYS "mkdir  "
		}

		COMMAND "move file" {
			KEYS "mv  "
		}

		COMMAND "pipe command" {
			KEYS "| "
		}

		COMMAND "pop directory" {
			KEYS {
				pp {enter}
			}
		}

		COMMAND "process scan" {
			KEYS "ps -ef | grep "
		}

		COMMAND "push directory" {
			KEYS "pd "
		}

		COMMAND "quick listing" {
			KEYS {
				ls{Enter}
			}
		}

		COMMAND "recursive search" {
			KEYS {
				find .  -name SCCS -prune -o -exec grep  {} /dev/nul
				l \\;{Left 15}
			}
		}

		COMMAND "hash path" {
			KEYS {
				rehash{Enter}
			}
		}

		COMMAND "remove file" {
			KEYS "rm "
		}

		COMMAND "reply to message" {
			KEYS {
				repl{enter}
			}
		}

		COMMAND "reply with quotes" {
			KEYS {
				rq {enter}
			}
		}

		COMMAND "run java" {
			SCRIPT {
				sendkeys "java "
				capitalizenext
			}
		}

		COMMAND "screen listing" {
			KEYS {
				screen -ls{Enter} 
			}
		}

		COMMAND "screen resume" {
			KEYS {
				screen -R{Enter}
			}
		}

		COMMAND "send message" {
			KEYS {
				send{enter}
			}
		}

		COMMAND "set class path" {
			KEYS "setenv CLASSPATH "
		}

		COMMAND "set environment" {
			KEYS "setenv  "
		}

		COMMAND "show message" {
			KEYS {
				show {enter}
			}
		}

		COMMAND "symbolic link" {
			KEYS "ln -s "
		}

		COMMAND "tar command" {
			KEYS "tar "
		}

		COMMAND "V. M. stat" {
			KEYS "vmstat 5 "
		}

		COMMAND "not  equals" {
			KEYS "!="
		}

		COMMAND "null pointer" {
			KEYS "NULL"
		}

		COMMAND "integer declaration" {
			KEYS "int "
		}

		COMMAND "if  statement" {
			SCRIPT {
				sendkeys "{Tab}if ( )  {      /*   */\n}{up}{Ctrl+f}{Ctrl+f}{Ctrl+f}"
			}
		}

		COMMAND "exit minus 1" {
			KEYS "exit (-1);"
		}

		COMMAND "external declaration" {
			KEYS "extern "
		}

		COMMAND "f print f" {
			KEYS {
				{Tab}fprintf(stdout, "\\n");{Ctrl+b}{Ctrl+b}{Ctrl+b}
				{Ctrl+b}{Ctrl+b}
			}
		}

		COMMAND "debug print" {
			KEYS {
				{Tab}debug(5,"\\n");{Ctrl+b}{Ctrl+b}{Ctrl+b}{Ctrl+b}
				{Ctrl+b}
			}
		}

		COMMAND "clear allocate" {
			KEYS {
				calloc (); {left 3}
			}
		}

		COMMAND "compile again" {
			KEYS {
				{Ctrl+x}{Ctrl+s}{Esc}xcompile{Enter}{Enter}
			}
		}

		COMMAND "compile buffer" {
			KEYS {
				{Ctrl+x}{Ctrl+s}{Esc}xcompile{Enter}
			}
		}

		COMMAND "constant declaration" {
			KEYS "const "
		}

		COMMAND "minus equals" {
			KEYS "-="
		}

		COMMAND "percent sign delta" {
			KEYS "%d"
		}

		COMMAND "plus equals" {
			KEYS "+="
		}

		COMMAND "plus plus" {
			KEYS "++"
		}

		COMMAND "pound define" {
			KEYS "#define "
		}

		COMMAND "pound end if" {
			KEYS "#endif "
		}

		COMMAND "pound include" {
			KEYS {
				#include ".h"{Left}{Left}{Left}
			}
		}

		COMMAND "Reference arrow" {
			SCRIPT {
				SendKeys "->"
				nospacenext 
			}
		}

		COMMAND "return statement" {
			KEYS {
				return ();{left 2}
			}
		}

		COMMAND "size of" {
			KEYS {
				sizeof (){Ctrl+b}
			}
		}

		COMMAND "standard include" {
			KEYS {
				#include <.h>{Ctrl+b}{Ctrl+b}{Ctrl+b}
			}
		}

		COMMAND "string  length" {
			KEYS {
				strlen(){Ctrl+b}
			}
		}

		COMMAND "string copy" {
			KEYS {
				strcpy(){Ctrl+b}
			}
		}

		COMMAND "string N. copy" {
			KEYS {
				strncpy (){left}
			}
		}

		COMMAND "while statement" {
			KEYS {
				{tab}while ( ) {  /*  */{tab}}{up}{right 6}
			}
		}

		COMMAND "set display Grendel" {
			KEYS {
				setenv DISPLAY grendel:0.0{enter}
			}
		}

		COMMAND "insert <2to20> spaces" {
			SCRIPT {
				sendkeys "{Space "+_arg1+"}"
			}
		}

		COMMAND "back <2to20> words" {
			SCRIPT {
				loop& = val(_arg1)
				do while (loop&)
				sendkeys "{esc}{backspace}"
				loop& = loop& -1
				loop
			}
		}

		COMMAND "<DirLeftRight> <2to20> Words" {
			SCRIPT {
				loop& = val(_arg2)
				do while (loop&)
				if _arg1 = "Left" then _arg1 = "b"
				if _arg1 = "Right" then _arg1 = "f"
				SendKeys "{esc}"+ _arg1 
				loop& = loop& -1
				loop
			}
		}

		COMMAND "Left Word" {
			KEYS {
				{esc}b
			}
		}

		COMMAND "Right Word" {
			KEYS {
				{esc}f
			}
		}

		COMMAND "voice users mailing list" {
			KEYS "voice-users@voicerecognition.net"
		}

		COMMAND "trash next" {
			SCRIPT {
				SendKeys "BM{Ctrl+a}{Ctrl+k}nnmh+mail:trash{Enter}{Down}{Enter}"
			}
		}

		LIST "2to20" {
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
			"11"
			"12"
			"13"
			"14"
			"15"
			"16"
			"17"
			"18"
			"19"
			"20"
		}

		LIST "DirLeftRight" {
			"Left"
			"Right"
		}
	}
}

MENU "EMACS" {
	STATE "macs" {
		COMMAND "begin macro" {
			KEYS {
				{Ctrl+x}(
			}
		}

		COMMAND "beginning of buffer" {
			KEYS {
				{Esc}<
			}
		}

		COMMAND "bury buffer" {
			KEYS {
				{esc}xbury-buffer{Enter}
			}
		}

		COMMAND "cancel command" {
			KEYS {
				{ctrl+g}
			}
		}

		COMMAND "capitalize word" {
			KEYS {
				{esc}{b}{esc}{c}
			}
		}

		COMMAND "clear line" {
			KEYS {
				{Ctrl+a}{Ctrl+k}
			}
		}

		COMMAND "close  frame" {
			KEYS {
				{ctrl+x}k{enter}{Ctrl+x}o{ctrl+x}1
			}
		}

		COMMAND "comment line" {
			KEYS {
				{RightCtrl+a}{Tab}/* {Ctrl+e}*/{RightCtrl+b}{RightCt
				rl+b}
			}
		}

		COMMAND "exit Emacs" {
			KEYS {
				{ctrl+x}{ctrl+c}
			}
		}

		COMMAND "copy region" {
			KEYS {
				{ctrl+w}{ctrl+y}
			}
		}

		COMMAND "cut region" {
			KEYS {
				{ctrl+w}
			}
		}

		COMMAND "delete char" {
			KEYS {
				{Ctrl+d}
			}
		}

		COMMAND "double sees" {
			KEYS {
				{Ctrl+c}{Ctrl+c}
			}
		}

		COMMAND "editor command" {
			KEYS {
				{esc}x
			}
		}

		COMMAND "editor help" {
			SCRIPT {
				SendKeys "{ctrl+h}"
				NoSpaceNext
			}
		}

		COMMAND "control echo" {
			KEYS {
				{Ctrl+e}
			}
		}

		COMMAND "end macro" {
			KEYS {
				{Ctrl+x})
			}
		}

		COMMAND "end of buffer" {
			KEYS {
				{esc}>
			}
		}

		COMMAND "enter comments" {
			KEYS {
				{Tab}/****/{Ctrl+p}
			}
		}

		COMMAND "equals equals" {
			KEYS "=="
		}

		COMMAND "evaluate buffer" {
			KEYS {
				{Esc}xeval-buffer{Enter}
			}
		}

		COMMAND "execute macro" {
			KEYS {
				{Ctrl+x}e
			}
		}

		COMMAND "fill paragraph" {
			KEYS {
				{esc}{q}
			}
		}

		COMMAND "forward message" {
			KEYS {
				{RightCtrl+c}{RightCtrl+f}
			}
		}

		COMMAND "get file" {
			KEYS {
				{Ctrl+x}{Ctrl+f}
			}
		}

		COMMAND "Gnu zip" {
			SCRIPT {
				sendkeys " gzip " 
			}
		}

		COMMAND "go to line" {
			KEYS {
				{esc}xgoto-line{Enter}
			}
		}

		COMMAND "go to mark" {
			KEYS {
				{Ctrl+x}{Ctrl+x}
			}
		}

		COMMAND "go to scratch buffer" {
			KEYS {
				{Ctrl+x}b*scratch*{Enter}
			}
		}

		COMMAND "control alpha" {
			KEYS {
				{Ctrl+a}
			}
		}

		COMMAND "incorporate mail" {
			KEYS {
				inc{enter}
			}
		}

		COMMAND "indent region" {
			KEYS {
				{Esc}xindent-region
			}
		}

		COMMAND "insert file" {
			KEYS {
				{Ctrl+x}i
			}
		}

		COMMAND "insert register" {
			KEYS {
				{Ctrl+x}ri
			}
		}

		COMMAND "insert registered one" {
			KEYS {
				{Ctrl+x}ri1
			}
		}

		COMMAND "insert signature" {
			KEYS {
				{Ctrl+x}i{Ctrl+a}{Ctrl+k}~/.signature{Enter}
			}
		}

		COMMAND "justify paragraph" {
			KEYS {
				{Esc}q
			}
		}

		COMMAND "kill  buffer" {
			KEYS {
				{Ctrl+x}k
			}
		}

		COMMAND "kill <2to20> words" {
			SCRIPT {
				sendkeys "{Ctrl+u}"+_arg1+"{esc}d"
			}
		}

		COMMAND "kill buffer" {
			KEYS {
				{Ctrl+x}k
			}
		}

		COMMAND "kill line" {
			KEYS {
				{Ctrl+u}
			}
		}

		COMMAND "kill region" {
			KEYS {
				{Ctrl+w} 
			}
		}

		COMMAND "kill rest" {
			KEYS {
				{Ctrl+k}
			}
		}

		COMMAND "kill that space" {
			KEYS {
				{Ctrl+@}{Ctrl+b}{Ctrl+r} {Ctrl+d}{Ctrl+x}{Ctrl+x}{Ct
				rl+f}
			}
		}

		COMMAND "kill word" {
			KEYS {
				{esc}d
			}
		}

		COMMAND "latex bold" {
			KEYS {
				{\\bf  }{left 2}
			}
		}

		COMMAND "latex citation" {
			KEYS {
				~\\cite{}{left}
			}
		}

		COMMAND "latex e.g." {
			KEYS {
				{\\it e.g.}
			}
		}

		COMMAND "latex emphasize" {
			KEYS {
				{\\em }{left}
			}
		}

		COMMAND "latex et all" {
			KEYS {
				{\\it et al.}
			}
		}

		COMMAND "latex italics" {
			KEYS {
				{\\it }{left}
			}
		}

		COMMAND "latex reference" {
			KEYS {
				~\\ref {}{left}
			}
		}

		COMMAND "latex section reference" {
			KEYS {
				~\\S\\ref {}{left}
			}
		}

		COMMAND "latex space" {
			KEYS {
				\\vspace{1.0in}
			}
		}

		COMMAND "list buffers" {
			KEYS {
				{Ctrl+x}{Ctrl+b}
			}
		}

		COMMAND "lower word" {
			KEYS {
				{esc}b{esc}l
			}
		}

		COMMAND "move message" {
			KEYS "Bm"
		}

		COMMAND "move to next line" {
			KEYS {
				{ctrl+e}{Enter}
			}
		}

		COMMAND "multiple 32" {
			KEYS {
				{Ctrl+u}32
			}
		}

		COMMAND "multiple command" {
			KEYS {
				{Ctrl+u}
			}
		}

		COMMAND "multiple eight" {
			KEYS {
				{Ctrl+u}8
			}
		}

		COMMAND "multiple four" {
			KEYS {
				{Ctrl+u}4
			}
		}

		COMMAND "multiple sixteen" {
			KEYS {
				{Ctrl+u}16
			}
		}

		COMMAND "multiple three" {
			KEYS {
				{Ctrl+u}3
			}
		}

		COMMAND "multiple two" {
			KEYS {
				{Ctrl+u}2
			}
		}

		COMMAND "next brace" {
			KEYS {
				{Esc}{Ctrl+f}
			}
		}

		COMMAND "next buffer" {
			KEYS {
				{Ctrl+x}b
			}
		}

		COMMAND "next word" {
			SCRIPT {
				CapitalizeNext
				NoSpaceNext
			}
		}

		COMMAND "other buffer" {
			KEYS {
				{Ctrl+x}o
			}
		}

		COMMAND "paste selection" {
			KEYS {
				{ctrl+y}
			}
		}

		COMMAND "quit Emacs" {
			KEYS {
				{Ctrl+x}{Ctrl+c}
			}
		}

		COMMAND "redraw screen" {
			KEYS {
				{Ctrl+l}
			}
		}

		COMMAND "refile message" {
			KEYS {
				Bm{Ctrl+a}{Ctrl+k}nnmh+mail:
			}
		}

		COMMAND "register version" {
			KEYS {
				{Esc}xvc-register{Enter}
			}
		}

		COMMAND "remove message" {
			KEYS {
				B{BackSpace}y
			}
		}

		COMMAND "remove next" {
			KEYS {
				qfd {enter}
			}
		}

		COMMAND "query replace" {
			KEYS {
				{Esc}%
			}
		}

		COMMAND "Santa Cruz Domain" {
			KEYS "cse.ucsc.edu"
		}

		COMMAND "save and  quit" {
			KEYS {
				{ctrl+x}{ctrl+s}{ctrl+x}{ctrl+c}
			}
		}

		COMMAND "save file" {
			KEYS {
				{Ctrl+x}{Ctrl+s}
			}
		}

		COMMAND "save register  1" {
			KEYS {
				{Ctrl+x}rs1
			}
		}

		COMMAND "save register" {
			KEYS {
				{Ctrl+x}rs
			}
		}

		COMMAND "save some buffers" {
			KEYS {
				{Ctrl+x}s
			}
		}

		COMMAND "scan  mail" {
			KEYS {
				scan +inbox{enter}
			}
		}

		COMMAND "search again" {
			KEYS {
				{Ctrl+s}{Ctrl+s}{Enter}
			}
		}

		COMMAND "search backward" {
			KEYS {
				{Ctrl+r}
			}
		}

		COMMAND "search forward" {
			KEYS {
				{Ctrl+s}
			}
		}

		COMMAND "see for loop" {
			KEYS {
				sendkeys "{Tab}for ( ; ; ) {\n}/* end for ()  */{Ctr
				l+a}{Ctrl+p}{Ctrl+p}{Esc}f{Ctrl+f}{Ctrl+f}"
			}
		}

		COMMAND "set mark" {
			KEYS {
				{Ctrl+@}
			}
		}

		COMMAND "short comment" {
			KEYS {
				{Tab}/*{Space}{Space}*/{Ctrl+b}{Ctrl+b}{Ctrl+b}
			}
		}

		COMMAND "short signature" {
			SCRIPT {
				sendkeys "                              tmk{Enter}"
			}
		}

		COMMAND "single window" {
			KEYS {
				{Ctrl+x}1
			}
		}

		COMMAND "split window" {
			KEYS {
				{Ctrl+x}2
			}
		}

		COMMAND "switch buffer" {
			KEYS {
				{Ctrl+x}b{Enter}
			}
		}

		COMMAND "switch chars" {
			KEYS {
				{Ctrl+t}
			}
		}

		COMMAND "switch words" {
			KEYS {
				{esc}t
			}
		}

		COMMAND "toggle version" {
			KEYS {
				{Ctrl+x}{Ctrl+q}
			}
		}

		COMMAND "undo that" {
			KEYS {
				{Ctrl+x}u
			}
		}

		COMMAND "version difference" {
			KEYS {
				{Ctrl+x}v=
			}
		}

		COMMAND "version directory" {
			KEYS {
				{Ctrl+x}vd
			}
		}

		COMMAND "version take action" {
			KEYS {
				%m{Enter}{Ctrl+x}vv
			}
		}

		COMMAND "insert a space" {
			KEYS {
				{Ctrl+@}{esc}b {Ctrl+x}{Ctrl+x}
			}
		}

		COMMAND "write file" {
			KEYS {
				{Ctrl+x}{Ctrl+w}
			}
		}

		COMMAND "back <2to20>" {
			SCRIPT {
				sendkeys "{BackSpace "+_arg1+"}"
			}
		}

		COMMAND "back <2to20> words" {
			SCRIPT {
				sendkeys "{Ctrl+u}"+ _arg1+"{esc}{backspace}"
			}
		}

		COMMAND "delete that word" {
			KEYS {
				{Esc}{BackSpace}
			}
		}

		COMMAND "trash next" {
			SCRIPT {
				sendkeys "BM{Ctrl+a}{Ctrl+k}nnmh+mail:trash{enter}{Down}{Enter}"
			}
		}


		COMMAND "trash message" {
			KEYS {
				Bm{Ctrl+a}{Ctrl+k}nnmh+mail:trash{Enter}
			}
		}

		COMMAND "bang dollar" {
			KEYS "!$"
		}

		COMMAND "change directory" {
			KEYS "cd  "
		}

		COMMAND "change mode" {
			KEYS "chmod "
		}

		COMMAND "complete message" {
			KEYS {
				{Ctrl+x}{Ctrl+s}{ctrl+x}{ctrl+c}
			}
		}

		COMMAND "compose message" {
			KEYS {
				comp{enter}
			}
		}

		COMMAND "control insert" {
			KEYS {
				{Ctrl+ExtIns}
			}
		}

		COMMAND "copy file" {
			KEYS "cp "
		}

		COMMAND "DOS 2 Unix" {
			KEYS "dos2unix "
		}

		COMMAND "dot dot" {
			KEYS ".."
		}

		COMMAND "finish and send message" {
			SCRIPT {
				SendKeys "{Ctrl+x}{Ctrl+s}{ctrl+x}{ctrl+c}"
				wait 200
				SendKeys "send{enter}"
			}
		}

		COMMAND "grep code" {
			KEYS {
				grep   *.[CHch]{Left 9}
			}
		}

		COMMAND "Gnu plot" {
			KEYS "gnuplot "
		}

		COMMAND "java  compile" {
			SCRIPT {
				sendkeys "javac "
				capitalizenext"
			}
		}

		COMMAND "kill job" {
			KEYS "kill -9 "
		}

		COMMAND "latex bibliography" {
			KEYS "bibtex  "
		}

		COMMAND "long listing" {
			KEYS "ls -l  "
		}

		COMMAND "make directory" {
			KEYS "mkdir  "
		}

		COMMAND "move file" {
			KEYS "mv  "
		}

		COMMAND "pipe command" {
			KEYS "| "
		}

		COMMAND "pop directory" {
			KEYS {
				pp {enter}
			}
		}

		COMMAND "process scan" {
			KEYS "ps -ef | grep "
		}

		COMMAND "push directory" {
			KEYS "pd "
		}

		COMMAND "quick listing" {
			KEYS {
				ls{Enter}
			}
		}

		COMMAND "recursive search" {
			KEYS {
				find .  -name SCCS -prune -o -exec grep  {} /dev/nul
				l \\;{Left 15}
			}
		}

		COMMAND "hash path" {
			KEYS {
				rehash{Enter}
			}
		}

		COMMAND "remove file" {
			KEYS "rm "
		}

		COMMAND "reply to message" {
			KEYS {
				repl{enter}
			}
		}

		COMMAND "reply with quotes" {
			KEYS {
				rq {enter}
			}
		}

		COMMAND "run java" {
			SCRIPT {
				sendkeys "java "
				capitalizenext
			}
		}

		COMMAND "screen listing" {
			KEYS {
				screen -ls{Enter} 
			}
		}

		COMMAND "screen resume" {
			KEYS {
				screen -R{Enter}
			}
		}

		COMMAND "send message" {
			KEYS {
				send{enter}
			}
		}

		COMMAND "set class path" {
			KEYS "setenv CLASSPATH "
		}

		COMMAND "set environment" {
			KEYS "setenv  "
		}

		COMMAND "show message" {
			KEYS {
				show {enter}
			}
		}

		COMMAND "symbolic link" {
			KEYS "ln -s "
		}

		COMMAND "tar command" {
			KEYS "tar "
		}

		COMMAND "V. M. stat" {
			KEYS "vmstat 5 "
		}

		COMMAND "not  equals" {
			KEYS "!="
		}

		COMMAND "null pointer" {
			KEYS "NULL"
		}

		COMMAND "integer declaration" {
			KEYS "int "
		}

		COMMAND "if  statement" {
			SCRIPT {
				sendkeys "{Tab}if ( )  {      /*   */\n}{up}{Ctrl+f}{Ctrl+f}{Ctrl+f}"
			}
		}

		COMMAND "exit minus 1" {
			KEYS "exit (-1);"
		}

		COMMAND "external declaration" {
			KEYS "extern "
		}

		COMMAND "f print f" {
			KEYS {
				{Tab}fprintf(stdout, "\\n");{Ctrl+b}{Ctrl+b}{Ctrl+b}
				{Ctrl+b}{Ctrl+b}
			}
		}

		COMMAND "debug print" {
			KEYS {
				{Tab}debug(5,"\\n");{Ctrl+b}{Ctrl+b}{Ctrl+b}{Ctrl+b}
				{Ctrl+b}
			}
		}

		COMMAND "clear allocate" {
			KEYS {
				calloc (); {left 3}
			}
		}

		COMMAND "compile again" {
			KEYS {
				{Ctrl+x}{Ctrl+s}{Esc}xcompile{Enter}{Enter}
			}
		}

		COMMAND "compile buffer" {
			KEYS {
				{Ctrl+x}{Ctrl+s}{Esc}xcompile{Enter}
			}
		}

		COMMAND "constant declaration" {
			KEYS "const "
		}

		COMMAND "minus equals" {
			KEYS "-="
		}

		COMMAND "percent sign delta" {
			KEYS "%d"
		}

		COMMAND "plus equals" {
			KEYS "+="
		}

		COMMAND "plus plus" {
			KEYS "++"
		}

		COMMAND "pound define" {
			KEYS "#define "
		}

		COMMAND "pound end if" {
			KEYS "#endif "
		}

		COMMAND "pound include" {
			KEYS {
				#include ".h"{Left}{Left}{Left}
			}
		}

		COMMAND "Reference arrow" {
			SCRIPT {
				SendKeys "->"
				nospacenext 
			}
		}

		COMMAND "return statement" {
			KEYS {
				return ();{left 2}
			}
		}

		COMMAND "size of" {
			KEYS {
				sizeof (){Ctrl+b}
			}
		}

		COMMAND "standard include" {
			KEYS {
				#include <.h>{Ctrl+b}{Ctrl+b}{Ctrl+b}
			}
		}

		COMMAND "string  length" {
			KEYS {
				strlen(){Ctrl+b}
			}
		}

		COMMAND "string copy" {
			KEYS {
				strcpy(){Ctrl+b}
			}
		}

		COMMAND "string N. copy" {
			KEYS {
				strncpy (){left}
			}
		}

		COMMAND "while statement" {
			KEYS {
				{tab}while ( ) {  /*  */{tab}}{up}{right 6}
			}
		}

		COMMAND "set display Grendel" {
			KEYS {
				setenv DISPLAY grendel:0.0{enter}
			}
		}

		COMMAND "insert <2to20> spaces" {
			SCRIPT {
				sendkeys "{Space "+_arg1+"}"
			}
		}

		COMMAND "Left Word" {
			KEYS {
				{esc}b
			}
		}

		COMMAND "Right Word" {
			KEYS {
				{esc}f
			}
		}

		COMMAND "<DirLeftRight> <2to20> Words" {
			SCRIPT {
				if _arg1 = "Left" then _arg1 = "b"
				if _arg1 = "Right" then _arg1 = "f"
				sendkeys "{Ctrl+u}"+_arg2+"{esc}"+_arg1
			}
		}

		LIST "2to20" {
			"2"
			"3"
			"4"
			"5"
			"6"
			"7"
			"8"
			"9"
			"10"
			"11"
			"12"
			"13"
			"14"
			"15"
			"16"
			"17"
			"18"
			"19"
			"20"
		}

		LIST "DirLeftRight" {
			"Left"
			"Right"
		}
	}
}

MENU "netscape" {
	STATE "Net" {
		COMMAND "type URL" {
			SCRIPT {
				sendkeys "{ctrl+o}http://www."
			}
		}
	}
}

MENU "REMINDER" {
	STATE "Break Time!" {
		COMMAND "give me two more minutes" {
			SCRIPT {
				setmouseposition 1,30,60
				buttonclick
			}
		}

		COMMAND "start the break" {
			SCRIPT {
				gotosleep
				setmouseposition 1, 30,140
				buttonclick
				appswapwith "NatSpeak"
				wait 200
				sendkeys "{Alt+u}sy"
				appswapwith "REMINDER"
			}
		}
	}
}