同花顺黑马主图源码

低位白线金红线时买入，高位白线死叉红线时卖出。连续黄柱时长盯。

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;
 {www.qill.cnDRAWGBK(指导线>主线 ,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