编写条件：
编写方法：
网友求助：
指标如下
XJ:=(H+L+C*2)/4;
ZD:=LLV(L,34);
ZG:=HHV(H,34);
BD1:EMA((XJ-ZD)/(ZG-ZD)*100,9),COLORRED,LINETHICK0;
BD2:=EMA(0.667*REF(BD1,1)+0.333*BD1,2),COLORGREEN,LINETHICK0;
FILLRGN(BD2>80,BD2,80),COLOR000055;
FILLRGN(BD1<20,BD1,20),COLOR005500;
FILLRGN(BD1>BD2,BD1,BD2),COLORRED;
FILLRGN(BD1<BD2,BD1,BD2),COLORGREEN;
{R1:EMA((XJ-ZD)/(ZG-ZD)*100,31),COLORWHITE;
R2:EMA(R1,5),COLORYELLOW;}
PARTLINE(1,80),COLOR0000AA;
PARTLINE(1,20),COLOR00AA00;
解答如下：
XJ:=(H+L+C*2)/4;
ZD:=LLV(L,34);
ZG:=HHV(H,34);
BD1:EMA((XJ-ZD)/(ZG-ZD)*100,9),colorred,LINETHICK0;
BD2:EMA(0.667*REF(BD1,1)+0.333*BD1,2),colorgreen,LINETHICK0;
FILLRGN(BD2,80,BD2>80,RGB(250,0,0));
FILLRGN(BD1,20,BD1<20,RGB(0,100,0));
FILLRGN(BD1,BD2,BD1>BD2,RGB(250,0,0));
FILLRGN(BD1,BD2,BD1<BD2,RGB(0,250,0));
80,COLOR0000AA;
20,COLOR00AA00;
ZD:=LLV(L,34);
ZG:=HHV(H,34);
BD1:EMA((XJ-ZD)/(ZG-ZD)*100,9),colorred,LINETHICK0;
BD2:EMA(0.667*REF(BD1,1)+0.333*BD1,2),colorgreen,LINETHICK0;
FILLRGN(BD2,80,BD2>80,RGB(250,0,0));
FILLRGN(BD1,20,BD1<20,RGB(0,100,0));
FILLRGN(BD1,BD2,BD1>BD2,RGB(250,0,0));
FILLRGN(BD1,BD2,BD1<BD2,RGB(0,250,0));
80,COLOR0000AA;
20,COLOR00AA00;
