庄家的钻心虫
引入公式后,修改第二行的源码,解时间限制
DRAWGBK(CLOSE>0,COLORRGB(0,188,38888),COLORRGB(0,33,333),1);
TT:=IF(DATE>109022111,0,1);
HHH1:=TT*MAX(H1,MAX(H2,MAX(H3,H4)));
HHH4:=TT*MIN(H1,MIN(H2,MIN(H3,H4)));
HHH2:=TT*(MAX(IF(H1<HHH1 AND H1>HHH4,H1,0),MAX(IF(H2<HHH1 AND H2>HHH4,H2,0),MAX(IF(H3<HHH1 AND H3>HHH4,H3,0),IF(H4<HHH1 AND H4>HHH4,H4,0)))));
HHH3:=TT*(MIN(IF(H1<HHH1 AND H1>HHH4,H1,200000),MIN(IF(H2<HHH1 AND H2>HHH4,H2,200000),MIN(IF(H3<HHH1 AND H3>HHH4,H3,200000),IF(H4<HHH1 AND H4>HHH4,H4,200000)))));
WZ:=-CAPITAL*0.01*W*TT;
HH1:=SUMBARS(VOL,CAPITAL*HHH1/100);
CD1:=BACKSET(BARPOS=SYSPARAM(1),HH1);
STICKLINE(CD1,0,WZ/2,10,0),color80FFFF;
HH2:=SUMBARS(VOL,CAPITAL*HHH2/100);
CD2:=BACKSET(BARPOS=SYSPARAM(1),HH2);
STICKLINE(CD2,0,WZ/2,10,0),color80FF80;
HH3:=SUMBARS(VOL,CAPITAL*HHH3/100);
CD3:=BACKSET(BARPOS=SYSPARAM(1),HH3);
STICKLINE(CD3,0,WZ/2,10,0),colorFFFF80;
HH4:=SUMBARS(VOL,CAPITAL*HHH4/100);
CD4:=BACKSET(BARPOS=SYSPARAM(1),HH4);
STICKLINE(CD4,0,WZ/2,10,0),colorFF8080;
区1:HH4,LINETHICK0,colorFF8080;
区2:HH3,LINETHICK0,colorFFFF80;
区3:HH2,LINETHICK0,color80FF80;
区4:HH1,LINETHICK0,color80FFFF;
S1:=SUM(VOL/CAPITAL*100,区1);
S2:=SUM(VOL/CAPITAL*100,区2);
S3:=SUM(VOL/CAPITAL*100,区3);
S4:=SUM(VOL/CAPITAL*100,区4);
均1:=S1/区1;
均2:=S2/区2;
均3:=S3/区3;
均4:=S4/区4;
DRAWNUMBER(CD1=1 AND REF(CD1,1)=0,11,REFX(均4,SYSPARAM(1)-BARPOS),3),colorFF;
DRAWNUMBER(CD2=1 AND REF(CD2,1)=0,15,REFX(均3,SYSPARAM(1)-BARPOS),3),colorFF;
DRAWNUMBER(CD3=1 AND REF(CD3,1)=0,3,REFX(均2,SYSPARAM(1)-BARPOS),3),colorFF;
DRAWNUMBER(CD4=1 AND REF(CD4,1)=0,18,REFX(均1,SYSPARAM(1)-BARPOS),3),colorFF;
DRAWTEXT(BARPOS=SYSPARAM(1),VOL,'Ray_L'),colorFF80FF;
R:=TT*AMOUNT/VOL/100;
HR:=COST(HIGH)-COST(R);
RL:=COST(R)-COST(LOW);
多头成交:STICKLINE(R>REF(R,1),0,VOL,8,1),colorFF;
空头成交:STICKLINE(R<REF(R,1),0,VOL,8,1),colorFF00;
高位量:STICKLINE(R>REF(R,1),VOL*(HR/(RL+HR)),VOL,8,0),color8000FF;
低位量:STICKLINE(R<REF(R,1),0,VOL*(RL/(RL+HR)),8,0),color808000;
VAR8:=IF(VOL/CAPITAL>0.001,1,EXP(ABS(LOG(VOL/CAPITAL*100))));
相对地量:STICKLINE(VAR8>2 AND VOL<MA(VOL,5)/2,0,VOL,5,0),colorFF00FF;
放量:STICKLINE(VOL>MA(VOL,5)*3,0,VOL,5,0),colorFFFFFF;
EXPLAIN(CLOSE>0,'高位量占多的,说明大家都有需求,'),color8000FF;
EXPLAIN(CLOSE>0,'低位量占多的,说明大家都急切出货;'),color808000;
EXPLAIN(CLOSE>0,'放量很有可能是庄家出货,'),colorFFFFFF;
EXPLAIN(CLOSE>0,'相对地量大概是洗盘完毕了.\n'),colorFF00FF;
EXPLAIN(CLOSE>0,'当然不是绝对的,最重要的是看整个发展过程和自己的体会.'),colorFF;
EXPLAIN(CLOSE>0,'Ray_L地虫');
EXPLAIN(CLOSE>0,'彩带的宽度可以调节');
EXPLAIN(CLOSE>0,'当区间的数字互相遮盖时,可以打开排列开关,调整宽度便可\n');
EXPLAIN(TT=0,'对不起,前辈,该指标的使用期限已到,我写指标的目的主要是进行经验交流的,请进行交流以获取指标的使用权'),colorFF;
EXPLAIN(CLOSE>0,'欢迎交流');
EXPLAIN(CLOSE>0,'email: );
EXPLAIN(CLOSE>0,'短信: ');
|