0
IF
if v920:'NJ' and p(v922) or (not(v920:'J')) and p(v330) then '1' else '0' fi
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
DEL
932
*
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
ADD
932
XXXXXXXXXXXXXXXXXXX
&uf('S0'),if v920:'NJ' then (if p(v922) then if p(v922^u) then if val(v922^u)>0 then if f(val(v922^u),0,0)=v922^u then else v922,'^\'&uf('S1A'),'^_'&uf('+4N922') fi else v922,'^_'&uf('+4N922') fi else v922,'^_'&uf('+4N922') fi fi/)else (if p(v330) then if p(v330^u) then if val(v330^u)>0 then if f(val(v330^u),0,0)=v330^u then else v330,'^\'&uf('S1A'),'^_'&uf('+4N330') fi else v330,'^_'&uf('+4N330') fi else v330,,'^_'&uf('+4N330') fi, fi/) fi
XXXXXXXXXXXXXXXXXXX
ADD
1933
XXXXXXXXXXXXXXXXXXX
if v920:'NJ' then (if p(v922) then if p(v922^u) then if val(v922^u)>0 then if f(val(v922^u),0,0)=v922^u then |^U|v922^U,|^C|v922^c fi fi fi fi/) else (if p(v330) then if p(v330^u) then if val(v330^u)>0 then if f(val(v330^u),0,0)=v330^u then |^U|v330^U,|^C|v330^c fi fi fi fi/) fi
XXXXXXXXXXXXXXXXXXX
CHA
932^U
*
'/'
'^/'
DEL
932^U
F
if val(v932^u)=0 then '1' else '0' fi
XXXXXXXXXXXXXXXXXXX
ADD
1000
XXXXXXXXXXXXXXXXXXX
&uf('+7W33#'),&uf('+7U33#'(v1933/))
XXXXXXXXXXXXXXXXXXX
DEL
1933
*
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
REPEAT
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
ADD
33
XXXXXXXXXXXXXXXXXXX
&uf('Av932#1')
XXXXXXXXXXXXXXXXXXX
NEWMFN
'*'
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
ADD
621
XXXXXXXXXXXXXXXXXXX
(v621/)
XXXXXXXXXXXXXXXXXXX
ADD
675
XXXXXXXXXXXXXXXXXXX
(v675/)
XXXXXXXXXXXXXXXXXXX
ADD
908
XXXXXXXXXXXXXXXXXXX
v908
XXXXXXXXXXXXXXXXXXX
ADD
905
XXXXXXXXXXXXXXXXXXX
v905
XXXXXXXXXXXXXXXXXXX
ADD
101
XXXXXXXXXXXXXXXXXXX
(v101/)
XXXXXXXXXXXXXXXXXXX
ADD
102
XXXXXXXXXXXXXXXXXXX
v102
XXXXXXXXXXXXXXXXXXX
ADD
919
XXXXXXXXXXXXXXXXXXX
(v919/)
XXXXXXXXXXXXXXXXXXX
ADD
125
XXXXXXXXXXXXXXXXXXX
v125
XXXXXXXXXXXXXXXXXXX
ADD
900
XXXXXXXXXXXXXXXXXXX
if v900^b:'05' then'^B09'fi,if v900^b:'03'or v900^b:'04'or v900^b:'07' then'^B10'fi,"^T"v900^t
XXXXXXXXXXXXXXXXXXX
ADD
920
XXXXXXXXXXXXXXXXXXX
if v920:'NJ' and &unifor("Av922^(#"v932)<>'' or &unifor("Av330^(#"v932)<>''then 'AUNTD'else 'ASP'fi
XXXXXXXXXXXXXXXXXXX
ADD
463
XXXXXXXXXXXXXXXXXXX
if v920:'NJ'then if p(v33^4) and &unifor('Av922#2')='' then "^S"v33^4,"^0"v33^0 else if v33:'^4'then'^S',v33^4 fi,if v33:'^0'then'^0',v33^0 fi fi,"^W"v903,"^J"v934,if p(v935) then ref(l("I="v933),'^V',v210^8,"Том"n210^8),'???'" "v935 fi,if p(v936) then ref(l("I="v933),'^H',v210^9,"N"n210^9)," "v936,|(|v931^c|)|fi,ref(l("I="v933),"^C"v200^a,if p(v510) then '^X'&uf('Av510^d#1'),if &uf('Av510^d#2')<>''then '^Y'&uf('Av510^d#2') fi,if &uf('Av510^d#3')<>''then '^Z'&uf('Av510^d#3') fi fi,"^7"v200^l,,if a(v200^l)then(". "| ; |+v923^h,if v923^h:':' then else if p(v923^h)then |, |d923^i else |. |d923^i fi,fi,v923^i,|. |v923^k,if v923^k:':' then else if p(v923^k)then |, |d923^l else |. |d923^l fi fi,v923^l,|. |v923^m,if v923^m:':' then else if p(v923^m)then |, |d923^n else |. |d923^n fi fi,v923^n),fi,("^G"| : |+v210^c,"^D"| ; |+v210^a,| ; |v210^x,| ; |v210^y)) else "^S"v33^4,"^0"v33^0,"^W"v903,if p(v461)then"^C"v461^c,if p(v46^L)  then '^X'&uf('Av46^l#1'),if &uf('Av46^l#2')<>''then '^Y'&uf('Av46^l#2') fi,if &uf('Av46^l#3')<>''then '^Z'&uf('Av46^l#3') fi fi,"^V"v200^v,"^A"v200^a else'^C',v200^a,if v920:'NJ' then ref(L("I="v933),v200^a) fi fi,if p(v510) then "^R"d461,"^X"n461,&uf('Av510^d#1'),if &uf('Av510^d#2')<>''then ' = '&uf('Av510^d#2') fi,if &uf('Av510^d#3')<>''then ' = '&uf('Av510^d#3') fi fi,&unifor('S0'),if p(v922) and v932=''then &unifor('D,@',mfn,',@tabsu922') fi,"^J"v210^d,&unifor('S0'),&uf('+7W210#'),(if p(v210) then if &uf('S1A')='1' then |^G|v210^c,|^D|v210^a,| ; |v210^x,| ; |v210^y fi fi),(if p(v210) then if v210=&uf('Av210#1') then else &uf('+7U210#'| ; |v210^a,| ; |v210^x,| ; |v210^y,| : |v210^c) fi fi),&unifor('S0'),if s(v210^a,v210^c)=''then (if p(v461) then if &unifor('S1A')='1'then|^D|v461^d,|^G|v461^g,if &uf('Av210^d#1')=''then |^J|v461^h fi fi fi),(if p(v461) then if v461=&uf('Av461#1') then else &uf('+7U210#'| ; |v461^d,| : |v461^g) fi fi) fi,'^4'g210,&uf('S0'),(if p(v923) then if val(&unifor('S1A'))=1 then else ' Другой раздел: 'v923^h,|. |v923^i,|, |v923^k,|. |v923^l fi fi),&unifor('S0'),(if p(v923) then if val(&unifor('S1A'))=1 then|^H|v923^h,|^I|v923^i,|^K|v923^k,|^L|v923^l fi fi) fi
XXXXXXXXXXXXXXXXXXX
ADD
963
XXXXXXXXXXXXXXXXXXX
if not(v920:'NJ')then "^E"v461^e,"^F"v461^f,if a(v461)then "^E"v200^e,"^F"v200^f fi,"^X"v461^x,if a(v461^x) then"^X"v700^a," "v700^b fi,"^B"v710^a,"^P"v205^a,(|^I|v10^a/) fi 
XXXXXXXXXXXXXXXXXXX
ADD
961
XXXXXXXXXXXXXXXXXXX
(v961/),if a(v961) then if p(v700) then '^Z1'v700 fi fi/(v701/)/(v702/)
XXXXXXXXXXXXXXXXXXX
ADD
962
XXXXXXXXXXXXXXXXXXX
(v962/)/(v711/)/v710"^ZДА"
XXXXXXXXXXXXXXXXXXX
ADD
700
XXXXXXXXXXXXXXXXXXX
if v33^w='' and p(v33^f) and v33^q='' then if val(v33^x)>1 then '^A'&unifor('E'v33^x,v33^f),if &unifor('F'v33^x,v33^f)<>'' then '^B'&unifor('F'v33^x,v33^f) fi,"^G"v33^? else '^A'if v33^f:' 'then if v33^?<>''then &unifor('G0 'v33^f),'^G'v33^?,'^B'&unifor('G2 'v33^f) else if v33^f:','then &unifor('G0,'v33^f),'^G'&unifor('G2 'v33^f) else &unifor('G0 'v33^f),'^B'&unifor('G2 'v33^f) fi fi else v33^f,"^G"v33^? fi fi,if v33^x:'1'then'^91' fi,"^Y"v33^y,"^P"v33^=,"^3"v33^! fi 
XXXXXXXXXXXXXXXXXXX
ADD
701
XXXXXXXXXXXXXXXXXXX
if v33^w<>'' and v33^f<>''and v33^q='' then if val(v33^x)>1 then '^A'&unifor('E'v33^x,v33^f),if &unifor('F'v33^x,v33^f)<>'' then '^B'&unifor('F'v33^x,v33^f) fi,"^G"v33^? else '^A'if v33^f:' 'then if v33^?<>''then &unifor('G0 'v33^f),'^G'v33^?,'^B'&unifor('G2 'v33^f) else if v33^f:','then &unifor('G0,'v33^f),'^G'&unifor('G2 'v33^f) else &unifor('G0 'v33^f),'^B'&unifor('G2 'v33^f) fi fi else v33^f,"^G"v33^? fi fi,if v33^x:'1'then'^91' fi,"^Y"v33^y,"^P"v33^=,"^3"v33^! fi
XXXXXXXXXXXXXXXXXXX
ADD
701
XXXXXXXXXXXXXXXXXXX
if v33^2<>'' and v33^s='' then               if val(v33^<)>1 then '^A'&unifor('E'v33^<,v33^2),if &unifor('F'v33^<,v33^2)<>'' then '^B'&unifor('F'v33^<,v33^2) fi,"^G"v33^, else '^A'if v33^2:' 'then if v33^,<>''then &unifor('G0 'v33^2),'^G'v33^,,'^B'&unifor('G2 'v33^2) else if v33^2:','then &unifor('G0,'v33^2),'^G'&unifor('G2 'v33^2) else &unifor('G0 'v33^2),'^B'&unifor('G2 'v33^2) fi fi else v33^2,"^G"v33^, fi fi,if v33^<:'1'then'^91' fi,"^Y"v33^z,"^P"v33^+,"^3"v33^. fi
XXXXXXXXXXXXXXXXXXX
ADD
701
XXXXXXXXXXXXXXXXXXX
if v33^3<>'' and v33^t='' then                if val(v33^>)>1 then '^A'&unifor('E'v33^>,v33^3),if &unifor('F'v33^>,v33^3)<>'' then '^B'&unifor('F'v33^>,v33^3) fi,"^G"v33^; else '^A'if v33^3:' 'then if v33^;<>''then &unifor('G0 'v33^3),'^G'v33^;,'^B'&unifor('G2 'v33^3) else if v33^3:','then &unifor('G0,'v33^3),'^G'&unifor('G2 'v33^3) else &unifor('G0 'v33^3),'^B'&unifor('G2 'v33^3) fi fi else v33^3,"^G"v33^; fi fi,if v33^>:'1'then'^91' fi,"^Y"v33^n,"^P"v33^-,"^3"v33^: fi
XXXXXXXXXXXXXXXXXXX
ADD
701
XXXXXXXXXXXXXXXXXXX
(if p(v926) then if v926^4='' then if v926^!=&uf('Av33^_#1') then &uf('+961*1.#'&uf('G0!'v926)) else if v926^?=&uf('Av33^_#1') then &uf('+961*1.#'&uf('G0?'v926)) fi fi fi fi/)
XXXXXXXXXXXXXXXXXXX
ADD
702
XXXXXXXXXXXXXXXXXXX
if v33^f<>'' and v33^q<>'' then if val(v33^x)>1 then '^A'&unifor('E'v33^x,v33^f),if &unifor('F'v33^x,v33^f)<>'' then '^B'&unifor('F'v33^x,v33^f) fi,"^G"v33^? else '^A'if v33^f:' 'then if v33^?<>''then &unifor('G0 'v33^f),'^G'v33^?,'^B'&unifor('G2 'v33^f) else if v33^f:','then &unifor('G0,'v33^f),'^G'&unifor('G2 'v33^f) else &unifor('G0 'v33^f),'^B'&unifor('G2 'v33^f) fi fi else v33^f,"^G"v33^? fi fi,if v33^x:'1'then'^91' fi,"^Y"v33^y,"^P"v33^=,"^4"v33^q,"^3"v33^! fi
XXXXXXXXXXXXXXXXXXX
ADD
702
XXXXXXXXXXXXXXXXXXX
if v33^2<>'' and v33^s<>''then if val(v33^<)>1 then '^A'&unifor('E'v33^<,v33^2),if &unifor('F'v33^<,v33^2)<>'' then '^B'&unifor('F'v33^<,v33^2) fi,"^G"v33^, else '^A'if v33^2:' 'then if v33^,<>''then &unifor('G0 'v33^2),'^G'v33^,,'^B'&unifor('G2 'v33^2) else if v33^2:','then &unifor('G0,'v33^2),'^G'&unifor('G2 'v33^2) else &unifor('G0 'v33^2),'^B'&unifor('G2 'v33^2) fi fi else v33^2,"^G"v33^, fi fi,if v33^<:'1'then'^91' fi,"^Y"v33^z,"^P"v33^+,"^4"v33^s,"^3"v33^. fi
XXXXXXXXXXXXXXXXXXX
ADD
702
XXXXXXXXXXXXXXXXXXX
if v33^3<>'' and v33^t<>''then if val(v33^>)>1 then '^A'&unifor('E'v33^>,v33^3),if &unifor('F'v33^>,v33^3)<>'' then '^B'&unifor('F'v33^>,v33^3) fi,"^G"v33^; else '^A'if v33^3:' 'then if v33^;<>''then &unifor('G0 'v33^3),'^G'v33^;,'^B'&unifor('G2 'v33^3) else if v33^3:','then &unifor('G0,'v33^3),'^G'&unifor('G2 'v33^3) else &unifor('G0 'v33^3),'^B'&unifor('G2 'v33^3) fi fi else v33^3,"^G"v33^; fi fi,if v33^>:'1'then'^91' fi,"^Y"v33^n,"^P"v33^-,"^4"v33^t,"^3"v33^: fi
XXXXXXXXXXXXXXXXXXX
ADD
702
XXXXXXXXXXXXXXXXXXX
(if p(v926) then if v926^4<>'' then if v926^!=&uf('Av33^_#1') then &uf('+961*1.#'&uf('G0!'v926)) else if v926^?=&uf('Av33^_#1') then &uf('+961*1.#'&uf('G0?'v926)) fi fi fi fi/)
XXXXXXXXXXXXXXXXXXX
ADD
710
XXXXXXXXXXXXXXXXXXX
if v33^8<>'' then if a(v33^f) then '^A'v33^8 fi fi
XXXXXXXXXXXXXXXXXXX
ADD
711
XXXXXXXXXXXXXXXXXXX
if v33^8<>'' then if p(v33^f) then '^A'v33^8 fi fi
XXXXXXXXXXXXXXXXXXX
ADD
200
XXXXXXXXXXXXXXXXXXX
"^A"v33^c,"^E"v33^e,"^F"v33^g
XXXXXXXXXXXXXXXXXXX
ADD
510
XXXXXXXXXXXXXXXXXXX
"^D"v33^d
XXXXXXXXXXXXXXXXXXX
ADD
225
XXXXXXXXXXXXXXXXXXX
if p(v33^u) then (if p(g33) then if val(g33^u)=val(&uf('Av33^u#1')) then '^A'g33^c,if &uf('Av33^/#1')<>'' then'^V'&uf('Av33^/#1') fi fi fi/) fi
XXXXXXXXXXXXXXXXXXX
ADD
610
XXXXXXXXXXXXXXXXXXX
if v33^5<>'' then v33^5/v33^6/v33^7 fi
XXXXXXXXXXXXXXXXXXX
ADD
320
XXXXXXXXXXXXXXXXXXX
v33^p
XXXXXXXXXXXXXXXXXXX
ADD
951
XXXXXXXXXXXXXXXXXXX
if v33^[<>'' then if v33^[:'1' then |^I|v33^] else if v33^[:'0' then |^A|v33^] fi fi fi 
XXXXXXXXXXXXXXXXXXX
END
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
DEL
33
1
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
DEL
932
1
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
UNTIL
if p(v932) then '1' else '0' fi
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
FI
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXX