2_2_4_1.asm

to search a character in a string and print the addre

DATA 	SEGMENT
STR		DB		'K IS A STUDENT FROM NO.1 HIGH SCHOOL OF BAOGANG, KUN DISTRICT, CITY OF BAOTOU, INNER MONGOLIA.$'

COUNT	DW		$-STR
CHAR	DB		' '
DATA 	ENDS

STACK 	SEGMENT
    	
STACK 	ENDS

CODE 	SEGMENT
    	ASSUME 	CS:CODE,DS:DATA,SS:STACK
    	
MAIN	proc
		MOV		AX,DATA
		MOV		DS,AX
		MOV		AL,CHAR
		XOR		SI,SI
		MOV		DI,COUNT
ALLOVER:CMP		STR[SI],'$'
		JZ		DONE
		CMP		AL,STR[SI]
		JZ		MARK
		INC		SI
		JMP		ALLOVER
MARK:	MOV		BX,SI
		MOV		STR[DI],BL
		JMP		A
DONE:	INC		SI
		MOV		STR[SI],0
A:   	 	MOV 	AH,4CH
		INT		21H
MAIN	endp
CODE	ENDS
    	END 		MAIN