汇编语言试验二查找匹配字符串

汇编语言 实验二查找匹配字符串一、目的查找匹配字符串SEARCH二、实验内容程序接收用户键入的一个关键字以及一个句子。如果句子中不包含关键字则显示‘NOmatch!’；如果句子中包含关键字则显示'MATCH’，且把该字在句子中的位置用十六进制数显示出来。流程图

三、设计和编码DATASEGMENTmessl DB 'Enterkeyword:','$'mess2 DB 'EnterSentence:','$'mess3 DB 'Matchatlocation:','$'mess4 DB 'NOTMATCH.',13,10,'$'mess5 DB 'Hifthesentence',13,10,'$'changeDB13,10,'$'stokninllabelbytemaxidb10act1db?stoknldb10dup(?)stoknin2labelbytemax2db50act2db?stokn2db50dup(?)DATAENDSSTACKSSEGMENT;此处输入堆栈段代码STACKSENDSCODESEGMENT.*************************************代码段mainprocfarassumecs:code,ds:data,es:dataSTART:pushdssubAX,AXsubBX,BXsubDI,DIsubSI,SIpushAXMOVAX,DATAMOVDS,AXLEADX,mess1MOVah,09INT21hLEADX,stoknin1MOVah,0ahINT21hcmpact1,0jeexita10:;为返回dos并清空后面要用到的寄存器;输出Enterkeyword;用21号中段的0ah号功能获取关键字;如果为空直接退出程序********************************LEADX,changeMOVah,09INT21hLEADX,mess2MOVah,09INT21hLEADX,stoknin2MOVah,0ahINT21hMOVAL,act1CBWMOVCX,AX输入Sentence并判断;输出回程，旅行;输出EnterSentence:;用21号中段的0ah号功能获取旬孑;保存关键字长度到。*PUSHCX ;cx入栈MOVAL,act2cmpAL,0jea50 ;保存旬孑长度到al,若旬孑为空则跳转显示notmatchSUBAL,act1jsa50 ;若旬孑长度小孑关键字长度，则跳转显示notmatchINCALCBWLEABX,stokn2MOVDI,0MOVSI,0a20:;将旬孑的首地址放进BX.****************************************比较内循环MOVAH,[BX+DI]jnea30INCDIINCSIDECjnea30INCDIINCSIDECCXCMPCX,0jea40jmpa20没遇到一个相等的字符,cx-1,cx不为0则比较下一个字符，当cx为0是说明关键字比较完a30:;*****************************************外循环，BX+1,清空si,di继续内循环比较INCBXDECALcmpAL,0jea50MOVDI,0MOVSI,0POPCXpushCXjmpa20a40:;*****************************************match,将bx减去旬孑的首地址加一得到关键字所在位置，调用二进制转十六进制孑函数将位置输出SUBBX,offsetstokn2INCBXLEADX,changeMOVah,09INT21hLEADX,mess3MOVah,09INT21hCALLbtohLEADX,mess5MOVah,09INT21hjmpa10;****************************************二进制转换十六进制btohPROCNEARMOVCH,4rotate:MOVCL,4ROLBX,CLMOVAL,BLandAL,0fhaddAL,30hcmpal,3ahjlprintitaddal,7hprintit:MOVdl,alMOVah,2int21hdecchjnzrotateretbtohendpa50:;*****************************************显示notmatchLEADX,changeMOVah,09INT21hLEADX,mess4MOVah,09INT21hjmpa10exit:retmainendpCODEENDSENDSTART四、运行结果及分析Enterkepuord：abbnterSentence：45454abbatchatlocat