|
|||||||||||
| 技術(shù)交流 | 電路欣賞 | 工控天地 | 數(shù)字廣電 | 通信技術(shù) | 電源技術(shù) | 測控之家 | EMC技術(shù) | ARM技術(shù) | EDA技術(shù) | PCB技術(shù) | 嵌入式系統(tǒng) 驅(qū)動編程 | 集成電路 | 器件替換 | 模擬技術(shù) | 新手園地 | 單 片 機 | DSP技術(shù) | MCU技術(shù) | IC 設(shè)計 | IC 產(chǎn)業(yè) | CAN-bus/DeviceNe |
鍵控流水燈程序 |
| 作者：gaowf2651 欄目：單片機 |
BINCNT.ASM 鍵控流水燈——HAMPIC項目之一，供套件測試用。 ; ; 下載： http://www.qsl.net/bd6cr/hampic/soft/bincnt.hex ; ;-----------------------------------------------------------------------; ;-----------------------------------------------------------------------; ; 作者：榮新華 BD6CR 2001年12月9日 ; ;-----------------------------------------------------------------------; LIST P=16F84 ; 告訴編譯程序使用何種PIC單片機 INCLUDE "p16f84.inc" ; 定義了特殊寄存器等內(nèi)容的頭文件 ERRORLEVEL -224 __CONFIG _PWRTE_ON & _XT_OSC & _WDT_OFF ; 配置字 ;變量定義 L1 EQU 0x20 L2 EQU 0x21 L3 EQU 0x22 ORG 0 ; 程序從零地址開始 ;-----------------------------------------------------------------------; ; 我們設(shè)置了PORTA4為輸入，PORTA0-3為輸出，PORTB0-7均為輸出 ; ;-----------------------------------------------------------------------; movlw B'00010000' ; 1代表輸入，0代表輸出 tris PORTA ; 設(shè)置PORTA movlw B'00000000' tris PORTB ; 設(shè)置PORTB ;-----------------------------------------------------------------------; ; 這里是主程序 ; ;-----------------------------------------------------------------------; movlw B'00000001' movwf PORTB ; 初始為00000001 bcf STATUS,C ; 清空狀態(tài)位C，以免出現(xiàn)不確定狀態(tài) loop: btfss PORTA,4 ; 只有PORTA4是高電平方可流水顯示 goto loop ; 否則再檢查PORTA4的電平 rrf PORTB, f ; 循環(huán)右移位 movlw .1 ; 延時程序，用循環(huán)的方式 movwf L1 loop1 movlw .255 movwf L2 loop2 movlw .255 movwf L3 loop3 decfsz L3, f goto loop3 decfsz L2, f goto loop2 decfsz L1, f goto loop1 goto loop ; 單片機程序沒有結(jié)束退出的概念 end ; 形式上的程序結(jié)束 |
| 2樓： | >>參與討論 |
| 作者： gaowf2651 于 2004/1/9 16:36:00 發(fā)布：
? |
|
|
|
| 免費注冊為維庫電子開發(fā)網(wǎng)會員，參與電子工程師社區(qū)討論，點此進入 |
Copyright © 1998-2006 m.58mhw.cn 浙ICP證030469號 |