wodefengmian.txt

来自「汇编程序设计万年历封面」· 文本 代码 · 共 108 行

.386
DATA SEGMENT  USE16
X   DB "  ****************************************************$"
X1  DB "  *                ^0^电子万年历^0^                  *$"
X2  DB "   *  版权号：x                                  *$"
X3  DB "    *  开发人：620                              *$"
X4  DB "     *  开发时间：2008                         *$"
X5  DB "      ********************************************$"



DATA ENDS
STACK SEGMENT USE16 STACK
      DB 200 DUP(?)
STACK ENDS
CODE SEGMENT USE16 ;
     ASSUME DS:DATA ,SS:STACK,CS:CODE
BEGIN: MOV AX,DATA
       MOV DS,AX

       MOV AH,6
       MOV CH,0
       MOV AL,0
       MOV CL,0
       MOV DH,24
       MOV DL,79
       MOV BH,7
       INT 10H

       MOV AH,2
       MOV DH,04H
       MOV DL,08H
       MOV BH,0
       INT 10H

       LEA DX,X
       MOV AH,9
       INT 21H

       MOV AH,2
       MOV DH,05H
       MOV DL,08H
       MOV BH,0
       INT 10H

       LEA DX,X1
       MOV AH,9
       INT 21H

       MOV AH,2
       MOV DH,06H
       MOV DL,08H
       MOV BH,0
       INT 10H

       LEA DX,X2
       MOV AH,9
       INT 21H

       MOV AH,2
       MOV DH,07H
       MOV DL,08H
       MOV BH,0
       INT 10H

       LEA DX,X3
       MOV AH,9
       INT 21H

       MOV AH,2
       MOV DH,08H
       MOV DL,08H
       MOV BH,0
       INT 10H

       LEA DX,X4
       MOV AH,9
       INT 21H

       MOV AH,2
       MOV DH,09H
       MOV DL,08H
       MOV BH,0
       INT 10H

       LEA DX,X5
       MOV AH,9
       INT 21H

       MOV AH,4CH
       INT 21H

       MOV AH,1
       INT 21H

       MOV AH,6
       MOV CH,0
       MOV AL,0
       MOV CL,0
       MOV DH,24
       MOV DL,79
       MOV BH,7
       INT 10H
CODE ENDS
  END BEGIN