tallht
17-07-2008, 09:25 AM
Processor 16f877a
Include <p16f877a.inc>
__config _xt_osc & _wdt_off & _cp_off & _boden_off & _lvp_off
;*****************************************
Banksel Trisd
Clrf Trisd
Banksel Portd
Loop Clrf Portd
Call Delay
Movlw 0xaa
Movwf Portd
Call Delay
Goto Loop
Delay Movlw B'10000000' ;khoi Dong Timer 0 Che Do Timer
Movwf Option_reg
Movlw B'10100000' ;cho Phep Timer 0 Ngat
Movwf Intcon
Btfss Intcon,tmr0if ;kiem Tra Co Ngat
Goto $-1 ;neu Bang 0 Thi Tiep Tuc Kiem Tra
Bcf Intcon,tmr0if ;xoa Co Tran
Return ;bang 1 Thi Quay Ve Ct Chinh
End
Em Dùng đoạn Code Trên để Tạo Trễ Làm Cho đèn Led Nhấp Nháy Trên Port D Của 16f877a .dịch Ra File Hex Thì Không Báo Lỗi Gì Nhưng Nạp Vào Proteus Thì Nó Không Nhấp Nháy Gì Hết.các đèn Led Chỉ Tối Thui Do Lệnh Clrf Lúc đầu Thôi?
Include <p16f877a.inc>
__config _xt_osc & _wdt_off & _cp_off & _boden_off & _lvp_off
;*****************************************
Banksel Trisd
Clrf Trisd
Banksel Portd
Loop Clrf Portd
Call Delay
Movlw 0xaa
Movwf Portd
Call Delay
Goto Loop
Delay Movlw B'10000000' ;khoi Dong Timer 0 Che Do Timer
Movwf Option_reg
Movlw B'10100000' ;cho Phep Timer 0 Ngat
Movwf Intcon
Btfss Intcon,tmr0if ;kiem Tra Co Ngat
Goto $-1 ;neu Bang 0 Thi Tiep Tuc Kiem Tra
Bcf Intcon,tmr0if ;xoa Co Tran
Return ;bang 1 Thi Quay Ve Ct Chinh
End
Em Dùng đoạn Code Trên để Tạo Trễ Làm Cho đèn Led Nhấp Nháy Trên Port D Của 16f877a .dịch Ra File Hex Thì Không Báo Lỗi Gì Nhưng Nạp Vào Proteus Thì Nó Không Nhấp Nháy Gì Hết.các đèn Led Chỉ Tối Thui Do Lệnh Clrf Lúc đầu Thôi?