股灾自救之四“鹏腾2009版(通达信 主图 选股 源码 贴图)
2015-7-20 13:12:45点击:
{主图}
M5:MA(C,5);
M10:MA(C,10);
M20:MA(C,20);
HH:=IF(BETWEEN(DATE,1150601,1150630),H,-999);
T:=HHVBARS(HH,0);
TT:=BARSLAST(L=LLV(L,T+1));
T1:=BARSLAST(CURRBARSCOUNT=CONST(TT)+1);
XL:=REFX(L,BARSNEXT(T1=0));
高位价:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,HH,ISLASTBAR,REF(HH,T),0),COLORYELLOW;
NOTEXT1:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,(HH-XL)*0.382+XL,ISLASTBAR,REF((HH-XL)*0.382+XL,T),0),DOTLINE,COLORGREEN;
大盘破日:BARSLAST(DATE=1150701)+1 NODRAW;
个股破日:BARSLAST(CROSS(NOTEXT1,C))+1 NODRAW;
TJ1:=个股破日<大盘破日 AND COUNT(CROSS(C,NOTEXT1),大盘破日)=1 AND CROSS(C,NOTEXT1);
TJ2:=COUNT(CROSS(NOTEXT1,C),个股破日)=1;
XG:=TJ1 AND TJ2;
DRAWICON(XG,L*0.98,1);
STICKLINE(DATE=1150701,C,O,2,0),COLORGREEN;
STICKLINE(DATE=1150701,H,L,0,0),COLORGREEN;
STICKLINE(CURRBARSCOUNT=CONST(个股破日),C,O,2,0),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=CONST(个股破日),H,L,0,0),COLORYELLOW;
低位价:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,XL,ISLASTBAR,REF(L,T1),0),COLORRED;
DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,NOTEXT1*1.04,VARCAT(VARCAT('第一阻力:',VAR2STR(NOTEXT1,2)),'元')),COLORGREEN;
{选股}
HH:=IF(BETWEEN(DATE,1150601,1150630),H,-999);
T:=HHVBARS(HH,0);
TT:=BARSLAST(L=LLV(L,T+1));
T1:=BARSLAST(CURRBARSCOUNT=CONST(TT)+1);
XL:=REFX(L,BARSNEXT(T1=0));
NOTEXT1:=DRAWLINE(CURRBARSCOUNT=CONST(T)+1,(HH-XL)*0.382+XL,ISLASTBAR,REF((HH-XL)*0.382+XL,T),0);
大盘破日:=BARSLAST(DATE=1150701)+1;
个股破日:=BARSLAST(CROSS(NOTEXT1,C))+1;
TJ1:=个股破日<大盘破日 AND COUNT(CROSS(C,NOTEXT1),大盘破日)=1 AND CROSS(C,NOTEXT1);
TJ2:=COUNT(CROSS(NOTEXT1,C),个股破日)=1;
XG:TJ1 AND TJ2;
M5:MA(C,5);
M10:MA(C,10);
M20:MA(C,20);
HH:=IF(BETWEEN(DATE,1150601,1150630),H,-999);
T:=HHVBARS(HH,0);
TT:=BARSLAST(L=LLV(L,T+1));
T1:=BARSLAST(CURRBARSCOUNT=CONST(TT)+1);
XL:=REFX(L,BARSNEXT(T1=0));
高位价:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,HH,ISLASTBAR,REF(HH,T),0),COLORYELLOW;
NOTEXT1:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,(HH-XL)*0.382+XL,ISLASTBAR,REF((HH-XL)*0.382+XL,T),0),DOTLINE,COLORGREEN;
大盘破日:BARSLAST(DATE=1150701)+1 NODRAW;
个股破日:BARSLAST(CROSS(NOTEXT1,C))+1 NODRAW;
TJ1:=个股破日<大盘破日 AND COUNT(CROSS(C,NOTEXT1),大盘破日)=1 AND CROSS(C,NOTEXT1);
TJ2:=COUNT(CROSS(NOTEXT1,C),个股破日)=1;
XG:=TJ1 AND TJ2;
DRAWICON(XG,L*0.98,1);
STICKLINE(DATE=1150701,C,O,2,0),COLORGREEN;
STICKLINE(DATE=1150701,H,L,0,0),COLORGREEN;
STICKLINE(CURRBARSCOUNT=CONST(个股破日),C,O,2,0),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=CONST(个股破日),H,L,0,0),COLORYELLOW;
低位价:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,XL,ISLASTBAR,REF(L,T1),0),COLORRED;
DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,NOTEXT1*1.04,VARCAT(VARCAT('第一阻力:',VAR2STR(NOTEXT1,2)),'元')),COLORGREEN;
{选股}
HH:=IF(BETWEEN(DATE,1150601,1150630),H,-999);
T:=HHVBARS(HH,0);
TT:=BARSLAST(L=LLV(L,T+1));
T1:=BARSLAST(CURRBARSCOUNT=CONST(TT)+1);
XL:=REFX(L,BARSNEXT(T1=0));
NOTEXT1:=DRAWLINE(CURRBARSCOUNT=CONST(T)+1,(HH-XL)*0.382+XL,ISLASTBAR,REF((HH-XL)*0.382+XL,T),0);
大盘破日:=BARSLAST(DATE=1150701)+1;
个股破日:=BARSLAST(CROSS(NOTEXT1,C))+1;
TJ1:=个股破日<大盘破日 AND COUNT(CROSS(C,NOTEXT1),大盘破日)=1 AND CROSS(C,NOTEXT1);
TJ2:=COUNT(CROSS(NOTEXT1,C),个股破日)=1;
XG:TJ1 AND TJ2;
- 上一篇:通达信超准全仓买入公式 2015/7/20
- 下一篇:大盘与个股对照区域看盘主图“白猫卡卡版”(通达信 源码 主图 2015/7/20