Get Last Spoken Commands for Get-Choice box

' Quick Command Creator Inline-Function for VoiceAttack -  Get list of last 20 Spoken Commands for Get Choice Box
'  by SemlerPDX Jun2020
'  VETERANS-GAMING.COM


Imports Microsoft.VisualBasic
Imports System
Imports System.Collections
Imports System.Collections.Generic
Imports System.Data
Imports System.Drawing
Imports System.Diagnostics
Imports System.Windows.Forms
Imports System.Linq
Imports System.Xml.Linq
Imports System.Threading.Tasks


Public Class VAInline
    dim spokenCommands as string = ""

    Public Sub Main()

        for cmdIndex as integer = 1 to 20
            if ((vaProxy.Utility.ParseTokens("{SPOKENCMD:" & cmdIndex.ToString() & "}")) IsNot nothing)
                spokenCommands = spokenCommands + vaProxy.Utility.ParseTokens("{SPOKENCMD:" & cmdIndex.ToString() & "}") + ";"
            end if
        next

        if (not(spokenCommands = ""))
            VA.SetText("~avcs_qcc_options_choices", spokenCommands.ToString())
        end if

    End Sub

End Class