test.brs

gpioPort = CreateObject("roControlPort", "BrightSign")
  print "About to Setup GIPO"
  if gpioPort <> invalid then
    print "GPIO VALID"
    stop
    gpioPort.SetPort(m.player.msgPort)
    for i=0 to 8 step 1
       result = gpioPort.EnableInput(i)
       if result then
         print "Successfully listining on pin " + strI(i)
       else
         print "Failed to listen to pin" + strI(i)
       endif
    end for
  endif