func main()
  dim datin

  HC165init(0,1,2)
 
loop:
  datin = HC165read()
  print datin
  goto loop


endfunc



include \lib\Dios165.lib