Entry:
	LDS	#RAMEnd+1 		
	BSET	DDRB,%11111111	
	MOVB	#$80,ATD0CTL2	
	JSR  DELAY20uS	
	MOVB	#$08,ATD0CTL3
 	MOVB	#$E3,ATD0CTL4
 	MOVB	#$A2,ATD0CTL5	
H2	BRCLR	ATD0STAT0,mATD0STAT0_SCF,H2 
	LDAA	ATD0DR0L		
	STAA	PORTB			
	JSR	TDELAY		
	BRA	H2