资源描述:
《单片机教学教案实验程序.ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、PORTEQU0CFA0H;片选地址CS0CSEGAT0000HLJMPSTARTCSEGAT4100HSTART:MOVDPTR,#PORTMOVA,#03H;两个红灯亮,黄灯、绿灯灭MOVX@DPTR,AACALLDE3S;延时3秒543210南北(绿)东西(绿)南北(黄)东西(黄)南北(红)东西(红)实验三简单I/O口扩展实验----交通灯控制实验LLL:MOVA,#12H;东西路口绿灯亮;南北路口红灯亮MOVX@DPTR,AACALLDE10S;延时10秒MOVA,#02H;东西路口绿灯灭;南北路口
2、红灯亮MOVX@DPTR,A543210南北绿东西绿南北黄东西黄南北红东西红MOVR2,#05H;R2中的值为黄灯闪烁次数TTT:MOVA,#06H;东西路口黄灯亮;南北路口红灯亮MOVX@DPTR,AACALLDE02S;延时0.2秒MOVA,#02H;东西路口黄灯灭;南北路口红灯亮MOVX@DPTR,AACALLDE02S;延时0.2秒DJNZR2,TTT;返回TTT,使东西路口;黄灯闪烁五次543210南北绿东西绿南北黄东西黄南北红东西红MOVA,#03H;两个红灯亮,黄灯、绿灯灭MOVX@DPTR,
3、AACALLDE02S;延时0.2秒MOVA,#21H;东西路口红灯亮;南北路口绿灯亮MOVX@DPTR,AACALLDE10S;延时10秒MOVA,#01H;东西路口红灯亮;南北路口绿灯灭MOVX@DPTR,A543210南北绿东西绿南北黄东西黄南北红东西红543210南北绿东西绿南北黄东西黄南北红东西红MOVR2,#05H;黄灯闪烁五次GGG:MOVA,#09H;东西路口红灯亮;南北路口黄灯亮MOVX@DPTR,AACALLDE02S;延时0.2秒MOVA,#01H;东西路口红灯亮;南北路口黄灯灭MOV
4、X@DPTR,AACALLDE02S;延时0.2秒DJNZR2,GGG;返回GGG,使南北路口;黄灯闪烁五次MOVA,#03H;两个红灯亮,黄灯、绿灯灭MOVX@DPTR,AACALLDE02S;延时0.2秒JMPLLL;转LLL循环DE10S:MOVR5,#100;延时10秒JMPDE1DE3S:MOVR5,#30;延时3秒JMPDE1DE02S:MOVR5,#02;延时0.2秒DE1:MOVR6,#200DE2:MOVR7,#126DE3:DJNZR7,DE3DJNZR6,DE2DJNZR5,DE1RE
5、TEND;延时程序实验五中断实验----交通灯控制实验PORTEQU0CFA0H;端口地址SAVEEQU55H;save保存从端口cfa0输出的数据CSEGAT0000HLJMPSTARTCSEGAT4003HLJMPINTCSEGAT4100HSTART:MOVDPTR,#PORTMOVA,#03H;置首显示码MOVSAVE,A;保存SETBEX0SETBEASETBIT0MOVX@DPTR,A;显示输出ACALLDE3S;延时3秒;开总允许开关;开INT0中断;负跳变触发中断INT:PUSHACC;中断
6、处理PUSHPSWMOVA,R5PUSHACCMOVA,#0C3H;红灯全亮,绿、黄灯全灭MOVX@DPTR,ADEL10S:MOVR3,#100;延时10秒DEL1:MOVR4,#200DEL2:MOVR5,#126DEL3:DJNZR5,DEL3DJNZR4,DEL2DJNZR3,DEL1MOVA,SAVE;取SAVE中保存数据输出到cfa0端口MOVX@DPTR,APOPACC;出栈MOVR5,APOPPSWPOPACCSETBEX0;允许外部中断RETIEND