;T16550-1.asm
;16550串行通訊基礎(chǔ)實(shí)驗(yàn)

;****************根據(jù)查看端口資源修改下列符號(hào)值*******************
IOY0         EQU   9C00H          ;片選IOY0對(duì)應(yīng)的端口始地址
;*****************************************************************
MY16550_0    EQU   IOY0+00H*4     ;16550數(shù)據(jù)緩沖寄存器端口地址
MY16550_1    EQU   IOY0+01H*4     ;16550中斷允許寄存器端口地址
MY16550_3    EQU   IOY0+03H*4     ;16550線路控制寄存器端口地址

STACK1 SEGMENT STACK
        DW 256 DUP(?)
STACK1 ENDS

CODE SEGMENT
        ASSUME CS:CODE

START: MOV DX,MY16550_3           ;設(shè)置16550線路控制寄存器
       MOV AL,80H                 ;準(zhǔn)備設(shè)置波特率除數(shù)寄存器
       OUT DX,AL

       MOV DX,MY16550_0           ;設(shè)置除數(shù)寄存器低字節(jié)0CH  
       MOV AL,0CH                 ;000C對(duì)應(yīng)9600 bit/s
       OUT DX,AL            
                            
       MOV DX,MY16550_1           ;設(shè)置除數(shù)寄存器高字節(jié)00H
       MOV AL,00H
       OUT DX,AL
       
       MOV DX,MY16550_3           ;設(shè)置線路控制寄存器，初始化數(shù)據(jù)格式
       MOV AL,1BH                 ;偶校驗(yàn)，1位停止位，字符寬度為8
       OUT DX,AL
             
       MOV DX,MY16550_1           ;設(shè)置中斷允許寄存器
       MOV AL,00H                 ;中斷不打開
       OUT DX,AL

SEND:  MOV DX,MY16550_0           ;向發(fā)送緩沖寄存器寫數(shù)
       MOV AL,55H
       OUT DX,AL         
       CALL DALLY

       MOV AH,1                   ;判斷是否有按鍵按下
       INT 16H
       JZ  SEND                   ;無(wú)按鍵則跳回繼續(xù)等待，有則退出

QUIT:  MOV AX,4C00H               ;結(jié)束程序退出
       INT 21H

DALLY PROC NEAR                   ;軟件延時(shí)子程序
       PUSH CX
       PUSH AX
       MOV CX,0100H
D1:    MOV AX,1000H
D2:    DEC AX
       JNZ D2
       LOOP D1
       POP AX
       POP CX
       RET
DALLY ENDP

CODE ENDS
     END START