大连理工大学2014级计算机原理实验(巢明)综合设计实验代码

2014级计算机原理实验（巢明）综合设计实验代码.model small.386IO_8253_0equ210hIO_8253_1equ211hIO_8253_k equ213hIO_8255_a equ200hIO_8255_b equ201hIO_8255_c equ202hIO_8255_k equ203hIO_0809equ220hioled equ230hdata segmentportcl db0ch,14h,21h,22h,0ffhled db3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,67h,77h,7ch,39h,5eh,79h,71h count db?buf db33hspeed db0dir db0data endsssg segment stackdw100dup(0)ssg endscodesegmentassume cs:code,ds:data,ss:ssg;主程序main proc farclimov ax,csmov ds,axmov ax,datamov ds,ax;-----------设置中断屏蔽字-------in al,21hand al,11011011b;开放主片IR5中断和一个从片输入IR2out21h,alin al,0A1hand al,11111110b;开放从片IR0中断out0A1h,al;----------设置中断向量---------pushdsmov ax,0mov ds,axlea ax,cs:int_proc1mov si,35h;MIR5中断类型码35hadd si,siadd si,simov ds:[si],ax;ippushcspop axmov ds:[si+2],ax;cspop dspushdsmov ax,0mov ds,axlea ax,cs:int_proc2mov si,70h;IR0中断类型码70hadd si,siadd si,simov ds:[si],axpushcspop axmov ds:[si+2],axpop ds;------------1Hz分频----------mov dx,IO_8253_kmov al,00110111b;通道0为模式3out dx,almov dx,IO_8253_0mov al,0out dx,alout dx,almov dx,IO_8253_kmov al,01010110B;通道1为模式3out dx,almov dx,IO_8253_1mov al,100;1s方波out dx,al;------------信号灯工作---------mov dx,IO_8255_k;8255设置A口输入，C口输出信号灯，B口输出电机mov al,10010000bout dx,alstire_on:mov bx,0mov al,portcl[bx]mov dx,IO_8255_cout dx,alinc bxmov count,7;主干路7sc1:call display;数码管显示程序call moto;电机控制程序mov dx,IO_8255_a;延时1sin al,dxand al,01hcmp al,0;PA0=1时循环jnz c1c2:call motomov dx,IO_8255_ain al,dxand al,01hcmp al,0;PA0=0时循环jz c2dec countcmp count,0;判断是否亮完7sjnz c1mov al,portcl[bx]mov dx,IO_8255_cout dx,alinc bxmov count,2;黄灯2sc3:call displaycall motomov dx,IO_8255_a;延时1sin al,dxand al,01hcmp al,0;PA0=1时，循环jnz c3c4:call motomov dx,IO_8255_ain al,dxand al,01hcmp al,0;PA0=0时,循环dec countcmp count,0;判断是否亮完2s jnz c3mov al,portcl[bx]mov dx,IO_8255_cout dx,alinc bxmov count,5;支路5sc5:call displaycall motomov dx,IO_8255_a;延时1sin al,dxand al,01hcmp al,0;PA0=1时，循环jnz c5c6:call motomov dx,IO_8255_ain al,dxand al,01hcmp al,0;PA0=0时，循环jz c6dec countcmp count,0;判断是否亮完5s jnz c5mov al,portcl[bx]mov dx,IO_8255_cout dx,alinc bxmov count,2;黄灯2sc7:call displaycall motomov dx,IO_8255_a;延时1sin al,dxand al,01hcmp al,0;PA0=1时，循环jnz c7c8:call motomov dx,IO_8255_aand al,01hcmp al,0;PA0=0时,循环jz c8dec countcmp count,0;判断是否亮完2s jnz c7jmp re_onmain endp;----------电机--------------;mov buf,66hmoto procpushbxpushdxpushaxm1:mov al,bufcmp dir,0je nx0ror al,1jmp nx1nx0:rol al,1nx1:mov dx,IO_8255_bout dx,alcall delay1mov buf,alpop axpop dxpop bxretmoto endp;jmp m1;-----------延迟子程序---------delay1procpushcxpushdxmov dh,speedx1:mov cx,0180hx2:loop x2dec dhjnz x1pop dxpop cxretdelay1endp;----------数码管显示--------display procpushbxmov al,countlea si,ledmov bx,siand al,0fh;低四位mov ah,0add si,axmov al,[si];字mov dx,ioledout dx,almov al,01h;位inc dxout dx,alcall delaypop bxretdisplay endp;---------delay procpushcxmov cx,50hy1:loop y1pop cxretdelay endp;---------主中断服务子程序1---------int_proc1proc farpushaxpushcxpushdxmov dx,IO_8255_a;读方向in al,dxand al,10000000bmov dir,almov dx,IO_0809;启动ADCout dx,almov dx,IO_0809;获取EOC状态地址add dx,2;指向状态口l1:in al,dxtest al,01hjz l1mov dx,IO_0809inc dx;读取数据，改转速in al,dxand al,01111110bmov speed,almov dx,IO_8255_cmov al,0chout dx,almov count,7mov al,20h;发送中断结束命令（向386EX主8259的MIR5）out20h,alpop dxpop cxpop axstiiretint_proc1endp;---------从中断服务子程序2----------int_proc2proc farpushaxpushcxpushdxmov dx,IO_8255_a;读方向in al,dxand al,10000000bmov dir,almov dx,IO_0809;启动ADCout dx,almov dx,IO_0809;获取EOC状态地址add dx,2l2:in al,dxtest al,01hjz l2mov dx,IO_0809inc dx;读取数据，改转速in al,dxand al,01111110bmov speed,almov dx,IO_8255_cmov al,21hout dx,almov count,7mov al,20h;发送中断结束命令（向386EX主8259的MIR5）out20h,almov al,20h;发送中断结束命令（向386EX从8259的SIR0）out0a0h,alpop dxpop cxpop axstiiretint_proc2endpcodeendsend main。