好友
阅读权限10
听众
最后登录1970-1-1
|
密码:00135
{源码}
AH:=90+(100-90)/2;
B:=(100-90)/2;
CCD:=COST(AH);
DDD:=COST(B);
CMJZD:=(CCD-DDD)/(CCD+DDD)*100/2;
筹码集中度:=MA(CMJZD,3),COLORGRAY;
拉高加仓:=IF(筹码集中度>REF(筹码集中度,3) AND MA(C,20)>REF(MA(C,20),3),1,0),COLOR0095FF;
STICKLINE(拉高加仓>0,0,-筹码集中度,2.1,0),COLOR0064FF;
STICKLINE(拉高加仓>0,0,-筹码集中度,1.5,0),COLOR0093FF;
STICKLINE(拉高加仓>0,0,-筹码集中度,0.9,0),COLOR00C2FF;
STICKLINE(拉高加仓>0,0,-筹码集中度,0.3,0),COLOR00FFFF;
拉高加仓X:=-IF(筹码集中度>REF(筹码集中度,3) AND MA(C,20)>REF(MA(C,20),3),1,0)*100,COLORFF00FF,LINETHICK3;
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*500;
STICKLINE(控盘<0,控盘,0,3,0),COLOR008000;
A10:=CROSS(控盘,0);
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,3,0),COLORRED;
机构控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,3,0),COLORFF00FF;
机构高度控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW;
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,3,0),COLORYELLOW,NODRAW;
机构出货:=IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLORYELLOW;
机构撤退:IF(控盘<0,控盘,0),COLORGREEN,NODRAW;
机构试盘:IF(A10,5,0),LINETHICK1,COLOR00FFFF,NODRAW;
STICKLINE(机构试盘>0,0,3,1,0),COLOR00FFFF;
散户活跃:( 机构控盘=0 AND 机构撤退=0 AND 机构高度控盘=0),NODRAW;
STICKLINE(散户活跃=1 ,-0.3,2,3,0),COLORFF0000;
A1111:=FINANCE(42);
A211:=DATETODAY(CONST(DATE));
A311:=A211-A1111;
XDATE:=DAYTODATE(A311)+19000000;
上市日期:=STRCAT('上市日期:',CON2STR(XDATE,0));
SSTS1:=STRCAT('上市',CON2STR(FINANCE(42),0));
SSTS2:=STRCAT(SSTS1,'天');
SSTS3:=STRCAT('累计交易:',CON2STR(TOTALBARSCOUNT,0));
SSTS4:=STRCAT(SSTS3,'周期');
W11:=EMA(C,1);
涨停:=W11/REF(W11,1)>=1.095;
ZTCS:=COUNT(涨停,BARSSINCE(涨停)+1);
NTZZT1:=STRCAT(' 距今',CON2STR(CONST(BARSLAST(涨停)),0));
NTZZT2:=STRCAT(NTZZT1,'天有涨停');
GZT1:=STRCAT(' 共涨停',CON2STR(ZTCS,0));GZT2:=STRCAT(GZT1,'次');
ZTTJ1:=STRCAT(SSTS2,GZT2);
ZTTJ2:=STRCAT(ZTTJ1,NTZZT2);
龙虎榜潜力:=STRCAT('【涨停统计】',ZTTJ2);
AC:=IF(CODELIKE('688'),0,1);
换手:=VOL/CAPITAL*100;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=CURRBARSCOUNT=1 AND C<REF(C,1);
DY2:=REF(V2,1)-DY;
TT:=(V2*1.01-REF(V2,1));
TT2:=(REF(V2*1.01,1)-REF(V2,2));
YY:=TT>3*ABS(TT2);
TT1:=EMA(V2,15);
A111:=COST(85);
A222:=COST(15);
A333:=A111-A222;
A444:=(A111+A222)/2;
筹码:=A333/A444*100<30,LINETHICK0;
BU1:=HHV(HIGH,250);
BU2:=LLV(LOW,250);
BU3:=BU1-BU2;
BU4:=(A444-BU2);
比例:=A444<(BU3*04+BU2),LINETHICK0;
吸筹结束:=筹码 AND 比例;
BU5:=C/REF(C,1)>1.04; {AND V/REF(V,1)>2;{ AND H=C;}
主力持仓%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3);
主力持仓:=主力持仓%>=75 {AND 主力持仓%<=91} AND C>0 AND CLOSE>OPEN;
强庄:=FILTER(主力持仓 AND 吸筹结束 AND BU4 AND WINNER(C)>=0.90 AND BU5 AND C/REF(C,1)>1.092 AND C=H AND C<40 AND AC AND 换手<20 ,10);
X_1:=(2*CLOSE+HIGH+LOW)/4;
X_2:=LLV(LOW,5);
X_3:=HHV(HIGH,5);
X_4:=EMA((X_1-X_2)/(X_3-X_2)*100,5);
X_5:=MA(X_4,2);
X_6:=REF(CLOSE,1)/REF(CLOSE,2)<0.95;
X_7:=X_5<20 AND X_6 AND CLOSE>LOW AND OPEN>LOW;
X_8:=CLOSE/REF(CLOSE,3)<0.95;
X_9:=REF(X_8,1)=1 AND CLOSE/REF(CLOSE,1)>1.025;
X_10:=VOL>REF(HHV(VOL,10),1) AND NOT(OPEN=CLOSE) AND HIGH/CLOSE<1.0007;
X_11:=REF(EVERY(MA(CLOSE,5)<MA(CLOSE,10),5),1) AND VOL/MA(VOL,10)>1.8;
X_12:=COUNT(X_7=1,3)>0 AND REF(CLOSE,1)<REF(CLOSE,2);
X_13:=VOL/REF(VOL,1)>1.7 AND REF(OPEN,1)<100;
跟庄乾坤:X_9 AND X_10 AND X_11 AND X_12 AND X_13;
DRAWTEXT(跟庄乾坤,10,'--跟庄乾坤'),COLORMAGENTA;
STICKLINE(跟庄乾坤,14,12,3.5,0),COLOR0000FF;
STICKLINE(跟庄乾坤,15,14.9,1.7,0),COLOR0000FF;
STICKLINE(跟庄乾坤,20.11,9.6,0.1,0),COLOR0000FF;
STICKLINE(跟庄乾坤,19.16,9.2,0.3,0),COLOR0000FF;
STICKLINE(强庄,14,12,3.5,0),COLORA8A8A8;
STICKLINE(强庄,15,14.9,1.7,0),COLORA8A8A8;
STICKLINE(强庄,14.9,14.8,1.9,0),COLORA8A8A8;
STICKLINE(强庄,14.8,14.7,2.1,0),COLORA8A8A8;
STICKLINE(强庄,14.7,14.6,2.3,0),COLORA8A8A8;
STICKLINE(强庄,14.6,14.5,2.5,0),COLORA8A8A8;
STICKLINE(强庄,14.5,14.4,2.7,0),COLORA8A8A8;
STICKLINE(强庄,14.4,14.3,2.9,0),COLORA8A8A8;
STICKLINE(强庄,14.3,14.2,3.1,0),COLORA8A8A8;
STICKLINE(强庄,14.2,14.1,3.3,0),COLORA8A8A8;
STICKLINE(强庄,14.1,14.0,3.5,0),COLORA8A8A8;
STICKLINE(强庄,20.11,9.6,0.1,0),COLORWHITE;
STICKLINE(强庄,19.16,9.2,0.3,0),COLORWHITE;
STICKLINE(强庄,19.12,8.8,0.6,0),COLORWHITE;
STICKLINE(强庄,18.8,18.4,0.9,0),COLORWHITE;
STICKLINE(强庄,18.4,18.0,1.2,0),COLORWHITE;
STICKLINE(强庄,18.0,15.0,1.4,0),COLORWHITE;
STICKLINE(强庄,17.4,17.0,0.6,0),COLORRED;
STICKLINE(强庄,16.5,16.4,1.5,0),COLORBLUE;
STICKLINE(强庄,15.1,14.9,1.5,0),COLORBLUE;
STICKLINE(强庄,14.9,12.5,1.5,0),COLORWHITE;
STICKLINE(强庄,12.5,12.0,1.3,0),COLORRED;
STICKLINE(强庄,12.0,11.3,1,0),COLORRED;
STICKLINE(强庄,11.3,10.7,0.7,0),COLORRED;
STICKLINE(强庄,10.77,10.1,0.3,0),COLORRED;
STICKLINE(强庄,12.4799999,12.1799999,1,0),COLORYELLOW;
STICKLINE(强庄,12.1799999,11.8799999,0.5,0),COLORYELLOW;
STICKLINE(强庄,11.8799999,11.58,0.1,0),COLORYELLOW;
STICKLINE(强庄,16.0,15.5,0.5,0),COLORRED;
MB1:=MA(C,5),COLORYELLOW;
QQ7:=MA(C,144);
AB:=(H-MB1)/MB1*100;
NHYT:=(H-MB1)/MB1*100>=20 AND H>C;
TGVFR:=AB>=15 AND AB<20 AND H>C;
A1:=FILTER(TGVFR,12);
STICKLINE(NHYT, 0,5.8, 0,0),COLORGREEN;
STICKLINE(NHYT, 5,6, 3,0),COLORGREEN;
DRAWICON(NHYT,6,9);
DRAWTEXT(NHYT,6.5, VARCAT(VAR2STR(MB1*1.2,2),'元★抛')),COLORGREEN;
ZF:=((C-REF(C,1))/REF(C,1))*100;
NE:=IF(NAMELIKE('S') OR NAMELIKE('*S'),0.05,0.1);
A11:=C/REF(C,1)-1>=NE-0.01/REF(C,1) AND C=H ;
连板数:=BARSLASTCOUNT(A11);
昨板数:=REF(连板数,1);
WW:=REF(A11,1) OR REF(A11,2);
W1昨:=VOL>=REF(V,1)*1.2 AND C<O AND WW AND 昨板数<3 AND H>REF(C,1) AND O>REF(C,1);
A57:=(C-REF(C,3))/REF(C,3)*100<20 AND (HHV(H,5)-LLV(L,5))/REF(O,5)<0.45 AND (HHV(H,9)-LLV(L,9))/REF(O,9)<0.43 AND (HHV(H,12)-LLV(L,12))/REF(O,12)<0.52 AND (HHV(H,10)-LLV(L,10))/REF(O,10)<0.52;
A116:=C>=HHV(MAX(C,O),20) AND (C-REF(C,12))/REF(C,12)*100<30 AND (C-REF(C,13))/REF(C,13)*100<25;
A16:=V>=REF(HHV(V,70),70);
A56:=H>=HHV(MAX(C,O),60) AND (C-REF(C,70))/REF(C,70)*100<150 AND SUM(V/CAPITAL*100,12)<150;
庄家洗盘:=W1昨 AND A57 AND A56 AND A16;
STICKLINE(庄家洗盘,0,1,2,0),COLORGREEN;
DRAWTEXT(庄家洗盘,0.7,'★庄家洗盘'),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR AND C>0,0.2,0.1,0,'【当前为跟庄王升级板】'),COLORGREEN,COLORRED,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR AND C>0,0.2,0.2,0,'【0以下黄金柱为主力异动】'),COLORGREEN,COLORRED,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR AND C>0,0.2,0.3,0,'【蓝色柱为散户活跃】'),COLORGREEN,COLORRED,LINETHICK2;
|
|