使用IRVINE32.inc.在MASM中进行回文检查

Question

我正在尝试检查字符串是否为回文。我试图使用堆栈来实现这一点，即，将字符串推到堆栈上，并将其弹出到另一个字符串中，然后将它们进行比较。但我的函数最终总是说"不是回文"，即使它是。

编辑：我将str1作为用户的输入。

str1 BYTE 30 DUP('$')

以下是我编写的函数

checkPalindrome PROC
pop address

mov esi , offset str1
mov ecx, lengthof str1
;push till last index of str1
L1:
cmp BYTE PTR [esi], '$'
je exitLoop
push [esi]
inc esi
loop L1
exitLoop:
mov edi, 0
sub ecx, 30
neg ecx
mov lengthStr, ecx
sub ecx, 1
L2:
pop eax
mov str2[edi], al
inc edi
loop L2
mov str2[edi], '$'

;this displays nothing when i assemble
mov edx, offset str2
call writeString

mov esi, offset str1
mov edi, offset str2
mov ecx, lengthStr
sub ecx, 1
L0:
mov eax, [esi]
mov ebx, [edi]
cmp al, bl
jne notPalind
inc esi
inc edi
loop L0

isPalind:
mov edx, offset isPalindrome
call writeString
jmp quit
notPalind:
mov edx, offset notPalindrome
call writeString
quit:
push address
ret
checkPalindrome ENDP

Answer 1

Irvin32不执行以$结尾的字符串。那是DOS的东西

给定你的all-$定义str1 BYTE 30 DUP('$')，并取例如"的输入；ABBA"；，缓冲区看起来像：

65, 66, 66, 65, 0, 36, 36, 36, 36, 36, ...

您的第一个循环将向堆栈中推送5个项目，然后在找到"$"字符后退出。

00000041
00000042
00000042
00000041
00000000  <-- ESP

sub ecx, 30
neg ecx
mov lengthStr, ecx
sub ecx, 1

以上计算将设置lengthStr=5，您发现它已经比实际输入多了1，因此您减去了1。尽管如此，这并没有帮助，因为堆栈仍然包含5个项目，而第一个脱落的项目将是终止零，这将在以后的回文比较中出错
这就是str2在$-终止后的样子：

0, 65, 66, 66, 34

你写了关于str2"这在我组装时什么都不显示"；。这是因为Irvin32只看到一个空字符串。以0开头的字符串。

检查回文会失败，因为这就是两个字符串最后的样子(你比较的部分(：

str1   65, 66, 66, 65
str2    0, 65, 66, 66

解决方案

将cmp BYTE PTR [esi], '$'更改为cmp byte ptr [esi], 0
删除sub ecx, 1
将mov str2[edi], '$'更改为mov str2[edi], 0
移除sub ecx, 1