int.asm

实施上述事实上述事实上实施上述事实上述事实上上述事实上

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;------------------INT.ASM-----------------------------------------
;------------------initialize sub-program -------------------------
;Internal transfer sub-program	: PR1,PR2
;Program transfer  port		: INT
;Program parameter libary	: SYSTAB,SCRTAB
;program input parameter/variable:  
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

INT:	MOV	COM,#40H		; SYSTEM SET 代码
	LCALL	PR1			; 写入指令代码
	MOV	COUNT1,#00H		; 设置计数器COUNT=0
INT1:	MOV	DPTR,#SYSTAB		; 设置指令参数表地址
	MOV	A,COUNT1		; 取参数
	MOVC	A,@A+DPTR
	MOV	DAT1,A
	LCALL	PR2     		; 写入参数
	INC	COUNT1			; 计数器加一
	MOV	A,COUNT1
	CJNE	A,#08H,INT1		; 循环
	MOV	COM,#44H		; SCROLL 代码
	LCALL	PR1			; 写入指令代码
	MOV	COUNT1,#00H		; 设置计数器COUNT=0
INT2:	MOV	DPTR,#SCRTAB		; 设置指令参数表地址
	MOV	A,COUNT1		; 取参数
	MOVC	A,@A+DPTR
	MOV	DAT1,A
	LCALL	PR2			; 写入参数
	INC	COUNT1
	MOV	A,COUNT1		; 计数器加一
	CJNE	A,#0AH,INT2		; 循环
	MOV	COM,#5AH			; HDOT SCR 代码
	LCALL	PR1			; 写入指令代码
	MOV	DAT1,#00H		; 设置参数P1
	LCALL	PR2			; 写入参数
	MOV	COM,#5BH		; OVLAY 代码
	LCALL	PR1			; 写入指令代码
	MOV	DAT1,#00H		; 设置参数:显示一,三区为文本属性
	LCALL	PR2			; 二重"或"合成
	MOV	COM,#59H		; DISP ON/OFF 代码
	LCALL	PR1			; 写入指令代码
	MOV	DAT1,#54H		; 设置参数:显示一～四区开显示
	LCALL	PR2			; 光标关显示
	RET