t5-2.asm

上课时老师讲的一些经典的例子；错过了就太可惜了呀

ROW	=5
COLUM	=10
ESCKEY	=1BH

DSEG	SEGMENT
MESS	DB'HELLO'
MESS_LEN=$-OFFSET MESS
COLORB	DB 07H,17H,0FH,70H,74H
COLORE	LABEL BYTE
DSEG    ENDS

CSEG	SEGMENT
        ASSUME  CS:CSEG,DS:DSEG
START:	MOV	AX,DSEG
	MOV	DS,AX
	MOV	DI,OFFSET COLORB -1

NEXTC:	INC	DI
	CMP	DI,OFFSET COLORE
	JNZ	NEXTE
	MOV	DI,OFFSET COLORB

NEXTE:	MOV	BL,[DI]
	MOV	SI,OFFSET MESS
	MOV	DH,ROW
	MOV	DL,COLUM
	CALL	ECHO
	MOV	AH,0
        INT     16H
	CMP	AL,ESCKEY
	JNZ	NEXTC
        MOV     AX,4C00H
	INT	21H

ECHO	PROC
	MOV	AX,0B800H
	MOV	ES,AX
	MOV	AL,80
	MUL	DH
	XOR	DH,DH
	ADD	AX,DX
	ADD	AX,AX
	XCHG	AX,BX
	MOV	AH,AL
	JCXZ	ECHO2
ECHO1:	MOV	AL,[SI]
	INC	SI
	MOV	ES:[BX],AX
	INC 	BX
	INC	BX
	LOOP	ECHO1
ECHO2:	RET
	ECHO	ENDP
	CSEG	ENDS
	END 	START