ХАНДЫФАР

Палиндром - это слово, число, фраза или другая последовательность символов, которые читаются одинаково как в обратном, так и в прямом направлении.

Палиндромы английских слов: civic, deed, deified, deked, DVD, esse, gag, kayak, lemel, level, madam, minim, mom, murdrum, non, noon, peep, poop, pop, racecar, radar, redder, refer, repaper, rotator, rotavator, rotor, sagas, solos, stats, tenet, testset, wow, yay.

1. title Автор: Довгополов Евгений Сергеевич
3. .model small
4. .stack 100h
6. data segment public
7. ____string db _"madam"
8. ____strlen equ ($-string)
9. ____true __db _"True$"
10. ____false _db _"False$"
11. data ends
13. code segment public
14. ____assume ds:data, cs:code
16. ____main proc
17. ________mov ____ax, seg data
18. ________mov ____ds, ax
20. ________mov ____cx, strlen
21. ________lea ____si, ds:[string]
22. ________mov ____di, si
23. ________add ____di, cx
24. ________dec ____di
25. ________shr_____cx, 1
27. ____MainLoop:
28. ________lodsb
29. ________cmp ____al, byte ptr[di]
30. ________jne ____NotPalindrome
32. ________dec ____di
33. ________loop ___MainLoop
35. ________mov ____ah, 09h
36. ________lea ____dx, ds:[true]
37. ________int ____21h
38. ________jmp ____Done
40. ____NotPalindrome:
41. ________mov ____ah, 09h
42. ________lea ____dx, ds:[false]
43. ________int ____21h
45. ____Done:
46. ________mov ____ax, 4C00h
47. ________int ____21h
48. ____main endp
50. code ends
51. end main

Палиндром - это слово, число, фраза или другая последовательность символов, которые читаются одинаково как в обратном, так и в прямом направлении.

Палиндромы английских слов: civic, deed, deified, deked, DVD, esse, gag, kayak, lemel, level, madam, minim, mom, murdrum, non, noon, peep, poop, pop, racecar, radar, redder, refer, repaper, rotator, rotavator, rotor, sagas, solos, stats, tenet, testset, wow, yay.

1. title Автор: Довгополов Евгений Сергеевич
3. .model small
4. .stack 100h
6. data segment public
7. ____string db _"madam"
8. ____strlen equ ($-string) ; Вычисляем длину массива string
9. ____true __db _"True$"
10. ____false _db _"False$"
11. data ends
13. code segment public ______________; Начало сегмента кода
14. ____assume ds:data, cs:code
16. ____main proc ____________________; Начало процедуры main
17. ________mov ____ax, seg data______; Получаем адрес сегмента памяти данных и сохраняем его в ax
18. ________mov ____ds, ax____________; Передаём адрес сегмента памяти данных из регистра ax в ds
20. ________mov ____cx, strlen________; Копируем значение переменной strlen в регистр cx
21. ________lea ____si, ds:[string]___; Загружаем адрес переменной string в регистр-источник ds:si
22. ________mov ____di, si____________; Копируем значение регистра-источника si в регистр-приёмник di
23. ________add ____di, cx____________; К di прбивляем cx. Указатель будет указывать на конец строки + 1
24. ________dec ____di________________; Уменьшаем индекс di на 1
25. ________shr_____cx, 1_____________; Делим длину строки на 2
27. ____MainLoop:
28. ________lodsb_____________________; Загружаем байт по адресу ds:si в регистр al. SI++
29. ________cmp ____al, byte ptr[di]__; Сравниваем значение в al со значением в регистре-приёмнике di
30. ________jne ____NotPalindrome_____; Если ZF=0, то прыгаем на метку NotPalindrome
32. ________dec ____di________________; Уменьшаем индекс di на 1. Смотрим следующий символ с конца строки
33. ________loop ___MainLoop__________; Выполняем цикл пока CX≠0
35. ________mov ____ah, 09h___________; Копируем значение функции вывода строки в регистр ah
36. ________lea ____dx, ds:[true]_____; Загружаем адрес переменной true в регистр ds:dx
37. ________int ____21h_______________; Вызываем прерывание
38. ________jmp ____Done______________; Выполняем безусловный переход на метку Done
40. ____NotPalindrome:
41. ________mov ____ah, 09h___________; Копируем значение функции вывода строки в регистр ah
42. ________lea ____dx, ds:[false]____; Загружаем адрес переменной false в регистр ds:dx
43. ________int ____21h_______________; Вызываем прерывание
45. ____Done:
46. ________mov ____ax, 4C00h_________; Копируем значение функции завершения в ah а значение в al
47. ________int ____21h_______________; Вызываем прерывание
48. ____main endp ____________________; Конец процедуры main
50. code ends ________________________; Конец сегмента кода
51. end main _________________________; Конец файла. Точкой входа указывается процедура main