能否帮我改下缠论分笔公式　[文华财经]

 这是益盟操盘手的，帮我改为文华6的。谢谢!

Ma5:Ma(C,5);Ma10:ma(C,10);Ma20:ma(C,20);
kx:="chanlun@kxian";
{这个放第一个 要不会出问题滴-_-\\\~~}
kxg:="chanlun@kxg";
kxd:="chanlun@kxd";
kxfx:="chanlun@kxfx";
笔:="chanlun@bi";
笔周期:"chanlun@bilast",linethick0, coloryellow;
bilast:="chanlun@bilast";{笔周期};
段:="chanlun@duan";
段周期:"chanlun@duanlast", linethick0, coloryellow;
duanlast:="chanlun@duanlast"; {段周期};
中枢:="chanlun@zs";
zszg:="chanlun@zszg";
zszd:="chanlun@zszd";
zsgg:="chanlun@zsgg";
zsdd:="chanlun@zsdd";
zszz:="chanlun@zszz";
zsks:="chanlun@zskslast";
zsjs:="chanlun@zsjslast";
bifx:=-REF(笔,bilast);
duanfx:=-REF(段,duanlast); 
kxqj:="chanlun@kxqj";

{画中枢Begin} {以背景方式画}
 STICKLINE(zszg>zszd AND duanfx=1, zszg, zszd, 20, 502), colorf00ff0;
STICKLINE(zszg>zszd AND duanfx=-1, zszg, zszd, 20, 502), colore6002d;

{中枢震荡监视器}
DRAWLINE(zsks=1, zszz, zsjs=1, zszz, 0), coloryellow;
{画中枢END} 
{顶底分型}
 STICKLINE(kx>0, kxg, kxd, 5, 1), colorwhite, linethick3;

 STICKLINE(kx<0, kxg, kxd, 5, 1), colorblue, linethick3;
 {笔段}
 STICKLINE(笔=1, kxg, kxd, 5, 1), colorgreen, linethick1;
 STICKLINE(笔=-1, kxg, kxd, 5, 1), colorred, linethick1;
 STICKLINE(段=1, kxg, kxd, 5, 0), colore66878, linethick1;
 STICKLINE(段=-1, kxg, kxd, 5, 0), color00cccc, linethick1;
 {画K线END}
 {画笔段}
 drawline(笔=1,h,笔=-1,l,0),coloryellow,linethick2;
 drawline(笔=-1,l,笔=1,h,0),coloryellow,linethick2;
 drawline(段=1,h,段=-1,l,0),colorwhite, linethick4;
 drawline(段=-1,l,段=1,h,0),colorwhite, linethick4; 
 

{当下提示 周期}
{DRAWTEXT(BARSTATUS=2 AND bifx=1 AND bilast>4, h*1.008, ''bilast+'+'(c-REF(l,bilast))), colorMagenta, align0, valign2;}
{DRAWTEXT(BARSTATUS=2 AND bifx=-1 AND bilast>4, l*0.992,''bilast+''(c-REF(h,bilast))), colorGreen, align0;}

 来源:程序化99

 来源: WWW.CXH99.COM