H01:=MAX(DYNAINFO(3),DYNAINFO(5));
L01:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H01-L01;
阻力:L01+P1*8/9,COLORCYAN,LINETHICK1;
支撑:L01+P1*0.5/9,COLORFF66FF,LINETHICK1;
中:(H01+L01)/2,POINTDOT,COLORWHITE,LINETHICK1;
DRAWICON(LONGcrOSS(支撑,C,2),C*0.995,44);
STICKLINE(LONGCROSS(支撑,C,2),C,阻力,0,-1),COLORRED;
DRAWICON(LONGCROSS(C,阻力,2),C*1.005,45);
STICKLINE(LONGCROSS(C,阻力,2),C,支撑,0,-1),COLORGREEN;
STICKLINE(C<支撑,支撑,C,1,0),COLORLIMAGENTA;
{机构出入}
成交额:=V*C/100,NODRAW;
A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A44:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A55:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A6:=((A2+A3)+A44)+A55;
DD1:=1;
AAA1:=STRCAT(STRCAT('机构买入',CON2STR((100*A2)/A6,0)),'%');
AAA2:=STRCAT(STRCAT('机构卖出',CON2STR((100*A3)/A6,0)),'%');
DRAWTEXT_FIX(DD1=1,0.8,0.20,0,AAA1),COLORRED;
DRAWTEXT_FIX(DD1=1,0.8,0.25,0,AAA2),COLORCYAN;
{主力扫盘}
价:=C;
大盘:=EMA(INDEXC,500)/EMA(C,500);
大盘参考线:=INDEXC/大盘;
VAR20:=(3*CLOSE+LOW+OPEN+HIGH)/6;
VAR21:=(20*VAR20+19*REF(VAR20,1)+18*REF(VAR20,2)+17*REF(VAR20,3)+16*REF(VAR20,4)+15*REF(VAR20,5)+14*REF(VAR20,6)+13*REF(VAR20,7)+12*REF(VAR20,8)+11*REF(VAR20,9)+10*REF(VAR20,10)+9*REF(VAR20,11)+8* REF(VAR20,12)+7*REF(VAR20,13)+6*REF(VAR20,14)+5*REF(VAR20,15)+4*REF(VAR20,16)+3*REF(VAR20,17)+2*REF(VAR20,18)+REF(VAR20,21))/210;
VAR22:=EMA(VAR21,15);
VAR23:=HHV(CLOSE,90);
VAR24:=LLV(CLOSE,90);
VAR25:=VAR23-VAR24;
VAR26:=EMA((CLOSE-VAR24)/VAR25-0.5,14);
ZLSP:=VAR26*20;
VAR27:=REF(HHV(CLOSE,66),2);
VAR28:=CROSS(CLOSE,VAR27) AND (HHV(CLOSE,110)/LLV(CLOSE,110)-1)*100<45 AND ZLSP<5.666;
VAR29:=LLV(ZLSP,35)<-8.9 AND CROSS(ZLSP,-7.815) AND ZLSP<-1.2;
VAR30:=10*FILTER(VAR29,41);
VAR31:=15*FILTER(VAR28,41)>10;
主力扫盘1:=VAR31*50,;
DRAWTEXT(VAR31,C,'●主力吸筹'),COLORRED;
{主力}
AX:=(vol/C)/2;
A2X:=SUM(IF(AX>100 AND CLOSE>REF(CLOSE,1),AX,0),0);
A3X:=SUM(IF(AX>100 AND CLOSE<REF(CLOSE,1),AX,0),0);
A4X:=SUM(IF(AX<100 AND CLOSE>REF(CLOSE,1),AX,0),0);
A5X:=SUM(IF(AX<100 AND CLOSE<REF(CLOSE,1),AX,0),0);
A6X:=A2X+A3X+A4X+A5X;
机买:=(A2X/A6X)*100;
机卖:=(A3X/A6X)*100;
主力差:=机买-机卖;
AAA1X:=DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.85,'●机构')=1;
DRAWTEXT(AAA1X>0 ,CLOSE*1.0001,'●'),COLORRED;
{有庄控盘}
VAR18:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR18-REF(VAR18,1))/REF(VAR18,1)*1000;
JJ:=DYNAINFO(11);
P:=55;S:=8;M1:=3;
财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10;
神:=EMA(财,M1);
{股价与均线偏离买卖条件}
BTJ1:=(C-JJ)/JJ<-0.03;
{控盘买卖条件}
BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;
{波段买卖条件}
BTJ3:=CROSS(财,神) AND 财<-0.3;
{以下为信号};
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);
DRAWTEXT(BTJ81,C,'●庄影'),COLORYELLOW;
{分时乾坤决策线}
星期:=WEEkdAY;
日1:=DATETODAY(DATE);
上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT);
自然日:=日1-DATETODAY(上市日)+1;
ZB:=(自然日-REF(自然日,1))!=星期-REF(星期,1)OR TOTALBARSCOUNT-CURRBARSCOUNT=0;
本周第几天:=BARSLAST(ZB)+1;
MA1:=REF(C,本周第几天);
MA2:=REF(MA1,本周第几天);
MA3:=REF(MA2,本周第几天);
MA4:=REF(MA3,本周第几天);
MA5:=REF(MA4,本周第几天);
MA6:=REF(MA5,本周第几天);
MA7:=REF(MA6,本周第几天);
MA8:=REF(MA7,本周第几天);
MA9:=REF(MA8,本周第几天);
MA10:=REF(MA9,本周第几天);
MA11:=REF(MA10,本周第几天);
MA12:=REF(MA11,本周第几天);
十三周价:=(C+MA1+MA2+MA3+MA4+MA5+MA6+MA7+MA8+MA9+MA10+MA11+MA12)/13;
决策:REFDATE(十三周价,DATE),POINTDOT,COLORMAGENTA;
DRAWICON(CROSS(C,决策),C,1);
现价:=C,COLORWHITE,LINETHICK2;
均价11:=SUM(C*V,240)/SUM(V,240),COLORRED,LINETHICK2;
TT:=BARSCOUNT(C);
前高:=REF(HHV(H,TT),1);
突破:=CROSS(C,REF(HHV(H,TT),1)) AND C/均价11<1.09 AND TT>1 AND TT<240;
主力扫盘:=COUNT(突破,13)>=3 AND CROSS(C,REF(HHV(H,TT),1));
已主力扫盘:=BARSLAST(主力扫盘)<13;
HJ_2:=DYNAINFO(4)>0 AND HHV(HIGH,2)/LLV(LOW,2)<1.25 AND REF(CLOSE,1)<LLV(LOW,3)+(HHV(HIGH,3)-LLV(LOW,3))*0.85;
HJ_9:=EMA(CLOSE,2);
HJ_10:=EMA(CLOSE,3);
HJ_11:=MAX(HJ_9,HJ_10);
X2:=CLOSE>HJ_11 AND HJ_2 AND (CLOSE>REF(HHV(HIGH,2),1) AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.015) AND (V/CAPITAL<=0.2) AND C/REF(C,1)<1.07;
NX:=MA(((SLOPE(C,20)*5)+C),10);
{中枢}
B1:=HOUR=09 AND MINUTE=45;
B20:=LLV(L,15);
B30:=BARSLAST(B1);
B4:=REF(B20,B30);
B5:=CONST(B4),COLORFF80FF,CIRCLEDOT,LINETHICK2;
C1:=HOUR=09 AND MINUTE=45;
C2:=HHV(H,15);
C3:=BARSLAST(C1);
C4:=REF(C2,C3);
C5:=CONST(C4),COLORFF80FF,CIRCLEDOT,LINETHICK2;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
macd10:=(DIF-DEA)*2;
AA0:=MACD10>00 AND DIF>0 AND DEA>0;
A100:=HOUR=10 AND MINUTE=0;
A20:=HHV(H,30);
A30:=BARSLAST(A100);
A40:=REF(A20,A30);
A50:=CONST(A40);
A80:=CLOSE>A50 AND REF(C<=A50,1) AND CLOSE>NX;
AB:=FILTER(A80,100);
A90:=DYNAINFO(3);
AC:=CLOSE<=A90*1.04 AND CLOSE>A90;
量比:=V/REF(MA(V,5),1);
XG:=AA0 AND AB AND AC AND A40>A90 AND 量比>=1;
HJ_4:=CLOSE;
HJ_5:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5);
BAB1:=STICKLINE(HJ_5>0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0);
BAB2:=STICKLINE(HJ_5<0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0);
HJ_6:=CLOSE/DYNAINFO(3);
HJ_7:=FILTER(HJ_5>0.015 AND HJ_5>REF(HJ_5,1)*2 AND VOL>REF(VOL,1)*2 AND CLOSE>REF(CLOSE,1) OR HJ_5>0.025,240);
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
WA1:=V*C/100;
WA2:=SUM((IF(((WA1/8>20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);
WA3:=SUM((IF(((WA1/8>20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0);
WA4:=SUM((IF(((WA1/8<20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);
WA5:=SUM((IF(((WA1/8<20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0);
机构买盘:=(WA2);
机构卖盘:=(WA3);
散户买盘:=(WA4);
散户卖盘:=(WA5);
BU:=BARSLAST(CLOSE=HHV(CLOSE,60));
SE:=BARSLAST(CLOSE=LLV(CLOSE,60));
KK1:=SE;
KK2:=BU;
LM1:=SE;
LM2:=BU;
OK:=KK1>KK2 AND LM1>LM2;
OK1:=KK1>KK2 AND LM1<LM2;
NOK:=KK2>KK1 AND LM2>LM1;
NOK1:=KK2>KK1 AND LM2<LM1;
DRAWICON(FILTER(CROSS(KK1,KK2) AND DYNAINFO(7)>REF(C,1)*1.03,60),OPEN*1,11);
DRAWTEXT(FILTER(CROSS(KK1,KK2)AND DYNAINFO(7)>REF(C,1)*1.03,60) ,OPEN*0.990,'抓'),COLORMAGENTA;
TT1:=BARSCOUNT(C);
均价黄:=SUM(C*V,TT1)/SUM(V,TT1);
量两步:=MA(V,5)>REF(MA(V,5),1) AND REF(MA(V,5),1)>REF(MA(V,5),2);
价两步:= C>=REF(C,1) AND REF(C,1)>REF(C,2);
价上岗量破5:=C>均价黄 AND V>MA(V,5);
量起爆:=V>=REF(V,1)*1;
价创新高:=C>=HHV(C,0);
量创新高:=V>=HHV(V,0);
对昨日涨幅:=(C/DYNAINFO(3)-1)*100<=2.50;{涨幅控制2个点以内}
每日一点:=量两步 AND 价两步 AND 价上岗量破5 AND 量起爆 AND 价创新高 AND 量创新高 AND 对昨日涨幅;
VV:=BARSSINCE(每日一点)+1;
首次起爆价:=REF(C,VV-1),NODRAW;
起爆收益:(DYNAINFO(7)-首次起爆价)/首次起爆价*100,NODRAW;
流通盘:=CAPITAL*100/100000000,NODRAW;
起爆时间:=REF(TIME/10000,VV),NODRAW;
已爆分钟:=VV-1,NODRAW;
DRAWICON(每日一点,C,25);
DRAWTEXT(每日一点,L-0.01,'←分时起爆'),COLORMAGENTA;
DRAWNUMBER_FIX(ISLASTBAR AND C>1,0.8,0.5,0,起爆收益),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR AND C>1,0.8,0.45,0,'起爆收益'),COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR AND C>1,0.85,0.5,0,'%'),COLORMAGENTA;
ACX:=FILTER(CROSS(KK1,KK2) AND DYNAINFO(7)>REF(C,1)*1.03,60);
ACX1:=BARSSINCE(ACX)+1;
首次抓板价:=REF(C,ACX1-1),NODRAW;
抓板收益:(DYNAINFO(7)-首次抓板价)/首次抓板价*100,NODRAW;
DRAWNUMBER_FIX(ISLASTBAR AND C>1,0.8,0.35,0,抓板收益),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR AND C>1,0.8,0.3,0,'抓板收益'),COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR AND C>1,0.85,0.35,0,'%'),COLORMAGENTA;
开盘量:DYNAINFO(15)/DYNAINFO(4)/100,NODRAW;
开换手:DYNAINFO(15)/DYNAINFO(4)/FINANCE(46)*100,NODRAW;
GF:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22));
LLJX:=EMA(GF,3);
ZJLL:=REF(LLJX,1);
QZJJ:=((LLJX-ZJLL)/ZJLL)*1;
DRAWTEXT_FIX(DYNAINFO(15)>0,0.25,0.7,0,STRCAT(STRCAT('【开盘换手】',CON2STR(开换手,2)),'')),COLORMAGENTA;
开盘:=(DYNAINFO(4)/DYNAINFO(3)-1)*100;
SJ:=BARSCOUNT(V);
今开量:DYNAINFO(15)/DYNAINFO(4)/100/10000,NODRAW;
昨大量:IF(SJ>238,REF(HHV(V,239),SJ-238),0)/10000,NODRAW;
BZ:=今开量/昨大量;
DRAWTEXT_FIX(SJ>239 AND BZ>0.6,0.25,0.1,0,STRCAT(STRCAT('【昨爆今开比】',CON2STR(BZ,2)),'')),COLORRED;
DRAWTEXT_FIX(SJ>239 AND BZ<0.6,0.25,0.1,0,STRCAT(STRCAT('【昨爆今开比】',CON2STR(BZ,2)),'')),COLORGREEN;
DRAWTEXT_FIX(SJ>239 AND BETWEEN(BZ,0.5,2),0.42,0.2,0,''),COLORYELLOW;
DRAWTEXT_FIX(SJ>239,0,0,0,'昨暴拉板量，一字除外,今比值0.60左右可考虑介入')COLORCYAN;
DRAWTEXT_FIX(SJ>239,0,0.2,0,'比值不达标，须开盘后补量, 过大,出货嫌疑')COLORCYAN;
DRAWTEXT_FIX(SJ>239,0,0.1,0,STRCAT(STRCAT('【昨拉板量】',CON2STR(昨大量*10000,2)),'')),COLORRED;
标准量:=昨大量*0.63*10000;
DRAWTEXT_FIX(SJ>239,0.25,0.3,0,STRCAT(STRCAT('【标准量】',CON2STR(标准量,2)),''))COLORRED;
DRAWTEXT_FIX(O>0,0,0.7,0,STRCAT(STRCAT('【开盘金额】',CON2STR(DYNAINFO(15)/10000,2)),'万')),COLORCYAN;
DD:=ZJBY.大单#DAY;
CDD:=ZJBY.超大单#DAY;
DRAWTEXT_FIX(DD>0,0.8,0.85,0,STRCAT(STRCAT('【大单】',CON2STR(DD,2)),'万')),COLORRED;
DRAWTEXT_FIX(CDD>0,0.8,0.75,0,STRCAT(STRCAT('【超单】',CON2STR(CDD,2)),'万')),COLORRED;
DRAWTEXT_FIX(DD<0,0.8,0.85,0,STRCAT(STRCAT('【大单】',CON2STR(DD,2)),'万')),COLORGREEN;
DRAWTEXT_FIX(CDD<0,0.8,0.75,0,STRCAT(STRCAT('【超单】',CON2STR(CDD,2)),'万')),COLORGREEN;
DRAWTEXT_FIX(DD=0,0.8,0.85,0,STRCAT(STRCAT('【大单】',CON2STR(DD,2)),'万')),COLORWHITE;
DRAWTEXT_FIX(CDD=0,0.8,0.75,0,STRCAT(STRCAT('【超单】',CON2STR(CDD,2)),'万')),COLORWHITE;
DRAWTEXT_FIX(DYNAINFO(15)>0,0.25,0.8,0,STRCAT(STRCAT('【开盘量】',CON2STR(开盘量,2)),'')),COLORGREEN;
ZTJ:=DYNAINFO(3)*1.1-0.01;
WZ:=BARSLAST(C<ZTJ);
拉板量:=IF(C>=ZTJ AND C=DYNAINFO(5),REF(V,WZ-1),DRAWNULL);
DRAWTEXT_FIX(DYNAINFO(15)>0,0.5,0.7,0,STRCAT(STRCAT('【拉板量】',CON2STR(拉板量,2)),'')),COLORMAGENTA;
ZL:=DYNAINFO(93)/DYNAINFO(3);
KZB:=开盘量/ZL*100;
前5量:=IF(SJ>4,REF(SUM(V,0),SJ-4),DRAWNULL);
BZ5:=前5量/ZL*100;
DRAWTEXT_FIX(O>0,0.25,0.9,0,STRCAT(STRCAT('【开昨比】:',CON2STR(KZB,2)),'%')),COLORCYAN;
WTG:=IF(INBLOCK('拟减持') OR INBLOCK('近期解禁') OR INBLOCK('本月解禁')
OR INBLOCK('连续亏损') OR INBLOCK('风险提示'),1,0);
DRAWTEXT_FIX(WTG,0.5,0.5,0,'●㎞● 问题股'),COLORYELLOW;
尾量:=IF(SJ>238,REF(SUM(V,60),SJ-239),0);
昨日量:=IF(SJ>238,REF(SUM(V,0),SJ-239),0);
昨尾比:=尾量/昨日量*100;
DRAWTEXT_FIX(SJ>239,0.8,0.67,0,STRCAT(STRCAT('【昨尾比】',CON2STR(昨尾比,2)),'%')),COLORMAGENTA;
DRAWTEXT_FIX(SJ>239 AND BZ>0.68,0.67,0.52,0,STRCAT(STRCAT('【昨爆今开比】',CON2STR(BZ,2)),'')),COLORRED;
