【微机原理实验】汇编语言程序设计-4.docVIP

实验四 接口实验 w88 石光 981239 源程序1； STACK SEGMENT PARA STACK STACK DB 256 DUP(0) STACK ENDS DATA SEGMENT SEG8 DW ? OFF8 DW ? IMR DB ? COUNT DB 100 TENH DB 2 HOUR DB 3: TENM DB 5 MINUTE DB 9: TENS DB 5 SECOND DB 0,0DH,$ DATA ENDS CODE SEGMENT START PROC FAR ASSUME CS:CODE,DS:DATA MOV AX,DATA MOV DS,AX MOV AH,0 INT 16H MOV AL,08H MOV AH,35H INT 21H MOV SEG8,DS ;中断向量应返回在[DS]∶[BX]中 MOV OFF8,BX CLI PUSH DS MOV AX,SEG TIMER MOV DS,AX MOV DX,OFFSET TIMER MOV AL,8 ;此处遗漏中断号 MOV AH,25H INT 21H POP DS MOV AL OUT 43H,AL MOV AX,11932 OUT 40H,AL MOV AL,AH OUT 40H,AL IN AL,21H MOV IMR,AL AND AL,0FCH ;重写IMR应该用“And” OUT 21H,AL STI FOREVER: MOV AH,1 INT 16H CMP AL,20H JZ EXIT MOV DX,OFFSET TENH MOV AH,09H INT 21H MOV AL,SECOND WAITCHA: CMP AL,SECOND JZ WAITCHA JMP FOREVER EXIT: CLI MOV AL,IMR OUT 21H,AL MOV AL,36H OUT 43H,AL MOV AL,0 OUT 40H,AL OUT 40H,AL CLI PUSH DS MOV AX,SEG8 MOV DS,AX MOV DX,OFF8 MOV AH,25H MOV AL,08H INT 21H STI POP DS ;DS出栈 MOV AH,4CH ;功能号有误 INT 21H TIMER PROC FAR PUSH AX DEC COUNT JNZ L2 MOV COUNT,100 INC SECOND CMP SECOND,9 JNE TIMEXT MOV SECOND,0 INC TENS CMP TENS,6 JL TIMEXT MOV TENS,0 INC MINUTE CMP MINUTE,9 JLE TIMEXT MOV MINUTE,0 INC TENM CMP TENM,6 JL TIMEXT MOV TENM,0 JMP L3 L2: JMP TIMEXT L3: MOV AL,HOUR AND AL,0FH MOV AH,TENH AND AH,0FH ;应将后四位全保留 MOV CL,4 ROL AH,CL OR AL,AH ADD AL,1 DAA CMP AL,24H ;此时AL中存的是BCD码 JL L1 MOV TENH,0 MOV HOUR,0 JMP TIMEXT L1: MOV AH,AL AND AL,0FH OR AL,30H MOV HOUR,AL MOV CL,4 ROR AH,CL AND AH,0FH OR AH,30H MOV TENH,AH TIMEXT: MOV AL,20H OUT 20H,AL POP AX IRET TIMER ENDP START ENDP CODE ENDS END START 源程序二； coDE segmenT ;no data segment MOV DX,3FBH MOV AL,80H OUT DX,AL MOV DX,3F8H MOV AL,12 OUT DX,AL ;写入对应波特率9600的波特因子的低八位 INC DX MOV AL,0 OUT DX,AL ;写入对应波特率9600的波特因子的低八位 MOV AL,0BH MOV DX,3FBH OUT DX,AL MOV AL,13H MOV DX,3FCH OUT DX,AL