lgladsden/jf-roku
1
0
Fork 0
Code Issues 1 Pull Requests Packages Projects Releases Wiki Activity

Break out functions into their own files

Browse Source
This commit is contained in:
Nick Bisby 2019-03-06 21:14:04 -06:00
parent 05b4c9d2f5
commit cf76f86150
No known key found for this signature in database
GPG Key ID: F6E0C4E6D0B5EB36
1 changed files with 0 additions and 149 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

149
source/Main.brs
View File

@ -25,155 +25,6 @@ sub Main()
ShowLibrarySelect() ShowLibrarySelect()
end sub end sub
sub ShowServerSelect()
port = CreateObject("roMessagePort")
screen = CreateObject("roSGScreen")
screen.setMessagePort(port)
scene = screen.CreateScene("ConfigScene")
screen.show()
scene.findNode("prompt").text = "Connect to Serviette"
config = scene.findNode("configOptions")
items = [
{"field": "server", "label": "Host", "type": "string"},
{"field": "port", "label": "Port", "type": "string"}
]
config.callfunc("setData", items)
button = scene.findNode("submit")
button.observeField("buttonSelected", port)
server_hostname = config.content.getChild(0)
server_port = config.content.getChild(1)
while(true)
msg = wait(0, port)
if type(msg) = "roSGScreenEvent" and msg.isScreenClosed()
return
else if type(msg) = "roSGNodeEvent"
node = msg.getNode()
if node = "submit"
set_setting("server", server_hostname.value)
set_setting("port", server_port.value)
return
end if
end if
end while
end sub
sub ShowSignInSelect()
port = CreateObject("roMessagePort")
screen = CreateObject("roSGScreen")
screen.setMessagePort(port)
scene = screen.CreateScene("ConfigScene")
screen.show()
scene.findNode("prompt").text = "Sign In"
config = scene.findNode("configOptions")
items = [
{"field": "username", "label": "Username", "type": "string"},
{"field": "password", "label": "Password", "type": "password"}
]
config.callfunc("setData", items)
button = scene.findNode("submit")
button.observeField("buttonSelected", port)
config = scene.findNode("configOptions")
username = config.content.getChild(0)
password = config.content.getChild(1)
while(true)
msg = wait(0, port)
if type(msg) = "roSGScreenEvent" and msg.isScreenClosed()
return
else if type(msg) = "roSGNodeEvent"
node = msg.getNode()
if node = "submit"
' Validate credentials
get_token(username.value, password.value)
if get_setting("active_user") <> invalid then return
print "Login attempt failed..."
end if
end if
end while
end sub
sub ShowLibrarySelect()
port = CreateObject("roMessagePort")
screen = CreateObject("roSGScreen")
screen.setMessagePort(port)
scene = screen.CreateScene("Library")
screen.show()
library = scene.findNode("LibrarySelect")
libs = LibraryList()
library.libList = libs
library.observeField("itemSelected", port)
while(true)
msg = wait(0, port)
if type(msg) = "roSGScreenEvent" and msg.isScreenClosed() then
exit while
else if itemSelectedQ(msg)
target = getMsgRowTarget(msg)
if target.libraryType = "movies"
ShowMovieOptions(target.libraryID)
else
print "Library type is not yet implemented"
end if
end if
end while
end sub
sub ShowMovieOptions(library_id)
port = CreateObject("roMessagePort")
screen = CreateObject("roSGScreen")
screen.setMessagePort(port)
scene = screen.CreateScene("Movies")
screen.show()
options = scene.findNode("MovieSelect")
options_list = ItemList(library_id)
options.movieData = options_list
options.observeField("itemSelected", port)
while true
msg = wait(0, port)
if type(msg) = "roSGScreenEvent" and msg.isScreenClosed() then
return
else if itemSelectedQ(msg)
target = getMsgRowTarget(msg)
showVideoPlayer(target.movieID)
end if
end while
end sub
sub showVideoPlayer(id)
port = CreateObject("roMessagePort")
screen = CreateObject("roSGScreen")
screen.setMessagePort(port)
scene = screen.CreateScene("Scene")
screen.show()
VideoPlayer(scene, id)
while true
msg = wait(0, port)
if type(msg) = "roSGScreenEvent" and msg.isScreenClosed() then
return
end if
end while
end sub
sub itemSelectedQ(msg) as boolean sub itemSelectedQ(msg) as boolean
' "Q" stands for "Question mark" since itemSelected? wasn't acceptable ' "Q" stands for "Question mark" since itemSelected? wasn't acceptable