вот каким должен быть флуд:
#MAIN
#NAME Џ«.⥦.®Ґ Ї®агзҐ.ЁҐ 0401060
phd:[break]
phd:if frame=1 then l#1=0 ball a
phd://if frame=4 then i#40=form_t(t12,"99999999")
phd://if frame=1 and i#40<20030601 then subst template document.101 BREAKS replace
phd:if frame=4 then
phd:s23=s3 s24=entry(2,c54,\176) c57=" Ї®зв®©"
phd:c55=i7 c55=substr(c55,1,3) c56=i17 c56=substr(c56,1,3)
phd://l#1=func(GSI,c1) l#2=func(GSI,c11) c#11=form_t(t11,"dd.mm.yyyy")
phd://c#11=form_t(t11,"dd.mm.yyyy")
phd://if frame=1 and t11=? then c#11=""
phd://if frame=1 and c61= then i41=0 i42=0
phd:// frame=1 and i7=44030845 and i17<>44030845 and i1=13 then c1=" "
phd://if frame=1 and i7=44030845 and i17=44030845 and i1=13 then s23=s3\\c2
phd://if frame=1 and i7=44030845 and i17=44030845 and i11=13 then s24=s4\\c12
phd://if frame=1 and i7=44030845 and i17=44030845 and i1>13 and l#1=1 then s23=s3\\c2\\c3
phd://if frame=1 and i7=44030845 and i17=44030845 and i11>13 and l#2=1 then s24=s4\\c12\\c13
phd:if frame=4 and c55=440 and c56=440 and i17<>44080002 then c57=" "
phd:if frame=4 and c22=ќ«ҐЄва®..®~ќ then c57="н«ҐЄва®..®"
phd:if frame=4 and c22=’Ґ«ҐЈа.䮬~’ then c57="⥫ҐЈа.䮬"
phd://if frame=1 and c11=0 then c11=" "
phd:if frame=4 then l#2=1 ball sd1
phd:if frame=4 and l#1=0 and i20=4 then no-apply
phd:if frame=4 and c21<>01 then ball a16
phd:if frame=4 and l#2=0 then no-apply
phd:
phd:[ball a16]
phd:l#2=0;
phd:if l#1=0 & i20=4 then return;
phd:if c21="16" then call program "g-prbdoc" param c25\",916"
phd:elseif c21="06" then call program "g-prbdoc" param c25\",906"
phd: else l#2=1;
phd:
phd:[ball sd1]
phd:find card_doc c25;
phd:i41=card_doc.kpp_i;
phd:i42=card_doc.kpp_b;
phd:i#2=index(s2,".¤б"); //message i#2; pause;
phd:if i#2=0 then return;
phd:c#1=trim(substr(s2,1,(i#2-1)));
phd:c#2=trim(substr(s2,i#2));
phd:i#2=length(c#1);
phd:c#3=" ";
phd://message c#1; pause;
phd://message c#2; pause;
phd:do while i#2>80;
phd://message i#2; pause;
phd: i#1=r_index(c#1," ",81);
phd: if i#1=0 | i#1=81 then i#1=80;
phd: c#3=c#3\\substr(c#1,1,i#1)\fill(" ",(80-i#1));
phd: c#1=trim(substr(c#1,i#1+1));
phd: i#2=length(c#1);
phd:end;
phd://message c#1; pause;
phd:c#1=c#1\fill(" ",(80-i#2))\\c#2;
phd://message c#1\\"*"; pause;
phd:if length(c#3)=1 then s2=c#1
phd:else s2=substr(c#3,3)\\c#1;
phd://message s2; pause;
phd:
phd:[ball a]
phd:message "ЏҐз.в.вм ¤®Єг¬Ґ.вл „®Ї.®дЁб. ?" update l#1;
phd:
DD :^b^^~033M^^~0331^
DD : --------
DD : ^t12"dd.mm.yyyy"^ ^t11"dd.mm.yyyy"^ ^\022\033P\017^ | 0401060 |^\022\033M^
DD : ---------------- ---------------- --------
DD :^\022\033P\017^ Џ®бв.ў Ў..Є Ї«.в. ‘ЇЁб..® б® бз.Ї«.в. ^\022\033M^
DD :
DD : ----
DD : ^\022\033P\017^| ^\022\033M^ ^\022\033P\017^|^\022\033M^
DD : Џ‹Ђ’…†ЌЋ… ЏЋђ“—…Ќ€… N ^i21"zzzz"^ ^t3"d99"^.^t3"m99"^.^t3"y9999"^ ^c57"x(10)"^ ^\022\033P\017^| ^\022\033M^^c61"xx"^^\022\033P\017^|^\022\033M^
DD : ---------------- ---------------- ----
DD :^\022\033P\017^^f78" "^„.в. ‚Ё¤ Ї«.⥦.^\022\033M^
DD :
DD : | ^s1(1)"x(75)"^
DD : | ^\022\033P\017^ ^@^
DD :^\015^ ‘㬬. ^\022\033M^
DD : | ^s1(2)"x(75)"^
DD : | ^\022\033P\017^ ^@^
DD :^\015^ Їа®ЇЁбмо^\022\033M^
DD : | ^s1(3)"x(75)"^
DD : --------------------------------------------------------------------------------------
DD : €ЌЌ ^c27"xxxxxxxxxxxx"^ | ЉЏЏ ^i41"zzzzzzzzzz"^ | |^@^
DD :^\015^^\022\033P\017^^f82" "^‘㬬.^\022\033M^
DD : -----------------------------------------------| |
DD : ^s23(1)"x(45)"^ | | ^d3"M>>>>>>>>>>>>>9.99"^
DD : | |
DD : ^s23(2)"x(45)"^ | |
DD : |------+-------------------------------
DD : ^s23(3)"x(45)"^ | | ^c1"x(20)"^^@^
DD :^\015^^\022\033P\017^^f82" "^‘з.N ^\022\033M^
DD : | |
DD : ^s23(4)"x(45)"^ | |
DD : | |
DD : | | ^@^
DD :^\015^^\022\033P\017^ Џ«.⥫мйЁЄ^\022\033M^
DD : -----------------------------------------------+------|
DD : ^AN,i7"x(46)"^| | ^i7"999999999"^^@^
DD :^\015^^\022\033P\017^^f82" "^Ѓ € Љ^\022\033M^
DD : |------|
DD : ^c6"x(46)"^| | ^c8"x(20)"^^@^
DD :^\015^^\022\033P\017^^f82" "^‘з.N ^\022\033M^
DD : | |
DD : | |^@^
DD :^\015^^\022\033P\017^^f12" "^Ѓ..Є Ї«.⥫мйЁЄ.^\022\033M^
DD : -----------------------------------------------+------+-------------------------------
DD : ^AN,i17"x(46)"^| | ^i17"999999999"^^@^
DD :^\015^^\022\033P\017^^f82" "^Ѓ € Љ^\022\033M^
DD : |------|
DD : ^c16"x(46)"^| | ^c18"x(20)"^^@^
DD :^\015^^\022\033P\017^^f82" "^‘з.N ^\022\033M^
DD : | |
DD : | |^@^
DD :^\015^^\022\033P\017^^f12" "^Ѓ..Є Ї®«гз.⥫п ^\022\033M^
DD : -----------------------------------------------+------|
DD : €ЌЌ ^z54(3/~)"x(12)"^ | ЉЏЏ ^i42"zzzzzzzzzz"^ | | ^z54(1/~)"x(20)"^^@^
DD :^\015^^\022\033P\017^^f82" "^‘з.N ^\022\033M^
DD : -----------------------------------------------| |
DD : ^s24(1)"x(46)"^| |
DD : | |
DD : ^s24(2)"x(46)"^| |
DD : |------+-------------------------------
DD : ^s24(3)"x(46)"^| | ^c21"x(3)"^ | | ^@^
DD :^\015^^\022\033P\017^^f81" "^‚Ё¤ ®Ї. ‘а®Є Ї«.в.^\022\033M^
DD : |------| |---------|
DD : ^s24(4)"x(46)"^| | | | ^i23"z"^^@^
DD :^\015^^\022\033P\017^^f81" "^Ќ.§.Ї«. ЋзҐа.Ї«.в.^\022\033M^
DD : |------| |---------|
DD : | | | | ^@^
DD :^\015^^\022\033P\017^ Џ®«гз.⥫м^f59" "^Љ®¤ ђҐ§.Ї®«Ґ ^\022\033M^
DD : --------------------------------------------------------------------------------------
DD : ^c62"x(20)"^ |^d45"zzzzzzzzzzzz"^ | ^c63"xx"^ | ^c64"x(10)"^| ^c65"x(15)"^| ^c67"x(10)"^| ^c66"xx"^
DD : --------------------------------------------------------------------------------------
DD :
DD : ^s2(1)"x(80)"^
DD :
DD : ^s2(2)"x(80)"^
DD :
DD : ^s2(3)"x(80)"^
DD :
DD : ^s2(4)"x(80)"^
DD :
DD :
DD :^\022\033P\017^ Ќ.§..зҐ.ЁҐ Ї«.⥦.^\022\033M^
DD : --------------------------------------------------------------------------------------
DD :^\022\033P\017^ Џ®¤ЇЁбЁ Ћв¬ҐвЄЁ Ў..Є.^\022\033M^
DD :
DD :
DD :
DD :
DD : -----------------------------
DD : Њ.Џ.
DD :
DD :
DD :
DD :
DD : -----------------------------
DD :^~0332^
99 : ^t12"dd.mm.yyyy"^ ^c#11"x(10)"^ ^\022\033P\017^ | 0401060 |^\022\033M^

__________________
Партия жизни: героин - пенсионерам!!!