20210428zb / 开普饭

红筹指标·标准启动·通达信源码分享（源码不加密、无未来、副图、贴图）

启动买入:=DYNAINFO(4)>0AND HHV(HIGH,10)/LLV(LOW,10)<1.25AND REF(CLOSE,1)<(LLV(LOW,15)+(HHV(HIGH,15)-LLV(LOW,15))*0.85)AND CLOSE>OPENAND CLOSE>=HHV(HIGH,10);

AA:=EMA(C,5),COLORBLUE;BB:=EMA(C,10),COLORBLUE;CC:=EMA(C,14),COLORBLUE;DD:=EMA(C,18),COLORBLUE,LINETHICK4;EE:=EMA(C,40),COLORRED,LINETHICK2;FF:=EMA(C,60),COLORRED,LINETHICK4;

RR1:=MAX(EE,FF);X2:= C>RR1 AND 启动买入 AND (C>REF(HHV(H,3),1) AND (C-REF(C,1))/REF(C,1)>0.07);

STICKLINE(X2>0,0,X2,4,0),COLORRED;STICKLINE(X2>0,0,X2,4,0),COLOR000088;STICKLINE(X2>0,0,X2,3.8,0),COLOR000099;STICKLINE(X2>0,0,X2,3.6,0),COLOR0000AA;STICKLINE(X2>0,0,X2,3.4,0),COLOR0000BB;STICKLINE(X2>0,0,X2,3,2),COLOR0000CC;STICKLINE(X2>0,0,X2,3,0),COLOR0000DD;STICKLINE(X2>0,0,X2,2.7,0),COLOR0000EE;STICKLINE(X2>0,0,X2,2.2,0),COLOR0000FF; STICKLINE(X2>0,0,X2,0.0,0),COLOR0000FF; 

深山老妖

VR1:=VOL/CAPITAL;VR2:=VOL/700000000;VR3:=IF(VR1=0,VR2,VR1);VR4:=1.1*(MAX(HIGH,REF(CLOSE,1))/MIN(LOW,REF(CLOSE,1))-1);VR5:=2.5*MAX(VR3,VR4);VR6:=DMA(CLOSE,VR5);VR7:=SMA(20*(VR6/REF(VR6,1)-1),2,1);VR8:=EMA(VR7,2);VRA:=0.24;VRB:=CLOSE>=REF(CLOSE,1);牛:= IF(VR7>VRA AND VR8>=0.005 AND VRB,1,0);疯牛:=CROSS(牛,0.5) AND COUNT(牛>0.5,10)=1;QB:="KDJ.J"-REF("KDJ.J",1)>30 AND C/REF(C,1)>1.043 AND "MACD.MACD">0 AND "MACD.DEA">0;LS:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,12),2.1*FORCAST(V,12));LQ:=FILTER(LS,28)*100 AND L>REF(C,1)*0.93 ;XG1:=QB OR LQ AND 疯牛;涨幅:=9;高度:=20;跨度:=10;N4:=34;短线:=EMA(CLOSE,17);A:=(3*C+L+O+H)/6;X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;中线:=EMA(X,13);KKA:=EMA(C,5);KKB:=EMA(KKA,8);KKC:=EMA(KKB,13);长线:=EMA(KKC,50);中期:=100*(C-LLV(L,N4))/(HHV(C,N4)-LLV(L,N4));KDD:=REF(中期,1)<1 AND 中期>1;持股:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);支撑:=LLV(持股,3);中期线:=MA(持股,12);VAR1:=1;VAR2:=LLV(LOW,10);VAR3:=HHV(HIGH,25);短期线:=EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4)*VAR1*30;AAA:=(3*C+L+O+H)/6;C2:=EMA(AAA,6);C3:=EMA(AAA,5);SHORT:=12;LONG:=26;MID:=9;DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);DEA:=EMA(DIF,MID);MACD:=(DIF-DEA)*2;N:=9;M1:=3;M2:=3;RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;K:=SMA(RSV,M1,1);D:=SMA(K,M2,1);J:=3*K-2*D;KAAA1:=EXIST(KDD,3);KBBB1:=C/REF(C,1)>1+0.01*涨幅;KAAA2:=支撑>中期线 AND 持股=支撑;KBBB2:=CROSS(C2,C3);KCCC2:=EXIST(C/REF(C,1)>1+0.01*涨幅,跨度);KDDD2:=BARSLAST(中期线>短期线)<跨度;KAAA3:=REF(C,1)<REF(中线,1) AND C>中线;KBBB3:=C/REF(C,1)>1+0.01*涨幅;KCCC3:=中线/长线<1+0.01*高度;超资:=IF(KBBB1+KCCC2+KBBB3=3,1,0);CC:=(H-C)/(C-O)<0.33;DD:=(C/REF(C,1)-1)>=0.0502 AND C>REF(C,1) AND (O-L)/(C-O)>=1.48 AND L<REF(L,1) AND L<REF(L,2);EE:=(C/REF(C,1)-1)>=0.08;AA:=VOL>REF(VOL,1)*1.9 AND C>REF(C,1) AND C/REF(C,1)-1>=0.049 AND CC;BB:=(C/REF(C,1)-1)>=0.0502 AND C>REF(C,1) AND V>REF(V,1) AND VOL>REF(VOL,1)*2.5 AND CC;异动选股:=IF(FILTER(AA OR BB OR DD OR EE,34),1,0) AND 超资;深山老妖: XG1 OR 异动选股;

STICKLINE(深山老妖,0,12,0.1,0),COLORGREEN;DRAWTEXT(深山老妖>0,12,'深山老妖'),COLORRED;

资金诊断

ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力筹码估算}

SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//小筹码估算}

ZSHTL:=SHCM/(ZLCM+SHCM)*100;{//小股民套牢筹码比率}

ZZLKP:=ZLCM/(ZLCM+SHCM)*100;{//主力控盘筹码比率}

ZCMZL:=MA(ZLCM+SHCM,13);{//市场筹码总量}

ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);{//走牛天数}

ZSHJJ:=EMA(ZSHTL,89);{//小股民警戒}

ZZLJJ:=EMA(ZZLKP,89);{//主力警戒}

ZJLRQD:=INTPART(ZZLKP-ZZLJJ);{//资金流入强度}

SH8:=EMA(ZSHTL,8);

DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);

{神秘黑洞}

STICKLINE(REF(ZSHTL,1)>90 AND ZSHTL<90,ZSHTL,0,4,0),COLOR9966FF;

{小股民套牢筹码}

STICKLINE(C>0,ZSHTL,ZZLKP,0,0),COLOREEEEEE;

{小股民筹码警戒}

STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZSHTL,ZSHJJ,1,0),COLORAAAAAA;

{主力控盘筹码}

STICKLINE(C>0,ZZLKP,0,3,0),COLORBLUE;

{铸顶风险区}

STICKLINE(ZZLKP>75,ZZLKP,0,3,0),COLORFFFFFF;

{顶部:(ZZLKP>75),COLORFFFFFF;}

{主力筹码警戒}

STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,3,0),COLORRED;

{筑底散兵坑}

STICKLINE(ZSHTL>=90,ZZLKP,0,3,0),COLORYELLOW;

{底部:(ZSHTL>=90),COLOR66FFCC;}

{筹码总量上升}

{IF(ZCMZL,ZCMZL>REF(ZCMZL,1),0),COLOR0066FF,LINETHICK0;}

{增量资金}

{//------【数值显示】}

散户套牢系数:INTPART(ZSHTL),NODRAW;

主力控盘系数:INTPART(ZZLKP),COLORCYAN,NODRAW;

资金流入强度:ZJLRQD,NODRAW;

{☆精确风险}

{【参数定义】}

RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;

K1:=SMA(RSV,10,1);

D1:=SMA(K1,5,1);

KK:=INTPART(K1);

DD:=INTPART(D1);

TFXXS:=KK+DD;{//变异KD风险系数}

TGLD:=MOD(TFXXS,10);{//踏浪涨停概率点}

TGLXS:=(TFXXS-REF(TFXXS,1))*10;{//变异KD乖离系数}

TYCFX:=TFXXS+TGLXS;{//变异KD预测风险}

乖离系数:TGLXS,NODRAW,COLORGREEN;

{【图解模板】}

{级别拐点}

{乖离系数}

STICKLINE(TGLXS>0,150,150+TGLXS,3,0),COLOR000088;

STICKLINE(TGLXS>0,150,150+TGLXS,2.5,0),COLOR000099;

STICKLINE(TGLXS>0,150,150+TGLXS,2,0),COLOR0000AA;

STICKLINE(TGLXS>0,150,150+TGLXS,1.5,0),COLOR0000BB;

{STICKLINE(TGLXS>0,100,100+TGLXS,1.2,0),COLOR0000CC;}

STICKLINE(TGLXS>0,150,150+TGLXS,1.0,0),COLOR0000DD;

{STICKLINE(TGLXS>0,100,100+TGLXS,0.8,0),COLOR0000EE;}

STICKLINE(TGLXS>0,150,150+TGLXS,0.5,0),COLOR0000FF;{//红柱}

STICKLINE(TGLXS<0,150,150+TGLXS,3,0),COLOR008800;

{STICKLINE(TGLXS<0,100,100+TGLXS,2.8,0),COLOR009900;}

STICKLINE(TGLXS<0,150,150+TGLXS,2.5,0),COLOR00AA00;

STICKLINE(TGLXS<0,150,150+TGLXS,2,0),COLOR00BB00;

{STICKLINE(TGLXS<0,100,100+TGLXS,1.8,0),COLOR00CC00;}

STICKLINE(TGLXS<0,150,150+TGLXS,1.5,0),COLOR00DD00;

{STICKLINE(TGLXS<0,100,100+TGLXS,1.2,0),COLOR00EE00;}

STICKLINE(TGLXS<0,150,150+TGLXS,1,0),COLOR00FF00;{//绿柱}

STICKLINE(TGLXS=0 AND REF(TGLXS,1)>=0,150,150+TGLXS,8,0),COLORRED;

STICKLINE(TGLXS=0 AND REF(TGLXS,1)<0,150,150+TGLXS,8,0),COLORGREEN;

{【数值显示】}

风险系数:TFXXS,LINETHICK2,COLORYELLOW;

预测风险:TYCFX,LINETHICK1,COLORCYAN;

市场筹码总量:ZCMZL,COLORGREEN,LINETHICK1;

上市:FINANCE(42)/10000,NODRAW,COLORYELLOW;

STICKLINE(TGLXS>0 AND 100+TGLXS<TYCFX AND 100+REF(TGLXS,1)>=REF(TYCFX,1),0,(100+ABS(TGLXS)),0,0),COLORYELLOW;

STICKLINE(TGLXS<0 AND 100+TGLXS>=TYCFX AND 100+REF(TGLXS,1)<REF(TYCFX,1),0,(100+ABS(TGLXS)),0,0),COLORYELLOW;

T1:=CONST( ZCMZL>REF(ZCMZL,1) AND DKB=1);

T2:=CONST( ZCMZL>REF(ZCMZL,1) AND DKB=0);

T3:=CONST( ZCMZL=REF(ZCMZL,1));

T4:=CONST( ZCMZL<REF(ZCMZL,1) AND DKB=1);

T5:=CONST( ZCMZL<REF(ZCMZL,1) AND DKB=0);

T6:=CONST(TFXXS<=50 );

T7:=CONST(TFXXS>=160 );

T8:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS<=100 );

T9:=CONST( TFXXS>50 AND TFXXS<160 AND TFXXS>=REF(TFXXS,1) AND TFXXS>100);

T10:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS>100 );

T11:=CONST(TFXXS>50 AND TFXXS<160 AND TFXXS<REF(TFXXS,1) AND TFXXS<=100 );

T12:=CONST( ZSHTL>90 );

T13:=CONST( ZZLKP>75 );

T14:=CONST(CROSS(ZCMZL,ZZLJJ) AND ZZLKP>ZZLJJ AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1) );

T15:=CONST(CROSS(ZCMZL,ZZLKP) AND ZZLKP>ZZLJJ AND ZZLKP<ZSHTL AND ZZLKP>10 AND ZZLJJ>REF(ZZLJJ,1) AND ZCMZL>REF(ZCMZL,1) );

T16:=CONST( CROSS(ZCMZL,ZSHTL) AND ZSHTL>ZZLKP AND ZCMZL>REF(ZCMZL,1));

T17:=CONST( CROSS(ZCMZL,100) AND ZCMZL>REF(ZCMZL,1));

T18:=CONST(REF(ZSHTL,1)>90 AND ZSHTL<90 );

TS1:=IF(T1=1,0+0.03,0);

TS2:=IF(T2=1,TS1+0.03,TS1);

TS3:=IF(T3=1,TS2+0.03,TS2);

TS4:=IF(T4=1,TS3+0.03,TS3);

TS5:=IF(T5=1,TS4+0.03,TS4);

TS6:=IF(T6=1,0+0.73,0);

TS7:=IF(T7=1,TS6+0.03,TS6);

TS8:=IF(T8=1,TS7+0.03,TS7);

TS9:=IF(T9=1,TS8+0.03,TS8);

TS10:=IF(T10=1,TS9+0.03,TS9);

TS11:=IF(T11=1,TS10+0.03,TS10);

TS12:=IF(T12,0+0.03,0);

TS13:=IF(T13=1,TS12+0.03,TS12);

TS14:=IF(T14=1,TS13+0.03,TS13);

TS15:=IF(T15=1,TS14+0.03,TS14);

TS16:=IF(T16=1,TS15+0.03,TS15);

TS17:=IF(T17=1,TS16+0.03,TS16);

TS18:=IF(T8=1,TS17+0.03,TS17);

DRAWTEXT_FIX(T1,0.58,TS1,0,'★主力动向监控：主力增仓'),COLORRED;

DRAWTEXT_FIX(T2,0.58,TS2,0,'★主力动向监控：主力减仓'),COLORMAGENTA;

DRAWTEXT_FIX(T3,0.58,TS3,0,'★主力动向监控：多空平衡'),COLORGRAY;

DRAWTEXT_FIX(T4,0.58,TS4,0,'★主力动向监控：主力回补'),COLORFF9933;

DRAWTEXT_FIX(T5,0.58,TS5,0,'★主力动向监控：主力出逃'),COLORGREEN;

DRAWTEXT_FIX(T6,0.78,TS6,0,'★操作风险提示：买入风险'),COLORYELLOW;

DRAWTEXT_FIX(T7,0.78,TS7,0,'★操作风险提示：卖出风险'),COLORCYAN;

DRAWTEXT_FIX(T8,0.78,TS8,0,'★操作风险提示：追涨博弈'),COLORRED;

DRAWTEXT_FIX(T9,0.78,TS9,0,'★操作风险提示：稳健持股'),COLORMAGENTA;

DRAWTEXT_FIX(T10,0.76,TS10,0,'★操作风险提示：盘跌减仓'),COLORWHITE;

DRAWTEXT_FIX(T11,0.76,TS11,0,'★操作风险提示：杀跌空仓'),COLORGREEN;

DRAWTEXT_FIX(T12,0.36,TS12,0,'☆特别信号提示：筑底散兵坑 '),COLOR66FFCC;

DRAWTEXT_FIX(T13,0.36,TS13,0,'☆特别信号提示：铸顶风险区'),COLORCYAN;

DRAWTEXT_FIX(T14,0.36,TS14,0,'☆特别信号提示：穿越主力 '),COLORRED;

DRAWTEXT_FIX(T15,0.36,TS15,0,'☆特别信号提示：穿越主力 '),COLORYELLOW;

DRAWTEXT_FIX(T16,0.36,TS16,0,'☆特别信号提示：穿越散户 '),COLORGREEN;

DRAWTEXT_FIX(T17,0.36,TS17,0,'☆特别信号提示：全盘穿越 '),COLOR3399FF;

DRAWTEXT_FIX(T18,0.36,TS18,0,'☆特别信号提示：神秘黑洞 '),COLOR9966FF;

{AAA:=REFDATE(HHV(H,30),DATE);

T1A:=CONST(IF(ZZNTS,1,0));

TS1A:=IF(T1A=1,0+0.03,0);

DRAWTEXT(T1A=1 AND CURRBARSCOUNT=45 AND PERIOD=5,AAA-(AAA*TS1A),'【走牛天数判断】'),COLORRED,LINETHICK6;

DRAWNUMBER(T1A=1 AND CURRBARSCOUNT=45-12 AND PERIOD=5,AAA-(AAA*TS1A),CONST(ZZNTS)),COLORRED,LINETHICK6;};

精准买卖

VAR3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;

VAR4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;

VAR5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;

VAR6:=(VAR3+VAR4+VAR5)/3;

VAR7:=EMA(VAR6,5);

VAR8:=IF(VAR6<=-20,10,0);

VAR9:=HHV(VAR8,10);

STICKLINE(VAR8=10,25,10,10,0),COLOR6666FF;

VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);

K:EMA(VAR7,5)*2, COLORFF00FF;

D:EMA(K,5), COLORWHITE;

J:K*3-D*2, COLORYELLOW;

VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10;

指标: EMA(EMA(VAR3,5),5)*3, COLORSTICK;

DRAWTEXT(VARA=20,15,'底部'),LINETHICK1,COLORWHITE;

STICKLINE((VARA=20),0,30,2,0),COLORWHITE;

VARC:=(ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3));

VARD:=(ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3));

STICKLINE((VARC=1),(-14),10,4,0),COLOR0000FF;

DRAWTEXT((VARC=1),(-14),'买'),COLOR00FFFF;

STICKLINE((VARD=1),5,30,4,0),COLOR00FF00;

DRAWTEXT((VARD=1),25,'卖'),COLORFFFF00;

VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;

VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

VAR10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

VAR11:=VARF<REF(VAR10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);

DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,15,'资金活动'),LINETHICK2,COLOR0000FF;

STICKLINE(VAR11 AND COUNT(VAR11,30)=1,1,10,5,0),COLORFF00FF;

VAR12:=(HIGH+LOW+CLOSE)/3;

VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14));

VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70));

VAR15:=IF(VAR13>=150 AND VAR13<200 AND VAR14>=150 AND VAR14<200,10,0);

VAR16:=IF(VAR13<=-150 AND VAR13>-200 AND VAR14<=-150 AND VAR14>-200,-10,VAR15);

VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;

VAR18:=100-ABS(VAR17);

VAR19:=IF(VAR18<90,VAR18,100);

VAR1A:=IF(VARE>0,VARE,0);

VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;

VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;

DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,15,'大笔出货'),LINETHICK1,COLORFFCC66;

STICKLINE(VAR1C AND COUNT(VAR1C,30)=1,0,10,5,0),COLORFFCC66;

{烧香拜佛 TDX}

{P(10,1,100),A(5,1,100);}

主买:=CONST("FSKY.主买#DAY"),NODRAW;

前量:=CONST("FSKY.前量#DAY");

前主:=CONST("FSKY.前主#DAY");

昨量:=CONST("FSKY.昨量#DAY"),NODRAW;

昨主:=CONST("FSKY.昨主#DAY");

今量:=CONST("FSKY.今量#DAY"),NODRAW;

前4:=CONST("FSKY.前4#DAY");

主4:=CONST("FSKY.主4#DAY");

前5:=CONST("FSKY.前5#DAY");

主5:=CONST("FSKY.主5#DAY");

CMM:=MAX(前5,前4),NODRAW;

BMM1:=MAX(前量,昨量),NODRAW;

BMM:=MAX(CMM,BMM1),NODRAW;

AMM:=IF(今量/BMM>2,今量,BMM),NODRAW;

MM:=CONST(500/AMM),NODRAW;

SVOL:=INTPART(SUM(V,0)/CAPITAL);

TJ0:=SVOL>REF(SVOL,1) OR BARSSINCE(CLOSE)=0;

S1:=BARSLAST(TJ0)+1;

TJ2:=S1<REF(S1,1);

S2:=IF(TJ2,REF(S1,1)+1,S1);

S3:=SUM(TJ2,0);

ZK1:="KD.K#WEEK"(9,3,3);

ZD2:="KD.D#WEEK"(9,3,3);

ZF1:="MACD.DIF#WEEK"(12,26,9);

ZA2:="MACD.DEA#WEEK"(12,26,9);

换手:V/CAPITAL*100,LINETHICK0;

JCD:=FILTER(CROSS(ZK1,ZD2) AND REF(ZD2,1)<30,13),NODRAW;

取点:=BARSLAST(JCD);

吸筹区:=IF(取点>0 AND 取点<61,取点,0);

ZS1:=吸筹区;

ZS2:=吸筹区+1;

ZS3:=换手/5;

ZSA:=IF(ZS1>0,SUM((ZS3),吸筹区+1),0),NODRAW;

主力筹码%:ZSA,NODRAW;

建仓天数:ZS1,NODRAW;

阶段总额（万）:=SUM(AMOUNT/10000,S2)*100,NODRAW;

阶段总量（手）:=SUM(V,S2)*100,NODRAW;

阶段成本（元）:(阶段总额（万）/(阶段总量（手）/100)),NODRAW;

STICKLINE(JCD,(0-6)*4,6*4,0,1),COLORGREEN;

N:=2.5;

VAR2:=LLV(LOW,10);

VAR3:=HHV(HIGH,25);

卖出:14.5*N,COLORC6C600;

清仓:17.5*N,COLORFF75FF;

动力线:= (EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4)*10-17.5)*N;

STICKLINE(动力线>REF(动力线,1) ,动力线 ,REF(动力线,1),5 ,1),COLORRED;

STICKLINE(动力线<=REF(动力线,1) ,动力线 ,REF(动力线,1),5 ,1),COLOR00FF00;

底部:-15.5*N,COLOR70DB93;

关注:-12.5*N,COLORYELLOW;

T1:=FILTER(CROSS(动力线,关注),20);

T2:=FILTER(CROSS(动力线,底部),20);

T3:=FILTER(CROSS(清仓,动力线),20);

T4:=FILTER(CROSS(卖出,动力线),20);

RSV:=((((HHV(HIGH,P) - CLOSE) / (HHV(HIGH,P) - LLV(LOW,P))) * 200) - 125);

散户:SMA(RSV,A,1)+15,COLORGRAY,LINETHICK2;

RSV1:=((((CLOSE - LLV(LOW,P)) / (HHV(HIGH,P) - LLV(LOW,P))) * 200) - 105);

主力:SMA(RSV1,A,1)+15,COLORGRAY,LINETHICK2;

IF(散户<0,散户,DRAWNULL),COLORYELLOW,LINETHICK2;

IF(主力>0,主力,DRAWNULL),COLORYELLOW,LINETHICK2;

准备起爆:=CROSS(主力,散户);

STICKLINE(准备起爆,10,-10,4,0),COLOR00FFFF;

小心阴跌一:=CROSS(散户,主力);

STICKLINE(小心阴跌一,10,-10,4,0),COLORGRAY;

DRAWICON((T1 OR T2),0 ,1);

DRAWTEXT((T3 OR T4),0,'＄'),COLOR00FFFF;

DRAWTEXT(准备起爆,5,' 佛，'),COLOR00FFFF;

换手冷清:STICKLINE(换手<3,(0-20)*4,(换手*1.5-20)*4,0.5,1),COLOR999999;

换手活跃:STICKLINE(换手>=3 AND 换手<7,(0-20)*4,(换手*1.5-20)*4,0.5,1),COLOR00CCCC;

换手热烈:STICKLINE(换手>=7,(0-20)*4,(换手*1.5-20)*4,0.5,1),COLOR0000DD;

{强弱走势89线:50/1.5*(MA(3*(C-LLV(L,89))/(HHV(H,89)-LLV(L,89)),2))-50,COLORMAGENTA,LINETHICK1;

0;};

KP:=DYNAINFO(4);

ZX:=DYNAINFO(7);

A1:=IF(主买>=今量/2,255,255);

A2:=IF(主买>=今量/2,0,0);

A3:=IF(主买>=今量/2,0,255);

{DRAWRECTREL(0,160,MM*今量,190,RGB(0,250,250));

DRAWRECTREL(0,160,MM*主买,190,RGB(A1,A2,A3));

DRAWRECTREL(0,160,MM*ABS(主买-(今量-主买)),190,RGB(A3,255,00));}

ZO:=CONST("FSKY.ZO#DAY");

ZC:=CONST("FSKY.ZC#DAY");

A4:=IF(昨主>=昨量/2,255,255);

A5:=IF(昨主>=昨量/2,0,0);

A6:=IF(昨主>=昨量/2,0,255);

{DRAWRECTREL(0,120,MM*昨量,150,RGB(0,250,250));

DRAWRECTREL(0,120,MM*昨主,150,RGB(A4,A5,A6));

DRAWRECTREL(0,120,MM*ABS(昨主-(昨量-昨主)),150,RGB(A6,255,00));}

JO:=CONST("FSKY.JO#DAY");

JC:=CONST("FSKY.JC#DAY");

A7:=IF(前主>=前量/2,255,255);

A8:=IF(前主>=前量/2,0,0);

A9:=IF(前主>=前量/2,0,255);

{DRAWRECTREL(0,80,MM*前量,110,RGB(0,250,250));

DRAWRECTREL(0,80,MM*前主,110,RGB(A7,A8,A9));

DRAWRECTREL(0,80,MM*ABS(前主-(前量-前主)),110,RGB(A9,255,00));}

JO3:=CONST("FSKY.JO3#DAY");

JC3:=CONST("FSKY.JC3#DAY");

A10:=IF(主4>=前4/2,255,255);

A11:=IF(主4>=前4/2,0,0);

A12:=IF(主4>=前4/2,0,255);

{DRAWRECTREL(0,40,MM*前4,70,RGB(0,250,250));

DRAWRECTREL(0,40,MM*主4,70,RGB(A10,A11,A12));

DRAWRECTREL(0,40,MM*ABS(主4-(前4-主4)),70,RGB(A12,255,00));}

JO4:=CONST("FSKY.JO4#DAY");

JC4:=CONST("FSKY.JC4#DAY");

A13:=IF(主5>=前5/2,255,255);

A14:=IF(主5>=前5/2,0,0);

A15:=IF(主5>=前5/2,0,255);

{DRAWRECTREL(0,0,MM*前5,30,RGB(0,250,250));

DRAWRECTREL(0,0,MM*主5,30,RGB(A13,A14,A15));

DRAWRECTREL(0,0,MM*ABS(主5-(前5-主5)),30,RGB(A15,255,00));}

五纯％:=CONST(IF(1 ,"FSKY2.五纯％#DAY",DRAWNULL)),NODRAW;

一纯％:=CONST(IF(1,"FSKY2.一纯％#DAY",DRAWNULL)),NODRAW;

三纯％:=CONST(IF(1 ,"FSKY2.三纯％#DAY",DRAWNULL)),NODRAW;

{DRAWRECTREL(0,345,200,600,RGB(80,80,80));

DRAWTEXT_FIX(五纯％>=0,0.0,1-0.65,0,STRCAT('五日纯量％: ',CON2STR(五纯％,2))),COLORFFFFFF;

DRAWTEXT_FIX(五纯％<0,0.0,1-0.65,0,STRCAT('五日纯量％: ',CON2STR(五纯％,2))),COLORFFFF00;

DRAWTEXT_FIX(三纯％>=0,0.0,1-0.56,0,STRCAT('三日纯量％: ',CON2STR(三纯％,2))),COLORFFFFFF;

DRAWTEXT_FIX(三纯％<0,0.0,1-0.56,0,STRCAT('三日纯量％: ',CON2STR(三纯％,2))),COLORFFFF00;

DRAWTEXT_FIX(一纯％>=0,0.0,1-0.48,0,STRCAT('当日纯量％: ',CON2STR(一纯％,2))),COLORFFFFFF;

DRAWTEXT_FIX(一纯％<0,0.0,1-0.48,0,STRCAT('当日纯量％: ',CON2STR(一纯％,2))),COLORFFFF00;};

20210428zb

相关推荐

深海宝塔主图指标公式

恳请老师把真实资金流公式（图上出粉红色柱子的地方）做成选股指标