下面的程序是统计输入字符串中单词saw的个数以及第一个出现的saw的偏移地址（以s的偏移地址输出）
问题是改成其它单词就有问题了。



以下为宏库文件MACROUT.LIB，需单独命名为扩展名为.LIB的文件，且与主程序保存在同一目录下。

OAH9  MACRO  A
      LEA DX,A
      MOV AH,9
      INT 21H
      ENDM

OAH2  MACRO B
      MOV DL,B
      MOV AH,2
      INT 21H
      ENDM

HUIHUAN MACRO     
        MOV DL,0AH
        MOV AH,2
        INT 21H
        MOV DL,0DH
        MOV AH,2
        INT 21H
        ENDM
        
JIEWEI  MACRO
        MOV DL,'H'
        MOV AH,2
        INT 21H
        MOV DL,20H
        MOV AH,2
        INT 21H
        ENDM
OAH10   MACRO B
        LEA DX,B
        MOV AH,10
        INT 21H
        ENDM
OAH1    MACRO
        MOV AH,1
        INT 21H
        ENDM
        
        



程序：

INCLUDE MACROUT.LIB
DATAS   SEGMENT
BUF     DB 200
        DB ?
        DB 200 DUP(?)
STR2    DB 'saw'
COUNT2  =$-STR2
COUNT   DW ?
OUTPUT  DB 'Please input a string:$ '
RESULT  DB 0AH,0DH,0AH,0DH,'The number of saw is:' 
FH1     DB 0
FH2     DB 0
FL1     DB 0
FL2     DB 0
ADDRESS DB 0AH,0DH,0AH,0DH,'The effective address is:'
EH1     DB 0
EH2     DB 0
EL1     DB 0
EL2     DB 0
AEND    DB 0
ENDR    DB '$'
DATAS ENDS

STACKS SEGMENT
       DB 200 DUP(0)
STACKS ENDS

CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS,ES:DATAS,SS:STACKS
START:
    MOV AX,DATAS
    MOV DS,AX
    MOV ES,AX
    
    MOV AL,[BUF+1]
    SUB AL,COUNT2
    ADD AL,1
    MOV AH,0
    MOV COUNT,AX
    
    OAH9 OUTPUT
    OAH10 BUF
    CLD
    LEA SI,BUF+2
    MOV BX,SI
LP: LEA DI,STR2
    MOV CX,COUNT2
    REPE CMPSB
    JE  NT
    INC BX
    JMP ET
NT: INC DX
    MOV BX,SI
    CMP DX,1
    JA ET
    
OUTA:
   
    MOV CL,4
    SUB BX,5
    
    MOV AL,BL
    MOV AH,BL
    SHR AL,CL
    ADD AL,30H
    
    AND AH,0FH
    ADD AH,30H
    CMP AH,39H
    JA  ADD7
    JMP OUTE
CMP2:CMP AL,39H
     JA  AD7
     JMP OUTE
     
ADD7:ADD AH,7
     JMP CMP2
AD7: ADD AL,7
OUTE:MOV EL1,AL
     MOV EL2,AH
     MOV AEND,'H'
    
    MOV AL,BH
    MOV AH,BH
    SHR AL,CL
    ADD AL,30H
    AND AH,0FH
    ADD AH,30H
    MOV EH1,AL
    MOV EH2,AH
    ADD BX,5
    
ET: MOV SI,BX
    CMP BX,COUNT
    JBE LP
    CMP DX,2
    JNA OUT0
    
    SUB DX,2
    MOV CH,DH
    MOV AL,DL
    MOV AH,0
    MOV CL,10
    DIV CL
    ADD AL,30H
    ADD AH,30H
    MOV FL1,AL
    MOV FL2,AH
    
    
    MOV AL,CH
    MOV AH,0
    MOV CL,10
    DIV CL
    ADD AL,30H
    ADD AH,30H
    MOV FH1,AL
    MOV FH2,AH
    OAH9 RESULT
    JMP EXIT
OUT0:MOV FH1,'0'
     MOV FH2,' '
     MOV FL1,' '
     MOV FL2,' '
     MOV EH1,'N'
     MOV EH2,'U'
     MOV EL1,'L'
     MOV EL2,'L'
     MOV AEND,20H
     OAH9 RESULT
EXIT:MOV AH,4CH
     INT 21H

CODES ENDS
    END START