From: "The Librarian"
The following macro makes arbitrary stops without finding a duplicate
line. Can someone please tell me why?
Thanks,
snip===============================================================snip
proc Main()
set(Break, On)
Repeat
DelBookMark("a")
DelBookMark("b")
BegLine()
PlaceMark("a")
MarkLine()
Right()
If Not lFind(GetMarkedText(), "i")
Down()
UnmarkBlock()
DelBookMark("a")
Sound(10) Delay(1) NoSound()
else
PlaceMark("b")
UnmarkBlock()
halt
endif
Until not Down()
end
snip===============================================================snip
This macro is used to eliminate duplicate passages when material has
been scanned twice. Sometimes it's only a page, but more than once it's
a complete chapter.
---
---------------
* Origin: apana>>>>>fidonet [sawasdi.apana.org.au] (3:800/846.13)
|