newmenu voicecom 1 1

menuitem "1. Team Replies" [showmenu "Team Replies"]
menuitem "2. Team Commands" [showmenu "Team Commands"]
menuitem "3. Team State" [showmenu "Team State"]
menuitem "4. Team Talk" [showmenu "Team Talk"]
menuitem "5. Team Tactics" [showmenu "Team Tactics"]
menuitem "6. Public Talk" [showmenu "Public Talk"]


alias vcrnd [ // pick random shout if possible
    alias len (listlen $arg1)
    if (> $len 1) [
        alias r (rnd $len)
        voicecom (at $arg1 $r) (at $arg2 $r)
    ] [
        voicecom $arg1 $arg2
    ]
]


alias genvcitem [
    if (> (listlen $arg2) 1) [ alias text (at $arg1 0) ] [ alias text $arg1 ] // split multiple shouts
    alias action (concatword vcrnd " [" $arg2 "]" " [" $arg1 "]")
    menuitem (concatword $arg3 ". " $text) $action // add as numbered list
]

// V 1 [ 1,2 ]
newmenu "Team Replies" 1 1
// the following two mirror F1/F2 - disagree/agree
genvcitem [Yes Affirmative "All right, Sir"]                    "yes affirmative allrightsir"       1 // #
genvcitem ["Negative" "No can do" "There's no way, Sir!"]       "negative nocando theresnowaysir"   2 // *
genvcitem ["On the move" "On my way"]                			"onthemove_1 onthemove_2"           3
genvcitem ["Got your back!" "Got you covered!"]                 "igotyourback igotyoucovered"       4
genvcitem ["In Position!" "In Position now!"]                   "inposition_1 inposition_2"         5

// V 2 [ 1,2,3 ]
newmenu "Team Commands" 1 1
genvcitem "Recover the flag!"                                   recovertheflag                      1 // *
genvcitem "Defend the flag!"                                    defendtheflag                       2 // #
genvcitem ["Come on, move!" "Spread Out!"]                      "comeonmove spreadout"              3 // *

// V 3 [ 2,3,4 ]
newmenu "Team State" 1 1
genvcitem "I'm attacking"                                       imattacking                         1
genvcitem "Coming in with the flag!"                            cominginwiththeflag                 2 // *
genvcitem "I made contact"                                      imadecontact                        3 // #
genvcitem ["Enemy down" "I got one"]                            "enemydown igotone"                 4 // *
genvcitem "I'm on defense"                                      imondefense                         5

// V 4 [ 1,2,3 ]
newmenu "Team Talk" 1 1
genvcitem ["We did it!" "Go get 'em boys!" "Good job, team!"]   "wedidit gogetemboys goodjobteam"   1
genvcitem "Sorry"                                               sorry                               2
genvcitem "I'm on your team, man!"                              imonyourteamman                     3 // *

// V 5 [ 1,2,3 ]
newmenu "Team Tactics" 1 1
genvcitem "Cover me!"                                           coverme                             1
genvcitem "Stay together!"                                      staytogether                        2
genvcitem "Stay here!"                                          stayhere                            3
genvcitem "Report In!"                                          reportin                            4 // *

// V 6 [ 1,2,3 ]
newmenu "Public Talk" 1 1
genvcitem "Nice shot"                   niceshot              1
genvcitem ["Thanks!" "Thanks, man"]     "thanks_1 thanks_2"   2
genvcitem ["Awesome" "Awesome!"]        "awesome_1 awesome_2" 3
