Re: programming question

["cmadsen" cmadsen@xxxxxxxx]

It seems to me that Morris is trying to find all of his shorthand words and
expand them into their longer counterparts. I'm not sure why he's even using
a program to do this. He can make a personal dictionary out of the
shorthands and their counterparts and then spell check the file.

chris

----- Original Message -----
From: "Carl Distefano" 
To: "XyWrite List" 
Sent: Friday, February 14, 2003 11:52 PM
Subject: Re: programming question


>
> Reply to note from "Morris Krok"  Fri, 14 Feb
> 2003 08:02:44 -0800
>
> Morris:
>
> > In order for this program to check one word after another, it
> > makes provision to place shtfind on the command line. Is there
> > another way in which this program can accomplish it. You will
> > also notice that I did not use BX se ??Q2 when searching for a
> > word as it did not work.
>
> Your SEarch command doesn't work with BX because of the func CL
> within the command. It serves no useful purpose; omit it. Once you
> get rid of the CMline-destroying func BC, there's no need to refresh
> the CMline with BC shtfind GT; you can omit the two occurrences of
> that. Plus, you have an unnecessary GoLabel command; that can be
> avoided by trapping errors with )> instead of >.
> I suggest using SE/W instead of "S" wildcards to find whole words.
> And there should be a YD before DW, to avoid an error if text is
> already DeFined. One other thing: the final  can be omitted in
> a U2 frame.
>
> So, without really understanding what this program does, I come out
> with the following, which should perform the same function as your
> original, while preserving the CMline:
>
> XPLeNCODE v2.0
> b-gin [UNTITLED]
> {{;5shtfind}}[cr|lf]{002}[BX_]es 1[Q2_][YD_][DW_] {<}SV06{>}[
> DE_][YD_][AS_][TF_][BX_]se/w /{<}PV06{>}/[Q2_]{<}IF@not({<}ER
> {>}){>}[AS_][GT_]*{<}EX{>}{<}EI{>}[PW_][PW_][DW_]{<}SV08{>}[Y
> D_][AS_]({<}PV08{>}[CL_]) {002}[cr|lf][cr|lf]
> -nd
> XPLeNCODE
>
> By the way, your code has a space after "DW " and two spaces after
> "CL )". I'm not sure they're meant to be there, but I didn't delete
> them.
>
> --
> Carl Distefano
> cld@xxxxxxxx
> http://users.datarealm.com/xywwweb/
>
>