screen.txt

建立一个安全、完整的学生信息管理系统

;;;;;;;;;;;;;;;;;;;;;;;屏幕宏定义;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;显示;;;;;;;;;;;;;;;;;;;;;;;
SHOW MACRO ADDRS
        LEA DX,ADDRS
        MOV AH,9
        INT 21H
        ENDM
;;;;;;;;;;;;;;;;;;;;;;;指定光标位置a,16;;;;;;;;;;;;;;;;;;;;;;;
SET_P1 MACRO  A
        MOV AH,2
        MOV DH,A
        MOV DL,16
        MOV BH,0
        INT 10H
        ENDM
;;;;;;;;;;;;;;;;;;;;;;;指定光标位置12,2;;;;;;;;;;;;;;;;;;;;;;;
SET_P2 MACRO
       MOV AH,2
       MOV DH,12
       MOV DL,2
       MOV BH,0
       INT 10H
       ENDM
;;;;;;;;;;;;;;;;;;;;;;;指定光标位置a,b;;;;;;;;;;;;;;;;;;;;;;;
SET_P3 MACRO  A,B
        MOV AH,2
        MOV DH,A
        MOV DL,B
        MOV BH,0
        INT 10H
        ENDM
;;;;;;;;;;;;;;;;;;;;;;;初始化选择光标;;;;;;;;;;;;;;;;;;;;;;;
CURSOR_ORIGINAL MACRO
       			MOV AH,2
       			MOV DH,12
       			MOV DL,30
       			MOV BH,0
       			INT 10H
       			ENDM

CLEAR    MACRO						;清全屏
	     MOV AX,0600H
       	 MOV CX,0
         MOV DX,184FH
         MOV BH,0CH
         INT 10H
         ENDM
         
CLEAR1   MACRO						;清下屏等待输入name....
	     MOV AX,0600H
       	 MOV CH,14
         MOV CL,1
         MOV DH,18
         MOV DL,26
         MOV BH,5FH
         INT 10H
         ENDM
CLEAR2   MACRO						;list后显示
	 	 MOV AX,0600H
       	 MOV CH,15
         MOV CL,0
         MOV DH,25
         MOV DL,38
         MOV BH,7FH
         INT 10H
         ENDM

CLEAR3   MACRO						;list后显示
	     MOV AX,0600H
       	 MOV CH,14
         MOV CL,0
         MOV DH,14
         MOV DL,38
         MOV BH,5FH
         INT 10H
         ENDM

ENTER_KEY MACRO						;enter
        PUSH AX
        PUSH DX
        MOV DL,0DH
        MOV AH,2
        INT 21H
        MOV DL,0AH
        MOV AH,2
        INT 21H
        POP DX
        POP AX
        ENDM

;;;;;;;;;;;;;;;;;;;;;;;显示成绩;;;;;;;;;;;;;;;;;;;;;;;
SHOW_ITEM MACRO ADDRS
        LOCAL LOP_1,LOP_3,LOP_2
        PUSH BX
        PUSH CX
        MOV BX,0
LOP_1:  MOV DL,ADDRS[BX]         ;DISPLAY CHAR
        MOV AH,2
        INT 21H
        INC BX
        CMP BX,10
        JL  LOP_1
        MOV DL,' '
        MOV AH,2
        INT 21H
        MOV DL,' '
        MOV AH,2
        INT 21H
        MOV CX,6
LOP_2: 	MOV DL,ADDRS[BX]
        MOV AH,2
        INT 21H
        INC BX
        LOOP  LOP_2
        MOV CX,3
LOP_3:  MOV DL,' '
        MOV AH,2
        INT 21H
        MOV DL,ADDRS[BX]
        MOV AH,2
        INT 21H
        INC BX
        MOV DL,ADDRS[BX]
        MOV AH,2
        INT 21H
        INC BX
        MOV DL,ADDRS[BX]
        MOV AH,2
        INT 21H
        INC BX
        LOOP  LOP_3
        ENTER_KEY
        POP CX
        POP BX
        ENDM
;;;;;;;;;;;;;;;;;;;;;;;接收字符;;;;;;;;;;;;;;;;;;;;;;;;
PUT   MACRO ADDRS,COUNT2
LOCAL   INITIAL,LOP_IN,INPUT_E,EXIT_INPUT
        PUSH BX
        PUSH AX
        MOV BX,0
INITIAL: MOV ADDRS[BX],' '
        INC BX
        CMP BX,10
        JL  INITIAL

        MOV BX,0
LOP_IN:     MOV AH,1
        INT 21H
        CMP AL,0AH
        JZ  INPUT_E
        CMP AL,0DH
        JZ  INPUT_E
        MOV ADDRS[BX],AL
        INC BX
        CMP BX,COUNT2
        JL LOP_IN
INPUT_E: CMP AL,0DH
        JZ  EXIT_INPUT
        CMP AL,0AH
        JZ  EXIT_INPUT
        MOV AH,7
        INT 21H
        JMP INPUT_E
EXIT_INPUT:   
        POP AX
        POP BX
        ENDM