電子發(fā)燒友App
適合3ePIC試驗板，愛晶產(chǎn)品銷售服務(wù)做的不好，好多C程序都是自己寫的，不過匯編程序參考一下不錯。
;------------------------------------------------------------------------------------------
;單雙位變換顯示實驗參考程序注意：此程序請用單步執(zhí)行（實驗1-1.asm）
;------------------------------------------------------------------------------------------
STATUS EQU03H;特殊功能寄存器定義
TRISD EQU88H;特殊功能寄存器定義
PORTD EQU08H;特殊功能寄存器定義
TRISE EQU89H;特殊功能寄存器定義
PORTE EQU09H;特殊功能寄存器定義
ORG0000H;復(fù)位地址
NOP;MPLAB專用語句
STBSFSTATUS，5;選擇體1
CLRFTRISD;PORTD設(shè)置為輸出
CLRFTRISE;PORTE設(shè)置為輸出
BCFSTATUS，5;選擇體0
BCF PORTE，0;RE0清零，選通LED
LOOPMOVLWB‘10101010’
MOVWFPORTD;設(shè)置PORTD的值
MOVLWB‘01010101’
MOVWFPORTD;再次設(shè)置PORTD的值
GOTOLOOP;循環(huán)操作
;------------------------------------------------------------------------------------------
END
;------------------------------------------------------------------------------------------
本文引用地址： http://www.21ic.com/app/mcu/201810/786583.htm
;------------------------------------------------------------------------------------------
;軟件延時自動計數(shù)實驗參考程序（實驗1-2.asm）
;------------------------------------------------------------------------------------------
STATUS EQU03H ;特殊功能寄存器定義
TRISD EQU88H;特殊功能寄存器定義
PORTDEQU08H;特殊功能寄存器定義
TRISE EQU89H;特殊功能寄存器定義
PORTEEQU09H;特殊功能寄存器定義
ORG0000H;復(fù)位地址
NOP;MPLAB專用語句
STBSFSTATUS，5;選擇體1
CLRF TRISD;PORTD設(shè)置為輸出
CLRF TRISE;PORTE設(shè)置為輸出
BCFSTATUS，5;選擇體0
CLRF PORTD;PORTD清零
BCF PORTE，0;RE0清零，選通LED
LOOPCALL DELAY1S;調(diào)用1S延遲程序
INCF PORTD;PORTD+1
GOTO LOOP;循環(huán)操作
;------------------------------------------------------------------------------------------
;1秒延時子程序參考程序
;------------------------------------------------------------------------------------------
DELAY1S MOVLW 06H;外循環(huán)常數(shù)
MOVWF 20H;外循環(huán)寄存器
LOP0MOVLW 0EBH;中循環(huán)常數(shù)
MOVWF 21H;中循環(huán)寄存器
LOP1MOVLW 0ECH;內(nèi)循環(huán)常數(shù)
MOVWF 22H;內(nèi)循環(huán)寄存器
LOP2DECFSZ 22H;內(nèi)循環(huán)寄存器遞減
GOTO LOP2;繼續(xù)內(nèi)循環(huán)
DECFSZ 21H;中循環(huán)寄存器遞減
GOTO LOP1;繼續(xù)中循環(huán)
DECFSZ 20H;外循環(huán)寄存器遞減
GOTO LOP0;繼續(xù)外循環(huán)
RETURN;返回
;------------------------------------------------------------------------------------------
END
;------------------------------------------------------------------------------------------
------------------------------------------------------------------------------------------
;霓虹燈顯示實驗參考程序（實驗1-3.ASM）
;------------------------------------------------------------------------------------------
STATUS EQU03H;特殊功能寄存器定義
TRISD EQU88H;特殊功能寄存器定義
PORTDEQU08H;特殊功能寄存器定義
TRISE EQU89H;特殊功能寄存器定義
PORTEEQU09H;特殊功能寄存器定義
PCLEQU02H;特殊功能寄存器定義
COUNTEREQU30H;自定義變量
ORG0000H;復(fù)位地址
NOP;MPLAB專用語句
STBSFSTATUS，5;選擇數(shù)據(jù)存儲器體1
CLRF TRISD;定義RD口為輸出
CLRF TRISE;PORTE設(shè)置為輸出
BCFSTATUS，5;選擇數(shù)據(jù)存儲器體0
CLRF PORTD;PORTD清零
BCF PORTE，0;RE0清零，選通LED
POPCLRF COUNTER;自定義變量COUNTER清0
LOOPMOVF COUNTER，0;取出變量COUNTER值
CALL TABLE;查表對應(yīng)數(shù)據(jù)
MOVWF PORTD;從PORTD輸出
CALL DELAY50MS;調(diào)用50MS延時
INCF COUNTER，1;循環(huán)變量遞增
MOVF COUNTER，0;取出當(dāng)前COUNTER變量值
SUBLW .20;是否已取出20個數(shù)據(jù)
BTFSC STATUS，2;查驗Z標(biāo)志位
GOTO POP;Z=1，表示一次循環(huán)結(jié)束，COUNTER重新復(fù)位
GOTO LOOP;返回繼續(xù)
;------------------------------------------------------------------------------------------
;數(shù)據(jù)表內(nèi)容
;------------------------------------------------------------------------------------------
TABLE
RETLWB‘00011000’;第0種顯示狀態(tài)
RETLWB‘00111100’ ;第1種顯示狀態(tài)
RETLWB‘01111110’ ;第2種顯示狀態(tài)
RETLWB‘11111111’ ;第3種顯示狀態(tài)
RETLWB‘01111110’ ;第4種顯示狀態(tài)
RETLWB‘00111100’;第5種顯示狀態(tài)
RETLWB‘00011000’ ;第6種顯示狀態(tài)
RETLWB‘00000000’;第7種顯示狀態(tài)
RETLWB‘10000001’ ;第8種顯示狀態(tài)
RETLWB‘11000011’;第9種顯示狀態(tài)
RETLWB‘11100111’ ;第10種顯示狀態(tài)
RETLWB‘11111111’;第11種顯示狀態(tài)
RETLWB‘11100111’ ;第12種顯示狀態(tài)
RETLWB‘11000011’;第13種顯示狀態(tài)
RETLWB‘10000001’ ;第14種顯示狀態(tài)
RETLWB‘00000000’;第15種顯示狀態(tài)
RETLWB‘11111111’;第16種顯示狀態(tài)
RETLWB‘00000000’;第17種顯示狀態(tài)
RETLWB‘11111111’;第18種顯示狀態(tài)
RETLWB‘00000000’;第19種顯示狀態(tài)
;------------------------------------------------------------------------------------------
;50MS軟件延時子程序
;------------------------------------------------------------------------------------------
DELAY50MS
MOVLW 41H;外循環(huán)常數(shù)
MOVWF 20H;外循環(huán)寄存器
LOOP1 MOVLW 0FFH;內(nèi)循環(huán)常數(shù)
MOVWF 21H;內(nèi)循環(huán)寄存器
LOOP2DECFSZ 21H;內(nèi)循環(huán)寄存器遞減
GOTO LOOP2 ;繼續(xù)內(nèi)循環(huán)
DECFSZ 20H;外循環(huán)寄存器遞減
GOTO LOOP1 ;繼續(xù)外循環(huán)
RETURN;返回
;------------------------------------------------------------------------------------------
END
;------------------------------------------------------------------------------------------
;------------------------------------------------------------------------------------------
;動態(tài)數(shù)碼自動計數(shù)顯示實驗參考程序（實驗2-1.asm）
;------------------------------------------------------------------------------------------
LISTP=16F877A
INCLUDE“P16F877A.INC”;頭文件的設(shè)定
;------------------------------------------------------------------------------------------
;BAW、SHW、 GEW和COUNTER變量的定義
COUNTEREQU71H;可用于循環(huán)的次數(shù)變量
QWEQU7CH;可用于十進制千位變量
BAWEQU7DH;可用于十進制百位變量
SHWEQU7EH;可用于十進制十位變量
GEWEQU7FH;可用于十進制個位變量
;------------------------------------------------------------------------------------------
ORG0000H;復(fù)位地址
NOP;MPLAB專用語句
CLRFQW
CLRFBAW
CLRFSHW
CLRFGEW;個、十、百寄存器清零
STBSFSTATUS，RP0;選擇體1
CLRFTRISD;PORTD設(shè)置為輸出
MOVLWB‘11100001’
MOVWFTRISB;PORTB的B2-5設(shè)置為輸出，其余輸入
BCFSTATUS，RP0;選擇體0
CLRFPORTD;PORTD清零
LGEWMOVFGEW，W;個位計數(shù)處理
SUBLW09H
BTFSCSTATUS，Z
GOTOLSHW;個位有進位，轉(zhuǎn)十位計數(shù)處理
INCFGEW，F(xiàn);無進位，各位加1
MOVFGEW，W
MOVWF60H;存入個位寄存器
GOTOPINC;數(shù)值動態(tài)顯示
LSHWCLRFGEW;十位計數(shù)處理
CLRF60H;個位有進位，個位清零
MOVFSHW，W;十位處理
SUBLW09H
BTFSCSTATUS，Z
GOTOLBAW;十位有進位，轉(zhuǎn)百位計數(shù)處理
INCFSHW，F(xiàn)
MOVFSHW，W
MOVWF61H
GOTOPINC;數(shù)值動態(tài)顯示
LBAWCLRFSHW;百位計數(shù)處理
CLRF61H;百位有進位，十位清零
MOVFBAW，W
SUBLW09H
BTFSCSTATUS，Z
GOTOLQW;百位有進位，轉(zhuǎn)千位計數(shù)處理
INCFBAW，F(xiàn)
MOVFBAW，W
MOVWF62H
GOTOPINC
LQWCLRFBAW;千位計數(shù)處理
CLRF62H;千位有進位，百位清零
MOVFQW，W
SUBLW09H
BTFSCSTATUS，Z
GOTOQL;千位有進位，轉(zhuǎn)清零處理
INCFQW，F(xiàn)
MOVFQW，W
MOVWF63H
GOTOPINC
QLCLRFGEW;個位計數(shù)處理
CLRFSHW;十位計數(shù)處理
CLRFBAW;百位計數(shù)處理
CLRFQW;千位計數(shù)處理
PINCNOP;數(shù)值動態(tài)顯示處理
DTJPMOVLW19H
MOVWFCOUNTER;遞增計數(shù)時間常數(shù)設(shè)置
LJ DECFSZCOUNTER，1
GOTOLS;時間未到，繼續(xù)動態(tài)掃描顯示
GOTOLR;時間到，遞增計數(shù)
LSBCFPORTB，1;顯示個位數(shù)值編碼
BSFPORTB，2
BSFPORTB，3
BSFPORTB，4
MOVFGEW，W
CALLBMA;調(diào)要顯示的數(shù)值的編碼
MOVWFPORTD
CALLDELAY10MS;動態(tài)掃描轉(zhuǎn)換時間控制
BSFPORTB，1;顯示十位數(shù)值編碼
BCFPORTB，2
BSFPORTB，3
BSFPORTB，4
MOVFSHW，W
CALLBMA;調(diào)要顯示的數(shù)值的編碼
MOVWFPORTD
CALLDELAY10MS;調(diào)用延時10MS程序
BSFPORTB，1;顯示百位數(shù)值的編碼
BSFPORTB，2
BCFPORTB，3
BSFPORTB，4
MOVFBAW，W
CALLBMA;調(diào)要顯示的數(shù)值的編碼
MOVWFPORTD
CALLDELAY10MS;調(diào)用延時10MS程序
BSFPORTB，1;顯示千位數(shù)值的編碼
BSFPORTB，2
BSFPORTB，3
BCFPORTB，4
MOVFQW，W
CALLBMA;調(diào)要顯示的數(shù)值的編碼
MOVWFPORTD
CALLDELAY10MS;調(diào)用延時10MS程序
GOTO LJ;返回顯示時間記時
LR GOTOLGEW;返回主程序
;-----------------------------------------------------------------------------------------
;10MS延時
;-----------------------------------------------------------------------------------------
DELAY10MS
MOVLW03H;0fh外循環(huán)常數(shù)
MOVWF20H;外循環(huán)寄存器
LOOP2MOVLW0FFH;中循環(huán)常數(shù)
MOVWF21H;中循環(huán)寄存器
L01DECFSZ21H，1;中循環(huán)寄存器遞減
GOTOL01;繼續(xù)中循環(huán)
DECFSZ20H，1;外循環(huán)寄存器遞減
GOTOLOOP2;繼續(xù)外循環(huán)
RETURN;返回
;------------------------------------------------------------------------------------------
;編碼查詢
;------------------------------------------------------------------------------------------
BMAADDWFPCL，F(xiàn);考察偏移量
RETLW3FH;“0” 編碼
RETLW06H;“1” 編碼
RETLW5BH;“2” 編碼
RETLW4FH;“3” 編碼
RETLW66H;“4” 編碼
RETLW6DH;“5” 編碼
RETLW7DH;“6” 編碼
RETLW07H;“7” 編碼
RETLW7FH;“8” 編碼
RETLW6FH;“9” 編碼
;------------------------------------------------------------------------------------------
END
;------------------------------------------------------------------------------------------
;------------------------------------------------------------------------------------------
;高4位自動計數(shù)低4位手動計數(shù)顯示實驗參考程序（實驗2-2.asm）
;------------------------------------------------------------------------------------------
LISTP=16F877A
INCLUDE“P16F877A.INC”;頭文件的設(shè)定
;------------------------------------------------------------------------------------------
AAAEQU10H;高4位計數(shù)遞增常數(shù)
GSWEQU30H;高4位值寄存器
DSWEQU31H;低4位值寄存器
ORG0000H ;復(fù)位地址
NOP ;MPLAB專用語句
STBSFSTATUS，RP0;選擇體1
MOVLW00H
MOVWFTRISD;PORTD設(shè)置為輸出
MOVLW0FFH
MOVWFTRISB;PORTB設(shè)置為輸入
MOVLW0FFH
MOVWFTRISC;PORTC設(shè)置為輸入
CLRFTRISE;PORTE設(shè)置為輸出
BCFSTATUS，RP0;選擇體0
CLRFPORTD;PORTD端口清零
BCF PORTE，0;RE0清零，選通LED
CLRFGSW;高4位值寄存器清零
CLRFDSW;低4位值寄存器清零
GOTOMAIN;轉(zhuǎn)至MAIN
MAINNOP;高4位自動計數(shù)程序段
MOVLWAAA;送高4位計數(shù)遞增常數(shù)
ADDWFPORTD，W
ANDLW0F0H;屏蔽低4位
MOVWFGSW
ADDWFDSW，W;高4位與低4位合成
MOVWFPORTD;送顯
CALLDELAY1S;調(diào)用延時約1秒的子程序
GOTOMAIN
DELAY1S;含按鍵掃描的1秒延時子程序
MOVLW6H
MOVWF20H
LP2MOVLW0EAH
MOVWF21H
LP1MOVLW0FFH
MOVWF22H
J0BTFSCPORTC，5;J0按下么？
GOTOJ1;去判斷J1是否按下
CALLDELAY10MS;防抖動延遲
BTFSCPORTC，5;J0按下確認
GOTOJ1;去判斷J1是否按下
PP0BTFSSPORTC，5;J0按下，判J0是否釋放
GOTOPP0;沒有釋放，再判
CALLDELAY10MS;防抖動延遲
BTFSSPORTC，5;J0可靠釋放？
GOTOPP0;不確定，則再判J0是否釋放
INCFPORTD，W;D口加1
ANDLW0FH;屏蔽高四位
MOVWFDSW;送入低4位值存儲器
ADDWFGSW，W;高四位加1
MOVWFPORTD;送D口顯示
J1 BTFSCPORTB，0;J1按下么？
GOTOLP0;J1沒有按下，轉(zhuǎn)到LP0延遲
CALLDELAY10MS;防抖動延遲
BTFSCPORTB，0;J1可靠按下？
GOTOLP0;J1沒有按下，轉(zhuǎn)到LP0延遲
PP1BTFSSPORTB，0;J1按下，判J1是否釋放
GOTOPP1;沒有釋放，再判
CALLDELAY10MS;防抖動延時
BTFSSPORTB，0;J1可靠釋放？
GOTOPP1;不確定，則再判J1是否釋放
DECFPORTD，W;D口減1
ANDLW0FH;屏蔽高四位
MOVWFDSW;送入低4位值存儲器
ADDWFGSW，W;高四位加1
MOVWFPORTD;送D口顯示
LP0DECFSZ22H，F(xiàn);延遲程序
GOTOLP0
DECFSZ21H，F(xiàn)
GOTOLP1
DECFSZ20H，F(xiàn)
GOTOLP2
RETURN
DELAY10MS
MOVLW0FH;外循環(huán)常數(shù)
MOVWF23H;外循環(huán)寄存器
LOOP2MOVLW0FH;中循環(huán)常數(shù)
MOVWF24H;中循環(huán)寄存器
L01DECFSZ24H，F(xiàn);中循環(huán)寄存器遞減
GOTOL01;繼續(xù)中循環(huán)
DECFSZ23H，F(xiàn);外循環(huán)寄存器遞減
GOTOLOOP2;繼續(xù)外循環(huán)
RETURN;返回
;------------------------------------------------------------------------------------------
END
;------------------------------------------------------------------------------------------
;------------------------------------------------------------------------------------------
;電平變化基本計數(shù)實驗參考程序（實驗2-3.ASM）
;------------------------------------------------------------------------------------------
LISTP=16F877A
INCLUDE“P16F877A.INC”
PB_TEMPEQU40H;定義PORTB臨時備份寄存器
;------------------------------------------------------------------------------------------
ORG0000H;復(fù)位地址
NOP;MPLAB專用語句
GOTOST;進入主程序
;------------------------------------------------------------------------------------------
;中斷服務(wù)程序
;------------------------------------------------------------------------------------------
ORG0004H;中斷程序入口地址
MOVFPORTB，W;PORTB 內(nèi)容放到W
MOVWFPB_TEMP;W內(nèi)容放到PB_TEMP
BTFSSPB_TEMP，4;判斷RB4是否為低電平
GOTOPP4;是RB4輸入，轉(zhuǎn)到PP4執(zhí)行PORTD加1
BTFSSPB_TEMP，5;判斷RB5是否為低電平
DECFPORTD;RB5低電平，是RB5輸入，執(zhí)行PORTD減1
PPQBCFINTCON，RBIF;B口電平中斷標(biāo)志位清零
RETFIE;中斷返回
PP4INCFPORTD;PORTD加1
GOTOPPQ;轉(zhuǎn)到PPQ退出中斷
;------------------------------------------------------------------------------------------
;系統(tǒng)主程序
;------------------------------------------------------------------------------------------
STBSFSTATUS，5;選擇數(shù)據(jù)存儲器體1
CLRFTRISD;定義RD口為輸出
BSF TRISB，4;定義RB4、RB5為輸入
BSF TRISB，5
CLRFTRISE;PORTE設(shè)置為輸出
BCFSTATUS，5;選擇數(shù)據(jù)存儲器體0
MOVLWB‘10001000’;開啟RB口電平變化中斷
MOVWFINTCON;送W數(shù)據(jù)到INTCON
CLRFPORTD;PORTD口清零
BCF PORTE，0;RE0清零，選通LED
GOTO$;原地等待
;------------------------------------------------------------------------------------------
END
;------------------------------------------------------------------------------------------
;LCD顯示本站網(wǎng)址和電話實驗參考程序（實驗2-4.ASM）
;進一步熟悉查表程序的用法，LCD的讀寫方法。
;------------------------------------------------------------------------------------------
LISTP=16F877A
INCLUDE“P16F877A.INC”
INCLUDE“MY.INC”;COUNT、TEMP變量已經(jīng)定義
;------------------------------------------------------------------------------------------
EEQU03H;LCD片選信號腳定義在RB.3腳
RWEQU02H;LCD讀/寫信號腳定義在RB.2腳
RSEQU01H ;LCD寄存器選擇信號腳定義在RB.1腳
;------------------------------------------------------------------------------------------
ORG 0000H
NOP ;放置一條ICD必需的空操作指令
GOTO MAIN
ORG 0008H
;------------------------------------------------------------------------------------------
TABLE ;取第一行的顯示碼WWW.AJDZ.NET
ADDWF PCL，1 ;地址偏移量加當(dāng)前PC值
RETLW ‘ ’
RETLW ‘ ’
RETLW ‘W’
RETLW ‘W’
RETLW ‘W’
RETLW ‘?！?/p>
RETLW ‘A’
RETLW ‘J’
RETLW ‘D’
RETLW ‘Z’
RETLW ‘?！?/p>
RETLW ‘N’
RETLW ‘E’
RETLW ‘T’
RETLW ‘ ’
RETLW ‘ ’
RETLW 00H;數(shù)據(jù)結(jié)束標(biāo)記
;------------------------------------------------------------------------------------------
TABLE1 ;取第二行的顯示碼TEL0575 2263178
ADDWF PCL，1 ;地址偏移量加當(dāng)前PC值
RETLW ‘T’
RETLW ‘E’
RETLW ‘L’
RETLW ‘：’
RETLW ‘0’
RETLW ‘5’
RETLW ‘7’
RETLW ‘5’
RETLW ‘-’
RETLW ‘2’
RETLW ‘2’
RETLW ‘6’
RETLW ‘3’
RETLW ‘1’
RETLW ‘7’
RETLW ‘8’
RETLW 00H;數(shù)據(jù)結(jié)束標(biāo)記
;------------------------------------------------------------------------------------------
MAIN
BSFSTATUS，RP0;選擇體1
MOVLW B‘11110001’
MOVWF TRISB;PORTB的B1-3定義為輸出，其余為輸入
CLRF TRISD;PORTD端口定義為輸出
BCF STATUS，RP0
CALL DELAY ;調(diào)用延時，剛上電LCD復(fù)位不一定有PIC快
MOVLW 01H
MOVWF PORTD ;清屏
CALL ENABLE
MOVLW 38H
MOVWF PORTD ;8位2行5x7點陣
CALL ENABLE
MOVLW 0FH ;顯示器開、光標(biāo)開、閃爍開
MOVWF PORTD
CALL ENABLE
MOVLW 06H ;文字不動，光標(biāo)自動右移
MOVWF PORTD
CALL ENABLE
MOVLW 80H
MOVWF PORTD ;顯示位置
CALL ENABLE
CALL WRITE1 ;調(diào)用送第一行數(shù)子程序“WWW.AJDZ.NET“
MOVLW 0C0H
MOVWF PORTD ;第一行的位置
CALL ENABLE
CALL WRITE2 ;調(diào)用送第二行數(shù)子程序“TEL0575 2263178”
MOVLW 0C2H
MOVWF PORTD ;第二行的位置
CALL ENABLE
GOTO $
;------------------------------------------------------------------------------------------
WRITE1
CLRF COUNT ;送第一行數(shù)字程序
LOOP1
MOVFW COUNT
CALL TABLE
MOVWF TEMP
CALL DATA2LCD
INCF COUNT，F(xiàn)
MOVFW TEMP
XORLW 00H;只影響標(biāo)記位
BTFSS STATUS，Z;判斷第1行數(shù)據(jù)是否讀完，未讀完則繼續(xù)讀
GOTO LOOP1
RETLW 0
;------------------------------------------------------------------------------------------
WRITE2 ;送第二行數(shù)子程序
CLRF COUNT
LOOP2
MOVFW COUNT
CALL TABLE1
MOVWF TEMP
CALL DATA2LCD
INCF COUNT，1
MOVFW TEMP
XORLW 00H
BTFSS STATUS，Z
GOTO LOOP2
RETLW 0
;------------------------------------------------------------------------------------------
DATA2LCD ;送數(shù)據(jù)到LCD子程序
MOVWF PORTD
BSF PORTB，RS
BCF PORTB，RW
BCF PORTB，E
CALL DELAY
BSF PORTB，E
RETLW 0
;------------------------------------------------------------------------------------------
ENABLE
BCF PORTB，RS ;寫入控制命令的子程序
BCF PORTB，RW
BCF PORTB，E
CALL DELAY
BSF PORTB，E
RETLW 0
;------------------------------------------------------------------------------------------
DELAY
movlw 0ffh ;將外層循環(huán)參數(shù)值FFH經(jīng)過W
movwf 20h ;送入用作外循環(huán)變量的20H單元
lp0movlw 0ffh ;將內(nèi)層循環(huán)參數(shù)值FFH經(jīng)過W
movwf 21h ;送入用作內(nèi)循環(huán)變量的21H單元
lp1decfsz 21h，1 ;變量21H內(nèi)容遞減，若為0跳躍
goto lp1 ;跳轉(zhuǎn)到LP1處
decfsz 20h，1 ;變量20H內(nèi)容遞減，若為0跳躍
goto lp0 ;跳躍到LP0處
return ;返回主程序
;------------------------------------------------------------------------------------------
END
;------------------------------------------------------------------------------------------
工商網(wǎng)監(jiān)
評論