创新量能主图
主图源码
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);
