通达信创新量能主图指标 趋势画线九转量化评分 源码

功能说明
关键量价标记:
百日高量阴线:标记100日内最高阴量柱,画黄白支撑/压力带。
量能极值带:标注100日最高量对应的价格区间,灰色带提示压力/支撑。

高低点识别:
高阳线/高阴线:标记放量阳线或阴线的价格通道。
近低/前低:自动标注近期两个低点位置,白红双色区分。

操作策略
突破交易:股价突破高量阴线顶部或量顶压力带时考虑做多,跌破量底支撑则警惕风险。
波段参考:近低/前低形成双底结构可布局反弹,量化评分>60分增强信号有效性。
风控提示:高阴线带下沿破位需止损,布林线上下轨交叉反向操作。

 
DRAWGBK(C>0,RGB(0,0,110),RGB(0,25,0),0,' ',0);

Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0.01,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;

百日高量阴:=VOL>=HHV(V,100) AND C<O;
百阴顶:=DRAWLINE(百日高量阴,H,REF(百日高量阴,1),REF(H,1),1),COLORYELLOW,NODRAW;
百阴底:=DRAWLINE(百日高量阴,L,REF(百日高量阴,1),REF(L,1),1),COLORWHITE,NODRAW;
DRAWBAND(百阴顶,RGB(56,94,15),百阴底,RGB(0,0,0));

量顶:=DRAWLINE(CURRBARSCOUNT>10 AND V=HHV(V,100),H,ISLASTBAR, REF(H,BARSLAST(CURRBARSCOUNT>10 AND V=HHV(V,100))),1),COLORLIGRAY;
量底:=DRAWLINE(CURRBARSCOUNT>10 AND V=HHV(V,100),L,ISLASTBAR, REF(L,BARSLAST(CURRBARSCOUNT>10 AND V=HHV(V,100))),1),COLORGRAY;
DRAWBAND(量顶,RGB(57,81,162),量底,RGB(0,0,0));

高阳顶:=IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)),1)+1)+1,CONST(REF(REF(C,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),REF(BARSLAST(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1)),1)+1)),DRAWNULL),COLORWHITE,NODRAW;
高阳底:=IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1)),1)+1)+1,CONST(REF(REF(L,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1),1))),REF(BARSLAST(TOPRANGE(V)>=20 AND C>=O AND C>=REF(C,1)),1)+1)),DRAWNULL),COLORWHITE,NODRAW;
DRAWBAND(高阳顶,RGB(128,42,42),高阳底,RGB(0,0,0));

高阴顶:=IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1)),1)+1)+1,CONST(REF(REF(O,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),REF(BARSLAST(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1)),1)+1)),DRAWNULL),COLORBLUE ,NODRAW;
高阴底:=IF(CURRBARSCOUNT<=CONST(REF(BARSLAST(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1)),1)+1)+1,CONST(REF(REF(L,BARSLAST(FILTER(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1),3))),REF(BARSLAST(TOPRANGE(V)>=20 AND C<O AND L<=REF(H,1)),1)+1)),DRAWNULL),COLORBLUE ,NODRAW;
DRAWBAND(高阴顶,RGB(61,145,64),高阴底,RGB(0,0,0));

BL1:=MA(CLOSE,10);
UB1:=BL1+2*STD(CLOSE,10);
LB1:=BL1-2*STD(CLOSE,10);
上穿A:=CROSS(C,UB1);
上穿:=CROSS(LB1,C);
ZDT:=BARSLAST(上穿A);
上:=DRAWLINE(上穿,O,REF(上穿,1),REF(O,1),1),COLOR00FF00;
下:=DRAWLINE(上穿,L,REF(上穿,1),REF(L,1),1),COLOR00FF00;
DRAWBAND(上,RGB(128,128,105),下,RGB(0,0,0));

{筹码峰}
上峰:STICKLINE(ISLASTBAR,HHV(H,5),HHV(H,5),50,1)COLORLIGRAY;
下峰:STICKLINE(ISLASTBAR,LLV(L,5),LLV(L,5),50,1)COLORLIGRAY;
{DRAWBAND(上峰,RGB(128,138,135),下峰,RGB(0,0,0));}

DRAWKLINE(H,O,L,C);

DRAWLINE(CURRBARSCOUNT=TOTALBARSCOUNT,CONST(L),CURRBARSCOUNT=1,L,3) DOTLINE COLORWHITE ;

TTT:=3;
A1:=REF(HIGH,6)=HHV(HIGH,2*TTT+1); BB01:=FILTER(A1,TTT); C1:=BACKSET(BB01,TTT+1); DZ1:=FILTER(C1,TTT);
A2:=REF(LOW,TTT)=LLV(LOW,2*TTT+1); B2:=FILTER(A2,TTT); C2:=BACKSET(B2,TTT+1); D2:=FILTER(C2,TTT);
E1:=(REF(LLV(LOW,2*TTT),1)+REF(HHV(HIGH,2*TTT),1))/2;
E2:=(HIGH+LOW)/2;
H1:=(DZ1 AND NOT(D2 AND E1>=E2)) OR BARSTATUS OR BARSCOUNT(CLOSE)=1;
L1:=(D2 AND NOT(DZ1 AND E1<E2));
XZ1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,XZ1)>0,LLVBARS(IF(L1,LOW,10000),XZ1));
G01:=F1>REF(F1,1);
I1:=BACKSET(G01,2);
LD:=I1>REF(I1,1);
UU1:=BACKSET(BARSTATUS,BARSLAST(LD)+1);
VV1:=UU1>REF(UU1,1);
WW:=BACKSET(VV1,REF(BARSLAST(LD),1)+2);
XZX:=WW>REF(WW,1);
近低:REF(L,BARSLAST(VV1)),COLORWHITE;
前低:REF(L,BARSLAST(XZX)),COLORLIRED;
DRAWTEXT(CURRBARSCOUNT=5,近低*0.997,STRCAT('近低:',CON2STR(近低,2))),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=10,前低*1.003,STRCAT('前低:',CON2STR(前低,2))),COLORLIRED;

{量化评分}
X1:=IF(MA(C,5)>MA(C,10),20,0);
X2:=IF(MA(C,20)>MA(C,60),10,0);
X3:=IF(KDJ.J>KDJ.K,10,0);
X4:=IF(MACD.DIF>MACD.DEA,10,0);
X5:=IF(MACD.MACD>0,10,0);
X6:=IF(V>MA(V,60),10,0);
X8:=IF(C/REF(C,1)>1.03,10,0);
XX:=X1+X2+X3+X4+X5+X6+X8;
DRAWTEXT_FIX(V>O,0,0.1,0,STRCAT('量化评分:',
STRCAT(CON2STR(XX,0),' '))),COLORYELLOW;

{短线操盘:EMA((MA(CLOSE,5)),3) ,LINETHICK2,COLORMAGENTA;

IF(短线操盘 > REF(短线操盘,3),短线操盘,DRAWNULL),LINETHICK2,COLORRED;

IF(短线操盘 < REF(短线操盘,3),短线操盘,DRAWNULL),LINETHICK2,COLORGREEN;}

T5:=REF(HHVBARS(HIGH,60),15)+15;
小美人:REF(HIGH,T5),COLORYELLOW,NODRAW;
STICKLINE(BARSTATUS=2,小美人,小美人,2000,1),COLORYELLOW;
DRAWTEXT(BARSTATUS=2,
小美人*0.997,STRCAT(('小美人:'),CON2STR(小美人,2))),COLORYELLOW;

{一剑封喉}
MB1:=EMA(WINNER(C)*100,5),COLORYELLOW;
MB2:=EMA(MB1,2),COLORBLUE;
MB3:=EMA(MB2,2),COLORBLUE;
MB4:=EMA(MB3,2),COLORBLUE;
N:=5;
VAR2:=MB1;
VAR3:=DRAWLINE(VAR2>=HHV(VAR2,N)=1,VAR2,VAR2<=LLV(VAR2,N)=1,VAR2,1);
阴半:=(MAX(O,C)-MIN(O,C))*0.5+MIN(O,C);
关注:=VAR2=VAR3 AND VAR2<MB4;
一剑封喉:=REF(VAR2,1)=REF(VAR3,1) AND VAR2>REF(VAR2,1);
DRAWTEXT(关注,L*0.990,'封')COLORYELLOW;
DRAWTEXT(一剑封喉,L*0.990,'喉')COLORRED;

{主力资}
均价:=AMOUNT/VOL/100;
AAA2:=SUM(IF( CLOSE>REF(CLOSE,1),VOL*均价,0),0);
AAA3:=SUM(IF( CLOSE<REF(CLOSE,1),VOL*均价,0),0);
AAA4:=SUM(IF( CLOSE=REF(CLOSE,1),VOL*均价,0),0);
BB1:=0;
B1万元:=DVOL*DCLOSE/100;
B1差:=B1万元-REF(B1万元,1);B2万元:=DVOL*DCLOSE/100;
净流入万元:=(AAA2-AAA3-0.5*AAA4);
PM:=MA(净流入万元,1);
PMA:=PM/REF(PM,1)>1;
PMB:=REF(PMA,1)<1 AND PMA;
密码:=(EMA(MA(B1万元,2),2))/100000;
二日比:=密码/REF(密码,1);
主力资金进入:=PMB AND 密码>REF(密码,1) AND 二日比>1 AND C>O;
{DRAWICON(主力资金进入,L*0.97,9);}
STICKLINE(主力资金进入,C,O,-1,0)COLORMAGENTA;

{蓝柱}
BLXS:=V/REF(V,1),NODRAW;
VMIN:=MIN(MIN(V,REF(V,1)),REF(V,2));
VMAX:=MAX(MAX(V,REF(V,1)),REF(V,2));
SL1:=V<=0.6*VMAX AND HHV(H,3)=HHV(H,21);
SL2:=REF(H,1)=HHV(H,21) AND BLXS<0.6 AND NOT(EXIST(C>1.097*REF(C,1),3));
SL:=SL1 OR SL2;
STICKLINE(SL,C,O,-1,0), COLORBLUE;

假阴真阳:=C<O AND (C>REF(C,1) OR 均价>REF(C,1));
STICKLINE(假阴真阳,C,O,-1,0)COLORLIRED;

长阴:=(C<=REF(C,1)*0.97 OR C<=O*0.97) AND H>L ;
短柱:=V<REF(V,1) OR V<REF(HHV(V,5),1);
长阴短柱:=长阴 AND 短柱;
STICKLINE(长阴短柱,C,O,1.8,0),COLORGREEN;

{黄金阴}
阴K:=C<REF(C,1) OR (C>O AND (C<REF((C+O)*0.5,1) OR 均价<REF(C,1)));
黄金阴:=O>REF(C+0.01,1) AND 阴K AND V<REF(V,1)*0.8;
STICKLINE(黄金阴,C,O,1.2,0)COLORYELLOW;
DRAWTEXT(黄金阴 AND V<REF(V,1)*0.66,L*0.995,'2')COLORRED;

{进场}
N1:=7;
VARR1:=REF(C,1);
VARR2:=SMA(MAX(C-VARR1,0),N1,1)/SMA(ABS(C-VARR1),N1,1)*1000;
VARR3:=DRAWLINE(VARR2>=HHV(VARR2,N1),VARR2,VARR2<=LLV(VARR2,N1),VARR2,1);
VARR4:=VARR2=VARR3;
VARR5:=VARR2<REF(VARR2,1);
STICKLINE(VARR4 AND VARR5,C+(C-O)/3,C,2.5,0),COLORWHITE;
{DRAWTEXT(VARR4 AND VARR5,L*0.97,' 进场')COLORBLUE;};

{洗盘}
XP1:=V=HHV(V,60) AND C<O;
XP2:=V<REF(V,1) AND H/C>1.04 AND C<O AND EXIST(H>HHV(L,60),5);
STICKLINE(XP2,O,C,0.5,1), COLORLIGREEN;

平底:=ABS(L-REF(MIN(O,C),1))<=0.03 OR ABS(O-REF(MIN(C,L),1))<=0.03;
平底不破:=REF(长阴短柱,1) AND 平底 AND C>REF(C,1) ;
STICKLINE(平底不破,MIN(O,REF(MIN(C,O),1)),MIN(O,REF(MIN(C,O),1)),10,0),COLORCYAN;

AA:=(C-REF(C,1))/REF(C,1)*100;
ZS:=(NAMELIKE('ST') OR NAMELIKE('*ST') OR NAMELIKE('S')) AND AA>=4.945;
DS:=(NAMELIKE('ST') OR NAMELIKE('*ST') OR NAMELIKE('S')) AND AA<=-4.945;
涨停:=C=ZTPRICE(REF(C,1),0.1) OR ZS ;
跌停:=C=DTPRICE(REF(C,1),0.1) OR DS;

{小压}
HH1:=REF(C,9)=HHV(C,2*9+1);
HH2:=FILTER(HH1,9);
HH3:=BACKSET(HH2,9+1);
HH4:=FILTER(HH3,9);
小压1:=REF(C*0.999,BARSLAST(HH4)),COLORWHITE,NODRAW;
HH5:=ABS(REF(小压1,1)-小压1)>小压1*0.075 AND HH4;
小压:REF(C,BARSLAST(HH5)),COLORCYAN,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=5,小压*0.997,STRCAT(('小压:'),CON2STR(小压,2))),COLORCYAN;

{启爆线}
LAST3K:=CURRBARSCOUNT>4;
T1:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T1));
CCVV:=CONST(CURRBARSCOUNT);
T2:=CONST(BARSLAST((CURRBARSCOUNT >(CCVV+T1)) AND (HIGH>T1HIGH)));
T2HIGH:=CONST(REF(HIGH,T2));
T3:=CONST(BARSLAST((CURRBARSCOUNT >(CCVV+T2)) AND (HIGH>T2HIGH)));
T3HIGH:=CONST(REF(HIGH,T3));
启爆线:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),LINETHICK2,COLORLIMAGENTA,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=5,启爆线*0.997,STRCAT(('启:'),CON2STR(启爆线,2))),COLORLIMAGENTA;

{量托}
VOL5:=MA(VOL,5),COLORWHITE;
VOL10:=MA(VOL,10),COLORYELLOW;
VOL40:=MA(VOL,40),COLORFF00FF ;
量托:=VOL5>=VOL40 AND CROSS(VOL10,VOL40) AND REF(VOL10,1)<REF(VOL40,1);
DRAWTEXT(量托,L-0.012,'托'),COLORWHITE;

FF1:=REF(HIGH,5)=HHV(HIGH,2*5+1);
FF2:=FILTER(FF1,5);
FF3:=BACKSET(FF2,5+1);
HDD:=FILTER(FF3,5);
突破前高:=CROSS(C,小压);
倍量2:=VOL>REF(V,1)*1.9;
倍量过左峰:=倍量2 AND 突破前高;
DRAWTEXT(倍量过左峰,小压,'倍Z峰'),COLORYELLOW;

ZF1:=(C-REF(C,1))/REF(C,1)*100;
双阴:=REF(ZF1,1)<0 AND REF(ZF1,1)>-10 AND ZF1<0 AND ZF1<REF(ZF1,1) AND V<REF(V,1);
DRAWTEXT(双阴 AND MACD>=0,L,'阴'),COLORWHITE;

DRAWTEXT(BOLL>=REF(BOLL,1) AND REF(BOLL,1)<REF(BOLL,2),H,'★转'),COLORYELLOW;
STICKLINE(C,REF(H,BARSLAST(BOLL>=REF(BOLL,1) AND REF(BOLL,1)<REF(BOLL,2))),REF(H,BARSLAST(BOLL>=REF(BOLL,1) AND REF(BOLL,1)<REF(BOLL,2))),3,0),COLORYELLOW;

{九转}
AH:=HHV(H,60);
AL:=LLV(L,60);
A0:=(AH-AL)/21;
A01:=C>REF(C,4);
NT:=BARSLASTCOUNT(A01);
TJ11:=NT=9;
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);
AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;
DRAWTEXT(AY>0,H+1.1*A0,VAR2STR(AY,0)),COLORYELLOW;
DRAWTEXT(NT=13,H+1.1*A0,'13'),COLORYELLOW;
DRAWTEXT(NT=18,H+1.1*A0,'18'),COLORYELLOW;
B01:=C<REF(C,4);
NT0:=BARSLASTCOUNT(B01);
TJ21:=NT0=9 ;
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);
CAY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;
DRAWTEXT(CAY1>0,L-1*A0,VAR2STR(CAY1,0)),COLORLIGREEN;
DRAWTEXT(NT0=13,L-1*A0,'13'),COLORGREEN;
DRAWTEXT(NT0=18,L-1*A0,'18'),COLORGREEN;



{锅盖}
CLT:=LLVBARS(L,60);
CLTT:=BARSLAST(CURRBARSCOUNT=CONST(CLT)+1);
CHT:=FINDHIGHBARS(H,CLT+1,60,1);
锅盖:DRAWLINE(CURRBARSCOUNT=CONST(CHT)+1,H,ISLASTBAR,REF(H,CHT),0),COLORLIGREEN,LINETHICK1;
TT1:=BARSLAST(CURRBARSCOUNT=CONST(CHT)+1);
DRAWTEXT(TT1=0,REF(H,TT1)*1.01,VARCAT(VARCAT('锅盖:',VAR2STR(REF(H,TT1),2)),''))COLORGREEN;
TT:=BARSLAST(CURRBARSCOUNT=CONST(CHT)+1);
DRAWLINE(TT=0,H,CLTT=0,L,0),COLORGREEN,LINETHICK1;
锅柄:DRAWLINE(CLTT=0,(锅盖-L)*0.618+L,ISLASTBAR,REF((锅盖-L)*0.618+L,CLTT),0)DOTLINE,COLORWHITE;
DRAWTEXT(CLTT=0,L*0.98,'锅底'),COLORWHITE;

{锅里淘金}
LT:=LLVBARS(L,34);
LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);
HT:=FINDHIGHBARS(H,LT+1,60,1);
EXT1:=DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORYELLOW,LINETHICK1;
TT0:=BARSLAST(CURRBARSCOUNT=CONST(HT)+1);
EXT2:=DRAWLINE(LTT=0,(EXT1-L)*0.618+L,ISLASTBAR,REF((EXT1-L)*0.618+L,LTT),0)LINETHICK1,COLORLIMAGENTA;

VB1:=IF(C>O OR (C=O AND C>=REF(C,1)),VOL,0);
VB2:=IF(C<O OR (C=O AND C<REF(C,1)),VOL,0);
LJ0:=SUM(VB1,LTT)/SUM(VB2,LTT);
XG:=COUNT(CROSS(C>=EXT2,0.5),LTT+1)=1 AND CROSS(C>=EXT2,0.5) AND LJ0>1.5;
DRAWTEXT(XG,L*1.01,'擒妖'),COLORYELLOW;

STT:=(O-C)/REF(C,1)*100;
ZF:=(C-REF(C,1))/REF(C,1)*100;
AY0:=REF(ZF<9,1) AND ZF<=IF(FINANCE(3)>2,(-11),(-6)) AND C<O AND STT>3.5;
AY1:=BARSLAST(AY0);
碗口1:REF(O,AY1),COLORYELLOW,NODRAW;
X_28:=(碗口1-LLV(MIN(CLOSE,OPEN),AY1))/LLV(CLOSE,AY1)*100;
突破大阴1:=X_28<36 AND AY1>16 AND AY1<150 AND REF(EVERY(MAX(C,O)<REF(O,AY1),AY1),1) AND CROSS(C,REF(O,AY1)) AND V>O;
STICKLINE(AY1>=0,碗口1,碗口1,10,0),COLORRED,LINETHICK1;

AY21:=REF(ZF<9,1) AND ZF<=IF(FINANCE(3)>2,(-12),(-7)) AND C<O AND STT>3.5;
AY2:=BARSLAST(AY21);
碗口2:REF(O,AY2),COLORLIRED,NODRAW;
X_29:=(碗口2-LLV(MIN(CLOSE,OPEN),AY2))/LLV(CLOSE,AY2)*100;
突破大阴2:=X_29<36 AND AY2>16 AND AY2<150 AND REF(EVERY(MAX(C,O)<REF(O,AY2),AY2),1) AND CROSS(C,REF(O,AY2)) AND V>O;
STICKLINE(AY2>=0,碗口2,碗口2,10,0),COLORLIRED,LINETHICK1;
STICKLINE(AY0>0 AND C<O,C,O,0.5,0),COLORGREEN;

{锁筹}
UB:=BOLL+2*STD(CLOSE,20),COLORGREEN,LINETHICK2;
BOLL:=MA(CLOSE,20),COLORRED,LINETHICK2;
LB:=BOLL-2*STD(CLOSE,20),COLORGREEN,LINETHICK2;
HJK_1:=CROSS(CLOSE,UB) OR CLOSE>UB;
DRAWTEXT(HJK_1,H,'●'),COLORWHITE;
浮筹H:=(WINNER(C*1.1)-WINNER(C*0.9))/WINNER(HHV(H,0))*100,COLORYELLOW,LINETHICK2;
RPY:=(C-LLV(C,240))/(HHV(C,240)-LLV(C,240))*100,COLORWHITE,LINETHICK1;
锁仓拉升:=RPY>99 AND 浮筹H<30,COLORRED;
DRAWTEXT(锁仓拉升,H,'●'),COLORYELLOW;

{竞价抢筹定义}
高开:=(O/REF(C,1)-1)*100;
S0:=DYNAINFO(15)/O/100;
开盘满量:=S0/MA(REF(V,1),5)*100;
主力入场:=开盘满量>=1.5 AND 高开>=2 AND 高开<=5;
DRAWTEXT(主力入场,L*0.99,'抢'),COLORWHITE;

竞价成交量:=IF(CURRBARSCOUNT=1,DYNAINFO(15)/DYNAINFO(4)/100,GPJYVALUE(25,1,0));
竞量昨比值:=竞价成交量/REF(V,1)*100;
抢筹:=竞量昨比值>5 AND 高开>=2 AND 高开<=5;
DRAWTEXT(抢筹,L*0.99,'抢'),COLORYELLOW;

{仙人指}
VVA1:=CLOSE/REF(CLOSE,3)>=1.1;
VVA2:=BACKSET(VVA1,2);
仙人指:=VVA2 AND COUNT(VVA2,2)=1;
DRAWICON(仙人指,H*1.02,11);

{涨停极点}
NE:=IF(NAMELIKE('S') OR NAMELIKE('*S'),0.05,0.1);
涨停01:=C/REF(C,1)-1>=NE-0.01/REF(C,1) AND C=H AND PERIOD=5{ AND V/REF(V,1)>=1.9};
TJ1:=COUNT(涨停01,10)>=1;
ZT:=BARSLAST(涨停01);
TJ2:=C>=REF(L,ZT);
TJ3:=V<REF(V,1) AND REF(V,1) <REF(V,2) AND V<MA(V,5);
TJ4:=ABS(C/O-1)*100<6 AND NOT(C=L);
TJ5:=V<REF(V,ZT);
TJ6:=C<REF(C,1) AND REF(C,1) <REF(C,2);
涨停极点:=TJ1 AND TJ2 AND TJ3 AND TJ4 AND TJ5 AND TJ6;
曾涨停1:=H/REF(C,1)-1>=NE-0.01/REF(C,1) AND C<H AND PERIOD=5 AND V/REF(V,1)>=1.9;
TJ01:=COUNT(曾涨停1,8)>=1;
CZT:=BARSLAST(曾涨停1);
TJ02:=C>=REF(L,CZT);
TJ03:=V<REF(V,1) AND REF(V,1) <REF(V,2) AND V<MA(V,5);
TJ04:=ABS(C/O-1)*100<6 AND NOT(C=L);
TJ05:=V<REF(V,CZT);
TJ06:=C<REF(C,1) AND REF(C,1) <REF(C,2);
炸板极点:=TJ01 AND TJ02 AND TJ03 AND TJ04 AND TJ05 AND TJ06;
极点:=涨停极点 OR 炸板极点;
{STICKLINE(极点,L,L,3,0) COLORWHITE;}
DRAWTEXT(极点,L*0.995,'▲'),COLORWHITE;

SN1:=(L+H)/2;
N3:=IF(BARSCOUNT(C),SMA(SN1,21,1),C),COLORYELLOW;
R1:=REF(C,1);
M3:=IF(BARSCOUNT(C)>10,SMA(V,90+1,1),0),COLORLIRED;
量能:=V/M3,COLORYELLOW;
HONGV:=V>=HHV(V,65)*0.82 AND H>R1*1.038;
DRAWTEXT(REF(量能>1.3 AND HONGV,6) AND O>N3 AND C<N3*1.25,L*0.995,'▲'),COLORGRAY;
{STICKLINE(REF(量能>1.3 AND HONGV,6) AND O>N3 AND C<N3*1.25,L-0.03,L-0.03,3,1),COLORLIGRAY;}

{T50底画白线}
MA10:=MA(CLOSE,10),COLORGREEN,LINETHICK1;
MA30:=MA(CLOSE,30),COLORLIRED,LINETHICK1;
A:=REF(H,5)<REF(H,4) AND REF(H,3)<REF(H,4) AND REF(H,2)<REF(H,4) AND REF(H,1)<REF(H,4) AND REF(C,1)<REF(C,2);
B:=MA10>MA30;
A00:=A AND B;
STICKLINE(A00,L,L,3,0) COLORYELLOW;
DRAWTEXT(FILTER(A00=1,3),L*0.99,VARCAT(VAR2STR(L,2),'')),COLORYELLOW;

MA18:=MA(CLOSE,18);
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
买:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX< 0,2) AND CROSS(DX,MA(DX,2));
DRAWTEXT(FILTER(买=1,5),LOW*0.99,'★'),COLORRED;

买线1:=ZIG(3,8);
卖线1:=MA(买线1,2);
BU:=CROSS(买线1,卖线1);
SEL:=CROSS(卖线1,买线1);
DRAWTEXT(BU,L*0.99,'★'),LINETHICK4,COLOR00AAFF;
DRAWTEXT(SEL,H*1.015,'卖'),LINETHICK4,COLORCYAN;

{上下轨}
N11:=2,200,13;
UR00:=2,200,6;
LR0:=2,200,6;
TC01:=IF(H=HHV(H,8*UR00),H,DRAWNULL);
TC02:=CONST(BARSLAST(TC01=H))+1;
UPPER:=CONST(IF(TC02=1,H,REF(H,TC02-1)));
BC1:=IF(L=LLV(L,8*LR0),L,DRAWNULL);
BC2:=CONST(BARSLAST(BC1=L))+1;
LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1)));
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;
HP:=CURRBARSCOUNT<=TC02 AND H=UPPER;
NOD:=(IF(TC02>BC2,TC02,BC2)-IF(TC02>BC2,BC2,TC02));
LR1:=FORCAST(C,NOD+1);
NP:=IF(CURRBARSCOUNT<=MAX(BC2,TC02),CONST(IF(MIN(TC02,BC2)=1,LR1,REF(LR1,MIN(TC02,BC2)-1))),DRAWNULL),POINTDOT,COLORRED;
LR2:=SLOPE(C,NOD+1);
LR3:=CONST(IF(MIN(TC02,BC2)=1,LR2,REF(LR2,MIN(TC02,BC2)-1)));
STICKLINE(IF(BC2>TC02,HP,LP),LOWER,UPPER,0,-1),COLORGRAY;
STICKLINE(IF(BC2>TC02,LP,HP),LOWER,UPPER,0,-1),COLORGRAY;
FP:=NP-LR3*(NOD),POINTDOT,COLORYELLOW;
EQU:=(NP+FP)/2,POINTDOT,COLORWHITE;
AD:=ABS(NP-FP);
DBL0:=BARSLAST(BC1!=DRAWNULL)+1;
DBH:=BARSLAST(TC01!=DRAWNULL)+1;
BSP:=IF(BC2>TC02,DBL0,DBH)-1;
LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP);
AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC02) AND H>LRL,H,LRL);
AT2:=HHV(AT1-LRL,MAX(BC2,TC02));
AT3:=CONST(BARSLAST(AT1-LRL=AT2));
AT4:=CONST(IF(AT3=0,H,REF(H,AT3)));
AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3)));
ATL:=LRL+AT5;
UT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC02) AND L<LRL,L,LRL);
UT2:=HHV(LRL-UT1,MAX(BC2,TC02));
UT3:=CONST(BARSLAST(LRL-UT1=UT2));
UT4:=CONST(IF(UT3=0,H,REF(H,UT3)));
UT5:=CONST(IF(UT3=0,LRL-UT1,REF(LRL-UT1,UT3)));
UTL:=LRL-UT5;
RH:=IF(CURRBARSCOUNT>=MIN(BC2,TC02)-10,ATL,CONST(REF(ATL,MIN(BC2,TC02)-11)));
RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC02)-10,UTL,CONST(REF(UTL,MIN(BC2,TC02)-11)));
上轨:IF(NP>FP,IF(ATL<=RH,ATL,DRAWNULL),IF(ATL>=RL,ATL,DRAWNULL)),COLORBLUE;
下轨:IF(NP>FP,IF(UTL<=RH,UTL,DRAWNULL),IF(UTL>=RL,UTL,DRAWNULL)),COLORLIMAGENTA;

{MA10:=MA(CLOSE,10),COLORYELLOW,LINETHICK1;}
MA54:=MA(CLOSE,54),COLORFFCCCC,LINETHICK0;
PL1:=(((CLOSE - MA54) / MA54) < 0.1);
PL2:=(((CLOSE - MA10) / MA10) < 0.3);
偏离率:=(((PL1 = 1) AND (PL2 = 1)) * 0.2);
平台突破:=((((偏离率 = 0) AND (REF(偏离率,1) = 0.2)) AND (REF((COUNT((偏离率 = 0.2),10) = 10),1) = 1)) * 1);
DRAWTEXT(平台突破,L,'突●'),COLOR0099FF;
AZ:=((((偏离率 = 0) AND (REF(偏离率,1) = 0.2)) AND (REF((COUNT((偏离率 = 0.2),10) = 10),1) = 1)) * 1);
AC:=BARSLAST(AZ);
DRAWLINE(AZ AND CURRBARSCOUNT<=120,L,ISLASTBAR,
REF(L,AC),1),COLOR0099FF,LINETHICK1;

底分型:=REF(L,1)<REF(L,2) AND REF(L,1)<L AND REF(H,1)<REF(H,2) AND REF(H,1)<H AND C>REF(H,1);
DRAWTEXT(底分型,L*0.997,'▲'),COLORMAGENTA;

A09:=((L+H) + (C*2))/4;
AAA1:=EMA(A09,14);
A1X:=(AAA1-REF(AAA1,1))/REF(AAA1,1) * 100;
G1:=BARSLAST(CROSS(A1X,0));
加速加仓:IF(H>=REF(A09,BARSLAST(CROSS(A1X,0)))*1.3,REF(A09,BARSLAST(CROSS(A1X,0)))*1.3,DRAWNULL),COLORYELLOW,LINETHICK1;
DRAWTEXT(ISLASTBAR,加速加仓,' 加速加仓'),COLORYELLOW;

{止损}
{STICKLINE(ISLASTBAR,HHV(C,5)*0.95,
HHV(C,5)*0.95,50,0),COLORWHITE;
DRAWTEXT(ISLASTBAR,HHV(C,5)*0.95,VARCAT(VAR2STR(HHV(C,5)*0.95,2),'')),COLORFFFFFF;}

XA0:=((L+H+C*2)/4);
上F:=EMA(XA0,14)*1.1382;
A1KX:=(上F-REF(上F,1)) / REF(上F,1) * 100;
GD1:=BARSLAST(CROSS(A1KX,0));
真妖显身:IF(H>=REF(XA0,BARSLAST(CROSS(A1KX,0)))*1.3, REF(XA0,BARSLAST(CROSS(A1KX,0)))*1.3,DRAWNULL),COLORFFB5FF,LINETHICK1;
DRAWTEXT(ISLASTBAR,真妖显身,' 妖显'),COLORFFB5FF;

T:=BARSLAST(CROSS(C,REF(H,TT)));
GL:=C/REF(H,TT);
TAK:=BARSLAST(GL=HHV(GL,T+1));
DF:=(C-REF(C,TAK+1))/REF(C,TAK+1)*100;
JL:=L/REF(H,TT);
XGK:=DF< -8 AND JL< 1.075 AND MIN(C,O)*1.005>=REF(H,TT);
XGT:=BARSLAST(COUNT(XGK,T+1)=1 AND XGK);
QFK:=BACKSET(XGT=0,TAK+1);
QFTK:=BARSLAST(CROSS(QFK=1,0.5));
XZF:=REFX(DF,BARSNEXT(XGT=0));
DRAWTEXT(CROSS(XGT=0,0.5),L*0.980,'回踩'),COLORWHITE;

{防守}
HA1:=IF(H=HHV(H,21),H,DRAWNULL);
HA2:=CONST(BARSLAST(HA1!=DRAWNULL));
HA3:=CONST(IF(HA2=0,L,REF(L,HA2)));
HA4:=CONST(REF(BARSLAST(L<HA3),HA2+1)+HA2+1);
止:IF(CURRBARSCOUNT<=HA2+21,CONST(IF(HA4=0,L,REF(L,HA4))),DRAWNULL),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=HA2+20,止*0.99,STRCAT(('防守:'),CON2STR(止,2))),COLORGREEN;

AA8:=BARSLAST(COUNT(C<O,3)>=3 AND HHV((REF(C,1)/C-1)*100,3)>=5);
BB8:IF(AA<30,REF(O,BARSLAST(CURRBARSCOUNT=CONST(AA8)+1)),DRAWNULL),LINETHICK1,COLORCCFFFF,DOTLINE;
CC8:=BARSLAST(CURRBARSCOUNT=CONST(AA)+2);
DRAWTEXT(CC8,H,'庄股启动'),COLORCCFFFF,DRAWABOVE;
DRAWICON((COUNT(C>BB8,CC8)=1 AND C>BB8 OR CROSS(C,BB8)) AND CC8<=30,L*0.98,1);



来函数检测结果如下
该公式包含未来函数:ZIG
该公式包含未来函数:BACKSET
该公式包含未来函数:WINNER
该公式包含未来函数:DYNAINFO
该公式包含未来函数:FINANCE
该公式包含未来函数:DHIGH
该公式包含未来函数:DCLOSE
该公式包含未来函数:DVOL
该公式包含未来函数:BARSNEXT
该公式包含未来函数:REFX

解密、定制、编写公式指标请联系QQ或微信同号:88652583
置顶指标

相关指标公式

指标安装下载帮助  |   联系我们  |  乐淘公式网  |  公式网   |  指标公式  |  加入收藏   

@2005-2025 浙ICP备2024071487号-1 乐淘公式网公式网均来源互联网收集整理,如不慎侵犯了你的权益,请联系我们告知,我们将做删除处理
免责声明:乐淘公式网所有指标公式及文章由网络收集,不保障实时性和真实性, 仅供学习研究并不构成投资建议,请勿以此为依据进行股票交易,由此引起的投资亏损与本站无关。
QQ:88652583 微信 88652583
sitemap站点地图