在个股付图中显示大盘K线图(大智慧)，BS决策黄金搭档[发现黑马]源码(大智慧)

在个股付图中显示大盘K线图(大智慧)，BS决策黄金搭档[发现黑马]源码(大智慧)

在个股付图中显示大盘K线图(大智慧)

DRAWGBKLAst(C>0,STRIP(RGB(0,0,0),RGB(0,50,50),0));

DRAWTEXTAbs(10 ,5 ,'沙吾提制作' ),COLOR00FFFF,LINETHICK2;

DPC:=INDEXC;

dpo:=INDEXO;

DPH:=INDEXH;

DPL:=INDEXL;

STICKLINE(DPC>DPO,DPC,DPO,8,0),COLOR0000FF;

STICKLINE(DPC>DPO,DPH,DPL,0.5,0),COLOR0000FF;

STICKLINE(DPC

STICKLINE(DPC

SH:=STKINDI('1A0001','1A0001');

SZ:=STKINDI('399001','399001');

IF STRCMP(maRKETLABEL,'SH')=0 THEN BEGIN DRAWTEXTABS(200,0,'上证指数'),LINETHICK5,Color6666FF;END;

IF STRCMP(MARKETLABEL,'SZ')=0 THEN BEGIN DRAWTEXTABS(200,0,'深圳成份指数'),LINETHICK5,Color6666FF;END;

上证MA1:=STKINDI('1A0001','MA.MA1');

深证MA1:=STKINDI('399001','MA.MA1');

上证MA2:=STKINDI('1A0001','MA.MA2');

深证MA2:=STKINDI('399001','MA.MA2');

上证MA3:=STKINDI('1A0001','MA.MA3');

深证MA3:=STKINDI('399001','MA.MA3');

上证MA4:=STKINDI('1A0001','MA.MA4');

深证MA4:=STKINDI('399001','MA.MA4');

上证MA5:=STKINDI('1A0001','MA.MA5');

深证MA5:=STKINDI('399001','MA.MA5');

上证MA6:=STKINDI('1A0001','MA.MA6');

深证MA6:=STKINDI('399001','MA.MA6');

大盘MA5:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA1,深证MA1),COLORFFFFFF;

大盘MA10:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA2,深证MA2),COLOR00FFFF;

大盘MA20:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA3,深证MA3),COLOR3333FF;

大盘MA30:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA4,深证MA4),COLOR5399FF;

大盘MA60:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA5,深证MA5),COLOR9900CC;

大盘MA120:IF(STRCMP(MARKETLABEL,'SH')=0,上证MA6,深证MA6),COLOR39FF00;

DRAWTEXTABS(5 ,30 ,'目前指数：'+INDEXC+' 点'),COLORFFFFFF;

DRAWTEXTABS(5 ,50 ,'昨日收盘：'+REF(INDEXC,1)+' 点'),COLORFFFFFF;

DRAWTEXTABS(5 ,70 ,'今日开盘：'+INDEXO+' 点'),COLORFFFFFF;

DRAWTEXTABS(5 ,90 ,'今日最高：'+INDEXH+' 点'),COLORFFFFFF;

DRAWTEXTABS(5 ,110 ,'今日最低：'+INDEXL+' 点'),COLORFFFFFF;

DRAWTEXTABS(5 ,130,'指数涨幅：'+((INDEXC-REF(INDEXC,1))/INDEXC)*100+' ％'),COLORFFFFFF;

DRAWTEXTABS(5,150 ,'上涨家数：'+INDEXADV+' 家'),COLORFF00FF;

DRAWTEXTABS(5,170 ,'走平家数：'+INDEXDEC+' 家'),COLOR00FFFF;

DRAWTEXTABS(5,190 ,'下跌家数：'+INDEXDEC+' 家'),COLOR39FF00;

上证difF:=STKINDI('1A0001','macd.DIFF');

深证DIFF:=STKINDI('399001','MacD.DIFF');

上证DEA:=STKINDI('1A0001','MACD.DEA');

深证DEA:=STKINDI('399001','MACD.DEA');

上证MACD:=STKINDI('1A0001','MACD.MACD');

深证MACD:=STKINDI('399001','MACD.MACD');

大盘DIFF:=IF(STRCMP(MARKETLABEL,'SH')=0,上证DIFF,深证DIFF);

大盘DEA:=IF(STRCMP(MARKETLABEL,'SH')=0,上证DEA,深证DEA);

大盘MACD:=IF(STRCMP(MARKETLABEL,'SH')=0,上证MACD,深证MACD);

DRAWTEXTABS(165,30,'大盘DIFF：'+大盘DIFF),COLORFFFFFF;

DRAWTEXTABS(165,50,'大盘 DEA：'+大盘DEA),COLOR00FFFF;

DRAWTEXTABS(165,70,'大盘MACD：'+大盘MACD),COLORFF00FF;

上证K:=STKINDI('1A0001','kdj.K');

深证K:=STKINDI('399001','kdJ.K');

上证D:=STKINDI('1A0001','KDJ.D');

深证D:=STKINDI('399001','KDJ.D');

上证J:=STKINDI('1A0001','KDJ.J');

深证J:=STKINDI('399001','KDJ.J');

大盘K:=IF(STRCMP(MARKETLABEL,'SH')=0,上证K,深证K);

大盘D:=IF(STRCMP(MARKETLABEL,'SH')=0,上证D,深证D);

大盘J:=IF(STRCMP(MARKETLABEL,'SH')=0,上证J,深证J);

DRAWTEXTABS(165,90,'大盘 K：'+大盘K),COLORFFFFFF;

DRAWTEXTABS(165,110,'大盘 D：'+大盘D),COLOR00FFFF;

DRAWTEXTABS(165,130,'大盘 J：'+大盘J),COLORFF00FF;

DRAWTEXTABS(310,30,'大盘5天均线：'+大盘MA5),COLORFFFFFF,LINETHICK2;

DRAWTEXTABS(310,50,'大盘10 天均线：'+大盘MA10),COLOR00FFFF,LINETHICK2;

DRAWTEXTABS(310,70,'大盘20 天均线：'+大盘MA20),COLORFF00FF,LINETHICK2;

DRAWTEXTABS(310,90,'大盘30 天均线：'+大盘MA30),COLOR39FF00,LINETHICK2;

DRAWTEXTABS(310,110,'大盘60 天均线：'+大盘MA60),COLORFF3366,LINETHICK2;

DRAWTEXTABS(310,130,'大盘120天均线：'+大盘MA120),COLORFFCC00,LINETHICK2;

上证bias1:=STKINDI('1A0001','BIAS.BIAS1');

深证BIAS1:=STKINDI('399001','BIAS.BIAS1');

上证BIAS2:=STKINDI('1A0001','BIAS.BIAS2');

深证BIAS2:=STKINDI('399001','BIAS.BIAS2');

上证BIAS3:=STKINDI('1A0001','BIAS.BIAS3');

深证BIAS3:=STKINDI('399001','BIAS.BIAS3');

大盘BIAS1:=IF(STRCMP(MARKETLABEL,'SH')=0,上证BIAS1,深证BIAS1);

大盘BIAS2:=IF(STRCMP(MARKETLABEL,'SH')=0,上证BIAS2,深证BIAS2);

大盘BIAS3:=IF(STRCMP(MARKETLABEL,'SH')=0,上证BIAS3,深证BIAS3);

DRAWTEXTABS(165,150,'大盘BIAS1：'+大盘BIAS1),COLORFFFFFF;

DRAWTEXTABS(165,170,'大盘BIAS2：'+大盘BIAS2),COLOR00FFFF;

DRAWTEXTABS(165,190,'大盘BIAS3：'+大盘BIAS3),COLORFF00FF;

BS决策黄金搭档[发现黑马]源码(大智慧)

input:n1(60,1,100);

Var3:=ema(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5);

Var4:=(CLOSE-LLV(CLOSE,N1))/(HHV(CLOSE,N1)-LLV(CLOSE,N1))*100;

Var5:=Ema(CLOSE,2)-EMA(CLOSE,150);

Var6:=EMA(Var5,100);

Var7:=2*(Var5-Var6);

Var8:=POW(Var7,3)*0.1+POW(Var7,1);

Var9:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));

VarA:=EMA(Var9*0.97,3);

VarB:=(HIGH+LOW+CLOSE)/3;

VarC:=(VarB-MA(VarB,14))/(0.015*AVEDEV(VarB,14));

黑马线: IF(DATE<1100530 AND Var7>0.1,Var8,0)*5,stick ,linethick2 ;

VarD:=LLV(HIGH,240);

VarE:=100*(CLOSE-VarD)/VarD;

VarF:=AMOUNT/vol;

Var10:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,5);

Var11:=INDEXC;

Var12:=MA(Var11,5);

Var13:=MA(Var11,20);

Var14:=MA(Var11,30);

Var15:=Var14>Var12*1.08 AND Var13>Var12*1.055;

Var16:=Var12>Var11*1.03 AND Var13>Var11*1.13;

Var17:=Var16;

Var18:=IF(FILTER(Var10<6,5)=1,1,0);

发现: (Var18 AND VarE<-2.5 AND Var3<5 AND Var4=0)*60;

Var19:=Var10<6 AND Var17;

黑马: IF(FILTER(Var19,1)=1,1,0)*80,colorblue;

大黑马: Var19 AND Var18*80,colorblue;

操盘手: Var4;

牛变马:=黑马线>操盘手;

强牛:黑马线*牛变马;

FILLRGN(强牛,操盘手*牛变马),color580b80;

Var1A:=crOSS(黑马线,2);

Var1B:=CROSS(黑马线,4);

庄拉: IF(FILTER((Var1A OR Var1B) AND Var4<40 AND Var3<40,5)=1,35,0),colorred;

Var1C:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;

Var1D:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;

Var1E:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;

Var1F:=REF(CLOSE,1);

Var20:=SMA(MAX(CLOSE-Var1F,0),5,1)/SMA(Abs(CLOSE-Var1F),5,1)*100;

Var21:=(HIGH+LOW+CLOSE)/3;

Var22:=(Var21-MA(Var21,14))/(0.015*AVEDEV(Var21,14));

Var23:=(Var1C>=-15.8 AND Var1C<=-12.2 AND Var1D<=-20.8 AND Var1E<=-27.5 AND Var20<=11.7 AND Var22<=-145)*100;

Var24:=Var4=0;

Var25:=Var4=100;

STICKLINE(Var23>0,90,100,5,0);

STICKLINE(Var24>0,-3,-9,1,0),colorred ,linethick3;

STICKLINE(Var25>0,101,105,1,0),linethick3 ,colorgreen ;

DRAWMOVETEXT(Var23>0,'发现大黑马加把安全锁，全部亏损问它要');

DRAWMOVETEXT(发现>0,'短线黑马2.5%') ;

DRAWMOVETEXT(黑马>0,'黑马发现10%');

DRAWMOVETEXT(大黑马,'获利10%以上');

DRAWMOVETEXT(HIGH>=HHV(HIGH,20), '创20天新高');

{0,colorff8833;}

{100,colorblue;};

牛市通网是一个牛股推荐网与低风险投资知识网，可以在线联系客服领取牛股。牛市通网从权威的投资专家、金融分析师等投资信息中挑选优质的文章进行发布。牛市通网主要为投资者提供股票知识、股票观点、股票分析和明智金融投资讨论等信息。