4main.asm

自己写的汇编程序 有时钟功能,可重置时钟,是我自己觉得写的不错的1个程序

EXTRN   ONE:NEAR,SND:NEAR,TRD:NEAR,FTH:NEAR

DATA 	SEGMENT  PUBLIC 'DATA'
TIP	DB '1.CHANGE lower to CAP      '
        DB '2.SEEK FOR THE MAX         '
        DB '3.SORTING                 '
	DB '4.TIME                     '
        DB '5.EXIT                    '
	DB '                           '
        DB 'PLEASE PRESS THE RIGHT KEY TO SELECT'
	DB '	'
	DB '$'
ERROR	DB 'YOU HAVE PRESSED THE WRONG KEY!'
        DB '                         '
        DB '                        '
        DB 'PLEASE PRESS THE ANY KEY TO BACK TO THE MENU '
	DB '	'
	DB '$'
DATA 	ENDS

STACK	SEGMENT PARA STACK 'STACK'
	DB 200 DUP(0)
STACK	ENDS

CODE 	SEGMENT PARA PUBLIC 'CODE'
     	ASSUME CS:CODE,DS:DATA,SS:STACK
START   PROC  
        MOV   AX,STACK
        MOV   SS,AX
        PUSH  DS
        MOV   AX,0
        PUSH  AX
        MOV   AX, DATA
        MOV   DS,AX
MENU:	MOV AH,6		;清屏 
        MOV BH,7
        MOV CX,0
        MOV DX,184FH
        INT 10H         	
	MOV AH,2		;光标控制
	MOV BH,0
	MOV DH,1
	MOV DL,0
	INT 10H
	LEA DX,TIP		;显示菜单
	MOV AH,9
	INT 21H
KEYIN:	MOV AH,1
	INT 21H
	MOV AH,0
	CMP AL,'5'
	JZ  EXIT
	CMP AL,'1'
	JZ  CALL1
	CMP AL,'2'
	JZ  CALL2
	CMP AL,'3'
	JZ  CALL3
	CMP AL,'4'
	JZ  CALL4
WRONG:	MOV AH,6
        MOV BH,7
        MOV CX,0
        MOV DX,184FH
        INT 10H         	;清屏 
	MOV AH,2
	MOV BH,0
	MOV DH,1
	MOV DL,0
	INT 10H
	LEA DX,ERROR
	MOV AH,9
	INT 21H
	MOV AH,1
	INT 21H
	JMP MENU
EXIT:   MOV AH,4CH
        INT 21H
CALL1:	CALL ONE
	JMP MENU
CALL2:	CALL SND
	JMP MENU
CALL3:	CALL TRD
	JMP MENU
CALL4:	CALL FTH
	JMP MENU
CODE	ENDS
	END START