分享

一线天(主图、源码)

 zgy1216 2013-01-07
一线天(主图、源码)
说明;1、上穿买,下穿卖。
2、线上持股,线下持币

JJ:=(H+L+3*C)/5;
VAR021:=EMA(JJ,5);VAR022:=EMA(JJ,13);VAR023:=EMA(JJ,21);VAR024:=EMA(JJ,34);H1A:=(VAR021+VAR022+VAR023+VAR024)/4;
成本和谐:MA(H1A,5),COLORWHITE,LINETHICK1;
IF(成本和谐>REF(成本和谐,1),成本和谐,DRAWNULL),COLORRED,LINETHICK3;
IF(成本和谐<REF(成本和谐,1),成本和谐,DRAWNULL),COLORGREEN,LINETHICK3;

{ZF:=(EMA(SUM(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)),3),49) * 10)+EMA(C,20);
★强势线★:IF(PERIOD!=0 ,EMA(ZF,34),DRAWNULL),LINETHICK2,COLOR00FFFF;
IF(★强势线★>REF(★强势线★,1),★强势线★,DRAWNULL),COLORFF00FF,LINETHICK2;
MA120:MA(C,120),DOTLINE,COLORWHITE;}


N:=30;
T1:=CONST(HHVBARS(V,N));
T0:IF(CURRBARSCOUNT<=N+7,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),LINETHICK3,COLORYELLOW; 
IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),CIRCLEDOT;
DRAWTEXT(ISLASTBAR,T0,' 量能平台');
N5:=10;
T011:=CONST(LLVBARS(LOW,N5));
T11HIGH:=CONST(REF(HIGH,T011));
CC01:=CONST(CURRBARSCOUNT);
T12:=CONST(BARSLAST((CURRBARSCOUNT >(CC01+T011)) AND (HIGH>T11HIGH)));
T12HIGH:=CONST(REF(HIGH,T12));
T13:=CONST(BARSLAST((CURRBARSCOUNT >(CC01+T12)) AND (HIGH>T12HIGH)));
T13HIGH:=CONST(REF(HIGH,T13));
洗盘杀入线:DRAWLINE(CURRBARSCOUNT=T13+1, T13HIGH, ISLASTBAR, T13HIGH, 1),LINETHICK2,COLORWHITE;
DRAWTEXT(ISLASTBAR, T13HIGH, '洗盘杀入线')LINETHICK2,COLORWHITE; 


VARA1:=IF(CLOSE>150,91.3,0.913);
箱体下沿:INTPART(CLOSE/VARA1 )*VARA1,POINTDOT,LINETHICK4,COLORGREEN;
箱体上沿:箱体下沿+VARA1,POINTDOT,LINETHICK4,COLORYELLOW ;
箱体中线: (箱体下沿+箱体上沿)/2,POINTDOT,COLORWHITE,LINETHICK3;


N2:=75;P:=5;P01:=10; 
{N2为多少天内的高低值参数,我以自已的初始K线根数定义。P1、P2为短、长支撑压力取点参数} 
A11:=REF(H,P)=HHV(H,2*P+1); 
B11:=FILTER(A11,P); 
C11:=BACKSET(B11,P+1); 
D1:=FILTER(C11,P); 
E1:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); 
F1:=E1>REF(E1,1); 
短压:DRAWLINE(D1,H,F1,H,1),COLORCYAN; 
A22:=REF(L,P)=LLV(L,2*P+1); 
B22:=FILTER(A22,P); 
C22:=BACKSET(B22,P+1); 
D2:=FILTER(C22,P); 
E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); 
F2:=E2>REF(E2,1); 
短支:DRAWLINE(D2,L,F2,L,1),COLORLIRED; 
AA1:=REF(H,P01)=HHV(H,2*P01+1); 
BB1:=FILTER(AA1,P01); 
CC1:=BACKSET(BB1,P01+1); 
DD1:=FILTER(CC1,P01); 
EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1); 
FF1:=EE1>REF(EE1,1); 
长压:DRAWLINE(DD1,H,FF1,H,1),COLORGREEN; 
AA2:=REF(L,P01)=LLV(L,2*P01+1);
BB2:=FILTER(AA2,P01); 
CC2:=BACKSET(BB2,P01+1); 
DD2:=FILTER(CC2,P01); 
EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1); 
FF2:=EE2>REF(EE2,1); 
长支:DRAWLINE(DD2,L,FF2,L,1),COLORRED;


DRAWTEXT_FIX(1,0.00,0,0,HYBLOCK)COLOR0080FF;
DRAWTEXT_FIX(1,0.14,0,0,DYBLOCK)COLOR00FFFF;
DRAWTEXT_FIX(1,0.00,0.06,0,EXTERNSTR(0,1))COLOR0000FF;
DRAWTEXT_FIX(1,0.00,0.12,0,EXTERNSTR(0,2))COLORFF00FF;
DRAWTEXT_FIX(1,0.00,0.18,0,EXTERNSTR(0,3))COLORFF88FF;
DRAWTEXT_FIX(1,0.00,0.24,0,EXTERNSTR(0,5)),COLORCYAN;
{新增证监会行业}
DRAWTEXT_FIX(1,0.00,0.30,0,EXTERNSTR(0,6)),COLOR0080FF;


涨停:=IF(REF(C,1)*1.095-C<0.01 ,1,0);
STICKLINE(涨停,OPEN,CLOSE,4,0),COLORRED;
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORRED;
DRAWTEXT(涨停,L-0.1,'涨停'),COLORYELLOW;

C3:=REF(C,1);
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,4,0),COLORBLUE;
STICKLINE(跌停,OPEN,CLOSE,3,0),COLORGREEN;
DRAWTEXT(跌停,H+0.3,'跌停'),COLORGREEN;




DRAWICON(CROSS(ZIG(3,10) ,REF(ZIG(3 ,10),1)) ,LOW*0.98,1);

DRAWICON(CROSS(REF(ZIG(3,10),1),ZIG(3,10)) ,HIGH*1.02,2);

DRAWTEXT(CROSS(ZIG(3,10),REF(ZIG(3,10),1)),LOW*0.99,'买') , COLORRED,LINETHICK1;

DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.008,'卖') , COLORGREEN,LINETHICK1;

下载地址(点击上图是广告,点击下图进入下载地址网页) 
·上一软件:让我起死回生的好指标资金增仓
·下一软件:通达信扬起风帆副图、附图、无未来
软件评论评论内容只代表网友观点,与本站立场无关!     评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论 
-

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约