TIP: Click on subject to list as thread! ANSI
echo: qedit
to: ALL
from: PHLETE TEACHOUT
date: 1997-09-02 21:28:00
subject: Mac.to find beg/end sentence

From: Phlete_Teachout@sptc.webfld.navy.mil (Phlete Teachout)
     
        Not sure why this came to me instead of the list.
______________________________ Forward Header 
__________________________________
Subject: Mac.to find beg/end sentence
Author:  HS  at sptc
Date:    8/30/97 5:42 AM
Hi
     
I need a macro to find the begin of a sentence (cursor on th first letter) 
and the end (cursor after the ./!/?/:. - The macro which I created does not 
in every case exactly what i want. Here is it:
     
________
     
proc BegSentence()
     PrevChar() // because I didn't find the opposit of the + find option 
     lFind("[\.\?\:\!]{{$$}|{ #\c}}","BX")
end
     
// Is there an opposite option to "+" for lFind() available? - If the 
sentence begins with a new paragraph I was not able to force the curser to 
stay on the first letter - //
     
proc EndSentence()
     lFind("[\.\?\:\!]\c{{$$}|{ #}}","FX")
end
     
     BegSentence() 
    EndSentence()
     
___
     
Is there a better way to do what I want?
     
Regards
     
Hanspeter Schaffner
---
---------------
* 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™.