Try

Sub Main
     HeardWord "\cap","that"
     HeardWord "compound","that"
End Sub

Optionally, if you would like to apply the previous formatting to the last spoken phrase (as opposed to having to select the text before deploying your command) simply change your code to

Sub Main
     HeardWord "select","that"
     HeardWord "\cap","that"
     HeardWord "compound","that"
End Sub

Forum Mission Statement
Trial Downloads
Dragon/Sales@KnowBrainer.com 
(615) 884-4558 ext 1

Hi Everyone,

Would someone be able to tell me how to do this the methods above compounded the text but did not add any capitalisation?

This is the format I am looking for myMethodName

I'm starting a coding course soon and it would be very helpful to know this because I am paralysed and it speeds up my coding compared to on screen keyword.

Thanks,

Rob

Dragon Professional Group 15.6 with knowbrainer 2017 professional and speech start.

Try this one out; it CamelCases the previous <1to10> words:

CamelCase <1to10>

Sub Main
   Dim camelVariable, dictate, firstCharacter As String
   Dim wasSpace, isLower, trailingSpace As Boolean
   Dim dictationLength As Integer

   For increment = 1 To Val (ListVar1)
      SendKeys "+^{Left}", 1
   Next increment
   Wait 0.2
   SendKeys "^c", 1
   Wait 0.3
   dictate = Clipboard
   Wait 0.3
   dictationLength = Len (dictate)

   If Mid (dictate, dictationLength, 1) = " " Then trailingSpace = True
'Dim testing As String
'testing = "#" + Mid (dictate, 1, dictationLength) + "#"
'MsgBox testing
   dictate = Trim (dictate)
   firstCharacter = Mid (dictate, 1, 1)
   firstCharacter = LCase (firstCharacter)
   camelVariable = firstCharacter

   dictationLength = Len (dictate)
   If dictationLength > 1 Then
      For increment = 2 To dictationLength
         firstCharacter = Mid (dictate, increment, 1)
         If firstCharacter = " " Then
            wasSpace = True
         Else
            If wasSpace = True Then firstCharacter = UCase (firstCharacter)
            camelVariable = camelVariable + firstCharacter
            wasSpace = False
         End If
      Next increment
   End If
   If leadingSpace = True Then camelVariable = " " + camelVariable
   If trailingSpace = True Then camelVariable = camelVariable + " "
   SendKeys camelVariable
End Sub

-Edgar
DPI 15.3, 64-bit Windows 10 Pro, OpenOffice & Office 365, Norton Security, Shure X2U XLR to USB mic adapter with Audio Technica DB135 vocal mic, Asus X299-Deluxe Prime, Intel Core i9-7940X (14 core, 4.3 GHz overclocked to 4.9 GHz), G.SKILL TridentZ Series 64GB (4 x 16GB) DDR4 3333 (PC4 26600) F4-3333C16Q-64GTZ, NVIDIA GIGABYTE GeForce GTX 1060 GV-N1060G1 GAMING-6GD REV 2.0 6GB graphics card with 3 1920x1080 monitors

Here's another version:

CamelCase <dictation>

Sub Main
   Dim camelVariable, dictate, firstCharacter As String
   Dim wasSpace, isLower As Boolean
   Dim dictationLength As Integer

   dictate = ListVar1

   dictate = Trim (dictate)' probably unnecessary
   firstCharacter = Mid (dictate, 1, 1)
   firstCharacter = LCase (firstCharacter)
   camelVariable = firstCharacter

   dictationLength = Len (dictate)
   If dictationLength > 1 Then
      For increment = 2 To dictationLength
         firstCharacter = Mid (dictate, increment, 1)
         If firstCharacter = " " Then
            wasSpace = True
         Else
            If wasSpace = True Then firstCharacter = UCase (firstCharacter)
            camelVariable = camelVariable + firstCharacter
            wasSpace = False
         End If
      Next increment
   End If

   SendKeys " " + camelVariable + " "
End Sub

-Edgar
DPI 15.3, 64-bit Windows 10 Pro, OpenOffice & Office 365, Norton Security, Shure X2U XLR to USB mic adapter with Audio Technica DB135 vocal mic, Asus X299-Deluxe Prime, Intel Core i9-7940X (14 core, 4.3 GHz overclocked to 4.9 GHz), G.SKILL TridentZ Series 64GB (4 x 16GB) DDR4 3333 (PC4 26600) F4-3333C16Q-64GTZ, NVIDIA GIGABYTE GeForce GTX 1060 GV-N1060G1 GAMING-6GD REV 2.0 6GB graphics card with 3 1920x1080 monitors

Sub Main
   Dim camelVariable, dictate, firstCharacter As String
   Dim wasSpace, isLower As Boolean
   Dim dictationLength As Integer

   dictate = ListVar1

   dictate = Trim (dictate)' probably unnecessary
   firstCharacter = Mid (dictate, 1, 1)
   firstCharacter = LCase (firstCharacter)
   camelVariable = firstCharacter

   dictationLength = Len (dictate)
   If dictationLength > 1 Then
      For increment = 2 To dictationLength
         firstCharacter = Mid (dictate, increment, 1)
         If firstCharacter = " " Then
            wasSpace = True
         Else
            If wasSpace = True Then firstCharacter = UCase (firstCharacter)
            camelVariable = camelVariable + firstCharacter
            wasSpace = False
         End If
      Next increment
   End If

   SendKeys " " + camelVariable + " "
End Sub

Hi Edgar,

Thank you for the reply! This one works really well!.
I tried the first one but I got an error saying unknown line 1.

I don't know what I did wrong for that one.

Is there a way to modify it for snake case?

Lunis, ah I see that works for pascal case now!

Thanks,

Rob

Dragon Professional Group 15.6 with knowbrainer 2017 professional and speech start.

That was a new one on me - had to look it up! Try changing this line (about line # 20):

            If wasSpace = True Then firstCharacter = UCase (firstCharacter)

so it looks like this: 

            If wasSpace = True Then firstCharacter = "_" + UCase (firstCharacter)

to get:

first_Second_Third

or:

            If wasSpace = True Then firstCharacter = "_" + LCase (firstCharacter)
to get:
first_second_third
getting:
First_second_third
is left as an excersize for the interested <grin>.

-Edgar
DPI 15.3, 64-bit Windows 10 Pro, OpenOffice & Office 365, Norton Security, Shure X2U XLR to USB mic adapter with Audio Technica DB135 vocal mic, Asus X299-Deluxe Prime, Intel Core i9-7940X (14 core, 4.3 GHz overclocked to 4.9 GHz), G.SKILL TridentZ Series 64GB (4 x 16GB) DDR4 3333 (PC4 26600) F4-3333C16Q-64GTZ, NVIDIA GIGABYTE GeForce GTX 1060 GV-N1060G1 GAMING-6GD REV 2.0 6GB graphics card with 3 1920x1080 monitors

Sub Main
   Dim camelVariable, dictate, firstCharacter As String
   Dim wasSpace, isLower As Boolean
   Dim dictationLength As Integer

   dictate = ListVar1

   dictate = Trim (dictate)' probably unnecessary
   firstCharacter = Mid (dictate, 1, 1)
   firstCharacter = LCase (firstCharacter)
   camelVariable = firstCharacter

   dictationLength = Len (dictate)
   If dictationLength > 1 Then
      For increment = 2 To dictationLength
         firstCharacter = Mid (dictate, increment, 1)
         If firstCharacter = " " Then
            wasSpace = True
         Else
            If wasSpace = True Then firstCharacter = UCase (firstCharacter)
            camelVariable = camelVariable + firstCharacter
            wasSpace = False
         End If
      Next increment
   End If

   SendKeys " " + camelVariable + " "
End Sub

In that version, how should the <dictation> list be defined? 

The reason why the previous answers no longer work is because the previous command examples were contributed for a much older version of Dragon; probably Dragon 11. Because you have rejuvenated this thread, we have edited Rüdiger's and Lunis's answers. We changed HeardWord "\Cap","that" to HeardWord "\cap","that"  which should do what you are looking. Keep in mind that you can't always rely on old answers. Dragon developers often change rules for possibly good reasons that elude us.

Forum Mission Statement
Trial Downloads
Dragon/Sales@KnowBrainer.com 
(615) 884-4558 ext 1

Hi, I'm new to the forum but I've written advanced scripts and VB commands. I could never get a "Cap" "That" or "No" "Cap "That" HeardWord working, I guess because I was not using the backslash before the Cap. Why do you have to do that? Are there other commands for which you need the \? I'm using Dragon Medical 10.2, so I guess I would use HeardWord "\Cap","that"?

thanks, Eric

If you dictate a word, and just after want it capitalized, just say :Cap That. If you want something capped beforehand, you can just say : Cap. Or, use:  HeardWord "\Cap"

MDH

The rules for using backslashes and capitalization in formatting "commands" changes version to version.

Prior to Version 11, "new line", "cap", and "no caps" were capitalized. Now they are not.

My recolleciton is that fewer formatting commands today use backslashes than in older versions. But "\cap" (or is it "\Cap"?) remains.

Some formatting commands use hyphens, e.g., HeardWord "No-Space" (or is it "no-space"?)

Alan,

You are correct, but just coincidentally, I use the very same Dragon version that she does, and this is how it happens to work in this paticular scenario.

MDH

No need to buy if all you want to do is try ...

DragonCapture KB Download (Latest)
DragonCapture Homepage

If we had been aware that you are open to Visual Basic...

However, in the code you have shown above, you may also delete the first line after the "Sub Main", namely referencing the Dragon engine control, just because it doesn't do anything in here.

Rüdiger

No need to buy if all you want to do is try ...

DragonCapture KB Download (Latest)
DragonCapture Homepage

Hi,

Cool, that worked! I thought the change was there but wasn't sure how the space was removed.

Ok you gave me an easy one but I got it haha it's :

This for line 10: firstCharacter = UCase (firstCharacter)

and

for line 20ish like you said above: If wasSpace = True Then firstCharacter = "_" + LCase (firstCharacter)

Thanks,

Rob

Dragon Professional Group 15.6 with knowbrainer 2017 professional and speech start.

Gold star <grin>!

-Edgar
DPI 15.3, 64-bit Windows 10 Pro, OpenOffice & Office 365, Norton Security, Shure X2U XLR to USB mic adapter with Audio Technica DB135 vocal mic, Asus X299-Deluxe Prime, Intel Core i9-7940X (14 core, 4.3 GHz overclocked to 4.9 GHz), G.SKILL TridentZ Series 64GB (4 x 16GB) DDR4 3333 (PC4 26600) F4-3333C16Q-64GTZ, NVIDIA GIGABYTE GeForce GTX 1060 GV-N1060G1 GAMING-6GD REV 2.0 6GB graphics card with 3 1920x1080 monitors

Thanks. Is it supposed to work in Dragon NaturallySpeaking 12.5 Professional, or did this feature appear in more recent versions?

If it is supposed to work in  Dragon NaturallySpeaking 12.5 Professional, which is the version I use, I have the following issue. When I create a new voice command and enter the command name "CamelCase <dictation>", Dragon automatically opens the window:

What am I supposed to do in this window? If I click on `cancel` then the command name is changed to `CamelCase dictation`.

Alan nailed it. Far Field algorithms (auto gain control) and open-ended vocabulary command capability (pseudo-artificial intelligence) wasn't introduced until professional versions of Dragon 13 release. Deep Learning was added to DPI 15. KnowBrainer 2017 includes 267 of these open ended artificial intelligence commands. This is just the beginning of the list of features you are missing out on when you don't upgrade to DPI 15 

Forum Mission Statement
Trial Downloads
Dragon/Sales@KnowBrainer.com 
(615) 884-4558 ext 1

Thanks. Is there any exhaustive change log for Dragon? I'm especially interested in change log for advanced scripting.

Sorry but we don't know what you mean by “change log for Advanced-Scripting”. Can you include some additional details?

Forum Mission Statement
Trial Downloads
Dragon/Sales@KnowBrainer.com 
(615) 884-4558 ext 1

I mean the list of additions, changes and deletions between each version of Dragon NaturalSpeaking Professional / Dragon Professional Individual.

For example, between Dragon NaturallySpeaking 12.5 Professional and Dragon NaturallySpeaking 13 Professional, the variable was added.

Example of changelog: https://github.com/tensorflow/tensorflow/blob/master/RELEASE.md

Nuance rarely removes a feature because they are big fans of backward compatibility. About the only features we have seen removed are information features that might cause Dragon end-users to ask questions. Since Nuance technical support phone calls cost Nuance $$$, they try to keep it to a minimum. For example, when running the Audio Check in Ver. 12, you could see a blue bar that would not only let you know that your volume level was acceptable but would even show you what your ideal volume level would be. In Ver. 11, you could even see a numerical grade but these features often generated Nuance support questions so while these features were interesting, Nuance decided to eliminate them.

Probably the best source to compare Dragon products is the manufacturer website but you can easily get lost on the Nuance website and Ver. 12 is pretty far back so you might not find all the information you would like but we might have a second-best option that's right here. Begin with KnowBrainer NaturallySpeaking 13 Review, then KnowBrainer Dragon 14 Review and finally KnowBrainer Dragon 15 Review.  

Forum Mission Statement
Trial Downloads
Dragon/Sales@KnowBrainer.com 
(615) 884-4558 ext 1

For the "camel up" solution I call that "class case" <grin>! I also have "member case": mAClassMemberVariable, "global case": gAGlobalVariable and a few others. I only use this stuff in coding so don't need the versions for database entry.

-Edgar
DPI 15.3, 64-bit Windows 10 Pro, OpenOffice & Office 365, Norton Security, Shure X2U XLR to USB mic adapter with Audio Technica DB135 vocal mic, Asus X299-Deluxe Prime, Intel Core i9-7940X (14 core, 4.3 GHz overclocked to 4.9 GHz), G.SKILL TridentZ Series 64GB (4 x 16GB) DDR4 3333 (PC4 26600) F4-3333C16Q-64GTZ, NVIDIA GIGABYTE GeForce GTX 1060 GV-N1060G1 GAMING-6GD REV 2.0 6GB graphics card with 3 1920x1080 monitors

Win10/x64, AMD Ryzen 7 3700X, 64GB RAM, Dragon 15.3, SP 6 PRO, SpeechStart, Office 365, KB 2017, Dragon Capture, Samson Meteor USB Desk Mic, Klim and JUKSTG earbuds with microphones, 3 BenQ 2560x1440 monitors, Microsoft Sculpt Keyboard and fat mouse