P [0+8+FQ(+4)[1 0FO10F"G+Q1' +FQ()+4U1 FQ1"L0' ,Q1:M(Q1+4(]1]0)) I 7 SXqh a j I5#} 4 GXq]n,n5U{{Ts3+&/9LZwdmkb& 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 SafetyDOCONDDOCOND 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) 1,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 js{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 [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 QBuffer 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) [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 [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' > [1.[0fnq0jqef"nf[vz' js{flag:1} fk+7a.-z(.: @m(m.m^R Backward Paragraph) m(m.m^R Fill Region) )+zj DOCONDDocument conditional expanderC 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.S Process all declarations (Flag, Implies, etc.).S Process a {Print:string} declaration.S Process {Implies:+FOO=>+BAR}.S 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.DOCOND 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 +8+fq(+4)[20[3 <%3,-q2f2u3q3&1@;q3"l0'> f[BBindq3-1*5,q3*5g2q:..o(0)+q2