Tham khảo tài liệu 'giới thiệu hợp ngữ assembler very good phần 10', công nghệ thông tin, kỹ thuật lập trình phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả | vị trí bắt đẩu START offset MAINST ENDIF REPEAT .So sánh các ký tự tương ứng trong MAINST bắt đẩu từ START và SUBST IF tất cả các ký tụ đều giống nhau THEN SUBST được tìm thây trong MAINST ELSE START START 1 END IF UNTIL SUBST được tìm thây trong MAINST OR. START STOP Hiển thị kết quả Sau khi đọc vào 2 chuỗi SUBST MAINST kiểm tra xem chúng khác rồng và SUBST không dài hơn MAINST. Tại dòng 44 - 50 chương trình tính vị trí dừng STOP vỊ trí trong MAINST để dừng lại việc tìm kiếm và khởi tạo vị trí bắt đầu STARÍỴvị trí tìm kiếm bằng đầu chuỗi MAINST. Chương trình Nguổn PGM11_5 ASM 1 TITLE PGM11. 5 Tìm chuỗi con 2 .MODEL SMALL 3 .STACK. 100H 4 -DATA 5 MSG1 DB VAO CHUOI CON SƯBST OAH ODH 6 MSG2 DB ŨAH ŨDH VAO CHUOI CHINH MAINST DB OAH ODH 7 MAINST ĐB 8C DUP O 8 SUBST DB 80 DUP O 9 STOP DW CUỐI cùng để tìm kiếm 10 START DW Vị trí tiếp tục tìm kiếm 11 SUB-LEN DW Chiều dài chuỗi con 12 YESMSG DB OAH ODH SUBST1la chuoi con cua DB MAINST 13 NOMSG DB OAH ODH SUBST khonợ lạ chuoi con gua DB MAINST 14 CODE 15 MAIN PROC 16 MOV AX ộDATA 17 MOV . DS AX 18 MOV ES- AX 19 Thông báo chó chuỗỉ con 291 20 MOV AH 9 Hàm con ỉn một chuỗi ký tự 21 LEA DX MSG1 Thông báo vào chuỗi con 22 INT 21H 23 Đọc chuỗi SUBST 24 LEẰ DI SUBST DI trỏ vào chuỗi con 25 CALL READ_STR BX chứa chiều dài chuỗi con 26 MOV SUB-LEN BX Cất nó trong biên SUB_LEN 27 ỉ Thông báo cho chuỗi chính 28 LEA DX MSG2 Thông báo vào chuỗi. MAĨNST 29 INT 21H 30 ỉ Đọc chuỗi MAINST 31 LEA DI MAĨNST DI trỏ tỏi chuỗi MAINST 32 CALL READ_STR ĩBX chứa chiều dài chuỗi MAINST 33 Kiểm tra xèm các chuỗi CÓ rỗng hay SUBST có dài hơn MAINST không 34 OR BX BX MAĨNST rỗng 35 JE NO Đúng SUBST không phải là chuỗi con của MAĨNST 36 CMP SUB-LEN 0 SUBST rỗng 37 JE NO Đúng SUBST không phải chuỗicon 38 CMP SUB_LEN BX SUBST dài hơn MAINST 39 JG NO Đúng iSUBST không phải chuỗicon .40 Kiểmtra xem SUBST có phải là chuỗi con của MAINST không - 41 LEA SI SUBST SI trỏ tới SUBST 42 LEA DI MAINST DI trỏ tới MAINST 43 CLD Xử lý từ trái ạua phải .
