51單片機實用程序庫 
  

 4.1 流水燈
程序介紹：利用P1 口通過一定延時輪流產生低電平
輸出，以達到發光二極管輪流亮的效果。實際應用中例如：
廣告燈箱彩燈、霓虹燈閃爍。
程序實例（LAMP.ASM）
ORG 0000H
AJMP MAIN
ORG 0030H
MAIN:
9
MOV A,#00H
MOV P1,A ;滅所有的燈
MOV A,#11111110B
MAIN1:
MOV P1,A ;開最左邊的燈
ACALL DELAY ;延時
RL A ;將開的燈向右邊移
AJMP MAIN ;循環
DELAY:
MOV 30H,#0FFH
D1: MOV 31H,#0FFH
D2: DJNZ 31H,D2
DJNZ 30H,D1
RET
END
4.2 方波輸出
程序介紹：P1.0 口輸出高電平，延時后再輸出低電
平，循環輸出產生方波。實際應用中例如：波形發生器。
程序實例（FAN.ASM）：
ORG 0000H
MAIN:
;直接利用P1.0口產生高低電平地形成方波//////////////
ACALL DELAY
SETB P1.0
ACALL DELAY
10
CLR P1.0
AJMP MAIN
;//////////////////////////////////////////////////
DELAY:
MOV R1,#0FFH
DJNZ R1,$
RET
END
五、定時器功能實例
5.1 定時1秒報警
程序介紹：定時器1每隔1秒鐘將p1.o的輸出狀態改變1
次，以達到定時報警的目的。實際應用例如：定時報警器。
程序實例（DIN1.ASM）：
ORG 0000H
AJMP MAIN
ORG 000BH
AJMP DIN0 ;定時器0入口
MAIN:
TFLA G EQU 34H ;時間秒標志，判是否到50個
0.2秒，即50*0.2=1秒
MOV TMOD,#00000001B;定時器0工作于方式
1
MOV TL0,#0AFH
MOV TH0,#3CH ;設定時時間為0.05秒，定時
20次則一秒
11
SETB EA ;開總中斷
SETB ET0 ;開定時器0中斷允許
SETB TR0 ;開定時0運行
SETB P1.0
LOOP: AJMP LOOP
DIN0:
;是否到一秒////////////////////////////////////////
INCC: INC TFLAG
MOV A,TFLAG
CJNE A,#20,RE
MOV TFLAG,#00H
CPL P1.0
;//////////////////////////////////////////////////
RE:
MOV TL0,#0AFH
MOV TH0,#3CH ;設定時時間為0.05秒，定時
20次則一秒
RETI
END
5.2 頻率輸出公式
介紹：f=1/t
s51 使用12M晶振，一個周期是1微秒使用定時器1
工作于方式0，最大值為65535，以產生200HZ的頻率為
例：
200=1/t:推出t=0.005 秒，即5000 微秒,即一個高電
12
平或低電平的時間為2500 微秒。這樣，定時值應設為
65535-2500=63035，將它轉換為十六進制則為:F63B。
具體程序請看f200.asm
頻率遞增：
200HZ:63035:F63B
250HZ:63535:F82F
300HZ:63868:F97C
5.3 200HZ頻率輸出
程序介紹：利用定時器定時，在P1.0 口產生200HZ
的頻率輸出。實際應用例如：傳感器前級推動。
程序實例（F200.ASM）：
ORG 0000H
AJMP MAIN
ORG 001BH
AJMP DIN0
MAIN:
CLR P1.0 ;產生一個低電平，實際上
是從p1.0口產生頻率
MOV TMOD,#00010000B ;定時器1工作于方式0
MOV TH1,#0F6H
MOV TL1,#3BH ;頻率產生的時間，詳細請
見頻率公式
SETB EA ;開總中斷
13
SETB TR1 ;開定時器1運行
SETB ET1 ;開定時器1允許
LOOP: AJMP LOOP ;無限循環
DIN0: CPL P1.0 ;產生一個高電平，
下次來就是低電平（因為取反），一個高電平和一個低電平
形成一個周期
MOV TH1,#0F6H
MOV TL1,#3BH ;重置頻率產生時間
RETI ;返回
END
5.4 200——250HZ變化頻率輸出
程序介紹：利用定時器定時時間的變化，由P1.0 口
產生200——250HZ變化的頻率。實際應用例如：傳感器
前級推動、頻率發生器。
程序實例（F250.ASM）：
ORG 0000H
AJMP MAIN
ORG 001BH
AJMP DIN1
MAIN:
;定義頻率200和300//////////////////////////////////
F2H EQU 30H
F2L EQU 31H
F3H EQU 32H
F3L EQU 33H
14
;//////////////////////////////////////////////////
;定義頻率保持初值//////////////////////////////////
MOV R1,#50
MOV R2,#02H
;//////////////////////////////////////////////////
;頻率賦初值////////////////////////////////////////
MOV F2H,#0F6H
MOV F2L,#3BH
MOV F3H,#0F8H
MOV F3L,#2FH
;//////////////////////////////////////////////////
CLR P1.0 ;在P1.0口產生一個低
電平，一個脈沖是由一個高電平和一個低電平組成的
MOV TMOD,#00010000B ;定時器工作于方式1
MOV TH1,F2H
MOV TL1,F2L ;200HZ輸出
SETB EA ;開總中斷
SETB TR1 ;開定時器1運行
SETB ET1 ;開定時器1允許
LOOP: AJMP LOOP
DIN1:
CPL P1.0 ;取反P1.0口，實際
是為了不斷的將p1.0的電平關系轉換，即產生了頻率
;頻率保持時間//////////////////////////////////////
DJNZ R1,RE
MOV R1,#50
DJNZ R2,RE
MOV R2,#02H
15
;//////////////////////////////////////////////////
MOV A,F2H
CJNE A,F3H,XIA ;頻率高位到300HZ
的高位了嗎？
AJMP JIA ;頻率高位沒到
300HZ的高位值，直接將低位值加1
XIA: INC F2L
MOV A,F2L
CJNE A,#00H,RE
INC F2H
MOV A,F2H
CJNE A,F3H,RE
;/////////////////////////////////////////////
;頻率高位加到300HZ的高位值了，低位加一，到300HZ的低
位值了嗎，沒到出去，到了關定時器
JIA:
INC F2L ;到了將200HZ頻率的低位加1
MOV A,F2L
CJNE A,#F3L,RE
CLR TR1
;/////////////////////////////////////////////
RE:
MOV TH1,F2H
MOV TL1,F2L
RETI
END
16
六、數顯
0——9999顯示
程序介紹：利用S51的串行口功能，實現數碼管0—
—9999 的循環顯示。實際應用例如：電子計分牌。
程序實例（9999.ASM）：
ORG 0000H
MAIN:
GEE EQU 30H
SHI EQU 31H
BEI EQU 32H
QIAN EQU 33H ;定義個十百千
MOV GEE,#00H
MOV SHI,#00H
MOV BEI,#00H
MOV QIAN,#00H ;賦初值
MOV SCON,#00H ;串行口工作于方式
0.同步移位
;顯示個，十，百，千//////////////////////////////////
DISPLAY:
ACALL DELAY ;延時
MOV DPTR,#SETTAB
MOV A,GEE
MOVC A,@A+DPTR
MOV SBUF,A
D1: JNB TI,D1
17
CLR TI
MOV DPTR,#SETTAB
MOV A,SHI
MOVC A,@A+DPTR
MOV SBUF,A
D2: JNB TI,D2
CLR TI
MOV DPTR,#SETTAB
MOV A,BEI
MOVC A,@A+DPTR
MOV SBUF,A
D3: JNB TI,D3
CLR TI
MOV DPTR,#SETTAB
MOV A,QIAN
MOVC A,@A+DPTR
MOV SBUF,A
D4: JNB TI,D4
CLR TI
;/////////////////////////////////////////////
;個，十，百，千的依次加一/////////////////////
INC GEE
MOV A,GEE
CJNE A,#0AH,DISPLAY
MOV GEE,#00H
INC SHI
MOV A,SHI
CJNE A,#0AH,DISPLAY
18
MOV SHI,#00H
INC BEI
MOV A,BEI
CJNE A,#0AH,DISPLAY
MOV BEI,#00H
INC QIAN
MOV A,QIAN
CJNE A,#0AH,DISPLAY
MOV QIAN,#00H
AJMP DISPLAY
;//////////////////////////////////////////////////
;延時//////////////////////////////////////////////
DELAY: MOV R1,#0FFH
E1: MOV R2,#0FFH
DJNZ R2,$
DJNZ R1,E1
RET
;/////////////////////////////////////////////
SETTAB:
DB 0FCH,60H,0DAH,0F2H,66H,0B6H,0BEH,0E0H,0FEH,
F6H,0EEH,3EH,9CH,7AH,9EH,8EH ;數顯代碼
END
七、AD 轉換
7.1 AD轉換（數碼顯示）
程序介紹：利用ADC0809模擬通道3輸入電壓，經單片機
19
處理后在數碼管上用相對應的16進制數顯示出來，0—5V對
應為0--0FFH,實際應用例如：數據采集。
程序操作：程序寫完上電運行后，用本機配帶的專用起微調
圖15所示電位器，會在數碼管上看到隨不同電壓而變化的對
應16進制值。也可以用
萬用表實ADC0809IN3腳
電壓，來檢驗所對應顯
示的16進制數。
圖15
程序實例（ad.asm）:
ORG 0000H
MAIN1:
ACALL DELAY ;延時
ACALL AD ;呼叫AD子程序
;將轉換的數字量屏蔽高位低位送顯////////////////////
MOV 31H,30H
MOV A,30H
ANL A,#0FH
MOV DPTR,#SETTAB
MOVC A,@A+DPTR
MOV SBUF,A
D1: JNB TI,D1
CLR TI
;//////////////////////////////////////////////////
;將轉換的數字量屏蔽低位高位送顯////////////////////
MOV A,30H
20
ANL A,#0F0H
SWAP A
MOV DPTR,#SETTAB
MOVC A,@A+DPTR
MOV SBUF,A
D2: JNB TI,D2
CLR TI
;//////////////////////////////////////////////////
AJMP MAIN1 ;返回主程序
AD: MOV DPTR,#7F00H ;指向轉換地址
MOV A,#03H ;指向轉換口
MOVX @DPTR,A ;轉換
MOV R1,#64H
D3: DJNZ R1,D3 ;等100微秒轉換完
MOVX A,@DPTR ;轉換后的值給A
MOV 30H,A ;轉換的值給30H
RET
DELAY: ;延時
MOV R2,#0FFH
D14: MOV R3,#0FFH
D12: DJNZ R3,D12
DJNZ R2,D14
RET
SETTAB:
DB 0FCH,60H,0DAH,0F2H,66H,0B6H,0BEH,0E0H,
0FEH,0F6H
DB 0EEH,3EH,9CH,7AH,9EH,8EH
21
7.2 十六進制兩位數加法器（數碼顯示）
程序介紹：將ADC0809輸入的兩個不同電壓（相同電
壓也可相加，只是為舉例說明，所以取不同電壓）所對應
的16進制數相加顯示出來。實際應用例如：取代加法運放
電路。
程序操作：程序寫完上電運行后，用本機配帶的鐘表
起微調圖16所示電位器，輸入兩個不同電壓，數碼管會顯
示兩個不同的對應16進制數，隨后數碼管會顯示兩個16
進制數相加的值。
程序實例（add2.asm）:
ORG 0000H
MAIN:
ADNUMBER EQU 30H ;AD轉換值
ADDNUMBER EQU 31H ;加數值1
ADL EQU 32H ;//
ADH EQU 33H ;ADL轉換高低位值
DISL EQU 34H ;//
DISH EQU 35H ;顯示高低位值
ADDTOTAL EQU 36H ;第一次AD轉換值
ADDJW EQU 37H ;加法進位數
ADDHOLD EQU 38H
;賦初值////////////////////////////////////////////
MOV ADDHOLD,#00H
MOV ADDNUMBER,#00H
MOV ADL,#00H
MOV ADH,#00H
MOV DISL,#00H
22
MOV DISH,#00H
MOV ADDJW,#00H
MOV ADDTOTAL,#00H
;//////////////////////////////////////////////////
MAIN1:
ACALL AD ;呼叫AD子程序
ACALL DELAY ;延時
ACALL CAIFEN ;呼叫AD值拆分為高
低的程序
ACALL DISPLAY ;呼叫顯示子程序
MOV A,ADNUMBER ;取AD值
CJNE A,ADDHOLD,ADD3 ;與上次AD值比
較，不相等，即輸入了新的AD值，去AD3執行
AJMP MAIN1 ;是相等的，證
明沒有輸入新的AD值，回去顯示老的AD值
ADD3: MOV A,ADDHOLD
CJNE A,#00H,ADD4
MOV ADDHOLD,ADNUMBER ;有一種情況就
是是第一次進來，AD保持值里面是放的初值00，與取的AD值
不同，是這種情況，也返回去
AJM MAIN1
ADD4: MOV ADDNUMBER,ADDHOLD ;是真的輸入
了新的AD值，將上次AD值給加數，為調加法程序做準備
MOV ADDHOLD,ADNUMBER ;將這次的AD
值也保持起來。準備與上一個AD值相加
;顯示這次輸入的AD值////////////////////////////////
ACALL DELAY
ACALL CAIFEN
23
ACALL DISPLAY
;//////////////////////////////////////////////////
DISPLAY1:
ACALL DELAY ;延時
ACALL ADD1 ;呼叫加法子程序
ACALL DISPLAY ;顯示
LOOP: AJMP LOOP ;返回主程序
;///////////////////////////////////////AD轉換
AD:
MOV DPTR,#7F00H;指向轉換地址
MOV A,#03H ;指向轉換口
MOVX @DPTR,A ;轉換
MOV R1,#64H
D1: DJNZ R1,D1 ;等100微秒轉換完
MOVX A,@DPTR ;轉換后的值給A
MOV ADNUMBER,A ;轉換的值給30H
RET
;//////////////////////////////////////////////////
;拆分AD值程序//////////////////////////////////////
CAIFEN:
MOV A,ADNUMBER
ANL A,#0FH
MOV ADL,A ;取低位
MOV A,ADNUMBER
ANL A,#0F0H
SWAP A
MOV ADH,A ;取高位
MOV DISL,ADL
24
MOV DISH,ADH ;給顯示值
RET
;//////////////////////////////////////////////////
;顯示//////////////////////////////////////////////
DISPLAY:
MOV A,DISL
MOV DPTR,#SETTAB
MOVC A,@A+DPTR
MOV SBUF,A
D3: JNB TI,D3
CLR TI
MOV A,DISH
MOV DPTR,#SETTAB
MOVC A,@A+DPTR
MOV SBUF,A
D4: JNB TI,D4
CLR TI
MOV A,ADDJW
MOV DPTR,#SETTAB
MOVC A,@A+DPTR
MOV SBUF,A
D5: JNB TI,D5
CLR TI
MOV SBUF,#00H
D6: JNB TI,D6
CLR TI
RET
;//////////////////////////////////////////////////
25
;加法程序//////////////////////////////////////////
ADD1:
CLR C
MOV A,ADDNUMBER ;取上次AD值
ADDC A,ADDHOLD ;與這次AD值相加
MOV ADDTOTAL,A ;將此次加的值給和
值
JNC ADDJW1 ;有無進位？
INC ADDJW ;有進位，進位值給
ADDJW
ADDJW1: ANL A,#0FH
MOV DISL,A ;加值取低位
MOV A,ADDTOTAL
ANL A,#0F0H
SWAP A
MOV DISH,A ;加值取高位
RET
;//////////////////////////////////////////////////
DELAY: ;延時
MOV R3,#0AH
DD1: MOV R1,#0FFH
D2 : MOV R2,#0FFH
DJNZ R2,$
DJNZ R1,D2
DJNZ R3,DD1
RET
SETTAB:
DB 0FCH,60H,0DAH,0F2H,66H,0B6H,0BEH,0E0H,
26
0FEH,0F6H
DB 0EEH,3EH,9CH,7AH,9EH,8EH
END
7.3 軟件濾波
程序介紹（7.31—7.34）：您如果接觸過模電就知道，
在采集電壓量時經常會碰到干擾，而在模電中經常所采用
的方法就是加電容濾波，這是用硬件實現的。實際上軟件
完全可以達到濾波的效果，現在介紹的是一種最經典的方
法。在一次電壓量的采集中，在很短的時間內對它進行6
次采集，將它轉換為數字量后求和（7.31），分析出6次
輸入中的最大值和最小值（7.32），然后減去最大值和最
小值（7.33），除以4（7.44）得到平均值。這樣實際上
就完成了一次軟件濾波。省去了復雜的硬件，而且取得了
好而精確的效果。實際應用例如：精確數據采集。
程序操作：程序寫入上電運行后，用本實驗儀自帶的
鐘表起微調電位器依次輸入6個電壓量。7.31程序會顯示
和值，7.32會繼續顯示最大和最小值，7.33程序會繼續顯
示減后所剩的值，7.34程序會繼續顯示除4后的值。
算法說明：為什么要選擇取6個數進行計算呢？因為
在匯編中做計算是非常麻煩的，取6個數，減去最大值和
最小值后，取平均值是除4.計算機的內部計算都是二進
制，而二進制每除一個2，實際上是向右移一次。所以為
了計算方便，我們選擇取6個數，最后在算除法的時候，
只需要用單片機自帶的右移位命令移2次就行了。
27
7.31 十六進制六位數加法（數碼顯示）
程序實例(add6.asm):
ORG 0000H
MAIN:
ADNUMBER EQU 30H ;AD轉換值
ADDNUMBER EQU 31H ;加數值1
ADL EQU 32H ;//
ADH EQU 33H ;ADL轉換高低位值
DISL EQU 34H ;//
DISH EQU 35H ;顯示高低位值
ADDTOTAL EQU 36H ;第一次AD轉換值
ADDJW EQU 37H ;加法進位數
ADDHOLD EQU 38H
ADDFLAG EQU 39H ;加標志
ENDFLAG EQU 40H
;賦初值////////////////////////////////////////////
MOV ADDHOLD,#00H
MOV ADDNUMBER,#00H
MOV ADL,#00H
MOV ADH,#00H
MOV DISL,#00H
MOV DISH,#00H
MOV ADDJW,#00H
MOV ADDFLAG,#00H
MOV ENDFLAG,#00H
MOV ADDTOTAL,#00H
;//////////////////////////////////////////////////
MAIN1:
28
;顯示AD值//////////////////////////////////////////
ACALL DELAY
ACALL DELAY
ACALL AD
MAIN3:
ACALL CAIFEN
ACALL DISPLAY
;//////////////////////////////////////////////////
;加這次的AD值，并判是否加了六次，是的話就進入死循環
ACALL DELAY
ACALL ADD1
ACALL DISPLAY
INC ADDFLAG
MOV A,ADDFLAG
CJNE A,#06H,MAIN2
LOOP: AJMP LOOP
;//////////////////////////////////////////////////
;沒有加到六次，繼續取值加，如果沒有來新AD值，還是去
顯示上次加的值，有新AD值來了，顯示這次AD值，并加上上
次AD值，顯示///////////////////////////////////////
MAIN2: ACALL DELAY
ACALL AD
MOV A,ADNUMBER
CJN A,ADDTOTAL,MAIN3
AJM MAIN2
;//////////////////////////////////////////////////
;////////////////////////////////////////////AD轉換
AD:
29
MOV DPTR,#7F00H ;指向轉換地址
MOV A,#03H ;指向轉換口
MOVX @DPTR,A ;轉換
MOV R1,#64H
D1: DJNZ R1,D1 ;等100微秒轉換完
MOVX A,@DPTR ;轉換后的值給A
MOV ADNUMBER,A ;轉換的值給30H
RET
;//////////////////////////////////////////////////
;拆分AD值程序//////////////////////////////////////
CAIFEN:
MOV A,ADNUMBER
ANL A,#0FH
MOV ADL,A ;取低位