[vatit]

đaay là code cảu mình :

LIST P=16F84A
	INCLUDE P16F84A.INC
REG_L EQU 0x0C
REG_M EQU 0x0B
REG_H EQU 0x0D
	ORG H'00'

MAIN BSF STATUS,5
	MOVLW 0x00
	MOVWF TRISB
	BCF STATUS,5
BATDAU MOVLW B'00000001'
	MOVWF PORTB	
	CALL DELAY05S
	CALL DELAY05S
	CALL DELAY05S
	MOVLW B'00000010'
	MOVWF PORTB	
	CALL DELAY05S
	CALL DELAY05S
	CALL DELAY05S
	GOTO BATDAU

DELAY05S CLRF REG_L
	CLRF REG_M
	MOVLW H'02'
	MOVWF REG_H
LOOP NOP
	DECFSZ REG_L
	GOTO LOOP
	NOP
	DECFSZ REG_M
	GOTO LOOP
	NOP
	DECFSZ REG_H
	GOTO LOOP
	RETURN
	END