CLRF TRISD 		
	MOVLW D'100'
	MOVWF PR2			
	MOVLW D'50'
	MOVWF ECCPR1L		
	MOVLW 0xCF
	MOVWF ECCP1CON		
	MOVLW 0x24
	MOVWF T2CON		
AGAIN CLRF TMR2			
	BCF	PIR1,TMR2IF	
WAIT	BTFSS PIR1,TMR2IF	
	BRA	WAIT
	BRA	AGAIN