((100*AA5)/AA6),0)));机买:=(AA2),LINETHICK0;机卖:=(AA3),LINETHICK0;散买:=(AA4);散卖:=(AA5);总买:=AA2+AA4;总卖:=AA3+AA5;机构买比:=机买/总买*0.1,LINETHICK0;机构卖比:=机卖/总卖*0.1,LINETHICK0;最新:CLOSE,LINETHICK2,COLORWHITE; AAB:=SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C)); BB:=BETWEEN(C/AAB,C+H,C-H); DRAWTEXT( ISLASTBAR AND 最新>REF(最新,1),最新,STRCAT(' 涨▲',CON2STR(最新,2))),COLORMAGENTA; DRAWTEXT( ISLASTBAR AND 最新<REF(最新,1),最新,STRCAT(' 跌▼',CON2STR(最新,2))),COLOR00FF00;均价11:SUM(C*V,240)/SUM(V,240),COLORYELLOW,LINETHICK2;TT:=BARSCOUNT(C);前高:=REF(HHV(H,TT),1);突破:=CROSS(C,REF(HHV(H,TT),1)){ AND HHVBARS(VOL,TT)=0} AND C/均价11<1.09 AND TT>1 AND TT<240;主力扫盘:=COUNT(突破,13)>=3 AND CROSS(C,REF(HHV(H,TT),1)){ AND HHVBARS(VOL,TT)=0}; DRAWTEXT(主力扫盘,前高, '←扫盘'),COLORYELLOW;已主力扫盘:=BARSLAST(主力扫盘)<13; DRAWTEXT(BARSLAST(主力扫盘)<8,(DYNAINFO(3))*9.5/10 , '↖已扫'),COLORGREEN;全仓买进:=CROSS(C,REF(HHV(H,TT),1)) AND HHVBARS(VOL,TT)=0 AND C/均价11<1.09 AND TT>1 AND TT<240 AND BARSLAST(主力扫盘)>=21;DRAWTEXT(全仓买进 ,前高, '←全仓'),COLORCYAN;VAR1:=EMA(EMA(C,13),13);控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000; JJJ:=DYNAINFO(11); P:=55; S:=8; M1:=3;能量:=(EMA(C,S)-EMA(C,P))*10;空头:=EMA(能量,M1); BTJ11:=(C-JJJ)/JJJ<-0.03; BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2; BTJ3:=CROSS(能量,空头) AND 能量<-0.3; BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);有庄:=BTJ811;RSV:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*80;K:=SMA(RSV,2,1);D:=SMA(K,2,1);RS:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*80;K1:=RS>=75;K2:=RS<80;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);DRAWTEXT(X2,C*0.999,'←准备注意买进'),COLORGREEN;{牛熊线}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;DRAWTEXT(CURRBARSCOUNT=20,B4,'分时支撑'),COLORYELLOW;C1:=HOUR=09 AND MINUTE=45;C2:=HHV(H,15);C3:=BARSLAST(C1);C4:=REF(C2,C3);C5:CONST(C4),COLORFF80FF,CIRCLEDOT,LINETHICK2;DRAWTEXT(CURRBARSCOUNT=20,C4,'分时突破'),COLORRED;{DRAWBAND(C5,RGB(204,204,204),B5,RGB(204,204,204));}{MACD}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;DRAWICON(XG,A50,23);{DRAWTEXT(CURRBARSCOUNT=20,A4,'强势区域'),COLORYELLOW;D1:=HOUR=10 AND MINUTE=0;D2:=LLV(L,30);D3:=BARSLAST(D1);D4:=REF(D2,D3);D5:CONST(D4),COLOR808080,CIRCLEDOT,LINETHICK2;DRAWTEXT(CURRBARSCOUNT=20,D4,'底部区域'),COLORYELLOW;}{均线突破中枢}JJ1:=DAY!=REF(DAY,1);JJ2:=BARSLAST(V>0 AND JJ1)+1;JJ:=SUM(V*C,JJ2)/SUM(V,JJ2);XG2:=CROSS(JJ,C5);DRAWICON(XG2,JJ,23);{TS:=(B4+C4)/2;DRAWTEXT(XG2,TS,'回落靠近黄线买');}VARA3:=HHV(CLOSE,90);VARA4:=LLV(CLOSE,90);VARA5:=VARA3 - VARA4;VARA6:=EMA((CLOSE - VARA4)/VARA5 - 0.5,14);ZLSP:=VARA6*20;VARA7:=REF(HHV(CLOSE,66),2);VARA8:=CROSS(CLOSE,VARA7) AND (HHV(CLOSE,110)/LLV(CLOSE,110) - 1) * 100 < 45 AND ZLSP < 5.666;VARA11:=15* FILTER(VARA8,41);XG0:HHV(H,480),DOTLINE,COLORCYAN;DRAWTEXT(FILTER(CROSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.995,'突'),COLORYELLOW;RQ:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1;JY:=BARSLAST((RQ-REF(RQ,1))!=WEEKDAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1;MA1:=REF(C,JY);MA2:=REF(MA1,JY);MA3:=REF(MA2,JY);MA4:=REF(MA3,JY);MA5:=REF(MA4,JY);MA6:=REF(MA5,JY);MA7:=REF(MA6,JY);MA8:=REF(MA7,JY);MA9:=REF(MA8,JY);H1:=MAX(DYNAINFO(3),DYNAINFO(5));L1:=MIN(DYNAINFO(3),DYNAINFO(6));P1:=H1-L1;阻力:L1+P1*8/9,COLORLIRED,DOTLINE;支撑:L1+P1*0.5/9,COLORGREEN,DOTLINE;均线:IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORYELLOW,DOTLINE;DIFF:=(EMA(CLOSE,12)-EMA(CLOSE,26))+DYNAINFO(3);DEAA:=EMA(DIFF,9);MACD1:=10*(DIFF-DEAA);MACD2:=EMA(MACD1,2);XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));主力:=EXPMA(CLOSE/XX,20);大户:=EXPMA(CLOSE/XX,60);散户:=EXPMA(CLOSE/XX,120);底:=1;1.022,NODRAW;高:=1.033;DRAWTEXT(CROSS(主力,1.02),C*0.999,' 拉'),COLORMAGENTA;DRAWICON(CROSS(主力,1.04),C,26);DRAWTEXT(CROSS(主力,1.04),C*0.999,' 冲'),COLORRED;A1:=(VOL/CLOSE)/3;A2:=SUM((IF(((A1>40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);A3:=SUM((IF(((A1>40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);A4:=SUM((IF(((A1<40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);A5:=SUM((IF(((A1<40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);A6:=((A2+A3)+A4)+A5;A7:=IF((BARSTATUS=2),((100*A2)/A6),0);A8:=((IF((BARSTATUS=2),((100*A3)/A6),0)));A9:=((IF((BARSTATUS=2),((100*A4)/A6),0)));A10:=((IF((BARSTATUS=2),((100*A5)/A6),0)));DRAWICON(LONGCROSS(支撑,C,2),C-0.01,23);DRAWTEXT(LONGCROSS(C,阻力,2),C+0.01,' 卖'),COLORGREEN;DRAWICON(LONGCROSS(C,阻力,2),C+0.01,15);量价:=(VOL/CLOSE)/3;B2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);B3:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0);B6:=B2+B3;DD1:=1;比:=B2/B3;D1:=YEAR AND MONTH AND DAY;BA1:=STRCAT(CON2STR(YEAR,0),'年');BA2:=STRCAT(CON2STR(MONTH,0),'月');BA3:=STRCAT(CON2STR(DAY,0),'日');BA4:=STRCAT('星期',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));AA:=STRCAT(STRCAT(STRCAT(BA1,BA2),STRCAT(BA3,BA4)),'');DRAWTEXT_FIX(D1,0.905,0,0,AA),COLORGRAY;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);WA6:=((A2+A3)+A4)+A5;WA7:=IF((ISLASTBAR),((100*WA2)/WA6),0);WA8:=IF((ISLASTBAR),((100*WA3)/WA6),0);WA9:=IF((ISLASTBAR),((100*WA4)/WA6),0);WA10:=IF((ISLASTBAR),((100*WA5)/WA6),0);机构买盘:=(WA2);机构卖盘:=(WA3);散户买盘:=(WA4);散户卖盘:=(WA5);DRAWTEXT_FIX(1,0.752,1-0.088,0,STRCAT(STRCAT('【机构买盘】',CON2STR(机构买盘,2)),' 万')),COLORRED;DRAWTEXT_FIX(1,0.883,1-0.088,0,STRCAT(STRCAT('【机构卖盘】',CON2STR(机构卖盘,2)),' 万')),COLORGREEN;敢死队:= (EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(CLOSE,500),1)*100;GSD11:=CROSS(EXPMA(敢死队,120)-0.0004,EXPMA(敢死队,200));XGG:=(GSD11);均价:SUM(V*C,0)/SUM(V,0),COLORYELLOW;地:=EMA(均价,50)/0.99,LINETHICK2,COLORGREEN;均价1:SUM(V*C,0)/SUM(V,0),COLORYELLOW;地1:=EMA(均价1,50)/0.97,LINETHICK2,COLORGREEN;如果:IF(地>REF(地,1),地,DRAWNULL),COLORRED,LINETHICK2;买单次数:=COUNT(V>2000 AND C>REF(C,1),0) AND XG;时间:=TIME2=100100;N:=BARSLAST(时间);C11:CONST(IF(N,MAX(REF(HHV(H,0),N+1),DYNAINFO(4)),HHV(H,0))),DOTLINE,COLORRED;C21:CONST(IF(N,MIN(REF(LLV(L,0),N+1),DYNAINFO(4)),LLV(L,0))),DOTLINE,COLORGREEN;C31:(C11+C21)/2,DOTLINE,COLORYELLOW;VV:=HHV(V,0);ZF:=(C11/C21-1)*100;DRAWTEXT(CURRBARSCOUNT=2,C11,VARCAT(VARCAT(VARCAT(VARCAT('上限:',VAR2STR(C1,2)),'元,'),VARCAT('振幅:',VAR2STR(ZF,2))),'%')),COLORRED;DRAWTEXT(CURRBARSCOUNT=2,C31,VARCAT(VARCAT('中限:',VAR2STR(C31,2)),'元')),COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=2,C21,VARCAT(VARCAT('下限:',VAR2STR(C21,2)),'元')),COLORGREEN;DRAWTEXT(C11/C21<=1.03 AND CROSS(C,C11) AND V>=VV,C11*1.005,'↙准备买入')COLORRED;DRAWTEXT(C11/C21<=1.03 AND CROSS(C21,C) AND V>=VV,C21*0.998,'★卖出')COLORGREEN;
|
发表于 2023-8-28 16:42:10
发表于 2023-9-13 18:37:51
