CZW-L 分析家

{CZW-L  分析家}
{n1:7,1,100}

KS:=(C-MA(C,17))/MA(C,17)*(-100);
RKS:=REF(KS,1);
MLS:=RKS/KS>=1.23 AND RKS>=8 AND C/REF(C,1)>=1.02;
超跌:STICKLINE(KS>=17,o,L,6,0),colorwhite,linethick6;
反弹:STICKLINE(MLS=1,o,L,6,0),colormagenta,linethick6;
超超跌:STICKLINE(KS>=34,o,L,8,1),colorwhite,linethick6;
反反弹:STICKLINE(MLS=1,o,L,8,1),colormagenta,linethick6;
超极跌:STICKLINE(KS>=34,o,L,8,1),COLORCYAN,linethick6;
次买:O+(c-O)/2,linethick0 ;
次卖:C+(O-C)/2,linethick0;
上涨空间预测:C+((H-L)/2)*2,linethick0 ;
下跌空间预测:c-((h-l)/2)*2 ,linethick0;
CZ:HHv(ma(h,11),1),colorred,LINETHICK2;
XX:llv(ma(h,11),5),colorgreen,LINETHICK2;
强弱分界:=EMA(CLOSE,55);
PARTLINE(强弱分界,C>=强弱分界,RGB(155,0,0),C<强弱分界,RGB(0,155,0)),linethick3,circledot;
PARTLINE(强弱分界,C>=强弱分界,RGB(255,0,0),C<强弱分界,RGB(0,255,0)),linethick3,POINTDOT;
PARTLINE(强弱分界,C>=强弱分界,RGB(255,255,255),C<强弱分界,RGB(255,255,255)),linethick1,POINTDOT;
Var1:=(OPEN+LOW+HIGH+CLOSE)/4;
ZC: LLV(LOW,60)*1.02 ,colorred;
YL: HHV(HIGH,60)*0.98,coloryellow;
Varr1:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
DRAWICON(CROSS(82,Varr1),HIGH,2);
DRAWTEXT(CROSS(82,Varr1),HIGH*1.01,'▼风险↓'),coloryellow;
拐点:=MA(CLOSE,3);
gd1:=REF(COUNT(拐点<=REF(拐点,1),5)=5,1) and  拐点>REF(拐点,1) ;
DRAWICON(gd1,0.97*CLOSE,1),ALIGN1;
DRAWTEXT(gd1,0.98*CLOSE,'▲'),color0000ff,ALIGN1;
k1:=llv(l,barslast(DISPSTATUS=1)+1);
k2:=hhv(h,barslast(DISPSTATUS=1)+1);
Var1:=WINNER(CLOSE);
Var2:=VOL/CAPITAL;
Var3:=Var2/Var1;
财神线:=IF(Var1<N1/100 ,Var3,0);
DRAWICON(财神线>1,k1*0.97,9);
DRAWICON(财神线<REF(财神线>1,1) AND 财神线>0.5 and 财神线<1,k1*0.97,8);
WR:="W&R"(14);
DRAWICON(FILTER(CROSS(( 81),WR),10),L*0.97,4);
DRAWICON(FILTER(CROSS(WR,(19)),10),H*1.04,5);
DRAWTEXT(FILTER(CROSS(( 81),WR),21),L*0.97,' W&R'),ALIGN0,COLORRED;
DRAWTEXT(FILTER(CROSS(WR,19),21),H*1.03,' W&R'),ALIGN2,COLORGREEN;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.1,0),COLOR0000FF;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.1,0),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0),LINETHICK2,COLOR5050FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0),COLOR5050FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6.6,0),COLOR5F5FFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0),COLOR5F5FFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5.5,0),COLOR6C6CFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0),COLOR6C6CFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4.4,0),COLOR7E7EFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0),COLOR7E7EFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3.3,0),COLOR9D9DFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR9D9DFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLORAFAFFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),COLORAFAFFF;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,1.2,0),COLORC1C1FF;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,0.5,0),COLORC1C1FF;
STICKLINE(c<=o,c,o,3,0),COLOR009900;STICKLINE(CLOSE<OPEN,CLOSE,HIGH,0.1,0),COLORFF8A85;
STICKLINE(CLOSE<OPEN,OPEN,LOW,0.1,0),COLORFF8A85;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,8,0),LINETHICK2,COLOR008200;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,7,0),COLOR138B13;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,6,0),COLOR279227;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,5,0),COLOR419D41;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,4,0),COLOR62AB62;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,3,0),COLOR80B980;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,2,0),COLOR90BE90;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,1,0),COLOR9FC49E;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,0.5,0),COLORB1CCB1;
SHOPEN:=OPEN;
SHHIGH:=HIGH;
SHLOW:=LOW;
SHCLOSE:=CLOSE;
SHAMOUNT:=AMOUNT;
SHVOL:=VOL;
J12:=(HIGH - ((HIGH - LOW) / 3));
J23:=(LOW + ((HIGH - LOW) / 3));
DRAWTEXT(c>0 and BARSTATUS=2,k2*1.12 ,'★ ★ ★  炒着玩祝您圣诞快乐 ★ ★ ★'),COLOR0000ff,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2,k2*1.1 ,'当日价格重心:'+NUMTOSTRN(((SHAMOUNT / SHVOL) / 100),2)+'                              '),COLORffffff,ALIGN2;
DRAWTEXT(c>0 and BARSTATUS=2,k2*1.1 ,'3日价格重心:'+NUMTOSTRN(((SUM(SHAMOUNT,3) / SUM(SHVOL,3)) / 100),2)+'           '),COLORffffff,ALIGN2;
DRAWTEXT((((SUM(SHAMOUNT,3) / SUM(SHVOL,3)) / 100) > REF(((SUM(SHAMOUNT,3) / SUM(SHVOL,3)) / 100),1)) and BARSTATUS=2,k2*1.1 ,'重心上移'),COLORffffff,ALIGN2;
DRAWTEXT((((SUM(SHAMOUNT,3) / SUM(SHVOL,3)) / 100) < REF(((SUM(SHAMOUNT,3) / SUM(SHVOL,3)) / 100),1)) and BARSTATUS=2,k2*1.1 ,'重心下移'),COLORffffff,ALIGN2;
DRAWTEXT((CLOSE > ((SUM(SHAMOUNT,3) / SUM(SHVOL,3)) / 100)) and BARSTATUS=2,k2*1.08 ,'收盘价格在3日重心以上'),COLORffffff,ALIGN2;
DRAWTEXT((CLOSE < ((SUM(SHAMOUNT,3) / SUM(SHVOL,3)) / 100)) and BARSTATUS=2,k2*1.08 ,'收盘价格在3日重心以下'),COLORffffff,ALIGN2;
t1:=(((IF((CLOSE = OPEN),1,0) + IF((CLOSE >= J12),1,0)) + IF((CLOSE <= J23),1,0)) > 1);
t2:=((((CLOSE > J23) AND (CLOSE < J12)) AND (OPEN > J23)) AND (OPEN < J12));
t3:=((CLOSE >= J12) AND (OPEN <= J23));
t4:=(((OPEN <= J12) AND (OPEN >= J23)) AND (CLOSE > J12));
t5:=(((OPEN <= J23) AND (CLOSE <= J12)) AND (CLOSE >= J23));
t6:=((CLOSE <= J23) AND (OPEN >= J12));
t7:=(((OPEN <= J12) AND (OPEN >= J23)) AND (CLOSE < J23));
t8:=(((OPEN >= J12) AND (CLOSE <= J12)) AND (CLOSE >= J23));
t9:=(((SHAMOUNT / SHVOL) / 100) > REF(HIGH,1));
t10:=(((SHAMOUNT / SHVOL) / 100) < REF(LOW,1));
e:=0;
if t1>0 THEN  BEGIN DRAWTEXT(C>0 and BARSTATUS=2,k2*(1.06-0.02*e),'极端行情,在未来的几日内有85%的机会变更方向'),colorFF00FF,ALIGN2;e:=e+1;end;
if t2>0 THEN  BEGIN DRAWTEXT(C>0 and BARSTATUS=2,k2*(1.06-0.02*e),'中性行情,多空双方都未能取得当日行情主动性的控制权'),colorFFFF00,ALIGN2;e:=e+1;end;
if t3>0 THEN  BEGIN DRAWTEXT(C>0 and BARSTATUS=2,k2*(1.06-0.02*e),'爬升行情,整个交易期间都有买方主导'),colorFF00FF,ALIGN2;e:=e+1;end;
if t4>0 THEN  BEGIN DRAWTEXT(C>0 and BARSTATUS=2,k2*(1.06-0.02*e),'爬升行情,信息较少,但收盘期间是买方主导,其他未知'),colorFF00FF,ALIGN2;e:=e+1;end;
if t5>0 THEN  BEGIN DRAWTEXT(C>0 and BARSTATUS=2,k2*(1.06-0.02*e),'爬升行情,买方把收盘价拉升到开盘价之上,卖方却也主导一段行情,但不知道是谁主导最后的行情'),colorFF0000,ALIGN2;e:=e+1;end;
if t6>0 THEN  BEGIN DRAWTEXT(C>0 and BARSTATUS=2,k2*(1.06-0.02*e),'漂流行情,整个交易期间都有卖方主导'),color00FF00,ALIGN2;e:=e+1;end;
if t7>0 THEN  BEGIN DRAWTEXT(C>0 and BARSTATUS=2,k2*(1.06-0.02*e),'漂流行情,信息最少,但收盘期间是卖方主导,其他未知'),color00FF00,ALIGN2;e:=e+1;end;
if t8>0 THEN  BEGIN DRAWTEXT(C>0 and BARSTATUS=2,k2*(1.06-0.02*e),'漂流行情,卖方把收盘价压至到开盘价之下,买方却也主导一段行情,但不知道是谁主导最后的行情'),colorFF0000,ALIGN2;e:=e+1;end;
if t9>0 THEN  BEGIN DRAWTEXT(C>0 and BARSTATUS=2,k2*(1.06-0.02*e),'上涨趋势'),color0000ff,ALIGN2;e:=e+1;end;
if t10>0 THEN  BEGIN DRAWTEXT(C>0 and BARSTATUS=2,k2*(1.06-0.02*e),'下跌趋势'),color00FF00,ALIGN2; end