双龙主图
DRAWTEXT_FIX(1,0.00,0.00,0,'【★★黑马交流9★★】'),COLOR00FFFF;
上市日期年:REF(YEAR,BARSCOUNT(CLOSE)-1),NODRAW,COLOR0000FF;
月:REF(MONTH,BARSCOUNT(CLOSE)-1),NODRAW,COLORFF00FF;
日:REF(DAY,BARSCOUNT(CLOSE)-1),NODRAW,COLOR00FFFF;
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,FGBLOCK);
Z3:=STRCAT(Z2,DYBLOCK);
Z4:=STRCAT(Z3,' ');
DRAWTEXT_FIX(ISLASTBAR,0.00,0.99,0,STRCAT(Z4,GNBLOCK)),COLORGREEN;
DA:(3*CLOSE+OPEN+LOW+HIGH)/6,POINTDOT;
DB:(20*DA+19*REF(DA,1)+18*REF(DA,2)
+17*REF(DA,3)+16*REF(DA,4)+15*REF(DA,5)+14*REF(DA,6)+13*REF(DA,7)
+12*REF(DA,8)+11*REF(DA,9)+10*REF(DA,10)+9*REF(DA,11)
+8*REF(DA,12)+7*REF(DA,13)+6*REF(DA,14)+5*REF(DA,15)+4*REF(DA,16)+3*REF(DA,17)
+2*REF(DA,18)+REF(DA,20))/210,COLORF0F000;DC:MA(DB,5),COLORYELLOW,LINETHICK1;
STICKLINE(DC>DB , DC,DB ,2.5,0),COLORGREEN,LINETHICK2;
STICKLINE(DB>DC,DC,DB,2.5,0),COLORRED,LINETHICK2;
买点:=CROSS(DB,DC) AND DB>DC;
DRAWTEXT(买点,DB*0.98,'买点'),COLORYELLOW;
卖点:=CROSS(DC,DB) AND DC>DB;
DRAWTEXT(卖点,DC*1.02,'卖点'),COLORYELLOW;
AC:=(2*C-H-L)*V/CAPITAL*100*0.1; {这里.用0.1不扩大成交量的影响力度}
MX:=MAX(AC,MAX(ABS(AC-REF(H,1)),ABS(AC-REF(L,1))));
WX5:=WMA(MX,5);
ZC:=(2*C+H+L)/4;
ZC5:=WMA(ZC,5);
STICKLINE(CROSS(ZC5,WX5),L*0.99,L*0.98,10,0),COLORYELLOW;
STICKLINE(CROSS(WX5,ZC5),H*1.01,H*1.02,10,0),COLOR0077FF;
双龙潜伏副图
DRAWGBK(C>0, RGB(0,0,50),RGB(00,0,0),0,0,1);
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
Z4:DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.001,0.050,0,GNBLOCK),COLORCYAN;{概念};
DRAWTEXT_FIX(ISLASTBAR,0.002,0.1,0,ZDBLOCK);
LHB:SIGNALS_USER(4,1);
DRAWTEXT(LHB,H,'龙虎'),COLORWHITE;
AHC1:=CLOSE*VOL;
AHC2:=EMA((EXPMA(AHC1,3)/EXPMA(VOL,3)+EXPMA(AHC1,6)/EXPMA(VOL,6)+EXPMA(AHC1,12)/EXPMA(VOL,12)+EXPMA(AHC1,24)/EXPMA(VOL,24))/4,13),COLORYELLOW;
ZT:=REF(C,1)*1.1-C<0.01 AND H=C;
顶:=1.3*AHC2;
内上:=1.06*AHC2;
内下:=AHC2*0.94;
底:=AHC2*0.87,DOTLINE,COLORGREEN;
IF((内上 <= REF(内上,1)),内上,DRAWNULL),COLORGREEN,DOTLINE,LINETHICK2;
IF((内上 >= REF(内上,1)),内上,DRAWNULL),COLORMAGENTA,DOTLINE,LINETHICK2;
IF((内下 <= REF(内下,1)),内下,DRAWNULL),COLORGREEN,DOTLINE,LINETHICK2;
IF((内下 >= REF(内下,1)),内下,DRAWNULL),COLORMAGENTA,DOTLINE,LINETHICK2;
爆:=REF(O<内上,1) AND C>内上 AND O>内上;
牛股:=C>内上 AND O>内上;
AR:=BARSLAST(牛股);
DRAWKLINE(H,O,L,C);
STICKLINE( 牛股 AND C>O,C,O,3.2,0),COLOR000066;
STICKLINE(牛股 AND C>O,C,O,2.0,0),COLOR000077;
STICKLINE(牛股 AND C>O,C,O,1.5,0),COLOR000099;
STICKLINE(牛股 AND C>O,C,O,0.9,0),COLOR0000CC;
STICKLINE(牛股 AND C>O,C,O,0.5,0),COLOR0000FF;
STICKLINE(牛股 AND C>O,O,C,0,0),COLORFFFFFF;
STICKLINE( 牛股 AND C<O,L,H,0,0),COLOR009900;
STICKLINE( 牛股 AND C<O,C,O,3.2,0),COLOR009900;
STICKLINE( 牛股 AND C<O,C,O,2.5,0),COLOR00BB00;
STICKLINE(牛股 AND C<O,C,O,1.5,0),COLOR00DD00;
STICKLINE(牛股 AND C<O,C,O,0.5,0),COLOR00FF00;
STICKLINE(牛股 AND C<O,C,O,0,0),COLORFFFFFF;
LC:=REF(CLOSE,1);
操作线:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100;
操作线1:=SMA(MAX(CLOSE-LC,0),20,1)/SMA(ABS(CLOSE-LC),20,1)*100;
潜伏:=操作线<10 AND 内上>=REF(内上,1);
DRAWTEXT(潜伏,L,'双龙
潜伏'),COLORYELLOW;
双龙副图选股
参数 N 2 500 13
M 2 500 45
X_1:=EMA(CLOSE,M1);
X_2:=EMA(CLOSE,M2);
X_3:=EMA(CLOSE,13);
X_4:=EMA(CLOSE,45);
X_5:=CLOSE/REF(CLOSE,1)>1.095 AND HIGH=CLOSE;
X_6:=X_3>REF(X_3,1) AND X_4>REF(X_4,1) AND CROSS(CLOSE,X_4);
X_7:=CROSS(X_3,X_4) AND COUNT(REF(X_5,1),3)>0 AND CLOSE>X_4 AND CLOSE<OPEN;
X_8:=X_3>X_4 AND LOW<X_4 AND HIGH>X_3 AND CLOSE>X_4 AND CLOSE>OPEN;
XG:REF(X_7,1) OR X_6 OR X_8;