{黑马一号主图}
MA005:MA(CLOSE,5);
MA010:MA(CLOSE,10);
MA020:MA(CLOSE,20);
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);
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;
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
成交额:=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
选股:=低 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;
{黑马一号副图}
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;
{黑马一号选股公式}
VASS1:=HHV(H,20);
VASS2:=LLV(L,20);
VASS3:=REF((VASS1/VASS2-1)*100 =30,1);
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.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);
黑马一号:起爆 AND VARR6 AND VASS3;
