;T8237.ASM
;8237DMA傳輸實驗

;***************根據CHECK配置信息修改下列符號值*******************
IOY0         EQU  9C00H        ;IOY0起始地址
;*****************************************************************
MY8237_0     EQU  IOY0+00H*4   ;通道0當前地址寄存器 
MY8237_1     EQU  IOY0+01H*4   ;通道0當前字節計數寄存器
MY8237_2     EQU  IOY0+02H*4   ;通道1當前地址寄存器
MY8237_3     EQU  IOY0+03H*4   ;通道1當前字節計數寄存器
MY8237_8     EQU  IOY0+08H*4   ;寫命令寄存器/讀狀態寄存器
MY8237_9     EQU  IOY0+09H*4   ;請求寄存器
MY8237_B     EQU  IOY0+0BH*4   ;工作方式寄存器
MY8237_D     EQU  IOY0+0DH*4   ;寫總清命令/讀暫存寄存器
MY8237_F     EQU  IOY0+0FH*4   ;屏蔽位寄存器 

STACK1 SEGMENT STACK
        DW 256 DUP(?)
STACK1 ENDS

CODE SEGMENT
	ASSUME CS:CODE

START:  MOV DX,MY8237_D   ;寫總清命令
        OUT DX,AL

        MOV DX,MY8237_0   ;寫通道0當前地址寄存器
        MOV AL,00H               
        OUT DX,AL
        MOV AL,00H     
        OUT DX,AL

       	MOV DX,MY8237_2   ;寫通道1當前地址寄存器
        MOV AL,08H        
       	OUT DX,AL
        MOV AL,00H
        OUT DX,AL

        MOV DX,MY8237_1   ;寫通道0當前字節計數寄存器
        MOV AL,07H       
        OUT DX,AL
        MOV AL,00H
        OUT DX,AL

        MOV DX,MY8237_3   ;寫通道1當前字節計數寄存器
        MOV AL,07H        
        OUT DX,AL
        MOV AL,00H
        OUT DX,AL

        MOV DX,MY8237_B   ;寫通道0工作方式寄存器
        MOV AL,88H        
        OUT DX,AL
        MOV AL,85H        ;寫通道1工作方式寄存器     
        OUT DX,AL

        MOV DX,MY8237_8   ;寫命令寄存器
        MOV AL,81H        
        OUT DX,AL
   
        MOV DX,MY8237_F   ;寫屏蔽位寄存器
        MOV AL,00H          
        OUT DX,AL

        MOV DX,MY8237_9   ;寫請求寄存器
        MOV AL,04H        
        OUT DX,AL
        
QUIT:   MOV AX,4C00H      ;結束程序退出
        INT 21H
CODE ENDS
     END START