80x86 汇编语言：查找字符串

;输入两个字符串。str1 长度，要比 str2 更长一些。

;在 str1 中查找，是否存在 str2。

;是则返回 str2 首字符在 str1 中的位置(从0开始)。

;否则返回 －1。

;题目链接：http://zhidao.baidu.com/question/1447835264679045420

;做而论道编程如下：    (2015-04-08 11:16 提问者采纳)

DATAS   SEGMENT

  STRING3  DB  'Please  input  string1(string1>string2):', 13, 10, '$'

  STRING4  DB  'Please  input  string2(string1>string2):', 13, 10, '$'

  CR_LF  DB  13, 10, '$'

  STF1   DB  10, ?, 10  DUP(?)

  STF2   DB  10, ?, 10  DUP(?)

  CHA    DW  ?

DATAS   ENDS

CODES   SEGMENT

    ASSUME   CS:CODES, ES:DATAS, DS:DATAS    

START:

    MOV   AX, DATAS

    MOV   DS, AX

    MOV   ES, AX

    LEA   DX, STRING3

    MOV   AH, 9

    INT   21H

    LEA   DX, STF1

    MOV   AH, 0AH

    INT   21H          ;123ASDF45

    LEA   DX, CR_LF

    MOV   AH, 9

    INT   21H

    LEA   DX, STRING4

    MOV   AH, 9

    INT   21H

    LEA   DX, STF2

    MOV   AH, 0AH

    INT   21H          ;ASDF

    LEA   DX, CR_LF

    MOV   AH, 9

    INT   21H

;-----------------------下面是比较查找

    MOV   AL, STF1 + 1 

    SUB   AL, STF2 + 1

    MOV   AH, 0

    MOV   CHA, AX      ;长度之差=5

    CLD

    MOV   BX, 0        ;BX=0~4, 这是 str2 首字符在 str1 中的位置(从0开始)

LP1:

    LEA   SI, STF1 + 2 ;源串

    ADD   SI, BX       ;从源串+0~4开始找

    LEA   DI, STF2 + 2 ;另一个串

    MOV   CL, STF2 + 1 ;比较4个字符

    MOV   CH, 0

    REPZ  CMPSB        ;串比较

    JZ    YES          ;找到则转移

    INC   BX           ;起始位置，向下移

    CMP   BX, CHA

    JNZ   LP1          ;不到5次，则继续找

;-----------------------下面是显示结果

NO:

    MOV   AH, 2

    MOV   DL, '-'

    INT   21H

    MOV   DL, '1'

    INT   21H

    JMP   EXIT 

YES:

    MOV   AH, 2

    MOV   DL, BL       ;0~4

    ADD   DL, '0'

    INT   21H  

EXIT:

    MOV   AH, 4CH

    INT   21H

CODES   ENDS

    END   START

提问者评价：希望您继续帮助我一下！！！