主图
DRAWGBK(O>C,RGB(50,25,0),RGB(0,25,50),0,0,0);
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);
DRAWICON(潜伏,L*0.98,34);
副图1
DIF:=10*(EMA(CLOSE,20)-EMA(CLOSE,120));
DEA:=EMA(DIF,10);
MACD:=(DIF-DEA)*2,COLORSTICK;
A3:=DIF;
柱值:A3,NODRAW,COLORYELLOW;
STICKLINE(A3>REF(A3,1)AND A3<0,0,A3,-1,0),COLOR003399;
STICKLINE(A3>REF(A3,1)AND A3<0,0,A3,2,0),COLOR0099BB;
STICKLINE(A3>REF(A3,1)AND A3<0,0,A3,1,0),COLOR00AADD;
STICKLINE(A3>REF(A3,1)AND A3<0,0,A3,0.1,0),COLOR00FFFF;
STICKLINE(A3>REF(A3,1)AND A3>0,0,A3,-1,0),COLOR000099;
STICKLINE(A3>REF(A3,1)AND A3>0,0,A3,2,0),COLOR0000BB;
STICKLINE(A3>REF(A3,1)AND A3>0,0,A3,1,0),COLOR0000DD;
STICKLINE(A3>REF(A3,1)AND A3>0,0,A3,0.1,0),COLOR0000FF;
STICKLINE(A3<REF(A3,1)AND A3<0,0,A3,-1,0),COLOR339900;
STICKLINE(A3<REF(A3,1)AND A3<0,0,A3,2,0),COLOR77BB00;
STICKLINE(A3<REF(A3,1)AND A3<0,0,A3,1,0),COLOR9ADD00;
STICKLINE(A3<REF(A3,1)AND A3<0,0,A3,0.1,0),COLORDDFF00;
STICKLINE(A3<REF(A3,1)AND A3>0,0,A3,-1,0),COLOR330099;
STICKLINE(A3<REF(A3,1)AND A3>0,0,A3,2,0),COLOR9900BB;
STICKLINE(A3<REF(A3,1)AND A3>0,0,A3,1,0),COLORBB00DD;
STICKLINE(A3<REF(A3,1)AND A3>0,0,A3,0.1,0),COLORFF00FF;
副图2
AA:=VOL/((H-L)*2-ABS(C-O));
买量:=AA*(H-L);
卖量:=0-AA*((H-C)+(O-L));
进出量:=(买量+卖量)>0;
AA1:=FILTER(L=LLV(L,13),8);
AA2:=IF(LLV(L,3)=LLV(L,13) AND C<REF((H+L)/2,1),MAX(REF(LLV(L,12),BARSLAST(AA1)+1)-L,0),0);
AA3:=EMA(AA2,3)*3;
AA4:=SUMBARS(AA3>0,21);
AA5:=SUM(AA3,AA4)/21;
AA6:=REF(AA3,1)=HHV(AA3,3) AND REF(AA3,1)>AA5*3 AND COUNT(C/REF(C,1)<0.9025,8)=0 AND LLV(L,3)/HHV(H,18)<0.88;
均线条件:=EMA(C,5)>=REF(EMA(C,5),1) ; {增加这个条件过滤掉那些股票价格继续下行，而出现信号}
反转:=FILTER(AA6 AND 进出量 AND 均线条件,3); {增加了过滤信号语句，减少重复信号}
STICKLINE(CLOSE,0,AA3,2.7,1),COLORYELLOW;
STICKLINE(反转,0,AA3,2.7,0),COLORRED;
副图3
量比:=2;
上涨:=30;
换手:=30;
低价:=5;
高价:=20;
离线:=4;
深度:=50;
变量00:=5;
变量01:=30;
A02:=(WINNER((CLOSE*1.100)) *100.000);
A03:=(WINNER((CLOSE*0.9))*100.000);
A04:=MA(A03,变量00);
STICKLINE(1.000,0,A04,1,-1),COLOR000033;
A06:=(100.000-MA(A02,变量00));
STICKLINE(1.000,100.000,MA(A02,变量00),1,-1),COLOR333300;
A08:=(MA(A02,变量00)-MA(A03,变量00));
STICKLINE(1.000,A04,MA(A02,变量00),1,-1),COLOR006699;
A0A:=(((((HHV(A04, 15.000) - A03) / A03)*100.000)>变量01) AND (HHV(A04, 15.000)>50.000));
STICKLINE(A0A,(0-2.000),2.000,8.000,0),COLORRED;
STICKLINE(NOT(A0A),(0-2.000),2.000,8.000,0),COLORGREEN;
获利:MA(A03,变量00),COLORRED,LINETHICK1;
套牢:(100.000-MA(A02,变量00)),COLORCYAN,LINETHICK1;
浮动:(MA(A02,变量00)- MA(A03,变量00)),COLORYELLOW,LINETHICK1;
HSL:=EMA(V/CAPITAL,3);
ZDL:=HHV(HSL,240);
ZXL:=LLV(HSL,240);
XS:=MA(C,33);
X4:=EMA(C,20);
锁定:EMA((HSL-ZXL)/ZXL*XS,13)/10,LINETHICK0;
二十斜:(X4-REF(X4,1))/REF(X4,1)*100,LINETHICK0;
十换手:SUM(VOL,10)/CAPITAL*100,LINETHICK0;
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;
主控度:(ZZLKP),LINETHICK0,COLORRED;
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;
换手率:=VOL/CAPITAL*100;
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);
AAA:=(3*C+L+O+H)/6;
C2:=EMA(AAA,6);
C3:=EMA(AAA,5);
短线:=EMA(CLOSE,17);
上涨天数:=BARSLAST(短线< 中线);
N1:=5;
N4:=34;
CQ:=100*(C-LLV(L,N4))/(HHV(C,N4)-LLV(L,N4));
SAT:=(AMOUNT/C)/(HHV(AMOUNT,N4)/HHV(C,N4));
饱和度:=IF(SAT>1,1,SAT)*100;
W1:=C=HHV(C,20);
W2:=BARSLAST(W1);
W3:=IF(W2>0,REF(C,W2),REF(C,W2));
W4:=CROSS(C,REF(W3,1));
突破:=W4 AND COUNT(W4,5)=1;
峰顶:=饱和度>=97 AND CQ>90;
短期:=100*(C-LLV(L,N1))/(HHV(C,N1)-LLV(L,N1));
KAAAA:=EXIST(CROSS(C2,C3),2);
KAAAB:=EXIST(MACD>0,4) AND MACD< 0;
KAAAC:=MA(VOL,10)>MA(VOL,5);
KBBB:=EVERY(C>中线 AND O>中线,5);
KCCC:=HHV(VOL,30)/VOL>量比;
KDDD:=上涨天数< 上涨;
KEEE:=SUM(换手率,30)>换手;
KFFF:=C>低价 AND C< 高价;
KHHH:=EXIST(峰顶,30) OR EXIST(突破,30);
KJJJ:=C/中线< 1+0.01*离线;
KIII:=短期< 深度;
游资:IF(KAAAA AND KBBB AND KCCC AND KDDD AND KEEE AND KFFF AND KHHH,100,0),COLORYELLOW,NODRAW;
主力:IF(KAAAB AND KBBB AND KCCC AND KDDD AND KEEE AND KFFF AND KHHH,80,0),COLORGREEN,NODRAW;
机构:IF(KAAAC AND KBBB AND KCCC AND KDDD AND KEEE AND KFFF AND KHHH AND KJJJ AND KIII,60,0),COLORRED,NODRAW;
STICKLINE(游资,0,38,1.5,0),COLORYELLOW;
STICKLINE(主力,0,28,1,0),COLORGREEN;
STICKLINE(机构,0,18,0.5,0),COLORRED;
获利1:=WINNER(C)*100,COLOR0033FF,NODRAW;
短套:=EMA(100*(1-WINNER(1.10*C)),1),COLORFFDD00,NODRAW;
中套:=EMA(100*(1-WINNER(1.2*C)),1),COLORFF0000 ,NODRAW;
长套:=EMA(100*(1-WINNER(1.5*C)),1),COLOR00FF00,LINETHICK2;
STICKLINE(CURRBARSCOUNT=90,40,50,100,1),COLOR0033FF;
STICKLINE(CURRBARSCOUNT=90,40,50,获利1,0),COLOR0033AA;
DRAWTEXT(CURRBARSCOUNT=116,51,'日获利盘:'),COLOR0033FF;
DRAWNUMBER(CURRBARSCOUNT=108,51,CONST(获利1)),COLOR0033FF;
STICKLINE(CURRBARSCOUNT=90,60,70,100,1),COLORFFFF00;
STICKLINE(CURRBARSCOUNT=90,60,70,短套,0),COLOR888800;
DRAWTEXT(CURRBARSCOUNT=116,71,'短线套牢:'),COLORFFFF00;
DRAWNUMBER(CURRBARSCOUNT=108,71,CONST(短套)),COLORFFFF00;
STICKLINE(CURRBARSCOUNT=30,40,50,100,1),COLORFF6600;
STICKLINE(CURRBARSCOUNT=30,40,50,中套,0),COLORFF6600;
DRAWTEXT(CURRBARSCOUNT=56,51,'中线套牢:'),COLORFF9900;
DRAWNUMBER(CURRBARSCOUNT=48,51,CONST(中套)),COLORFF9900;
STICKLINE(CURRBARSCOUNT=30,60,70,100,1),COLOR00FF00;
STICKLINE(CURRBARSCOUNT=30,60,70,长套,0),COLOR008833;
DRAWTEXT(CURRBARSCOUNT=56,71,'长线套牢:'),COLOR00FF00;
DRAWNUMBER(CURRBARSCOUNT=48,71,CONST(长套)),COLOR00FF00;
VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),13,1)/SMA(MAX(LOW-VAR2,0),13,1)*100;
VAR4:=EMA(IF(CLOSE*1.2,VAR3*13,VAR3/13),13);
VAR5:=LLV(LOW,34);
VAR6:=HHV(VAR4,34);
VAR7:=IF(LLV(LOW,56),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
DRAWTEXT_FIX(1,0.980,20,1,''),COLOR666666;
AA:=VAR8>REF(VAR8,1);
DR:=100;
ZRQ:=3;
DJ:=REF(LLV(L,100),3);
ZD:=REFDATE(DJ,DATE);
XG:=L=ZD;
XGA:=AA AND XG,COLORRED,LINETHICK2;
XG1:=XGA>REF(XGA,1);
起爆:=XG1>REF(XG1,1)COLORRED,LINETHICK2;
STICKLINE(FILTER(起爆>=1,5),45,0,4,0),COLORRED;
DRAWTEXT(FILTER(起爆=1,5),36,'起爆'),COLORRED;
STICKLINE(起爆,40,25,1,0),COLORYELLOW;
STICKLINE(起爆,25,10,2,0),COLOR00FF00;
STICKLINE(起爆,10,0,2,0),COLORBLUE;
STICKLINE(起爆,25,15,0.5,0),COLORRED;
STICKLINE(起爆,15,6,1,0),COLOR00FF00;
STICKLINE(起爆,6,0,2,0),COLORBLUE;
副图4
DRAWGBK(CLOSE>0,RGB(0,108,108),RGB(88,0,0),0,5,0);A5:=((CLOSE - (LLV(LOW,9))) / ((HHV(HIGH,9)) - (LLV(LOW,9)))) * 100;
A6:=SMA(A5,3,1);
A7:=SMA(A6,3,1);
A17:=MA(CLOSE,90);
A26:=((CLOSE - A17) / A17) * 100;
RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K2:=SMA(RSV2,3,1);
D2:=SMA(K2,3,1);
A65:=(CROSS(K2,D2)) * 60;
A105:=MA(CLOSE,27);
A106:=((CLOSE - A105) / A105) * 100;
A107:=(MA(A106,3));
A149:=BARSLAST(((CROSS(-10,A107)) = 1));
A150:=BARSLAST(((CROSS(A107,10)) = 1));
A151:=((A107 < -10) AND (A149 > 3));
A152:=((A107 > 10) AND (A150 > 3));
瀹夊叏:=(((IF(A151,A107,0)) < 0) * -10);
姊呰姳寮€:=(((((A65 AND 瀹夊叏) AND ((A6 - A7) > 1.5)) AND (OPEN != HIGH)) AND (A26 < -10)) OR (瀹夊叏 AND (CROSS(A6,A7))));
瓒呭崠鍖?:=MA((CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100 ,2);
閽荤煶搴?:(瓒呭崠鍖?<-20);