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; STICKLINE(ZZLKP>75,-ZZLKP/5-10,-10,2,0),COLORFFFFFF; MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14); HD :=HIGH-REF(HIGH,1); LD :=REF(LOW,1)-LOW; DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14); DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14); 多头线:=DMP*100/MTR,COLORRED,LINETHICK2; 空头线:=DMM*100/MTR,COLORGREEN,LINETHICK2; 趋势线:=EXPMEMA(ABS(空头线-多头线)/(空头线+多头线)*100,6),COLORYELLOW,LINETHICK2; 强弱分界:30,COLORWHITE,DOTLINE,LINETHICK1; VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0); VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.03) AND((HIGH)/(CLOSE)<1.03) AND ((多头线-空头线)>10) AND 多头线>25 AND (趋势线>REF(趋势线,1)) AND (VAR3AA>0),91,0); XG:=(FILTER((VAR4AA>90),21)),COLORYELLOW; STICKLINE(XG,-1,-20,4,0),COLOR000099; STICKLINE(XG,-1,-20,2,0),COLOR0000BB; STICKLINE(XG,-1,-20,1,0),COLOR0000DD; STICKLINE(XG,-1,-20,0.9,0),COLOR0000FF; AHC1:=CLOSE*VOL; AHC22:=EMA((EXPMA(AHC1,23)/EXPMA(VOL,23)+EXPMA(AHC1,54)/EXPMA(VOL,54)+EXPMA(AHC1,108)/EXPMA(VOL,108)+EXPMA(AHC1,316)/EXPMA(VOL,316))/4,34); 通道:=1.0668*AHC22; 起爆:=CROSS(C,通道) AND REF(C,1)*1.05-C<0.008 AND C>O*0.5; RRF:=起爆; A1:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,23))/EMA(CLOSE,23)); A2:=DMA(((2.15*CLOSE+LOW+HIGH)/4),A1); 金线王:=EMA(A2,200)*1.118; 金线王2:=EMA(A2,200)*1.118; 条件:=(C-REF(C,1))/REF(C,1)*100>8; 金K线:=CROSS(C,金线王) AND 条件; STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLOR000088; STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLOR0000AA; STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLOR0000CC; STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLOR0000EE; STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLOR0000EE; STICKLINE(IF(RRF,-120,0),+12,0,5,0),COLORLIMAGENTA; STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLOR770077; STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLOR990099; STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLORBB00BB; STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLORDD00DD; STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLORFF00FF; STICKLINE(IF(RRF,-120,0),+9,0,5,0),COLORDD00DD; STICKLINE(IF(RRF,-120,0),+6,0,5,0),COLOR003300; STICKLINE(IF(RRF,-120,0),+6,0,5,0),COLOR005500; STICKLINE(IF(RRF,-120,0),+6,0,5,0),COLOR007700; STICKLINE(IF(RRF,-120,0),+6,0,5,0),COLOR009900; STICKLINE(IF(RRF,-120,0),+6,0,5,0),COLOR00CC00; STICKLINE(RRF,0,3,5,0),COLOR008888; STICKLINE(RRF,0,3,5,0),COLOR00AAAA; STICKLINE(RRF,0,3,5,0),COLOR00CCCC; STICKLINE(RRF,0,3,5,0),COLOR00FFFF; STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLOR000088; STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLOR0000AA; STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLOR0000CC; STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLOR0000EE; STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLOR0000EE; STICKLINE(IF(金K线,-120,0),+12,0,4,0),COLORLIMAGENTA; STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLOR770077; STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLOR990099; STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLORBB00BB; STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLORDD00DD; STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLORFF00FF; STICKLINE(IF(金K线,-120,0),+9,0,4,0),COLORDD00DD; STICKLINE(IF(金K线,-120,0),+6,0,4,0),COLOR003300; STICKLINE(IF(金K线,-120,0),+6,0,4,0),COLOR005500; STICKLINE(IF(金K线,-120,0),+6,0,4,0),COLOR007700; STICKLINE(IF(金K线,-120,0),+6,0,4,0),COLOR009900; STICKLINE(IF(金K线,-120,0),+6,0,4,0),COLOR00CC00; STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLOR666666; STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLOR777777; STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLOR888888; STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLOR999999; STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLORDDDDDD; STICKLINE(IF(金K线,-120,0),+3,0,4,0),COLORFFFFFF; DRAWTEXT(RRF,10.5,'黑马一号'),COLORYELLOW; {DRAWTEXT(RRF,8.5,'黑'),COLORYELLOW;} DRAWTEXT(金K线,6,'黑马启动'),COLORYELLOW; DIFF:=(EMA(CLOSE,12) - EMA(CLOSE,26)),DOTLINE; DEAX:=EMA(DIFF,9),POINTDOT; MACD2:=(2 * (DIFF - DEAX))*40; STICKLINE((MACD2>=0),30,30+MACD2,2.8,-1),COLOR0000FF; STICKLINE(((MACD2>=0) AND (MACD2 < REF(MACD2,1))),30,30+MACD2,2,0),COLOR0090FF; STICKLINE((MACD2<0),30,30+MACD2,2,0)COLORCYAN; STICKLINE(((MACD2<0) AND (MACD2 > REF(MACD2,1))),30,30+MACD2,2.8,-1),COLORCYAN; VARU1:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>REF(ZIG(3,10),2); VARU2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<REF(ZIG(3,10),2); STICKLINE(VARU1,76,85,2,0),COLORFF00FF,LINETHICK2;{高位红色} STICKLINE(VARU1,76,85,2,0),COLORFF00FF,LINETHICK2;{高位红色} STICKLINE(VARU1,76,85,1,0),COLORFF00FF,LINETHICK2;{高位红色} STICKLINE(VARU2,76,85,2,0),COLORWHITE,LINETHICK2;{底位白色} STICKLINE(VARU2,76,85,2,0),COLORWHITE,LINETHICK2;{底位白色}; FFD:=EMA((C - REF(C,1)) / REF(C,3),10) * 100; KJHU:=EMA(EMA(EMA(EMA(FFD,2),2),2),3); STICKLINE(KJHU >= REF(KJHU,1) AND KJHU>2,-36,-30,3,0),COLORFF00FF; STICKLINE(KJHU < REF(KJHU,1) AND KJHU > EMA(KJHU,4) AND KJHU>2,-36,-30,2,0),COLOR00BBFF; STICKLINE(KJHU < REF(KJHU,1) AND KJHU < EMA(KJHU,4) AND KJHU>2,-36,-30,3,0),COLORGREEN; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.95,0,0.5,FFD),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.85,0,0,'【FFD】 '),COLORYELLOW; 龙腾四海:=100-100*(HHV(HIGH,5*8)-CLOSE)/(HHV(HIGH,5*8)-LLV(LOW,5*8)),COLORWHITE; STICKLINE(龙腾四海>=95,60,65,2,0),COLORGREEN; STICKLINE(龙腾四海=100,65,70,3,0),COLORCC3366; DRAWTEXT(龙腾四海=100,66,'100'),COLORWHITE; N:=500; BJQD:=100*CLOSE/INDEXC; B:=SUM(BJQD,N)/N; XDQD1:=BJQD/B; XDQD:XDQD1/(SUM(XDQD1,60)/60)*50+20,COLORFF33FF,LINETHICK2; B1:=0.9*50+20,COLORBLUE; B2:=1.0*50+20,COLORFFAA00,LINETHICK2; B3:1.12*50+20,COLORRED,LINETHICK2; DRAWICON(CROSS(XDQD,B3),B3,5); BF:=C>0.97*REF(C,BARSLAST(CROSS(B3,XDQD)+1)) AND (LONGCROSS(XDQD,B3,30)); STICKLINE(BF,B1,B3,1,0),COLORRED; STICKLINE(LONGCROSS(B3,XDQD,20),B1,B3,1,0),COLORYELLOW; DRAWTEXT(ISLASTBAR, XDQD,' 牛股线'),COLORFF33FF; DRAWTEXT(ISLASTBAR, B3,' 主升浪'),COLORRED; 所属地域:DRAWTEXT_FIX(1,0.6,0,0,DYBLOCK),COLORMAGENTA,LINETHICK2; 所属行业:DRAWTEXT_FIX(ISLASTBAR ,0.7,0,0,HYBLOCK),COLORYELLOW; 所属概念:DRAWTEXT_FIX(ISLASTBAR ,0.75,0,0,GNBLOCK),COLORMAGENTA,LINETHICK2; VAR1D:=EMA(CLOSE,2)-EMA(CLOSE,89); VAR1E:=EMA(VAR1D,30); VAR1F:=2*(VAR1D-VAR1E)*10; VAR20:=POW(VAR1F,3)*0.1+POW(VAR1F,2); VAR25:=IF(YEAR<2008 AND VAR1F>0.015,VAR20,0)/45; VAR26:=EMA(CLOSE,2)-EMA(CLOSE,150); VAR27:=EMA(VAR26,100); VAR28:=2*(VAR26-VAR27); VAR29:=POW(VAR28,3)*0.1+POW(VAR28,1); AA:=IF( VAR28>0.1,VAR29,0)*5; 庄进场:AA,VOLSTICK; MA35:MA(庄进场,35),COLORYELLOW; 上趋势:=MA(LOW,20)*1.2,COLOR0080FF,LINETHICK2; 次上趋势:=MA(LOW,20)*1.1,COLORYELLOW; 次下趋势:=MA(HIGH,20)*0.9,COLORWHITE; 下趋势:=MA(HIGH,20)*0.8,COLORGREEN,LINETHICK2; 趋势强度:=IF(C>次上趋势,IF(C>上趋势,4,3),IF(C>次下趋势 AND C<次上趋势,2,IF(C<下趋势,0,1))); C1:=10000*C/INDEXC; O1:=10000*O/INDEXO; 主力动向:=MA(C1,5),LINETHICK2,COLORCYAN; STICKLINE(C1>=O1 AND C1>主力动向 AND STICKLINE(趋势强度=4,C,O,3,0),-0,-2,2,0),COLORFF00FF; DRAWTEXT(ISLASTBAR, MA35,'MA35 '),COLORFF00FF; 倍数:=1.9; 倍量:=VOL>=REF(V,1)*倍数 AND (IF(C<O,C>REF(C,1),1)),COLORYELLOW,NODRAW; STICKLINE(倍量, 0,AA,1,0),COLORYELLOW; XA_1:=(CLOSE-LLV(CLOSE,10))/(HHV(CLOSE,10)-LLV(CLOSE,10)); 强庄起爆:=CROSS(XA_1,0.05)*3 AND FILTER(CLOSE/REF(CLOSE,1)>1.048 AND C=H AND BETWEEN(FORCAST(VOL,4),0.2*FORCAST(VOL,12),2.1*FORCAST(VOL,12)),28) AND NOT(DYNAINFO(4)=0); STICKLINE(强庄起爆,0,-1,2,0),COLORYELLOW; DRAWICON(强庄起爆,-0.9,26); DRAWTEXT(强庄起爆,-0.9,' 强庄起爆'),COLORYELLOW; X_1:=EMA(CLOSE,9); X_2:=(CLOSE+OPEN)/2; X_3:=MA(CLOSE,3); X_4:=MA(CLOSE,2*3); X_5:=MA(CLOSE,3*3); X_6:=MA(CLOSE,4*3); X_7:=MA((X_3+X_4+X_5+X_6)/4,5); 主升浪1:EMA(X_1*1.14,5)*5,COLORGREEN; 主升浪4:EMA(CLOSE,3)*5,COLORRED; DRAWICON(CROSS(主升浪4,主升浪1),主升浪4,1); DRAWTEXT(ISLASTBAR,主升浪1,'主1'),COLORGREEN; DRAWTEXT(ISLASTBAR,主升浪4,' 主4'),COLORRED; VX1:=(C*2+H+L)/4*10; VX2:=EMA(VX1,13)-EMA(VX1,34); VX3:=EMA(VX2,5); VX4:=2*(VX2-VX3)*5.5; 超大主力吃: IF(VX4>=0,VX4,0)*2-36,COLOR7F00FF,LINETHICK4; 8*2-36; DRAWTEXT(ISLASTBAR,超大主力吃,'超大主力吃'),COLOR7F00FF; DRAWTEXT(ISLASTBAR, -20,' 吃货线'),COLORWHITE;
|