同花顺黑马主图源码
低位白线金红线时买入，高位白线死叉红线时卖出。连续黄柱时长盯。
AAA:=MA(CLOSE,3);
BBB:=(ATAN((AAA/REF(AAA,1)-1)*100)*45)>45;
CCC:=CROSS(MA(C,1),MA(C,21)) AND C>REF(H,1)AND BBB;
STICKLINE(CCC,O,C,50,0 ),colorbrown;
STICKLINE(CCC,O,C,45 ,0 ),color2222bb;
STICKLINE(CCC,O,C,37 ,0 ),color3333cc;
STICKLINE(CCC,O,C,29 ,0 ),color5555dd;
STICKLINE(CCC,O,C,21 ,0 ),colorred;
STICKLINE(CCC,O,C,13 ,0 ),color888eee;
STICKLINE(CCC,O,C,5 ,0 ),color999fff;
MA5:=MA(C,5);
角度:=(ATAN((MA5/REF(MA5,1)-1)*100)*45)>=45;
DRAWTEXT(FILTER(角度,21),L*0.96,'∠45°上升'),colorwhite;
MA10:=MA(C,10);
MA30:=MA(C,30);
FA:=BARSLAST(CROSS(MA10,MA5)) AND CROSS(MA5,MA10);
FB:=FA AND MA5>MA30 AND MA10>MA30 AND MA10>REF(MA10,1);
DRAWTEXT(FB,L-0.58,'★直到涨'),colorred;
V1:=EMA(CLOSE,5);
V2:=EMA(EMA(CLOSE,90)*1.01,10);
DRAWTEXT(FILTER(CROSS(V1,V2),21),(HIGH)*(1.06),'长盯'),colorbrown;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
AB:=CROSS(AK1,AK);
DRAWTEXT((AB = 1),(LOW * 0.99),'○短介'),color32dded;
AA1:=L<AMOUNT/V*0.95;
BB1:=(C-REF(C,1))/REF(C,1)*100>1.2;
CC1:=L<MA(C,5)*0.921;
DD1:=V<MA(V,5)*1.5;
老鼠仓:= AA1 AND BB1 AND CC1 AND DD1;
DRAWTEXT(FILTER(老鼠仓,21),L*0.99,' 低吸'),COLORE6E8FA;
VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0);
DRAWTEXT(FILTER((VAR4AA>90),45),(LOW)*(0.93),'★介必升 '),COLOR00FFFF;
DRAWTEXT(FILTER((VAR4AA>90),35),(LOW)*(0.99000001),'★莫观望'),COLOR00FFFF;
A1AA:=9;
A2AA:=(REF(CLOSE,A1AA+1)<CLOSE);
DRAWTEXT(FILTER((A2AA>-0.5),84),(HIGH)*(1.05),'手勿痒'),COLORE6E8FA;
VAR6:=REF(C,1);
VAR7:=SMA(MAX(C-VAR6,0),6,1)/SMA(ABS(C-VAR6),6,1)*100;
DRAWTEXT(CROSS(82,VAR7),H*1.01,'▼高抛'),colorgreen;
指导线:EMA((EMA(CLOSE,4)+EMA(CLOSE,6)+EMA(CLOSE,12)+EMA(CLOSE,24))/4,2),linethick1,ColorFFffFF;
界:MA(CLOSE,27),linethick1,Color00FFFF;
主线:(MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24)+MA(CLOSE,36))/4,LINETHICK2,COLORFF00FF;
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,COLORFFFFFF;
STICKLINE(指导线>主线,BBI,主线,1,0),LINETHICK3 ,coloryellow;
{DRAWGBK(指导线>主线 ,STRIP(RGB(255,255,255),RGB(0,150,130),1));}
IF(CLOSE>OPEN)
RETURN "阳";
ELSE IF(CLOSE<OPEN)
RETURN "阴";
ELSE IF(CLOSE==OPEN AND OPEN>=CLOSE[1])
RETURN "阳";
ELSE IF(CLOSE==OPEN AND OPEN<=CLOSE[1])
RETURN "阴";
ELSE
RETURN "平";
SHGZG;
MONEY;
HIGH;
LOW
