|
;====================================
;ex1
LIST P=P16F84
#INCLUDE "P16F84.INC"
;*************************
ORG 0x000
GOTO MAIN
ORG 0x005
MAIN
;*************************
BSF STATUS,RP0
CLRW
MOVWF TRISA
MOVWF TRISB
BCF STATUS,RP0
;============================
LOOP
MOVLW 0FFH
MOVWF PORTA
MOVWF PORTB
CALL DELAY
CLRW
MOVWF PORTA
MOVWF PORTB
CALL DELAY
GOTO LOOP
DELAY
DECFSZ D'255',1
DECFSZ D'100',1
GOTO DELAY
RETURN
END[/QUOTE]
|