[Date Prev][Date Next][Subject Prev][Subject Next][
Date Index][
Subject Index]
Re: SPELL frame
- Subject: Re: SPELL frame
- From: Carl Distefano cld@xxxxxxxx
- Date: Sat, 21 Jan 2012 19:31:31 -0500
Reply to note from Fred Weiner Fri, 20 Jan 2012
21:07:28 -0700
As a codicil to my previous post, here's a pair of U2 routines,
ADDWD and DELWD, that will enable you to add or *remove* words, or
word pairs (for Auto-Replace), to or from the spelling file without
manually editing that file. ADDWD adds the word under the
cursor, or DeFined text, to the loaded SPell file (appends it to the
end of the file). You can also specify a word, or word pair, on the
CMline:
ADDWD iPhone
ADDWD iph iPhone
The same usages apply to DELWD.
You can also batch-add or batch-delete short lists of words, by
DeFining them and issuing the desired command. There's a 77-
character limit on batch lists, however.
XPLeNCODE v2.0
b-gin [UNTITLED]
{{;5addwd,delwd}} Add|Delete word under cursor (or DeFined li
st of words or word pairs) to|from the loaded SPell file ({<}
VA$SP{>}) [CLD 1/21/12][cr|lf]{002}{<}IF{<}VA$WS{>}==1{>}{<}I
F{<}VA$WA{>}>0{>}{<}SX01,@upr({<}VA$FR{>}){>}{<}SX02,{<}VA@50
{>}{>}{<}IF{<}VA|02{>}<1{>}[DZ_]{<}IF{<}VA$DE{>}<1{>}[JM_]2.D
Wonly[Q2_]{<}EI{>}{<}SV02{>}{<}EI{>}{<}IF{<}VA|02{>}<77{>}{<}
SV03,[cr|lf]{014}{>}{<}IF({<}IS02{>}+"{014}"){240}{<}IS03{>}{
{062}}{<}SX02,{<}IS02{>}+"{014}"{>}{<}XS02,03,03,04,04{>}{<}SX02,
{<}IS03{>}{>}{<}EI{>}[YD_]{<}SV03,{>}{<}SX50,{<}VA$SP{>}{>}{<
}IF{<}IS50{>}<>"(none)"{>}[DX_][JM_]2.CallorGo/100[Q2_][TF_][
BX_]se "[wC]{<}PV02{>}[wC]"[Q2_]{<}IF@not({<}ER{>}){>}{<}IF"A
"{238}{<}IS01{>}==0{>}{<}SV01,Already in{>}{<}LBa{>}[BX_]ab/n
v[Q2_]{<}IF{<}VA$WS{>}<1{>}[BX_]rs[Q2_]{<}EI{>}{<}IF{<}VA|03{
{062}}>0{>}[BX_]load {<}PV50{>}[Q2_][BX_]wait[Q2_]{<}EI{>}[DO_][F
F_]{<}SX01,{<}IS01{>}+" "+{<}IS50{>}{>}{<}PR@01{>}{<}EX{>}{<}
EI{>}[LB_][YD_][DF_][BX_]seb "[wC]{<}PV02{>}[wC]"[Q2_][CR_][D
F_][DN_][BX_]sa[Q2_][BX_]wait[Q2_]{<}SV01,Removed from{>}{<}S
V03,!{>}{<}GLa{>}{<}EI{>}{<}IF"A"{238}{<}IS01{>}==0{>}[BX_]ap
fil {<}PV50{>},{<}PV02{>}[Q2_][BX_]wait[Q2_]{<}SV01,Added to{
{062}}{<}SV03,!{>}{<}GLa{>}{<}EI{>}{<}SV01,Not found in{>}{<}GLa{
{062}}{<}EI{>}{<}PRNo personal SPell file loaded{>}{<}EX{>}{<}EI{
{062}}{<}PRDeFined block too long{>}{<}EX{>}{<}EI{>}{<}PRNo windo
w{>}{<}EX{>}{<}EI{>}{<}PRNo file{>}{002}[cr|lf][cr|lf]
-nd
XPLeNCODE
--
Carl Distefano
cld@xxxxxxxx