rjexp15.asm

显示屏相关程序实现显示屏点亮控制等功能.

DATA  SEGMENT
WLUX  DB 0
WLUY  DB 0
WRDX  DB 24
WRDY  DB 79
CSTL  DB 01
CEDL  DB 07
TSTL  DB 04
TSTR  DB 05
PG    DB 0
DATA  ENDS
STACK  SEGMENT
STA   DB    50 DUP(?)
TOP   EQU   LENGTH STA
STACK  ENDS
CODE  SEGMENT
ASSUME  CS:CODE,DS:DATA,ES:DATA,SS:STACK
START:  MOV  AX,DATA
        MOV  DS,AX
        MOV  ES,AX
        MOV  AX,STACK
        MOV  SS,AX
        MOV  SP,TOP   ;段寄存器和堆栈初始化
        MOV  AH,07H
        MOV  AL,00H   ;清整个窗口为空白
        MOV  BH,07H   ;属性为正常显示
        MOV  CH,WLUX
        MOV  CL,WLUY    ;左上角坐标
        MOV  DH,WRDX    
        MOV  DL,WRDY    ;右下角坐标 
        INT  10H      ;显示I/O      
        MOV  CH,CSTL   ;起始行
        MOV  CL,CEDL   ;结束行
        MOV  AH,01H
        INT  10H       ;设置光标类型
        MOV  DH,TSTL   ;光标起始行
        MOV  DL,TSTR   ;光标起始列
        MOV  BH,PG   ;当前显示页
        MOV  AH,02H
        INT  10H      ;设置光标位置
PPP:    MOV  AX,4C00H
        INT  21H      ;返回DOS
CODE    ENDS
END     START