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" ]

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

genvcitem = [
  if (> (listlen $arg2) 1) [ text = (at $arg1 0) ] [ text = $arg1 ] // split multiple shouts
  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