簡單的bug找了一下午
現(xiàn)有一組字符串為data,name,time,file,code,path,user,exit,quit,text觅廓，請編寫程序從鍵盤輸入4個字符的字符串，若存在將其刪除, 并在顯示器上顯示。
有空再加注釋吧撒璧。
DATAS SEGMENT
? ? BUF1 DB 'data,name,time,file,code,path,user,exit,quit,text','$'
? ? BUF2 DB 5
? ? DB ?
? ? DB 5 DUP(?)
? ? ;此處輸入數(shù)據(jù)段代碼?
DATAS ENDS
STACKS SEGMENT
? ? ;此處輸入堆棧段代碼
STACKS ENDS
CODES SEGMENT
? ? ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
? ? MOV AX,DATAS
? ? MOV DS,AX
? ? MOV ES,AX
? ? LEA DX,BUF2
? ? MOV AH,0AH
? ? INT 21H
? ? MOV DL,0AH
? ? MOV AH,02H
? ? INT 21H
? ? MOV CH,10
? ? MOV CL,04H
? ? LEA SI,BUF1
? ? LEA DI,BUF2[2]
L:
CMP CH,0
JZ END0
NEXT:
CMPSB
JNZ TIAOZHUAN
DEC CL
CMP CL,0
JZ CHANGE
JMP NEXT
TIAOZHUAN:
CMP CL,0
JZ DAYIN
DEC CL
INC SI
JMP TIAOZHUAN
DAYIN:
MOV DL,BUF1[SI-5]
MOV AH,02H
INT 21H
MOV DL,BUF1[SI-4]
MOV AH,02H
INT 21H
MOV DL,BUF1[SI-3]
MOV AH,02H
INT 21H
MOV DL,BUF1[SI-2]
MOV AH,02H
INT 21H
CMP BUF1[SI-1],'$'
JZ END0
MOV DL,BUF1[SI-1]
LEA DI,BUF2[2]
MOV AH,02H
INT 21H
MOV CL,4
DEC CH
JMP L
CHANGE:
INC SI
DEC CH
MOV CL,4
LEA DI,BUF2[2]
JMP L
END0:
? ? ;此處輸入代碼段代碼
? ? MOV AH,4CH
? ? INT 21H
CODES ENDS
? ? END START
