
		WCLK = 0
		PauseUs 10
		SEL0 = 0
		SEL1 = 0
		SEL2 = 0
		I = DMXADRS
		GoSub PLSU
		
		SEL0 = 1
		SEL1 = 0
		SEL2 = 0
		I = DMXADRS + 1
		GoSub PLSU
		
		SEL0 = 0
		SEL1 = 1
		SEL2 = 0
		I = DMXADRS + 2
		GoSub PLSU
		
		SEL0 = 1
		SEL1 = 1
		SEL2 = 0
		I = DMXADRS +3
		GoSub PLSU
		
		SEL0 = 0
		SEL1 = 0
		SEL2 = 1
		I = DMXADRS + 4
		GoSub PLSU
		
		SEL0 = 1
		SEL1 = 0
		SEL2 = 1
		I = DMXADRS + 5
		GoSub PLSU
		
		SEL0 = 0
		SEL1 = 1
		SEL2 = 1
		I = DMXADRS + 6
		GoSub PLSU
		
		SEL0 = 1
		SEL1 = 1
		SEL2 = 1
		I = DMXADRS + 7
		GoSub PLSU
		
		WCLK = 1
		PauseUs 10
		
		Return
		
PLSU:
		PLS = 500 + (2 * GEGEVENS(I))
		PulsOut WDAT,PLS
		Return