PW [0+8+FQ(+4)[1 0FO10F"G+Q1' +FQ()+4U1 FQ1"L0' ,Q1:M(Q1+4(]1]0)) I$ 7 I)Xqh 0{ xj {$5> 4N GXq]nf,n5E*={T`sr~X&/9ELMiZ;d6kb%& DOCOND Alternatives Declaration%& Docond Char Replace Declaration& DOCOND Flag Declaration & DOCOND Implies Declaration'& DOCOND Local Variable Declaration& DOCOND Lookup& DOCOND Print Declaration!& DOCOND Process Conditionals!& DOCOND Process Declarations& DOCOND Refill & DOCOND Replace Declaration& DOCOND Safety DOCONDDOCOND Set Flag~DIRECTORY~+~DOC~ & DOCOND Alternatives Declaration+~DOC~ & Docond Char Replace Declaration#~DOC~ & DOCOND Flag Declaration&~DOC~ & DOCOND Implies Declaration-~DOC~ & DOCOND Local Variable Declaration~DOC~ & DOCOND Lookup$~DOC~ & DOCOND Print Declaration'~DOC~ & DOCOND Process Conditionals'~DOC~ & DOCOND Process Declarations~DOC~ & DOCOND Refill&~DOC~ & DOCOND Replace Declaration~DOC~ & DOCOND Safety~DOC~ DOCOND~DOC~ DOCOND Set Flag~DOC~ ~Filename~~Filename~ ~INVERT~zm(m.m& DOCOND Safety) q:.b(qBuffer Index)-13/2[Initial Local Count m(m.m& DOCOND Process Declarations) 1,(m.m& DOCOND Refill)m.lMM Refill m(m.m& DOCOND Process Conditionals) js{end}0,.k 2f= "ek' 1m(m.m& Init Buffer Locals) F1,f Flag[1 .[0fnq0j ff"em(m.m& DOCOND Safety)' +[2 0:g1f+-:"l 0:g1u21,fq1:g1u1' ff"ejs{end}fsz-.f[vz' j:s{Flag:1}"e :i*No Such Flag: 1fserr' fkc6c 1af+-?"l 1au2:i*Illegal Flag Declaration: {Flag:21}fserr' 1a-q2"e0' 1a-?"n ff"n:I*Conflicting Flag Setting: 21fserr'' dq2i 2js{end}fkcfsz-.f[vz [1[2[3[..h [..dq..d[4 128*5,32:i..d 1m(m.m& Alter ..D){(}) :ft j<:s{; .u3s: q3,.-1x1 1,m.m& DOCOND 1 Declarationu2 q2"nm2' q3jful> .,(fulr.)tq.[0fnq0j 1au2c .,(s=>2r.)x1 q1m(m.m& DOCOND Lookup)-q2"e 2c.,(s}r.)x1 1m(m.mDOCOND Set Flag)1' :[1[2 1a-?"n' c.,(s}r.)x1 .(j:s{Default:1}"l fkc9c1au2' "#ftWhat setting for the 1 flag  ' )j 1m(m.mDOCOND Set Flag)21 T[1[3m.m& DOCOND Lookup m.mDOCOND Set Flag .[2 <.,(s,}.-1)x1 q1ml-+"e!oChosen' 0a-}@;> !Retry! ftChoose one of  q2j.,(s}r.)tft:  1,m(m.m& Read Line)Alternative: u1 q2,.:fb1"l1af,}:"l fkc0af:,:"loOk''' oRetry !Ok! 1ms+1 !Chosen! q2j <.u2s,} q2,.-1f~1"n q2,.-1x3 1ms-3' 0a-}@;> -.[1s=q1,.-1x*[.2 fu-1x*[3 q3m.l.2 ZQBuffer Filenames"E' FSMODIF"N @FT Save your source changes before DOCOND processing 1m(m.m& Yes or No)"n 1m(m.m^R Save File)'' 0uBuffer Filenames 0u:.b(qBuffer Index+2) m(m.m& Set Mode Line) H[1[2[3q4[..d[4 1au2c .,(s=>2r.)x1 q1m(m.m& DOCOND Lookup)u3 q2-q3"n' 2c.,(s->-->>.+fk)x2 -1-(fssvalue)u4 .,(s}r.)x3 .(zj 0fsvz q4,1m(m.mReplace String)23 fsz-.fsvz)j G[1[2[3q4[..d[4 1au2c .,(s=>2r.)x1 q1m(m.m& DOCOND Lookup)u3 q2-q3"n' 2c.,(s->-->>.+fk)x2 -1-(fssvalue)u4 .,(s}r.)x3 .(zj 0fsvz q4,m(m.mReplace String)23 fsz-.fsvz)j z[1[2[3[4[..d 128*5,32:i..d 1m(m.m& Alter ..D){(}) m.m& DOCOND Lookup js{end}.[e j<:s{;1af*+-"l!' 1au2-dd.,(s:r.)fx1d q2-*"e fu-1fx3d m(m.m1)3+0u2 fq2"gg2fkc'!' fsz-qe,q1mlu3 .u4ful-d q2-q3"nq4,.k' "#q4j' > 2[1.[0fnq0jqef"nf[vz' js{flag:1} fk+7aJ.-z(.: @m(m.m^R Backward Paragraph) m(m.m^R Fill Region) )+zj  DOCOND!Document conditional expander;C Perform full DOCOND processing on contents of buffer.^C Specify the value of a DOCOND flag. The argument (from terminal or suffix) should be a "+" or "-" followed by the name of the flag to be set. A numeric argument says that redefining a flag already set is illegal.5S Process all declarations (Flag, Implies, etc.).+S Process a {Print:string} declaration.#S Process {Implies:+FOO=>+BAR}.6S Process a {Flag:...} by asking user for setting. S Process an Alternatives declaration. Ask the user which alternative to set to "+", unless one already is. Set all the others to "-".,S Process {Local Variable:varname=value}<S Make sure user doesn't clobber his source with DOCOND.-S Process a {Replace:...} specifications.rS Process a Char Replace declaration. Like Replace declarations except that they use 0mmReplace instead of 1.+S Process all {+FOO:text} conditionals.S Return the current setting of a flag. Specify the flag name as a string as a prefix argument. The setting is returned as a numeric character. A precomma numeric argument specifies the value of FS VZ to use while looking up the flag (for efficiency.-S Re-fill this or the previous paragraph.lDOCOND DOCOND Set Flag & DOCOND Process Declarations & DOCOND Print Declaration & DOCOND Implies Declaration & DOCOND Flag Declaration & DOCOND Alternatives Declaration & DOCOND Local Variable Declaration & DOCOND Safety & DOCOND Replace Declaration & Docond Char Replace Declaration & DOCOND Process Conditionals & DOCOND Lookup & DOCOND Refill T+8+fq(+4)[20[3 <%3,-q2f2u3q3&1@;q3"l0'> f[BBindq3-1*5,q3*5g2q:..o(0)+q2