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", "DgnWordDllCallI