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