2.asm

来自「此程序是微机与接口技术的课程设计源程序 」· 汇编 代码 · 共 47 行

;2.ASM
EXTRN	INFO1:BYTE,INFO2:BYTE,BUFA:BYTE,BUFB:BYTE,INFO0:BYTE
PUBLIC	CHANGE1
CODE 	SEGMENT
  		ASSUME CS:CODE
LOWTOHIGH PROC NEAR
   		CMP AL,'A'
   		JB STOP
   		CMP AL,'Z'
   		JA STOP
   		SUB AL,20H
STOP :	RET
LOWTOHIGH ENDP
CHANGE1 PROC FAR
   		LEA DX,INFO0
   		MOV AH,9
   		INT 21H

   		LEA DX,INFO1
   		MOV AH,9
   		INT 21H
   		LEA DX,BUFA
   		MOV AH,10
   		INT 21H
   		LEA SI,BUFA+1
   		LEA DI,BUFB
   		MOV CH,0
   		MOV CL,[SI]
   		ADD SI,1
NEXT:	MOV AL,[SI]
     	CALL LOWTOHIGH
     	MOV [DI],AL
     	INC SI
     	INC DI
     	LOOP NEXT
     	MOV BYTE PTR [DI],'$'
     	LEA DX,INFO2
     	MOV AH,9
     	INT 21H
     	LEA DX,BUFB
     	MOV AH,9
     	INT 21H
     	RET
CHANGE1 ENDP
CODE 	ENDS
  		END