智能仪器实验源程序包含ad转换 电子秒表 数码管及键盘 电子音乐 eep room.docVIP

AD转换 ORG 0000H MAIN: MOV DPTR,#8000H mov A,#00h MOVX @DPTR,A LCALL DELAY100 MOV DPTR,#8000H MOVX A,@DPTR MOV P1,A LCALL DELAY100 LJMP MAIN DELAY100: MOV R6,#199 LOOP2:MOV R7,#250 LOOP1:DJNZ R7,LOOP1 ;执行250次延时250×2us DJNZ R6,LOOP2 ;循环199次延时199×2×（250×2+1）us RET END 数码管显示及键盘 ;************************************* LOAD BIT P1.2 DIN BIT P1.0 DCLK BIT P1.1 DOUT BIT P3.3 ;********************************** TIMER1 DATA 031H TIMER2 DATA 032H TIMER3 DATA 033H KEY_F DATA 034H ;按键标志位 KEY DATA 035H ;存键值 ;*********************************** ORG 0000H JMP START ORG 0013H ;键盘中断使用外部中断 1 口 LJMP CH451_INT ORG 030H START: MOV SP,#60H MOV P1,#60H; 禁止P1接口上的其它芯片工作 ;*********************************** CLR DIN ;初始化 CH451 SETB DCLK SETB DIN SETB LOAD SETB DOUT MOV B,#04H ;设定系统参数命令字 MOV A,#03H;关看门狗开显示、键盘 LCALL WRITE_CH451 ;写入命令 MOV B,#05H MOV A,#80H;设置显示参数为译码方式 LCALL WRITE_CH451 ;写入命令 NOP CLR IT1 ;置外部中断信号为低电平触发 CLR IE1 ;清中断标志 SETB PX1 ;设置 INT1 优先 SETB EX1 ;允许键盘中断 SETB EA ;开总中断 LX0:MOV R5,#00H ;显示数据初始化 LX: MOV A,R5 ;送显示数据 MOV B,#08H ;加载字数据 0 命令字（在 DIG0 位数码管显示） LCALL WRITE_CH451 ;写命令 NOP LCALL DELAY_1S ;延时 MOV B,#03H ;字数据左移命令字 MOV A,#00H LCALL WRITE_CH451 ;写命令 INC R5 ;下一个显示数据 CJNE R5,#10H,LX ;0—F 轮显一遍 JMP LX0 ;循环 ;********************************************* DELAY_1S: MOV TIMER1,#4 DLY: MOV TIMER2,#255 DLY1: MOV TIMER3,#255 DLY2: NOP NOP DJNZ TIMER3, DLY2 DJNZ TIMER2, DLY1