۱۶-فروردین-۱۳۹۱, ۰۵:۳۰:۴۶
کد:
DSEG SEGMENT 'DATA'
; add your data here!
CCCP LABEL BYTE
MAX DB 20
LEN DB ?
BUFFRE DB 20 DUP('$'),'$'
KGB DB 'Enter String:','$'
PPP DB 'Result:','$'
DSEG ENDS
SSEG SEGMENT STACK 'STACK'
db 256 DUP(0)
SSEG ENDS
CSEG SEGMENT 'CODE'
START PROC FAR
; set segment registers:
MOV AX, DSEG
MOV DS, AX
MOV ES, AX
; add your code here
MOV AH,09H
LEA DX,KGB
INT 21H
MOV AH,0AH
LEA DX,CCCP
INT 21H
MOV CL,LEN
MOV CH,0
MOV SI,0
MOV BL,BUFFRE[SI]
L:
CMP BL,20H
JE K
INC SI
MOV BL,BUFFRE[SI]
LOOP L
JMP F
K:
MOV BUFFRE[SI],'*'
INC SI
MOV BL,BUFFRE[SI]
LOOP L
F:
MOV AH,02H
MOV DL,0AH
INT 21H
MOV AH,02H
MOV DL,0DH
INT 21H
MOV AH,09H
LEA DX,PPP
INT 21H
MOV AH,09H
LEA DX,BUFFRE
INT 21H
MOV AX, 4C00h ; exit to operating system.
INT 21h
START ENDP
CSEG ENDS
END START ; set entry point.