查找匹配字符串.zip

中南大学 汇编 上机 查找匹配字符串 ;PROGRAM TITLE GOES HERE--search ;******************************* datarea segment mess1 db 'Enter keyword:','$' mess2 db 'Enter Sentence:','$' mess3 db 'Match at location:','$' mess4 db 'No match!',13,10,'$ ' mess5 db 'match.',13,10,'$ ' mess6 db 'H of the sentence.',13,10,'$ ' ; stokn3 db 10 dup(?) stoknin1 label byte max1 db 10 act1 db ? stokn1 db 10 dup(?)