08.01.2013 Views

MCS-51 单片机设计应用程序实例 - Read

MCS-51 单片机设计应用程序实例 - Read

MCS-51 单片机设计应用程序实例 - Read

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

MOV P1,A<br />

LCALL DL1MS<br />

INC R1<br />

MOV A,P3<br />

JNB ACC.3,ENDOUT<br />

RL A<br />

MOV R5,A<br />

MOV P3,#0FFH<br />

AJMP PLAY<br />

ENDOUT: MOV P3,#0FFH<br />

MOV P1,#0FFH<br />

RET<br />

<strong>MCS</strong>-<strong>51</strong> 系 列 单 片 机 设 计 实 例<br />

TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0FFH<br />

;<br />

;<br />

DL1MS: MOV R6,#14H ;1MS 延 时子程序<br />

DL1: MOV R7,#19H<br />

DL2: DJNZ R7,DL2<br />

;<br />

DJNZ R6,DL1<br />

RET<br />

TEST: CLR A ;模 数转换子程序<br />

MOV P2,A<br />

MOV R0,#70H ;转 换值存放首址<br />

MOV R7,#08H ;转 换 8次控制<br />

LCALL TESTART ;启 动 测 试<br />

WAIT: JB P3.7,MOVD ;等 A/D 转换结束信号<br />

;<br />

AJMP WAIT<br />

TESTART: SETB P2.3 ;测 试启动<br />

;<br />

NOP<br />

NOP<br />

CLR P2.3<br />

SETB P2.4<br />

NOP<br />

NOP<br />

CLR P2.4<br />

NOP<br />

NOP<br />

NOP<br />

NOP<br />

RET<br />

PDF created with FinePrint pdfFactory trial version http://www.fineprint.com<br />

22

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!