| 
 | 
	
 
ddd segment 
   FIRST DB 'This is A Third Example$' 
   count EQU 100 
   RESULT DW ? 
ddd ends 
code segment 
  assume cs:code,ds:ddd 
start: 
     MOV AX,DDD 
     MOV DS,AX 
     MOV CX,count 
     MOV DX,0 
     MOV SI, OFFSET FIRST 
LL:  LODSB 
     CMP AX, 'A' 
     JNE NEXT 
     INC DX 
NEXT OOP LL 
     MOV RESULT, DX 
     MOV AH, 4CH 
     INT 21H 
code ends 
     end 
[em01] |   
 
 
 
 |