2026黑马涨停王决策系统电脑、手机通用版

仅供学习交流，所述模型指标公式仅限学术探讨模拟测试，不作任何投资依据建议，"基于开源数据集的理论推演"，请勿用作法律禁止之外用途！股市有风险，入市需谨慎。

{黑马启动主图}

{成交量卖点}

VASS1:=HHV(H,20);

VASS2:=LLV(L,20);

VASS3:=REF((VASS1/VASS2-1)*100<=30,1);

VAR6:=REF(CLOSE,1);

VAR7:=SMA(MAX(CLOSE-VAR6,0),6,1)/SMA(ABS(CLOSE-VAR6),6,1)*100;

STICKLINE(CROSS(84,VAR7),CLOSE,OPEN,2.8,0),COLORGREEN;

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,LINETHICK2,COLORYELLOW;

金线王2:EMA(A2,200)*1.118,LINETHICK1,COLORRED;

{金线王3:EMA(A2,20)*1.108,LINETHICK1,COLORRED;}

条件:=(C-REF(C,1))/REF(C,1)*100>5;

金K线:=CROSS(C,金线王) AND 条件;

DRAWTEXT(金K线,L*0.98,'↖金K线'),COLORRED;

DRAWTEXT(金K线,L*0.98,'        K  '),COLORYELLOW ;

STICKLINE(金K线,CLOSE,OPEN,3.2,0),COLOR0077FF;

STICKLINE(金K线,CLOSE,OPEN,2.5,0),COLOR0099FF;

STICKLINE(金K线,CLOSE,OPEN,1.9,0),COLOR00BBFF;

STICKLINE(金K线,CLOSE,OPEN,1.2,0),COLOR00DDFF;

STICKLINE(金K线,CLOSE,OPEN,0.3,0),COLOR00FFFF;

MA1:MA(CLOSE,5);

{黑马一号}

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,COLOR9F5F9F,LINETHICK3;

起爆:=CROSS(C,通道) AND REF(C,1)*1.05-C<0.005 AND C>O*0.5;

VARR1:=V;

VARR2:=VARR1>MA(V,89);

VARR3:=EXPMA(C,5);

VARR4:=EXPMA(C,29);

VARR5:=VARR3>VARR4;

LC:=REF(CLOSE,1);

RSI1:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;

RSI2:=SMA(MAX(CLOSE-LC,0),56,1)/SMA(ABS(CLOSE-LC),56,1)*100;

VARR6:=RSI1>RSI2 AND VARR5 AND VARR2 AND C>REF(HHV(H,40),1);

DRAWTEXT(起爆 AND VARR6 AND VASS3,L*0.97,'↖黑马一号'),COLORYELLOW;

{红}

STICKLINE(起爆 AND VARR6 AND VASS3,CLOSE,OPEN,3,0),COLOR000099;

STICKLINE(起爆 AND VARR6 AND VASS3,CLOSE,OPEN,2.2,0),COLOR0000CC;

STICKLINE(起爆 AND VARR6 AND VASS3,CLOSE,OPEN,1.5,0),COLOR0000FF;

STICKLINE(起爆 AND VARR6 AND VASS3,CLOSE,OPEN,0.5,0),COLORCC66FF;

STICKLINE(起爆 AND VARR6 AND VASS3,OPEN,CLOSE,0.5,0),COLORYELLOW;

{黑马启动}

DRAWTEXT(金K线 AND VARR6 AND VASS3,L*0.94,'↖黑马启动'),COLORRED;

STICKLINE(金K线 AND VARR6 AND VASS3,CLOSE,OPEN,3,0),COLOR000099;

STICKLINE(金K线 AND VARR6 AND VASS3,CLOSE,OPEN,2.2,0),COLOR0000CC;

STICKLINE(金K线 AND VARR6 AND VASS3,CLOSE,OPEN,1.5,0),COLOR0000FF;

STICKLINE(金K线 AND VARR6 AND VASS3,CLOSE,OPEN,0.5,0),COLORCC66FF;

STICKLINE(金K线 AND VARR6 AND VASS3,OPEN,CLOSE,0.5,0),COLORYELLOW;

{涨停板K线加色}

C3:=REF(C,1);

涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);

STICKLINE(涨停,OPEN,CLOSE,2,0),COLORYELLOW;

{机构持有}

AA1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-

VOL/CAPITAL*100,0)),0);

成交额:=V*C/100,NODRAW;{万元}

AA2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

AA3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

AA4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

AA5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

AA6:=((AA2+AA3)+AA4)+AA5;

DD1:=1;

AAA1:=STRCAT(STRCAT('机构持有',CON2STR((100*AA2)/AA6,0)),'%');

AAA2:=STRCAT(STRCAT('散户持有',CON2STR((100*AA3)/AA6,0)),'%');

DRAWTEXT_FIX(DD1=1,0.9,0.9,0,AAA1),COLORRED;

DRAWTEXT_FIX(DD1=1,0.9,0.99,0,AAA2),COLORGREEN;

{一阳线上穿五条平均线}

MA5:=MA(C,5);

MA10:=MA(C,10);

MA20:=MA(C,20);

MA30:=MA(C,30);

MA55:=MA(C,55);

低:=O<MA5 AND O<MA10 AND O<MA20 AND L<MA30 AND L<MA55; 

高:=C>MA5 AND C>MA10 AND H>MA20 AND H>MA30 AND H>MA55;

选股:=低 AND 高;

STICKLINE(选股,CLOSE,OPEN,3,0),COLOR000099;

STICKLINE(选股,CLOSE,OPEN,2.2,0),COLOR0000CC;

STICKLINE(选股,CLOSE,OPEN,1.5,0),COLOR0000FF;

STICKLINE(选股,CLOSE,OPEN,0.5,0),COLORCC66FF;

STICKLINE(选股,OPEN,CLOSE,0.5,0),COLORYELLOW;

DRAWTEXT(选股,L*0.94,'↖一穿五'),COLORYELLOW;

{黑马启动}

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>5;

金K线:=CROSS(C,金线王) AND 条件;

VARR1:=V;

VARR2:=VARR1>MA(V,89);

VARR3:=EXPMA(C,5);

VARR4:=EXPMA(C,29);

VARR5:=VARR3>VARR4;

LC:=REF(CLOSE,1);

RSI1:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;

RSI2:=SMA(MAX(CLOSE-LC,0),56,1)/SMA(ABS(CLOSE-LC),56,1)*100;

VASS1:=HHV(H,20);

VASS2:=LLV(L,20);

VASS3:=REF((VASS1/VASS2-1)*100<=30,1);

VARR6:=RSI1>RSI2 AND VARR5 AND VARR2 AND VASS3 AND C>REF(HHV(H,40),1);

RRF:=金K线 AND VARR6,STICK;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLOR000088;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLOR0000AA;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLOR0000CC;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLOR0000EE;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLOR0000EE;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLORLIMAGENTA;

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLOR770077;

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLOR990099;

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLORBB00BB;

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLORDD00DD;

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLORFF00FF; 

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLORDD00DD; 

STICKLINE(IF(RRF,-120,0),+6,0,3,0),COLOR003300;

STICKLINE(IF(RRF,-120,0),+6,0,3,0),COLOR005500;

STICKLINE(IF(RRF,-120,0),+6,0,3,0),COLOR007700;

STICKLINE(IF(RRF,-120,0),+6,0,3,0),COLOR009900;

STICKLINE(IF(RRF,-120,0),+6,0,3,0),COLOR00CC00;

STICKLINE(IF(RRF,-120,0),+3,0,3,0),COLOR666666;

STICKLINE(IF(RRF,-120,0),+3,0,3,0),COLOR777777;

STICKLINE(IF(RRF,-120,0),+3,0,3,0),COLOR888888;

STICKLINE(IF(RRF,-120,0),+3,0,3,0),COLOR999999;

STICKLINE(IF(RRF,-120,0),+3,0,3,0),COLORDDDDDD;

STICKLINE(IF(RRF,-120,0),+3,0,3,0),COLORFFFFFF;

{STICKLINE(IF(RRF,-120,0),-3,0,3,0),COLOR000044;

STICKLINE(IF(RRF,-120,0),-3,0,3,0),COLOR000033;

STICKLINE(IF(RRF,-120,0),-3,0,3,0),COLOR000055;

STICKLINE(IF(RRF,-120,0),-3,0,3,0),COLOR000077;

STICKLINE(IF(RRF,-120,0),-3,0,3,0),COLOR000099;

STICKLINE(IF(RRF,-120,0),-3,0,3,0),COLORLIMAGENTA;}

DRAWTEXT(RRF,8.5,'黑'),COLORYELLOW;

DRAWTEXT(RRF,6,'马'),COLORYELLOW;

DRAWTEXT(RRF,3.5,'启'),COLORRED;

DRAWTEXT(RRF,1,'动'),COLORRED;

{DRAWTEXT(RRF,-1.5,'标'),COLORYELLOW;};

{黑马一号}

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,COLOR9F5F9F,LINETHICK3;

起爆:=CROSS(C,通道) AND REF(C,1)*1.05-C<0.008 AND C>O*0.5;

RRF:=起爆,STICK;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLOR000088;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLOR0000AA;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLOR0000CC;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLOR0000EE;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLOR0000EE;

STICKLINE(IF(RRF,-120,0),+12,0,3,0),COLORLIMAGENTA;

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLOR770077;

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLOR990099;

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLORBB00BB;

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLORDD00DD;

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLORFF00FF; 

STICKLINE(IF(RRF,-120,0),+9,0,3,0),COLORDD00DD; 

STICKLINE(IF(RRF,-120,0),+6,0,3,0),COLOR003300;

STICKLINE(IF(RRF,-120,0),+6,0,3,0),COLOR005500;

STICKLINE(IF(RRF,-120,0),+6,0,3,0),COLOR007700;

STICKLINE(IF(RRF,-120,0),+6,0,3,0),COLOR009900;

STICKLINE(IF(RRF,-120,0),+6,0,3,0),COLOR00CC00;

STICKLINE(RRF,0,3,3,0),COLOR008888;

STICKLINE(RRF,0,3,3,0),COLOR00AAAA;

STICKLINE(RRF,0,3,3,0),COLOR00CCCC;

STICKLINE(RRF,0,3,3,0),COLOR00FFFF;

DRAWTEXT(RRF,10.5,'黑'),COLORYELLOW;

DRAWTEXT(RRF,7.5,'马'),COLORYELLOW;

DRAWTEXT(RRF,4.5,'一'),COLORRED;

DRAWTEXT(RRF,1.5,'号'),COLORRED;

{一阳线上}

MA5:=MA(C,5);

MA10:=MA(C,10);

MA20:=MA(C,20);

MA30:=MA(C,30);

MA55:=MA(C,55);

低:=O<MA5 AND O<MA10 AND O<MA20 AND L<MA30 AND L<MA55; 

高:=C>MA5 AND C>MA10 AND H>MA20 AND H>MA30 AND H>MA55;

选股:低 AND 高;

{黑马一号选股}

VAR1:=IF(DATE<1990101 AND DATE>900101,1,0);

{黑马一号}AHC1:=CLOSE*VOL*VAR1;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)*VAR1;

通道:=1.0668*AHC22,COLOR9F5F9F,LINETHICK3;

黑马一号:CROSS(C,通道) AND REF(C,1)*1.07-C<0.007 AND C>O*0.5*VAR1;