content: sub Main()
    showChannelSGScreen()
  end sub
  
  sub showChannelSGScreen()
    screen = CreateObject("roSGScreen")
    m.port = CreateObject("roMessagePort")
    screen.setMessagePort(m.port)
    scene = screen.CreateScene("MainScene")
    screen.show()
  
    while(true)
      msg = wait(0, m.port)
      msgType = type(msg)
      if msgType = "roSGNodeEvent"
        if (msg.GetField() = "closeApp")
          screen.close()
        end if
      end if
      if msgType = "roSGScreenEvent"
          if msg.isScreenClosed() then return
      end if
    end while
  end sub
  