微机原理实验程序

《微机原理实验程序》由会员分享，可在线阅读，更多相关《微机原理实验程序（14页珍藏版）》请在装配图网上搜索。

1、实验一 8255L8255_CMD EQU 2A3HL8255_PA EQU 2A0HL8255_PB EQU 2A1HL8255_PC EQU 2A3HCODE SEGMENTASSUME CS:CODE,DS:CODEBEGIN:MOV CX,0FEHAA:LOOP AAMOV DX,L8255_CMDMOV AL,9CHOUT DX,ALBB:MOV DX,L8255_PAIN AL,DXMOV DX,L8255_PBOUT DX,ALMOV AH,00HINT 16HJZ BBMOV AX,4C00HINT 21HCODE ENDSEND BEGIN实验二 8259TITLE ZY2.

2、ASMUCODE SEGMENT ASSUME CS:UCODEBEGIN: JMP BEGIN_ INT_SEG DW ? INT_OFF DW ?BEGIN_: CLI MOV AH,35H MOV AL,0EH INT 21H MOV INT_OFF,BX MOV INT_SEG,ES MOV AX,CS ADD AX,10H MOV DS,AX MOV AH,25H MOV AL,0EH MOV DX,OFFSET UINTR INT 21H IN AL,21H AND AL,0BFH MOV DX,21H OUT DX,AL STI JMP $ UINTR PROC FAR CLI

3、MOV DX,88H MOV AL,0055H OUT DX,AL MOV AL,20H OUT 20H,AL IRETUINTR ENDPUCODE ENDS END BEGIN 实验三 ADC0809CODE SEGMENTASSUME CS:CODESTART:MOV DX,2B8H ;2B0H-2B7HMOV AL,01HOUT DX,ALCALL DELAYIN AL,DXCALL SHOWCALL DELAYJMP STARTSHOW PROC NEAR PUSH DX PUSH AX MOV CL,4 SHR AL,CL AND AL,0FH CALL H2C JC SHOW_O

4、UT MOV DX,88H OUT DX,AL POP AX AND AL,0FH CALL H2C JC SHOW_OUT MOV DX,88H OUT DX,AL MOV CX,0FFHDELA: LOOP DELA SHOW_OUT: POP DX RETSHOW ENDPH2C PROC NEAR CMP AL,0 JAE N0_9 JMP H2C_ERRN0_9: CMP AL,9 JBE N0_9_OK CMP AL,0AH JAE HEX_CMP JMP H2C_ERRHEX_CMP: CMP AL,0FH JBE HEX_CMP_OK JMP H2C_ERRHEX_CMP_OK

5、: CLC ADD AL,37H JMP CMP_OUTN0_9_OK: CLC ADD AL,30H JMP CMP_OUTH2C_ERR: STCCMP_OUT: RETH2C ENDPDELAY:MOV CX,0FFHDELEA:LOOP DELEARETEXIT:MOV AX,4C00HINT 21HCODE ENDSEND START实验四 交通灯 PORT_A EQU 2A0H ;8255 PORT A ADDRESSPORT_B EQU 2A1H ;8255 PORT B ADDRESSPORT_C EQU 2A2H ;8255 PORT C ADDRESSCMD_PORT EQ

6、U 2A3HPORT_CS EQU 2A3HTIM_CTL EQU 43H ;8253 TIMER CONTROL PORT ADDRESSTIMER EQU 40H ;8253 ADDRESSTIMER0 EQU 40H ;8253 TIMER/CNTER 0 PORT ADDRESSTIMER1 EQU 41H ;8253 TIMER/CNTER 1 PORT ADDRESSTIMER2 EQU 42H ;8253 TIMER/CNTER 2 PORT ADDRESSCODE SEGMENTASSUME CS:CODESTART: MOV AL,10000011B ;PORT_A、PORT

7、_CHIGN 4 BITS:OUTPUT,PORT_CLOW 4 BITS:INPUT,MODE 0 MOV DX,PORT_CS OUT DX,ALSHOW:MOV DX,PORT_AMOV AL,00100100BOUT DX,ALMOV CX,8HUANG4:CALL TIMINGLOOP HUANG4CALL TIMINGMOV CX,8HUANG:MOV AL,01000100BOUT DX,ALCALL TIMINGMOV DX,PORT_AMOV AL,00000100BOUT DX,ALCALL TIMINGLOOP HUANGMOV AL,10000001BOUT DX,AL

8、CALL TIMINGMOV CX,8HUANG2:CALL TIMINGLOOP HUANG2MOV CX,8HUANG3:MOV AL,10000010BOUT DX,ALCALL TIMINGMOV DX,PORT_AMOV AL,10000000BOUT DX,ALCALL TIMINGLOOP HUANG3JMP SHOWTIMING PROC NEARCALL DELAYRETTIMING ENDPDELAY PROC NEARPUSH CXPUSH BXMOV BX,0FFHDELAY_:MOV CX,0FFHDELAY_AGAIN:LOOP DELAY_AGAINDEC BXJ

9、NZ DELAY_POP BXPOP CXRETDELAY ENDPCODE ENDSEND START实验五 存储器扩展CODE SEGMENTASSUME CS:CODESTART:MOV CX,50HMOV DI,0MOV AX,2000HMOV DS,AXMOV ES,AXWRITE:MOV AL,0AAHSTOSBMOV AL,55HSTOSBLOOP WRITEMOV CX,50HMOV SI,0000HREAD:LODSWCMP AX,55AAHJNZ NOT_RIGHTLOOP READMOV AL,RMOV DX,88HOUT DX,ALJMP $NOT_RIGHT:MOV

10、AL,EMOV DX,88HOUT DX,ALJMP $CODE ENDSEND START实验六 LED动态 TITLE LED_ACT.ASMPORT_A EQU 2A0HPORT_C EQU 2A2HPORT_CS EQU 2A3HCODE SEGMENTASSUME CS:CODESTART:JMP START_TABLE DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FHSTART_:MOV AX,CSADD AX,10HMOV DS,AXMOV CX,100HMOV DX,PORT_CSMOV AL,80HOUT DX,AL NOP NOPSHOW

11、1:MOV DX,PORT_CMOV AL,2OUT DX,ALMOV CX,10MOV BX,0SHOW2:MOV SI,0SHOW:MOV DX,PORT_AMOV AL,BYTE PTR TABLE+100HSIOUT DX,ALCALL DELAYMOV AL,0OUT DX,ALMOV DX,PORT_CMOV AL,1OUT DX,ALMOV DX,PORT_AMOV AL,BYTE PTR TABLE+100HBXOUT DX,ALCALL DELAYMOV DX,PORT_CMOV AL,2OUT DX,AL;CALL DELAYINC SILOOP SHOWINC BLCMP

12、 BL,9MOV CX,10JNA SHOW2JMP SHOW1DELAY PROC NEAR PUSH CX MOV CX,0FFFFHDELA: LOOP DELA POP CXRETDELAY ENDPCODE ENDSEND START静态 CODE SEGMENTASSUME CS:CODESTART:JMP START1PORT_A EQU 2A0HPORT_C EQU 2A2HPORT_CS EQU 2A3HTABLE DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FHERR_MSG DB THE CHAR CAN NOT DISPLAYED!$

13、START1:MOV AX,CSADD AX,10HMOV DS,AXMOV CX,100HMOV DX,PORT_CSMOV AL,80HOUT DX,AL NOP NOPSTART_:MOV AH,00HINT 16HCMP AL,0JB ERRCMP AL,9JA ERRSUB AL,30HXOR AH,AHMOV SI,AXMOV AL,BYTE PTR DS:TABLESIMOV DX,PORT_AOUT DX,ALDEC CXJNZ START_JMP STARTERR:LEA DX,ERR_MSGINT 21HCODE ENDSEND START实验七 BCD相乘 DISPL M

14、ACRO ADD DL,30H MOV AH,02H INT 21HENDMCRLF MACRO MOV DL,0DH MOV AH,02H INT 21H MOV DL,0AH MOV AH,02H INT 21HENDMDATA SEGMENTDATA1 DB 48HDATA2 DB 75HRESULT DW ?DATA ENDSSTACK SEGMENTSTA DB 20 DUP(?)TOP EQU LENGTH STASTACK ENDSCODE SEGMENTASSUME CS:CODE,SS:STACK,DS:DATA,ES:DATASTART: MOV AX,DATA MOV D

15、S,AX MOV AX,STACK MOV SS,AX MOV AX,TOP MOV SP,AX MOV DI,OFFSET RESULT MOV SI,OFFSET DATA1 MOV AH,SI MOV CL,04H SHR AH,CL MOV DL,AH DISPL MOV AL,SI MOV BL,AL AND AL,0FH MOV DL,AL DISPL CRLF MOV SI,OFFSET DATA2 MOV AH,SI MOV CL,04H SHR AH,CL MOV DL,AH DISPL MOV AL,SI AND AL,0FH MOV DL,AL DISPL CRLF XO

16、R DX,DXS1: CMP BL,0 JZ S2 CLC MOV AL,SI ADC AL,DL DAA MOV DL,AL MOV AL,00H ADC AL,DH DAA MOV DH,AL MOV AL,BL DEC AL DAS MOV BL,AL JMP S1S2: MOV RESULT,DX MOV SI,DX MOV CL,04H SHR DH,CL MOV DL,DH DISPL MOV DX,SI AND DH,0FH MOV DL,DH DISPL MOV DX,SI MOV CL,04H SHR DL,CL DISPL MOV DX,SI AND DL,0FH DISP

17、L CRLFS3: MOV AX,4C00H INT 21HCODE ENDSEND START实验八 两个多位十进制数相加CRLF MACRO MOV DL,0DHMOV AH,02H INT 21H MOV DL,0AHMOV AH,02H INT 21HENDMDATA SEGMENTDATA1 DB 33H,39H,31H,37H,34H;被加数DATA2 DB 36H,35H,30H,38H,32H;加数DATA ENDSSTACK SEGMENTSTA DB 20 DUP(?)TOP EQU LENGTH STASTACK ENDSCODE SEGMENTASSUME CS:COD

18、E,DS:DATA,SS:STACK,ES:DATASTART: MOV AX,DATA MOV DS,AX MOV AX,STACK MOV SS,AX MOV AX,TOP MOV SP,AX MOV SI,OFFSET DATA2MOVBX,05HCALLDISPLCRLFMOVSI,OFFSET DATA1MOVBX,05HCALLDISPLCRLFMOVDI,OFFSET DATA2CALLADDAMOVSI,OFFSET DATA1MOVBX,05HCALLDISPL CRLFMOVAX,4C00HINT21HDISPLPROCNEARDS1:MOV AH,02HMOVDL,SI+

19、BX-1INT21HDECBXJNZDS1RETDISPL ENDPADDAPROCNEARMOVDX,SI MOVBP,DIMOVBX,05HAD1: SUBBYTE PTR SI+BX-1,30HSUBBYTE PTR DI+BX-1,30HDECBXJNZAD1MOVSI,DX MOVDI,BP MOV CX,05HCLCAD2:MOVAL,SIMOVBL,DIADCAL,BLAAA MOVSI,AL INC SIINCDILOOPAD2MOVSI,DXMOV DI,BPMOVBX,05HAD3: ADD BYTE PTR SI+BX-1,30H ADD BYTE PTR DI+BX-1,30HDECBXJNZAD3RETADDAENDPCODEENDSENDSTART