1、stack segmentstack endscode segmentassume cs:code,ds:data,ss:stackbegin: PUSH DSMOV AX,0MOV AX,DATAMOV DS,AXmov dx,0006hmov al,80hout dx,alled: mov al,01hmov LA,almov dx,0000hout dx,almov al,80hmov LB,almov dx,0002hout dx,almov cx,7led1:mov dx,0000hmov al,LArol al,1mov LA,alout dx,almov dx,0002hmov
2、al,LBror al,1mov LB,alout dx,alcall DELAYloop led1mov cx,7led2: mov dx,0000hmov al,LAror al,1mov LA,alout dx,almov dx,0002hmov al,LBrol al,1mov LB,alout dx,alcall DELAYloop led2jmp ledDELAY PROCMOV CXX,CXMOV AXX,AXMOV CX,0FHD1: MOV AX,0FFFHD2: DEC AXJNZ D2LOOP D1MOV AX,AXXMOV CX,CXXRETDELAY ENDPcode endsend begin
