以下是通达信金元宝人大大版本图幅图选股源码贴图
{主图}
D:=MACD.DIF;
D1:=MACD.DEA;
M:=MACD.MACD;
A:=BARSLASTCOUNT(D>D1 AND M<REF(M,1));
A1:=BARSLASTCOUNT(D>D1 AND M>REF(M,1));
TA:=BARSLAST(A=1);
XG:=REF(H,TA)/H>1.1 AND A1=1 AND EVERY(D>D1,TA+1);
DRAWICON(XG,L*0.95,1);
STICKLINE(XG,C,O,2,0),COLORYELLOW;
STICKLINE(XG,H,L,0,0),COLORYELLOW;
{幅图}
D:=MACD.DIF;
D1:=MACD.DEA;
M:=MACD.MACD;
A:=BARSLASTCOUNT(D>D1 AND M<REF(M,1));
A1:=BARSLASTCOUNT(D>D1 AND M>REF(M,1));
TA:=BARSLAST(A=1);
XG:=REF(H,TA)/H>1.1 AND A1=1 AND EVERY(D>D1,TA+1);
STICKLINE(XG,0,8,1.5,0),COLORYELLOW;
{选股}
D:=MACD.DIF;
D1:=MACD.DEA;
M:=MACD.MACD;
A:=BARSLASTCOUNT(D>D1 AND M<REF(M,1));
A1:=BARSLASTCOUNT(D>D1 AND M>REF(M,1));
TA:=BARSLAST(A=1);
XG:REF(H,TA)/H>1.1 AND A1=1 AND EVERY(D>D1,TA+1);