content: sub main(params as object)
      screen = createObject("roSGScreen")
      messagePort = createObject("roMessagePort")
      screen.setMessagePort(messagePort)
  
      scene = screen.CreateScene("AppScene")
  
      screen.show()
  
      while (true)
          msg = wait(2500, messagePort)
  
          if type(msg) = "roSGScreenEvent"
              if msg.isScreenClosed() then
                  return
              end if
          end if
      end while
  end sub
  