十字路口交通信号灯模拟 源程序

CODESEGMENTASSUMECS:CODE,DS:CODE,ES:CODEORG32F0HPAEQU0FFD8HPBEQU0FFD9HPCEQU0FFDAHPCTLEQU0FFDBHH3:MOVAL,90HMOVDX,PCTLOUTDX,AL;控制字A口输入，B、C口输出，工作在方式0;===============================================L1:MOVDX,PA;PA.0口输入自动开INAL,DXTESTAL,01HJZL1;===============================================N1:MOVDX,PB;PB.0红灯MOVAL,0FEHOUTDX,AL;===============================================L2:MOVDX,PA;PA.0口输入自动关INAL,DXTESTAL,01HJZL2;======================================================MOVDX,PA;PA.1口输入南北灯走动东西灯为绿色进C1INAL,DXTESTAL,02HJZC1;==============================================MOVDX,PA;PA.2口输入南北灯走动东西灯为绿色进C2INAL,DXTESTAL,04HJZC2;==============================================MOVDX,PC;PC.1绿灯MOVAL,0FDHOUTDX,ALCALLDELAY;延时2sMOVDX,PB;PB.1绿灯MOVAL,0FDHOUTDX,ALMOVDX,PC;PC.2黄灯MOVAL,0FBHOUTDX,ALCALLDELAY;延时2sMOVDX,PB;PB.1绿灯MOVAL,0FDHOUTDX,ALMOVDX,PC;PC.0红灯MOVAL,0FEHOUTDX,ALCALLDELAY;延时2sMOVDX,PB;PB.2黄灯MOVAL,0FBHOUTDX,ALMOVDX,PC;PC.1绿灯MOVAL,0FDHOUTDX,ALCALLDELAY;延时2sJMPN1;==================================================C1:;==========================================MOVDX,PA;PA.0口输入自动关INAL,DXTESTAL,04HJZC2;0跳，1不跳;============================================MOVDX,PB;PB南北红灯亮，PC东西绿灯亮MOVAL,0FEHOUTDX,ALMOVDX,PCMOVAL,0FDHOUTDX,ALCALLDELAYY;延时JMPC1C2:;==================================================MOVDX,PA;PA.0口输入自动关INAL,DXTESTAL,02HJZC1;0跳，1不跳;============================================MOVDX,PC;PC东西红灯亮，PB南北绿灯亮MOVAL,0FEHOUTDX,ALMOVDX,PBMOVAL,0FDHOUTDX,ALCALLDELAYYY;延时JMPC2;=========================================================;=========================================================DELAY:PUSHCX;延时2sMOVCX,8FFFH;===========================================Q1:MOVDX,PA;PA.0口输入防止开关引起灯的亮灭延迟INAL,DXTESTAL,01HJZQ1;=======================================================LOOP$MOVCX,8FFFH;========================================================Q2:MOVDX,PA;PA.0口输入防止开关引起灯的亮灭延迟INAL,DXTESTAL,01HJZQ2;=======================================================LOOP$MOVCX,8FFFH;=====================================================Q3:MOVDX,PA;PA.0口输入防止开关引起灯的亮灭延迟INAL,DXTESTAL,01HJZQ3;=============================================================LOOP$MOVCX,8FFFH;=====================================================Q4:MOVDX,PA;PA.0口输入防止开关引起灯的亮灭延迟INAL,DXTESTAL,01HJZQ4;=============================================================LOOP$MOVCX,8FFFH;=====================================================Q5:MOVDX,PA;PA.0口输入防止开关引起灯的亮灭延迟INAL,DXTESTAL,01HJZQ5;=============================================================LOOP$MOVCX,8FFFH;=====================================================Q6:MOVDX,PA;PA.0口输入防止开关引起灯的亮灭延迟INAL,DXTESTAL,01HJZQ6;=============================================================LOOP$POPCXRETDELAYY:PUSHCX;延时2sMOVCX,8FFFHLOOP$POPCXRETDELAYYY:PUSHCX;延时2sMOVCX,8FFFHLOOP$POPCXRET;===============================================================CODEENDSENDH3;-------------------------软件实验显示程序----------------------------CODESEGMENTASSUMECS:CODE,DS:CODE,ES:CODEORG3000HS9:JMPSTART9ZXKEQU0FFDCHZWKEQU0FFDDHLEDDB0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90HDB88H,83H,0C6H,0A1H,86H,8EH,0FFH,0CH,0DEH,0F3HBUFDB?,?,?,?,?,?START9:MOVCX,0005H;dais88ON/OFFLED,COUNTA90:PUSHCXA91:MOVBX,OFFSETBUFMOVAX,0A0DHMOV[BX],AXADDBX,2MOVAX,0501HMOV[BX],AXADDBX,2MOVAX,0808HMOV[BX],AX;CALLDIS;JMPSTART9;--------------------------DIS:MOVCL,20HMOVBX,OFFSETBUFDIS1:MOVAL,[BX]PUSHBXMOVBX,OFFSETLEDXLATPOPBXMOVDX,ZXKOUTDX,ALMOVAL,CLMOVDX,ZWKOUTDX,ALPUSHCXMOVCX,0100HDELAY:LOOP$POPCXCMPCL,01HJZEXITINCBXSHRCL,1JMPDIS1EXIT:MOVAL,00HMOVDX,ZWKOUTDX,ALRETCODEENDSENDS9