Dragon NaturallySpeakingの高度なスクリプトのグローバル定数

Question

Dragon NaturallySpeakingの高度なスクリプトでは、すべての音声コマンドで使用できる定数を定義する方法はありますか？

---

は例えば、私は2つの声を持っているコマンド：

Sub Main 
    originalClipboard = Clipboard 
    Clipboard("~\cite{}") 
    SendKeys "^v" 
    Wait(0.3) 
    SendKeys "{LEFT}" 
    Clipboard(originalClipboard) 
End Sub 

そして

Sub Main 
    Clipboard("os.path.join()") 
    SendKeys "^v" 
    Wait(0.3) 
    SendKeys "{Left}" 
End Sub 

を私がグローバル定数で0.3を格納することを好むだろう。

Answer 1

はい、#Usesディレクティブを使用して、グローバルな定数と関数のセットをスクリプトに組み込むことができます。あなたが定義するためにそれを使用することができます

'#Uses "C:\Scripts\pgGlobal.bas.txt" 

：

はhttp://www.nuance.com/products/help/dragon/dragon-for-pc/scriptref/Content/vbs/uses_comment.htmが

ので、例えば、私はで始まる任意のスクリプトで使用することができ、多くの定数と関数が含まれてグローバルなファイルを持っている参照してください。定数：

Public Const myWait = "0.3" 

ここでは1つの関数とそれに関連する定数がありますが（上記のように文字通り定数を文字通り定義することもできます） ：

Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long 
' Use this function to get System parameters (screen, mouse, etc.) 
' 
Public Const SM_CXSCREEN = 0 ' The width of the primary display monitor. 
Public Const SM_CYSCREEN = 1 ' The height of the primary display monitor. 
Public Const SM_XVIRTUALSCREEN = 76 ' The left side of the virtual screen. 
Public Const SM_YVIRTUALSCREEN = 77 ' The top of the virtual screen. 
Public Const SM_CXVIRTUALSCREEN = 78 ' The width of the virtual screen. 
Public Const SM_CYVIRTUALSCREEN = 79 ' The height of the virtual screen. 
Public Const SM_CMONITORS = 80 ' The number of display monitors. 
' 

そして、それはそうのように呼び出されます：私はすべてのこれらのパラメータを持つメッセージボックスを与えること

'#uses "C:\Scripts\pgGlobal.bas.txt" 
Sub Main 
    MsgBox "Primary Width: " & GetSystemMetrics(SM_CXSCREEN) & _ 
     " x Primary Height: " & GetSystemMetrics(SM_CYSCREEN) & vbCrLf & _ 
     "Number of monitors: " & GetSystemMetrics(SM_CMONITORS) & vbCrLf & _ 
     "Total Width: " & GetSystemMetrics(SM_CXVIRTUALSCREEN) & _ 
     " x Total Height: " & GetSystemMetrics(SM_CYVIRTUALSCREEN) & vbCrLf & _ 
     "Left Pixel: " & GetSystemMetrics(SM_XVIRTUALSCREEN) & _ 
     " x Top Pixel: " & GetSystemMetrics(SM_XVIRTUALSCREEN) 
End Sub 

。