roku_family_photos.git

@@ -30,6 +30,7 @@ Sub Main()

           msg = wait(0, port) 

           If type(msg) = "roUniversalControlEvent" Then

                button = msg.GetInt()

+               print "button is "; button

                If ((button = 5) Or (button = 6)) and m.index < m.slideCount - 1 Then

                     print "Show Next Slide"

@@ -39,6 +40,8 @@ Sub Main()

                     print "Show Previous Slide"

                     m.index = m.index - 1

                     ChangeSlide()

+               Else If (button = 10) Then

+                    DisplayDialog()

                End If

           End If

@@ -47,6 +50,39 @@ Sub Main()

 End Sub

+Function DisplayDialog()

+     dialog = CreateObject("roPinEntryDialog")

+     dialog.SetMessagePort(CreateObject("roMessagePort"))

+     dialog.EnableOverlay(true)

+     dialog.EnableBackButton(true)

+     dialog.SetNumPinEntryFields(4)

+     dialog.SetTitle("Enter your Roku PIN to begin your free trial.")

+     dialog.AddButton(1, "Continue")

+     dialog.AddButton(99, "Back")

+     dialog.Show()

+     While True

+          msg = wait(0, dialog.GetMessagePort())

+          If msg <> invalid

+               print "msg is "; msg

+               if msg.isScreenClosed()

+                    print "msg is isScreenClosed"; msg

+                    exit while

+               Else If msg.isButtonPressed()

+                    print "the index of the button pressed is"; msg.GetIndex()

+                    If msg.GetIndex() = 1 Then

+                         print "The user entereded PIN "; dialog.Pin()

+                    Else If msg.GetIndex() = 99 Then

+                         print "The user cancelled."

+                    Endif

+                    exit while

+               End If

+          End If

+     End While

+     print "Just before dialog.Close"

+     dialog.Close()

+End Function

+

+

 Function ChangeSlide()

      If m.index < 0 Then