ARTICLE · 1136842
黑马起动套装指标源码分享
黑马起动套装指标源码分享


主图源码分享: MA005:MA(CLOSE,5);MA010:MA(CLOSE,10);MA020:MA(CLOSE,20);MA030:MA(CLOSE,30);MA060:MA(CLOSE,60);MA120:MA(CLOSE,120); GRZT_W9:=HHV(H,20); GRZT_M1:=LLV(L,20);GRZT_Z1:=REF((GRZT_W9/GRZT_M1-1)*100<=30,1);GRZT_L7:=REF(CLOSE,1);GRZT_S2:=SMA(MAX(CLOSE-GRZT_L7,0),6,1)/SMA(ABS(CLOSE-GRZT_L7),6,1)*100;STICKLINE(CROSS(84,GRZT_S2),CLOSE,OPEN,2.8,0),COLORGREEN;GRZT_X5:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,23))/EMA(CLOSE,23)); GRZT_Y9:=DMA(((2.15*CLOSE+LOW+HIGH)/4),GRZT_X5); GRZT_U4:=EMA(GRZT_Y9,200)*1.118,LINETHICK2,COLORYELLOW;GRZT_I9:=EMA(GRZT_Y9,200)*1.118,LINETHICK1,COLORRED; GRZT_T3:=(C-REF(C,1))/REF(C,1)*100>5;GRZT_Z0:=CROSS(C,GRZT_U4) AND GRZT_T3;DRAWTEXT(GRZT_Z0,L*0.98,'↖金K线'),COLORYELLOW;STICKLINE(GRZT_Z0,CLOSE,OPEN,3.2,0),COLOR0077FF;STICKLINE(GRZT_Z0,CLOSE,OPEN,2.5,0),COLOR0099FF;STICKLINE(GRZT_Z0,CLOSE,OPEN,1.9,0),COLOR00BBFF;STICKLINE(GRZT_Z0,CLOSE,OPEN,1.2,0),COLOR00DDFF;STICKLINE(GRZT_Z0,CLOSE,OPEN,0.3,0),COLOR00FFFF; GRZT_J8:=CLOSE*VOL;GRZT_I3:=EMA((EXPMA(GRZT_J8,23)/EXPMA(VOL,23)+EXPMA(GRZT_J8,54)/EXPMA(VOL,54)+EXPMA(GRZT_J8,108)/EXPMA(VOL,108)+EXPMA(GRZT_J8,316)/EXPMA(VOL,316))/4,34);GRZT_N4:=1.0668*GRZT_I3,COLOR9F5F9F,LINETHICK3;GRZT_Y3:=CROSS(C,GRZT_N4) AND REF(C,1)*1.05-C<0.005 AND C>O*0.5; GRZT_L5:=V;GRZT_H8:=GRZT_L5>MA(V,89);GRZT_I5:=EXPMA(C,5);GRZT_U7:=EXPMA(C,29);GRZT_D6:=GRZT_I5>GRZT_U7;GRZT_P2:=REF(CLOSE,1);GRZT_U2:=SMA(MAX(CLOSE-GRZT_P2,0),12,1)/SMA(ABS(CLOSE-GRZT_P2),12,1)*100;GRZT_I6:=SMA(MAX(CLOSE-GRZT_P2,0),56,1)/SMA(ABS(CLOSE-GRZT_P2),56,1)*100;GRZT_S0:=GRZT_U2>GRZT_I6 AND GRZT_D6 AND GRZT_H8 AND C>REF(HHV(H,40),1);DRAWTEXT(GRZT_Y3 AND GRZT_S0 AND GRZT_Z1,L*0.97,'↖黑马一号'),COLORCYAN; STICKLINE(GRZT_Y3 AND GRZT_S0 AND GRZT_Z1,CLOSE,OPEN,3,0),COLOR000099;STICKLINE(GRZT_Y3 AND GRZT_S0 AND GRZT_Z1,CLOSE,OPEN,2.2,0),COLOR0000CC;STICKLINE(GRZT_Y3 AND GRZT_S0 AND GRZT_Z1,CLOSE,OPEN,1.5,0),COLOR0000FF;STICKLINE(GRZT_Y3 AND GRZT_S0 AND GRZT_Z1,CLOSE,OPEN,0.5,0),COLORCC66FF;STICKLINE(GRZT_Y3 AND GRZT_S0 AND GRZT_Z1,OPEN,CLOSE,0.5,0),COLORYELLOW; DRAWTEXT(GRZT_Z0 AND GRZT_S0 AND GRZT_Z1,L*0.94,'↖黑马启动'),COLORMAGENTA;STICKLINE(GRZT_Z0 AND GRZT_S0 AND GRZT_Z1,CLOSE,OPEN,3,0),COLOR000099;STICKLINE(GRZT_Z0 AND GRZT_S0 AND GRZT_Z1,CLOSE,OPEN,2.2,0),COLOR0000CC;STICKLINE(GRZT_Z0 AND GRZT_S0 AND GRZT_Z1,CLOSE,OPEN,1.5,0),COLOR0000FF;STICKLINE(GRZT_Z0 AND GRZT_S0 AND GRZT_Z1,CLOSE,OPEN,0.5,0),COLORCC66FF;STICKLINE(GRZT_Z0 AND GRZT_S0 AND GRZT_Z1,OPEN,CLOSE,0.5,0),COLORYELLOW; GRZT_E2:=REF(C,1);GRZT_T5:=IF((C-GRZT_E2)*100/GRZT_E2>=(10-0.01*100/GRZT_E2),1,0);STICKLINE(GRZT_T5,OPEN,CLOSE,2,0),COLORYELLOW; GRZT_M3:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSEGRZT_G1:=V*C/100,NODRAW;GRZT_K4:=SUM((IF(((GRZT_G1/8>20) AND (CLOSE>(REF(CLOSE,1)))),GRZT_G1,0)),0);GRZT_B7:=SUM((IF(((GRZT_G1/8>20) AND (CLOSE<(REF(CLOSE,1)))),GRZT_G1,0)),0);GRZT_D9:=SUM((IF(((GRZT_G1/8<20) AND (CLOSE>(REF(CLOSE,1)))),GRZT_G1,0)),0);GRZT_G7:=SUM((IF(((GRZT_G1/8<20) AND (CLOSE<(REF(CLOSE,1)))),GRZT_G1,0)),0);GRZT_L2:=((GRZT_K4+GRZT_B7)+GRZT_D9)+GRZT_G7;GRZT_L1:=1;GRZT_D8:=STRCAT(STRCAT('机构持有',CON2STR((100*GRZT_K4)/GRZT_L2,0)),'%');GRZT_K5:=STRCAT(STRCAT('散户持有',CON2STR((100*GRZT_B7)/GRZT_L2,0)),'%');DRAWTEXT_FIX(GRZT_L1=1,0.9,0.9,0,GRZT_D8),COLORRED;DRAWTEXT_FIX(GRZT_L1=1,0.9,0.99,0,GRZT_K5),COLORGREEN; GRZT_J6:=MA(C,5);GRZT_P7:=MA(C,10);GRZT_V7:=MA(C,20); GRZT_O8:=MA(C,30);GRZT_W4:=MA(C,55); GRZT_T8:=OGRZT_J6 AND C>GRZT_P7 AND H>GRZT_V7 AND H>GRZT_O8 AND H>GRZT_W4; GRZT_V5:=GRZT_T8 AND GRZT_N2;STICKLINE(GRZT_V5,CLOSE,OPEN,3,0),COLOR000099;STICKLINE(GRZT_V5,CLOSE,OPEN,2.2,0),COLOR0000CC;STICKLINE(GRZT_V5,CLOSE,OPEN,1.5,0),COLOR0000FF;STICKLINE(GRZT_V5,CLOSE,OPEN,0.5,0),COLORCC66FF;STICKLINE(GRZT_V5,OPEN,CLOSE,0.5,0),COLORYELLOW;DRAWTEXT(GRZT_V5,L*0.94,'↖一穿五'),COLORYELLOW; 附图源码分享: GRFT_F8:=CLOSE*VOL; GRFT_T4:=EMA((EXPMA(GRFT_F8,23)/EXPMA(VOL,23) +EXPMA(GRFT_F8,54)/EXPMA(VOL,54) +EXPMA(GRFT_F8,108)/EXPMA(VOL,108) +EXPMA(GRFT_F8,316)/EXPMA(VOL,316))/4,34); GRFT_Z1:=1.0668*GRFT_T4; GRFT_O7:=CROSS(C,GRFT_Z1) AND ABS(REF(C,1)*1.05-C)<0.008 AND C>O*0.5; GRFT_T3:=GRFT_O7; GRFT_E5:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,23))/EMA(CLOSE,23)); GRFT_L6:=DMA(((2.15*CLOSE+LOW+HIGH)/4),GRFT_E5); GRFT_A5:=EMA(GRFT_L6,200)*1.118; GRFT_H3:=(C-REF(C,1))/REF(C,1)*100>8; GRFT_D3:=CROSS(C,GRFT_A5) AND GRFT_H3; GRFT_V1:=MA(C,5); GRFT_B7:=MA(C,30); GRFT_H9:=MA(C,34); GRFT_X8:=MA(C,5); GRFT_J8:=SMA(EMA((GRFT_X8-REF(GRFT_X8,1))/REF(GRFT_X8,1),3)*100,3,1); GRFT_Z7:=(C-GRFT_V1)/GRFT_V1*100; GRFT_O1:=(C-GRFT_H9)/GRFT_H9*100; GRFT_R4:=COUNT(CROSS(GRFT_Z7,0),3)>=1 AND GRFT_O1>REF(GRFT_O1,1) AND GRFT_V1>REF(GRFT_V1,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)GRFT_G1:=FILTER(GRFT_R4,10); STICKLINE(GRFT_T3,0,12,5,0),COLORMAGENTA; STICKLINE(GRFT_T3,0,9,5,0),COLORFF00FF; STICKLINE(GRFT_T3,0,6,5,0),COLOR00CC00; STICKLINE(GRFT_T3,0,3,5,0),COLOR00FFFF; STICKLINE(GRFT_D3,0,12,4,0),COLORMAGENTA; STICKLINE(GRFT_D3,0,9,4,0),COLORFF00FF; STICKLINE(GRFT_D3,0,6,4,0),COLOR00CC00; STICKLINE(GRFT_D3,0,3,4,0),COLORFFFFFF; STICKLINE(GRFT_G1,0,10,3,0),COLORRED; DRAWTEXT(GRFT_G1,1.5,'黑马必抓'),COLOR00FFFF; DRAWTEXT(GRFT_T3,10.5,'黑马一号'),COLORYELLOW; DRAWTEXT(GRFT_D3,6,'黑马启动'),COLORYELLOW; 选股源码分享: GRXG_T9:=HHV(H,20); GRXG_Q2:=LLV(L,20); GRXG_M1:=REF((GRXG_T9/GRXG_Q2-1)*100<=30,1); GRXG_R5:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,23))/EMA(CLOSE,23)); GRXG_A1:=DMA(((2.15*CLOSE+LOW+HIGH)/4),GRXG_R5); GRXG_Z7:=EMA(GRXG_A1,200)*1.118; GRXG_Z3:=(C-REF(C,1))/REF(C,1)*100>5; GRXG_Q9:=CROSS(C,GRXG_Z7) AND GRXG_Z3; GRXG_Y1:=CLOSE*VOL; GRXG_V5:=EMA((EXPMA(GRXG_Y1,23)/EXPMA(VOL,23) +EXPMA(GRXG_Y1,54)/EXPMA(VOL,54) +EXPMA(GRXG_Y1,108)/EXPMA(VOL,108) +EXPMA(GRXG_Y1,316)/EXPMA(VOL,316))/4,34); GRXG_J4:=1.0668*GRXG_V5; GRXG_P7:=CROSS(C,GRXG_J4) AND ABS(REF(C,1)*1.05-C)<0.005 AND C>O*0.5; GRXG_V2:=V>MA(V,89); GRXG_I8:=EXPMA(C,5); GRXG_X0:=EXPMA(C,29); GRXG_D3:=GRXG_I8>GRXG_X0; GRXG_O5:=REF(C,1); GRXG_Z6:=SMA(MAX(C-GRXG_O5,0),12,1)/SMA(ABS(C-GRXG_O5),12,1)*100; GRXG_O3:=SMA(MAX(C-GRXG_O5,0),56,1)/SMA(ABS(C-GRXG_O5),56,1)*100; GRXG_T7:=GRXG_Z6>GRXG_O3 AND GRXG_D3 AND GRXG_V2 AND C>REF(HHV(H,40),1); GRXG_M5:=GRXG_P7 AND GRXG_T7 AND GRXG_M1; GRXG_A3:=GRXG_Q9 AND GRXG_T7 AND GRXG_M1; GRXG_K9:=MA(C,5); GRXG_J2:=MA(C,10); GRXG_E0:=MA(C,20); GRXG_C0:=MA(C,30); GRXG_H5:=MA(C,55); GRXG_X4:=OGRXG_D1:=C>GRXG_K9 AND C>GRXG_J2 AND H>GRXG_E0 AND H>GRXG_C0 AND H>GRXG_H5; GRXG_I0:=GRXG_X4 AND GRXG_D1; GRXG_I3:=GRXG_M5 OR GRXG_A3 OR GRXG_Q9 OR GRXG_I0; GRXG_Y7:=CLOSE*VOL; GRXG_X2:=EMA((EXPMA(GRXG_Y7,23)/EXPMA(VOL,23) +EXPMA(GRXG_Y7,54)/EXPMA(VOL,54) +EXPMA(GRXG_Y7,108)/EXPMA(VOL,108) +EXPMA(GRXG_Y7,316)/EXPMA(VOL,316))/4,34); GRXG_W4:=1.0668*GRXG_X2; GRXG_J5:=CROSS(C,GRXG_W4) AND ABS(REF(C,1)*1.05-C)<0.008 AND C>O*0.5; GRXG_A0:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,23))/EMA(CLOSE,23)); GRXG_M0:=DMA(((2.15*CLOSE+LOW+HIGH)/4),GRXG_A0); GRXG_J0:=EMA(GRXG_M0,200)*1.118; GRXG_D9:=(C-REF(C,1))/REF(C,1)*100>8; GRXG_N8:=CROSS(C,GRXG_J0) AND GRXG_D9; GRXG_N0:=MA(C,5); GRXG_B5:=MA(C,30); GRXG_K5:=MA(C,34); GRXG_W2:=MA(C,5); GRXG_C7:=MA(C,13); GRXG_I4:=SMA(EMA((GRXG_W2-REF(GRXG_W2,1))/REF(GRXG_W2,1),3)*100,3,1); GRXG_N6:=(C-GRXG_N0)/GRXG_N0*100; GRXG_U7:=(C-GRXG_K5)/GRXG_K5*100; GRXG_P8:=COUNT(CROSS(GRXG_N6,0),3)>=1 AND GRXG_U7>REF(GRXG_U7,1) AND GRXG_N0>REF(GRXG_N0,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)GRXG_C4:=FILTER(GRXG_P8,10); GRXG_U5:=GRXG_J5 OR GRXG_N8 OR GRXG_C4; GRXG_X6:=GRXG_I3 AND GRXG_U5; GRXG_P1:=NOT(NAMELIKE('ST') OR NAMELIKE('*ST')); GRXG_A9:=DYNAINFO(4)>0; GRXG_G5:GRXG_X6 AND GRXG_P1 AND GRXG_A9; 



{===== 量价加权成本线突破 =====}
{===== 动态加权压力线突破(强阳) =====}
{===== 短均回零再启动 =====}
{===== 黑马一号:品红立柱 =====}
{===== 黑马启动:灰白+紫渐变柱 =====}
{===== 黑马必抓:红柱 =====}
{===== 文字标注 =====}
{===== 区间震荡约束 =====}
{===== 动态加权均线(压力线) =====}
{===== 信号A:长阳穿动态压力 =====}
{===== 量价加权成本线 =====}
{===== 动量+均线多头+放量破高 =====}
{===== 均线“低开高走穿多线”形态 =====}
{===== 二次突破信号(放宽容差) =====}
{===== 短均拐头回零再启动 =====}
{===== 最终合成 =====}
