TIP: Click on subject to list as thread! ANSI
echo: qedit
to: ALL
from: `THE LIBRARIAN`
date: 1997-12-20 01:33:00
subject: What`s Wrong?

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)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.