21,459
社区成员
发帖
与我相关
我的任务
分享
A SEGMENT
NUM DB 00111001B
BUF DB 0AH,0DH,'(NUM)='
BUF0 DB 4 DUP(?)
A ENDS
B SEGMENT STACK
DB 200 DUP(0)
B ENDS
C SEGMENT
ASSUME DS:A,SS:B,CS:C
BEGIN: MOV AX,A
MOV DS,AX
LEA DI,BUF0
MOV AL,NUM
MOV CL,4
SHR AL,CL
OR AL,30H
MOV [DI],AL
OR AL,30H
MOV [DI],AL
INC DI
MOV AL,NUM
AND AL,0FH
OR AL,30H
MOV [DI],AL
INC DI
MOV BYTE PTR [DI],'H'
INC DI
MOV BYTE PTR [DI],'$'
LEA DX,BUF
MOV AH,9
INT 21H
MOV AH,4CH
INT 21H
C ENDS
END BEGIN
A SEGMENT
NUM DB 00111001B
BUF DB 0AH,0DH,'(NUM)='
BUF0 DB 4 DUP(?)
A ENDS
B SEGMENT STACK
DB 200 DUP(0)
B ENDS
C SEGMENT
ASSUME DS:A,SS:B,CS:C
BEGIN: MOV AX,A
MOV DS,AX
LEA DI,BUF0
MOV AL,NUM
MOV CL,4
SHR AL,CL
OR AL,30H
MOV [DI],AL
OR AL,30H
MOV [DI],AL
INC DI
MOV AL,NUM
AND AL,0FH
OR AL,30H
MOV [DI],AL
INC DI
MOV BYTE PTR [DI],'H'
INC DI
MOV BYTE PTR [DI],'$'
LEA DX,BUF
MOV AH,9
INT 21H
MOV AH,4CH
INT 21H
C ENDS
END BEGIN