|
以下是通达信双飞乌鸦（鹏腾版）主图幅图 选股（无源码的请下载附件导入）
{主图}
A:=C/REF(C,1)>1.085 AND C>=O;
B:=REF(C,1)<O AND C<O;
TJ:=REF(A,1) AND B;
TK:=O/REF(MAX(C,O),1);
TJ1:=COUNT(TJ,6);
T1:=BARSLAST(TJ1=1 AND TJ);
T:=BARSLAST(TJ1=2 AND TJ AND EVERY(TK<1.075,T1));
EXT:DRAWLINE(T=0,C,REF(T=0,1),REF(C,1),1),DOTLINE,COLORYELLOW;
GL:=(C/EXT-1)*100;
TT:=(H/EXT-1)*100;
XG:=COUNT(GL>4,T)=1 AND GL>4 AND TK<1.02 AND REF(TT,1)<4 AND GL<7.8;
STICKLINE(XG,C,O,2,0),COLORLIMAGENTA;
STICKLINE(XG,L,H,0,0),COLORLIMAGENTA;
DRAWICON(XG,L,1);
DRAWTEXT(T=0,EXT*1.05,VARCAT(VARCAT('突破价:',VAR2STR(REF(C,T),2)),'元'))COLORYELLOW;
{幅图}
A:=C/REF(C,1)>1.085 AND C>=O;
B:=REF(C,1)<O AND C<O;
TJ:=REF(A,1) AND B;
TK:=O/REF(MAX(C,O),1);
TJ1:=COUNT(TJ,6);
T1:=BARSLAST(TJ1=1 AND TJ);
T:=BARSLAST(TJ1=2 AND TJ AND EVERY(TK<1.075,T1));
EXT:=DRAWLINE(T=0,C,REF(T=0,1),REF(C,1),1);
GL:=(C/EXT-1)*100;
TT:=(H/EXT-1)*100;
XG:=COUNT(GL>4,T)=1 AND GL>4 AND TK<1.02 AND REF(TT,1)<4 AND GL<7.8;
STICKLINE(XG,0,8,1.5,0),COLORLIMAGENTA;
{选股}
A:=C/REF(C,1)>1.085 AND C>=O;
B:=REF(C,1)<O AND C<O;
TJ:=REF(A,1) AND B;
TK:=O/REF(MAX(C,O),1);
TJ1:=COUNT(TJ,6);
T1:=BARSLAST(TJ1=1 AND TJ);
T:=BARSLAST(TJ1=2 AND TJ AND EVERY(TK<1.075,T1));
EXT:=DRAWLINE(T=0,C,REF(T=0,1),REF(C,1),1);
GL:=(C/EXT-1)*100;
TT:=(H/EXT-1)*100;
XG:COUNT(GL>4,T)=1 AND GL>4 AND TK<1.02 AND REF(TT,1)<4 AND GL<7.8;
下面这一组主图选股和幅图出票要多点，但风险也增加了，思路提供者鹏腾2009老师您需要的3张票票在下面这组公式里
{主图}
A:=C/REF(C,1)>1.085 AND C>=O;
B:=REF(C,1)<O AND C<O;
TJ:=REF(A,1) AND B;
TJ1:=COUNT(TJ,6);
T:=BARSLAST(TJ1=2 AND TJ);
EXT:DRAWLINE(T=0,C,REF(T=0,1),REF(C,1),1),COLORYELLOW,DOTLINE;
GL:=(C/EXT-1)*100;
XG:=COUNT(GL>4,T)=1 AND GL>4;
STICKLINE(XG,C,O,2,0),COLORLIMAGENTA;
STICKLINE(XG,L,H,0,0),COLORLIMAGENTA;
DRAWICON(XG,L,1);
DRAWTEXT(T=0,EXT*1.05,VARCAT(VARCAT('突破价:',VAR2STR(REF(C,T),2)),'元'))COLORYELLOW;
{幅图}
A:=C/REF(C,1)>1.085 AND C>=O;
B:=REF(C,1)<O AND C<O;
TJ:=REF(A,1) AND B;
TJ1:=COUNT(TJ,6);
T:=BARSLAST(TJ1=2 AND TJ);
EXT:=DRAWLINE(T=0,C,REF(T=0,1),REF(C,1),1);
GL:=(C/EXT-1)*100;
XG:=COUNT(GL>4,T)=1 AND GL>4;
STICKLINE(XG,0,8,1.5,0),COLORLIMAGENTA;
{选股}
A:=C/REF(C,1)>1.085 AND C>=O;
B:=REF(C,1)<O AND C<O;
TJ:=REF(A,1) AND B;
TJ1:=COUNT(TJ,6);
T:=BARSLAST(TJ1=2 AND TJ);
EXT:=DRAWLINE(T=0,C,REF(T=0,1),REF(C,1),1);
GL:=(C/EXT-1)*100;
XG:COUNT(GL>4,T)=1 AND GL>4;
658422293.jpg
|
