炉温监测系统课程设计

.486data segment at 0 use16;8255各个端口的地址porta equ 203hportb equ 207hportc equ 20bhcontrolport equ 20fh;七段码地址wei equ 360hduan equ 340H;8253各个端口地址DS0 equ 300hDS1 equ 304hDS2 equ 308hDSC equ 30ch;8259端口地址oport equ 3a0hjport equ 3A8H;0809地址ADPORT EQU 3C0HADPORT1 EQU 3C4HADPORT2 EQU 3C8H；中断向量ZDIR0 EQU 20H; 定时器中断ZDIR1 EQU 24H; AD中断ZDIR2 EQU 28H; 开关1中断ZDIR3 EQU 2CH; 开关2中断ZDIR4 EQU 30H; 开关3中断;定义数据缓冲区ORG 4000HDATA4AD DB 3 DUP(?) ;AD转换后的数据存储处DATA4LED DB 18 DUP(?) ;十六进制到BCD的显示数据存储处DATA ENDSCODE SEGMENT USE16org 2000hASSUME CS:CODE,DS:DATA,ES:DATABEG: CLIJMP STARTTAB DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,67H,77H,7CH,39H,5EH,79H,71H ;段码表; AD转换中断用ADataNW DW DATA4ADADPTnw DW 3C0H ;通道口内存保留;显示程序用LEDnw DW DATA4LEDTime DB 10;开关中断用Swh1 DB 0FFHSwh2 DB 0FFHSwh3 DB 0FFHSTART:MOV AX,DATAMOV DS,AXMOV AX,0MOV SS,AXMOV SP,1000HMOV AL,0C0HMOV DX,WEI ;OUT DX,ALINITA8259:MOV AL,00010011B;ICW1MOV DX,OPORTOUT DX,ALMOV AL,00001000B;ICW2MOV DX,JPORTOUT DX,ALMOV AL,00000001B;ICW4MOV DX,JPORTOUT DX,ALMOV AL,11100000B;OCW1;;;;屏蔽字MOV DX,JPORTOUT DX,ALMOV AL,20H ;清ISRMOV DX,OPORTOUT DX,ALINITIA8255:MOV AL,10000000BMOV DX,controlportOUT DX,ALMOV AL,0FFHMOV DX,PORTAOUT DX,ALINITIA8253:MOV DX,DSCMOV AL,00110110BOUT DX,ALMOV DX,DS0MOV AL,60H ;0EA60HMOV AL,0EAHOUT DX,AL;中断向量初始化MOV DI,ZDIR0MOV AX,OFFSET TimerSTOSWMOV AX,SEG TimerSTOSWMOV DI,ZDIR1MOV AX,OFFSET ADPROCSTOSWMOV AX,SEG ADPROCSTOSWMOV DI,ZDIR2MOV AX,OFFSET switch1STOSWMOV AX,SEG switch1STOSWMOV DI,ZDIR3MOV AX,OFFSET switch2STOSWMOV AX,SEG switch2STOSWMOV DI,ZDIR4MOV AX,OFFSET switch3STOSWMOV AX,SEG switch3STOSWMOV DX,ADPORT; 启动ADCOUT DX,AL;炉号初始化MOV DI,4003HMOV BYTE PTR [DI],0INC DIMOV BYTE PTR [DI],0INC DIMOV BYTE PTR [DI],1ADD DI,4MOV BYTE PTR [DI],0INC DIMOV BYTE PTR [DI],0INC DIMOV BYTE PTR [DI],2ADD DI,4MOV BYTE PTR [DI],0INC DIMOV BYTE PTR [DI],0INC DIMOV BYTE PTR [DI],3AGAIN:STICALL CZBCDCALL DISPJMP AGAIN;-------拆字十六进制转BCD码------CZBCD PROCPUSH BxPUSH CXPUSH AXLEA SI,DATA4AD ;AD转换后的数据存储处LEA DI,DATA4LED ;十六进制到BCD的显示数据存储处add di,5CZ0:MOV AL,[SI]MOV BL,0AHMOV CX,3CZ1:DIV BLMOV [DI],AHdec DIMOV AH,00HLOOP CZ1add DI,9INC SICMP SI,4002H ;AD转换后的数据存储处是否到头JBE CZ0POP AXPOP CXPOP BXRETCZBCD ENDP;-----------------显示子程序------DISP PROCPUSH DXPUSH CXPUSH BXPUSH AXLEA BX,TAB;马表MOV SI,LEDnwMOV AH,0C1HDISP1:MOV DX,WEIMOV AL,AHOUT DX,AL ;位输出MOV DX,DUANMOV AL,[SI]XLATOUT DX,AL ;段输出MOV CX,0200HLOOP $INC SISAL AH,1OR AH,0C0HCMP AH,0C0HJNZ DISP1POP AXPOP BXPOP CXPOP DXRETDISP ENDP;-------AD采样程序-------ADPROC PROCPUSH AXPUSH SIPUSH DXMOV DX,[ADPTnw];A/D通道0CMP DX ,3c8H; 到第三号炉子了？JBE NEXTMOV [ADPTnw],3C0H;到了就置数据区7号炉端口next:MOV SI,[ADataNW]CMP SI,4002hJBE NEXT2MOV [ADataNW],4000HJMP CHUNEXT2:IN AL,DXMOV [SI],ALADD [ADPTnw],4INC [ADataNW]CMP AL,50 ;是否在50到200之间JBE BAOJINjmp OKCMP AL,200JAE BAOJINJMP OKBAOJIN:CMP SI,4000HJZ BAOJIN1CMP SI,4001HJZ BAOJIN2CMP SI,4002HJZ BAOJIN3JMP CHUQUBAOJIN1:MOV DX,203H ;报警1MOV AX,0FEHOUT DX,ALJMP CHUQUBAOJIN2:MOV DX,203H ;报警2MOV AX,0FDHOUT DX,ALJMP CHUQUBAOJIN3:MOV DX,203H ;报警3MOV AX,0FCHOUT DX,ALJMP CHUQUok: MOV DX,203H ;解除报警MOV AX,0FfHOUT DX,ALCHUQU:MOV DX,[ADPTNW];启动ADCOUT DX,ALCHU:MOV AL,20HMOV DX,OPORTOUT DX,ALPOP DXPOP SIPOP AXIRETADPROC ENDP;--------定时器中断------------Timer procPUSH AXPUSH DXMOV AL,[Time]DEC ALMOV [Time],ALCMP AL,0JNZ ENDO ;未到0关中断;到了CMP [swh1],0 ;判断是否有按键按下JZ enddCMP [swh2],0JZ enddCMP [swh3],0JZ enddmov AX,[LEDNW] ;CMP AX,400FH ;JAE DALE ;ADD AX,6 ;MOV [LEDNW],AX ;JMP ENDD ;DALE: MOV [LEDNW],4003H ; 改变显示参数ENDD:MOV DX,ADPORT ;到了开A/DOUT DX,AL ;MOV [Time],10 ;ENDO:MOV AL,20HMOV DX,OPORTOUT DX,ALPOP DXPOP AXIRETTimer endp;---------开关1的中断----------Switch1 procNOT SWH1CMP SWH1,0JNZ BACK1mov [LEDnw],4003h;是第一次按下back1:MOV AL,20HMOV DX,OPORTOUT DX,ALstiIRETSwitch1 ENDp;---------开关2的中断----------Switch2 procNOT SWH2CMP SWH2,0JNZ BACK2mov [LEDnw],4009h;是第一次按下back2:MOV AL,20HMOV DX,OPORTOUT DX,ALstiIRETSwitch2 ENDp;---------开关3的中断----------Switch3 procNOT SWH3CMP SWH3,0JNZ BACK3mov [LEDnw],400fh;是第一次按下back3:MOV AL,20HMOV DX,OPORTOUT DX,ALstiIRETSwitch3 ENDpCODE ENDSEND BEG。