同花顺仓位副图指标
红色为安全投资黄色为谨慎投资蓝色为风险投机绿色将面临变盘
源码
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 OR DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) AND JJJ>(DYNAINFO(6)-0.01)));
五日成本:IF(JJJT,0.01*EMA(AMOUNT,5)/EMA(VOL,5),EMA((HIGH+LOW+CLOSE)/3,5));
十三日日成本:IF(JJJT,0.01*EMA(AMOUNT,13)/EMA(VOL,13),EMA((HIGH+LOW+CLOSE)/3,13));
三十四日成本:IF(JJJT,0.01*EMA(AMOUNT,34)/EMA(VOL,34),EMA((HIGH+LOW+CLOSE)/3,34));
长期成本:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120)),DOTLINE;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
BBI线:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
CPX40:=WMA(MID,40);
CPX30:=WMA(MID,30);
CPX20:=WMA(MID,20);
CPX15:=WMA(MID,15);
CPX10:=WMA(MID,10);
CPX5:=WMA(MID,5);
CPX3:=WMA(MID,3);
STZF:=(MAX(CLOSE,OPEN)/MIN(CLOSE,OPEN)-1)*100;
均STZF:=(SUM(STZF,21)-STZF)/20;
DYX:=CLOSE(均STZF*2.5));
ZNCPX3:=IFF(DYX,(6*CLOSE+2*REF(MID,1)+1*REF(MID,2))/9,CPX3);
DYKX:=CLOSE>REF(CLOSE,1) AND (100*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>(均STZF*2.5));
ZNCPX5:=IFF(DYKX,(6*CLOSE+2*REF(MID,1)+1*REF(MID,2))/9,CPX5);
CPMXK:=CPX20;
CPMXM:=CPX30;
CPKXM:=ZNCPX3;
CPKXK:=ZNCPX3;
UP:=CPX30>REF(CPX30,1);
DOWN:=CPX30
CPXM:=IFF(UP,CPMXK,IFF(DOWN,CPMXM,0));
CPXK:=IFF(UP,CPKXM,IFF(DOWN,CPKXK,0));
D:=CPXK> CPXM;
K:=CPXK<=CPXM;
长:=WMA(MID,30);
中:=WMA(MID,20);
短:=WMA(MID,10);
SXX:=短>REF(短,1) AND 中
SMX:=短>REF(短,1) AND 中>REF(中,1) AND 长
SML:=短>REF(短,1) AND 中>REF(中,1) AND 长>REF(长,1);
SXL:=短>REF(短,1) AND 中REF(长,1);
XML:=短REF(中,1) AND 长>REF(长,1);
XXL:=短REF(长,1);
XXX:=短
均线最大:=MAX(CPX5,MAX(CPX10,MAX(CPX20,MAX(CPX30,CPX40))));
均线最小:=MIN(CPX5,MIN(CPX10,MIN(CPX20,MIN(CPX30,CPX40))));
高缠绕度:=1000*(均线最大/均线最小-1)<27;
低缠绕度:=1000*(均线最大/均线最小-1)>=27;
投机:=10;
试盘:=IFF(SXX,20,0);
加仓:=IFF(SMX AND D,40,IFF(SMX AND K,20,0));
重仓:=IFF(SML AND D AND 低缠绕度,90,IFF(SML AND D AND 高缠绕度,60,IFF(SML AND K,20,0)));
高仓:=IFF(SXL AND D AND 低缠绕度,70,IFF(SXL AND D AND 高缠绕度,40,IFF(SXL AND K,20,0)));
减仓:=IFF(XML AND D,60,IFF(XML AND K,20,0));
轻仓:=IFF(XXL AND D,30,IFF(XXL AND K,20,0));
空仓:=IFF(XXX,0,0);
仓位1:=IFF(SML AND D AND 低缠绕度,90,IFF(SXL AND D AND 低缠绕度,70,IFF((XML AND D) OR (SML AND D AND 高缠绕度),60,IFF((1/2)==10,50,IFF((SMX AND D) OR (SXL AND D AND 高缠绕度),40,IFF(XXL AND D,30,0))))));
仓位2:=IFF(SXX OR (SMX AND K) OR (SML AND K) OR (SXL AND K) OR (XML AND K) OR (XXL AND K),20,10);仓位A:=MAX(仓位1,仓位2);
配置仓位:=IFF(((REF(仓位A,1)==90) OR (REF(仓位A,1)==70)) AND (仓位A<=50 AND 仓位A>=30),60,仓位A);
修正一天:=COUNT(配置仓位>=70,2)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,2)==1;
修正二天:=COUNT(配置仓位>=70,3)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,3)==2;
修正三天:=COUNT(配置仓位>=70,4)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,4)==3;
修正四天:=COUNT(配置仓位>=70,5)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,5)==4;
修正五天:=COUNT(配置仓位>=70,6)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,6)==5;
修正六天:=COUNT(配置仓位>=70,7)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,7)==6;
修正七天:=COUNT(配置仓位>=70,8)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,8)==7;
修正八天:=COUNT(配置仓位>=70,9)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,9)==8;
修正九天:=COUNT(配置仓位>=70,10)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,10)==9;
修正十天:=COUNT(配置仓位>=70,11)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,11)==10;
修正十一天:=COUNT(配置仓位>=70,12)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,12)==11;
修正十二天:=COUNT(配置仓位>=70,13)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,13)==12;
修正十三天:=COUNT(配置仓位>=70,14)==1 AND COUNT(配置仓位>=30 AND 配置仓位<=60,14)==13;
蓝:=配置仓位<=20;
红:=(配置仓位>=70) OR 修正一天 OR 修正二天 OR 修正三天 OR 修正四天 OR 修正五天 OR 修正六天 OR 修正七天 OR 修正八天 OR 修正九天 OR 修正十天 OR 修正十一天 OR 修正十二天 OR 修正十三天;
黄:=(红==0) AND (蓝==0);
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=((VAR1-REF(VAR1,1))/REF(VAR1,1)*1000)>0;
STICKLINE(控盘 AND 蓝,H,L,0,1),coloryellow;
STICKLINE(控盘 AND 蓝,C,O,10,1),coloryellow;
STICKLINE(控盘 AND 红,H,L,0,1),colorred;
STICKLINE(控盘 AND 红,C,O,10,1),colorred;
STICKLINE(控盘 AND 黄,H,L,0,1),coloryellow;
STICKLINE(控盘 AND 黄,C,O,10,1),coloryellow;
STICKLINE(控盘==0 AND 蓝,H,L,0,1),colorblue;
STICKLINE(控盘==0 AND 蓝,C,O,10,1),colorblue;
STICKLINE(控盘==0 AND 红,H,L,0,1),coloryellow;
STICKLINE(控盘==0 AND 红,C,O,10,1),coloryellow;
STICKLINE(控盘==0 AND 黄,H,L,0,1),colorblue;
STICKLINE(控盘==0 AND 黄,C,O,10,1),colorblue;
配置仓位NEW:=IFF(控盘 AND 配置仓位<=50,50,配置仓位);
今日仓位:配置仓位NEW;
黄新:=黄 OR (控盘==0 AND 红) OR (控盘 AND 蓝) OR (控盘==0 AND 今日仓位>=60);
蓝新:=蓝 OR (控盘==0 AND 黄);
红新:=红;STICKLINE((控盘==0 AND 今日仓位>=60),H,L,0,1),coloryellow;
STICKLINE((控盘==0 AND 今日仓位>=60),C,O,10,1),coloryellow;
修一天:=COUNT(红新,2)==1 AND COUNT(黄新,2)==1;
修二天:=COUNT(红新,3)==1 AND COUNT(黄新,3)==2;
修三天:=COUNT(红新,4)==1 AND COUNT(黄新,4)==3;
修四天:=COUNT(红新,5 )==1 AND COUNT(黄新,5 )==4;
修五天:=COUNT(红新,6 )==1 AND COUNT(黄新,6 )==5;
修六天:=COUNT(红新,7 )==1 AND COUNT(黄新,7 )==6;
修七天:=COUNT(红新,8 )==1 AND COUNT(黄新,8 )==7;
修八天:=COUNT(红新,9 )==1 AND COUNT(黄新,9 )==8;
修九天:=COUNT(红新,10)==1 AND COUNT(黄新,10)==9;
修十天:=COUNT(红新,11)==1 AND COUNT(黄新,11)==10;
修十一天:=COUNT(红新,12)==1 AND COUNT(黄新,12)==11;
红色修正:=修一天 OR 修二天 OR 修三天 OR 修四天 OR 修五天 OR 修六天 OR 修七天 OR 修八天 OR 修九天 OR 修十天 OR 修十一天;
STICKLINE(红色修正,H,L,0,1),colorligreen;
STICKLINE(红色修正,C,O,10,1),colorligreen;
DRAWTEXT_FIX(蓝 OR 红 OR 黄,0.01,0.05,0,'红色为安全投资'),colorred;DRAWTEXT_FIX(蓝 OR 红 OR 黄,0.01,0.12,0,'黄色为谨慎投资'),coloryellow;DRAWTEXT_FIX(蓝 OR 红 OR 黄,0.01,0.19,0,'蓝色为风险投机'),colorblue;DRAWTEXT_FIX(蓝 OR 红 OR 黄,0.01,0.26,0,'绿色将面临变盘'),colorgreen;
