<strong>MCS</strong>-<strong>51</strong> 系 列 单 片 机 设 计 实 例 ; ************************* ; * * ; * 电 子屏字符显示器 * ; * 显 示“电子设计” * ; * 2001.10.23 LRM * ; ************************* ; 四 个显示字符数据表在 50H— 6FH 单 元内,字符用 8*8 点阵,R4( 30H) 用 于 ; 控 制显示静止字的时间,R5( 31H) 静止字显示跳转地址步距,B内放显示首 ; 址 ; ; ; ;************; ;中 断入口程序; ;************; ; ORG 0000H LJMP START ORG 0003H RETI ORG 000BH RETI ORG 0013H RETI ORG 001BH RETI ORG 0023H RETI ORG 002BH RETI ; ; CLEARMEN: MOV A,#0FFH MOV P1,A MOV P2,A MOV P3,A MOV P0,A MOV DPTR,#TAB CLR A MOV R3,A MOV R1,#50H MOV R2,#20H CLLOOP: MOVC A,@A+DPTR MOV @R1,A PDF created with FinePrint pdfFactory trial version http://www.fineprint.com 14
; MOV A,R3 INC A MOV R3,A INC R1 DJNZ R2,CLLOOP RET START: LCALL CLEARMEN START1: LCALL KEYWORK AJMP START1 KEYWORK: MOV P1,#0FFH KEYRET: RET JNB P1.0,KEY1 JNB P1.1,KEY2 JNB P1.2,KEY3 KEY1: LCALL DL10MS JB P1.0,KEYRET WAIT: JNB P1.0,WAIT LCALL CLEARMEN MOV 30H,#80H MOV 31H,#08H LJMP DISP1 KEY2: LCALL DL10MS JB P1.1,KEYRET WAIT1: JNB P1.1,WAIT1 LCALL CLEARMEN MOV 30H,#14H MOV 31H,#01H LJMP DISP1 KEY3: LCALL DL10MS JB P1.2,KEYRET WAIT2: JNB P1.2,WAIT2 ; ; LCALL CLEARMEN LJMP DISP2 DISP1: MOV B,#50H MOV R4,30H MOV R5,31H LOOP: LCALL DISPLAY DJNZ R4,LOOP MOV R4,30H MOV A,B CJNE A,#68H,CONT <strong>MCS</strong>-<strong>51</strong> 系 列 单 片 机 设 计 实 例 PDF created with FinePrint pdfFactory trial version http://www.fineprint.com 15
- Page 1 and 2: MCS-51 系 列 单 片 机 设 计
- Page 3 and 4: ;************; ; 初 始化程序 ;
- Page 5 and 6: ;************; ; 延 时程序 ; ;*
- Page 7 and 8: ; ; ; ORG 0003H RETI ORG 000BH LJMP
- Page 9 and 10: ; INTT1: PUSH ACC PUSH PSW MOV TL1,
- Page 11 and 12: ; WAITH: JNB P3.7,WAITH LJMP START1
- Page 13: 说明: MCS-51 系 列 单 片 机
- Page 17 and 18: OUT: RET INC R0 DJNZ R2,MOV1 MOV R2
- Page 19 and 20: 说明: MCS-51 系 列 单 片 机
- Page 21 and 22: ; RET ;****************************
- Page 23 and 24: MCS-51 系 列 单 片 机 设 计
- Page 25 and 26: MCS-51 系 列 单 片 机 设 计
- Page 27 and 28: ;**********************************
- Page 29 and 30: ; NOP NOP NOP NOP DJNZ R2,LOWBACKTM
- Page 31 and 32: ; AJMP READHEAD READDATA00: MOV R3,
- Page 33 and 34: SETB REMOTEIN MCS-51 系 列 单
- Page 35 and 36: MCS-51 系 列 单 片 机 设 计
- Page 37 and 38: ;**********************************
- Page 39 and 40: ADD A,B MCS-51 系 列 单 片 机
- Page 41 and 42: ; RET KEYFUN12: MOV A,#0EH ; LJMP R
- Page 43 and 44: DL10MS: MOV R3,#14H DL10MS1: LCALL
- Page 45 and 46: ; ORG 000BH RETI ORG 0013H RETI ORG
- Page 47 and 48: DEC A JZ FUN9 DEC A JZ FUN10 DEC A
- Page 49 and 50: LOOP: MOV A,P1 SUBB A,#0FFH JZ LOOP
- Page 51 and 52: ; ; MCS-51 系 列 单 片 机 设
- Page 53 and 54: ;;;;;;;;;;;;;;;;;;;; ;; PROGRAM STA
- Page 55 and 56: MOV A,71H MCS-51 系 列 单 片
- Page 57 and 58: NOP NOP NOP NOP CLR VSCL SETB VSDA
- Page 59 and 60: ; ;;;;;;;;;;;;;;;;;;;; ;;DISPLAY PR
- Page 61 and 62: ; ; ;;;;;;;;;;;;;;;;; ; DL1MS ;; ;;
- Page 63 and 64: ; KKK: MOV A,15H RLC A MOV 15H,A MO
- Page 65 and 66:
3. 传感脉冲检测电路 MCS-51
- Page 67 and 68:
; MOV 23H,#00H CLR 30H SETB ET1 SET
- Page 69 and 70:
; CPL P3.6 CPL P3.7 LCALL DS50MS LC
- Page 71 and 72:
RETT0: POP PSW POP ACC RETI ;;;;;;;
- Page 73 and 74:
说明: MCS-51 系 列 单 片 机
- Page 75 and 76:
;**********************************
- Page 77 and 78:
LCALL REMOTE RET KEYFUN06: MOV A,#0
- Page 79 and 80:
MCS-51 系 列 单 片 机 设 计
- Page 81 and 82:
MCS-51 系 列 单 片 机 设 计
- Page 83 and 84:
MCS-51 系 列 单 片 机 设 计
- Page 85 and 86:
; ORG 0013H ORG 001BH ORG 0023H LJM
- Page 87 and 88:
LJMP REMOTE KEY1: LCALL DELAY JB P0
- Page 89 and 90:
LJMP READOUT0 FRT: CLR P0.4 LJMP RE
- Page 91 and 92:
MCS-51 系 列 单 片 机 设 计
- Page 93 and 94:
NOP NOP NOP NOP NOP NOP NOP DJNZ R0
- Page 95 and 96:
;**********************************
- Page 97 and 98:
READ21: INC A READ22: JNB P1.0,READ
- Page 99 and 100:
说明: MCS-51 系 列 单 片 机
- Page 101 and 102:
; MCS-51 系 列 单 片 机 设
- Page 103 and 104:
MOV A,P1 ANL A,#0F0H CJNE A,#0F0H,C
- Page 105 and 106:
KEYFUN04: MOV 29H,#01H MOV 28H,#00H
- Page 107 and 108:
MOV B,#100 LCALL MULLOOP MOV A,29H
- Page 109 and 110:
RET DL1MS: MOV R4,#02H DL1MSLOOP: L
- Page 111 and 112:
MCS-51 系 列 单 片 机 设 计
- Page 113 and 114:
DEC A MOV P1,A MOV P0,A MOV P3,A SE
- Page 115 and 116:
FUN02: MOV R0,#75H MOV B,#02H LCALL
- Page 117 and 118:
; SETB EA RETI ;************** ;
- Page 119 and 120:
MCS-51 系 列 单 片 机 设 计
- Page 121 and 122:
MCS-51 系 列 单 片 机 设 计
- Page 123 and 124:
寄存器 ; ; 控 制标志位定
- Page 125 and 126:
; ; MCS-51 系 列 单 片 机 设
- Page 127 and 128:
; MCS-51 系 列 单 片 机 设
- Page 129 and 130:
MCS-51 系 列 单 片 机 设 计
- Page 131 and 132:
MCS-51 系 列 单 片 机 设 计
- Page 133 and 134:
; ; MCS-51 系 列 单 片 机 设
- Page 135 and 136:
; ; MCS-51 系 列 单 片 机 设
- Page 137 and 138:
; ; MCS-51 系 列 单 片 机 设
- Page 139 and 140:
; MCS-51 系 列 单 片 机 设
- Page 141 and 142:
; ; MCS-51 系 列 单 片 机 设
- Page 143 and 144:
; R2 内 容高位地址 R1 内 容
- Page 145 and 146:
COMPASCOUT: RET ; ; MCS-51 系 列
- Page 147 and 148:
MCS-51 系 列 单 片 机 设 计
- Page 149 and 150:
; MCS-51 系 列 单 片 机 设
- Page 151 and 152:
MCS-51 系 列 单 片 机 设 计
- Page 153 and 154:
; ; MCS-51 系 列 单 片 机 设
- Page 155 and 156:
; MCS-51 系 列 单 片 机 设
- Page 157 and 158:
MCS-51 系 列 单 片 机 设 计
- Page 159 and 160:
; RET MCS-51 系 列 单 片 机
- Page 161 and 162:
; MCS-51 系 列 单 片 机 设