Planet
navi homePPSaboutscreenshotsdownloaddevelopmentforum

source: code/branches/multiplayerFS15/data/gui/scripts/MultiplayerMenu.lua @ 10334

Last change on this file since 10334 was 10334, checked in by frovelli, 9 years ago

Added serverlist ping display in LAN

  • Property svn:eol-style set to native
File size: 4.8 KB
Line 
1-- MultiplayerMenu.lua
2
3local P = createMenuSheet("MultiplayerMenu")
4
5--joinMode is 1 for choice "LAN" and 2 for "Internet"
6--initial status 1
7P.joinMode = 1
8
9function P.onLoad()
10    P.multiplayerMode = "startClient"
11
12    --button are arranged in a 3x2 matrix, Join and Host buttons are in the upper left and middle, the back button in the lower right of the table
13    P:setButton(1, 1, {
14            ["button"] = winMgr:getWindow("orxonox/MultiplayerJoinButton"),
15            ["callback"]  = P.MultiplayerJoinButton_clicked
16    })
17
18    P:setButton(1, 2, {
19            ["button"] = winMgr:getWindow("orxonox/MultiplayerHostButton"),
20            ["callback"]  = P.MultiplayerHostButton_clicked
21    })
22
23    P:setButton(2, 3, {
24            ["button"] = winMgr:getWindow("orxonox/MultiplayerBackButton"),
25            ["callback"]  = P.MultiplayerBackButton_clicked
26    })
27end
28
29function P.onShow()
30    --P.showServerList()
31
32    if P.joinMode == 1 then
33        local window = winMgr:getWindow("orxonox/MultiplayerLanButton")
34        local button = tolua.cast(window,"CEGUI::RadioButton")
35        button:setSelected(true)
36    end
37    if P.joinMode == 2 then
38        local window = winMgr:getWindow("orxonox/MultiplayerInternetButton")
39        local button = tolua.cast(window,"CEGUI::RadioButton")
40        button:setSelected(true)
41    end
42end
43
44function P.LanButton_clicked(e)
45    local we = CEGUI.toWindowEventArgs(e)
46    local button = tolua.cast(we.window,"CEGUI::RadioButton")
47    P.joinMode = 1
48    if button:isSelected() == true then
49        P.showServerList()
50    end
51end
52
53function P.InternetButton_clicked(e)
54    local we = CEGUI.toWindowEventArgs(e)
55    local button = tolua.cast(we.window,"CEGUI::RadioButton")
56    P.joinMode = 2
57    if button:isSelected() == true then
58        P.showServerList()
59    end
60end
61
62function P.MultiplayerHostButton_clicked(e)
63    showMenuSheet("HostMenu", true)
64end
65
66
67function P.MultiplayerJoinButton_clicked(e)
68    local choice = winMgr:getWindow("orxonox/MultiplayerListbox"):getFirstSelectedItem()
69    local destination = nil
70    if choice then
71        local index = tolua.cast(choice, "CEGUI::ListboxItem"):getID()
72        destination = P.serverList[index][2]
73    else
74        return
75    end
76    orxonox.execute("startClient " .. destination)
77    hideAllMenuSheets()
78end
79
80function P.MultiplayerBackButton_clicked(e)
81    hideMenuSheet(P.name)
82end
83
84function P.showServerList()
85    -- LAN Discovery
86    if P.joinMode == 1 then
87        local listbox = winMgr:getWindow("orxonox/MultiplayerListbox")
88        CEGUI.toListbox(listbox):resetList()
89        local discovery = orxonox.LANDiscovery:getInstance()
90        discovery:discover()
91        P.serverList = {}
92        local index = 0
93        local servername = ""
94        local serverip = ""
95        local serverrtt = ""
96        while true do
97            servername = discovery:getServerListItemName(index)
98            if servername == "" then
99                break
100            end
101            serverip = discovery:getServerListItemIP(index)
102            if serverip == "" then
103                break
104            end
105            serverrtt = discovery:getServerListItemRTT(index)
106
107            table.insert(P.serverList, {servername, serverip, serverrtt})
108            index = index + 1
109        end
110        index = 1
111        for k,v in pairs(P.serverList) do
112            local item = CEGUI.createListboxTextItem( v[1] .. ": " .. v[2] .. " Ping: " .. v[3] .."ms" )
113            item:setID(index)
114            index = index + 1
115            item:setSelectionBrushImage(menuImageSet, "MultiListSelectionBrush")
116            CEGUI.toListbox(listbox):addItem(item)
117        end
118    -- WAN Discovery
119    elseif P.joinMode == 2 then
120        local listbox = winMgr:getWindow("orxonox/MultiplayerListbox")
121        CEGUI.toListbox(listbox):resetList()
122        local discovery = orxonox.WANDiscovery()
123        orxout("discovering." )
124        discovery:discover()
125        orxout("discovered." )
126        P.serverList = {}
127        local index = 0
128        local servername = ""
129        local serverip = ""
130        local serverrtt = ""
131        while true do
132            servername = discovery:getServerListItemName(index)
133            if servername == "" then
134                break
135            end
136            serverip = discovery:getServerListItemIP(index)
137            if serverip == "" then
138                break
139            end
140            serverrtt = discovery:getServerListItemRTT(index)
141
142            table.insert(P.serverList, {servername, serverip, serverrtt})
143            index = index + 1
144        end
145        index = 1
146        for k,v in pairs(P.serverList) do
147            local item = CEGUI.createListboxTextItem( v[1] .. ": " .. v[2] .. " Ping: " .. v[3] .."ms" )
148            item:setID(index)
149            index = index + 1
150            item:setSelectionBrushImage(menuImageSet, "MultiListSelectionBrush")
151            CEGUI.toListbox(listbox):addItem(item)
152        end
153    end
154
155end
156
157return P
Note: See TracBrowser for help on using the repository browser.