newmenu multiplayer

menuitem "Join a server"		"showmenu server"
menuitem "Update servers"		"updatefrommaster; showmenu server"
menuitem "Join LAN Game"		"lanconnect"
menuitem "Disconnect"			"disconnect"
menuitem "Server voting..."		[ showmenu "Server voting" ]
menuitem "Chat"				"saycommand"
menuitem "Team Chat"			"saycommand %"
menuitem "VoiceCom"			"showmenu voicecom"

newmenu "Server voting"

menuitem "Vote to change mode/map" 		"showmenu Gamemode"
menuitem "Vote to change mastermode" 		"showmenu Mastermode"
menuitem "Vote to force a team change" 		[ showmenu "force team" ]
menuitem "Vote to kick a player"		[showmenu "kick player"]
menuitem "Vote to ban a player" 		[showmenu "ban player"]
menuitem "Vote to remove bans"			"removebans"

newmenu Gamemode

menuitem "Team Deathmatch"		"mode 0; showmenu maps"
menuitem "Deathmatch"			"mode 2; showmenu maps"
menuitem "Team Survivor"		"mode 4; showmenu maps"
menuitem "Survivor"			"mode 3; showmenu maps"
menuitem "Capture the Flag"		"mode 5; showmenu maps_ctf"
menuitem "Pistol Frenzy"		"mode 6; showmenu maps"
menuitem "Last Swiss Standing"		"mode 9; showmenu maps"
menuitem "One Shot, One Kill"		"mode 10; showmenu maps"
menuitem "Team One Shot, One Kill"	"mode 11; showmenu maps"


newmenu Mastermode

menuitem "Unlock the server (open)"		"mastermode 0"
menuitem "Lock the server (private)"		"mastermode 1"


newmenu voicecom 1 1

menuitem "1. Team Commands" [showmenu "Team Commands"]
menuitem "2. Team State" [showmenu "Team State"]
menuitem "3. Team Talk" [showmenu "Team Talk"]
menuitem "4. Team Shouts" [showmenu "Team Shouts"]
menuitem "5. 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
]


newmenu "Team Commands" 1 1

genvcitem "Come on, move!"              comeonmove          1
genvcitem "Cover me!"                   coverme             2
genvcitem "Spread out!"                 spreadout           3
genvcitem "Stay here!"                  stayhere            4
genvcitem "Stay together!"              staytogether        5
genvcitem "Defend the flag!"            defendtheflag       6
genvcitem "Recover the flag!"           recovertheflag      7


newmenu "Team State" 1 1

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

newmenu "Team Talk" 1 1

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 "Sorry"                                               sorry                               3
genvcitem "I'm on your team, man!"                              imonyourteamman                     4
genvcitem ["We did it!" "Go get 'em boys!" "Good job, team!"]   "wedidit gogetemboys goodjobteam"   5

newmenu "Public Talk" 1 1

genvcitem "Nice shot"                   niceshot            1