
dd=!deaccent $(reply$i)
chemeq_option=n
ddn=!exec chemeq $dd
chemeq_option=

m_reply$i=$dd

gg=!deaccent $(replygood$i)
gg=!rows2lines $gg
gg=!line 1 of $gg
chemeq_option=n
ggn=!exec chemeq $gg
chemeq_option=

!if $ggn = $ddn
 diareply$i=good
 !advance freegot
!else
 diareply$i=bad
!endif

