'Shift Register 595 Demo
func main()
dim x

HC595init(0,1,2)

again:

for x = 0 to 255
   HC595write(x)
   pause 10
 next

   goto again

endfunc

include \lib\Dios595.lib