h813s.asm

来自「上课老师给的8086仿真器」· 汇编 代码 · 共 115 行

CODE SEGMENT
ASSUME CS:CODE
DMA	EQU 00h
	ORG 1730H
START:  CLD
        MOV AL,00		;RAM-RAM
	OUT DMA+0DH,AL
	OUT DMA+0CH,AL
	MOV AL,0FFH
C16:	MOV BL,AL
	MOV BH,AL
	MOV CX,08
	mov dx,DMA
C17:	OUT DX,AL
	PUSH AX
	OUT DX,AL
	NOP
	NOP
	NOP
	IN AL,DX
	MOV AH,AL
	IN AL,DX
	CMP BX,AX
	JE C18
	HLT
C18:	INC DX
	LOOP C17
	INC AL
	JZ C16
        OUT DMA+0DH,AL
        OUT DMA+0CH,AL
	MOV AL,01H
	OUT DMA+08H,AL
	PUSH AX

	MOV AL,00H
	OUT DMA,AL
	PUSH AX
	MOV AL,80H
	OUT DMA,AL

	MOV AL,00H
	OUT DMA+2,AL
	PUSH AX
	MOV AL,90H
	OUT DMA+2,AL

	MOV AL,0FFH
	OUT DMA+1,AL
	PUSH AX
	MOV AL,07H
	OUT DMA+1,AL

	MOV AL,0FFH
	OUT DMA+3,AL
	PUSH AX
	MOV AL,07H
	OUT DMA+3,AL

	MOV AL,88H
	OUT DMA+0BH,AL
	PUSH AX
	MOV AL,85H
	OUT DMA+0BH,AL
	PUSH AX
	MOV AL,42H
	OUT DMA+0BH,AL
	PUSH AX
	MOV AL,43H
	OUT DMA+0BH,AL
	PUSH AX
	MOV AL,0EH
	OUT DMA+0FH,AL
	PUSH AX

	MOV AL,04
	OUT DMA+09H,AL
WBUF1:	MOV BX,0
	MOV WORD PTR DS:[BX+077AH],191AH
	ADD BX,2
	MOV WORD PTR DS:[BX+077AH],1819H
	ADD BX,2
	MOV WORD PTR DS:[BX+077AH],1010H
WAIT:   CALL DISPG
        JMP WAIT

DISPG:	  mov dx,077Fh
	  mov ah,20h
disp0:	  mov cx,00ffh
	  mov bx,dx
	  mov bl,ds:[bx]
	  mov bh,0h
	  push dx
	  mov dx,0ff22h
	  mov al,ds:[bx+data1]
	  OUT DX,AL
	  mov dx,0ff21h
	  mov al,ah
	  OUT DX,AL
disp1:	  loop disp1
	  pop dx
	  dec dx
	  shr ah,01h
	  jnz disp0
	  mov dx,0ff22h
	  mov al,0FFH
	  OUT DX,AL
	  ret
data1:	  db 0c0h,0f9h,0a4h,0b0h,99h,92h,82h,0f8h
	  db 80h,90h,88h,83h,0c6h,0a1h,86h,8eh
	  db 0ffh,0ch,89h,0deh,0c7h,8ch,0f3h,0bfh
	  db 90h,0a3h,0a1h,86h,8fh
CODE ENDS
END  START