MOD A
'Smart Module to 74HC595
func main()
  dim x
  dim z

  init595(0,1,2)
  
  z=0
again:

  for x = 0 to 255
    set595m(2,x,z)
    pause 10
  next
  z = z +1
  goto again

endfunc

include lib\595.lib