通达信黄金分割优化版主图 源码
{牛牛指标网提供:www.tdx001.com}
复制内容到剪贴板
- N:=75;P:=5;P1:=10;
- {N为多少天内的高低值参数,我以自已的初始K线根数定义。P1、P2为短、长支撑压力取点参数}
- A1:=REF(H,P)=HHV(H,2*P+1);
- B1:=FILTER(A1,P);
- C1:=BACKSET(B1,P+1);
- D1:=FILTER(C1,P);
- E1:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);
- F1:=E1>REF(E1,1);
- 短压:DRAWLINE(D1,H,F1,H,1),COLORCYAN;
- A2:=REF(L,P)=LLV(L,2*P+1);
- B2:=FILTER(A2,P);
- C2:=BACKSET(B2,P+1);
- D2:=FILTER(C2,P);
- E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
- F2:=E2>REF(E2,1);
- 短支:DRAWLINE(D2,L,F2,L,1),COLORLIRED;
- AA1:=REF(H,P1)=HHV(H,2*P1+1);
- BB1:=FILTER(AA1,P1);
- CC1:=BACKSET(BB1,P1+1);
- DD1:=FILTER(CC1,P1);
- EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1);
- FF1:=EE1>REF(EE1,1);
- 长压:DRAWLINE(DD1,H,FF1,H,1),COLORGREEN;
- AA2:=REF(L,P1)=LLV(L,2*P1+1);
- BB2:=FILTER(AA2,P1);
- CC2:=BACKSET(BB2,P1+1);
- DD2:=FILTER(CC2,P1);
- EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1);
- FF2:=EE2>REF(EE2,1);
- 长支:DRAWLINE(DD2,L,FF2,L,1),COLORRED;
- STICKLINE(C>=O,C,O,3,0),COLOR000045;
- STICKLINE(C>=O,C,O,2.5,0),COLOR000065;
- STICKLINE(C>=O,C,O,2,0),COLOR000085;
- STICKLINE(C>=O,C,O,1.5,0),COLOR0000A5;
- STICKLINE(C>=O,C,O,1,0),COLOR0000C5;
- STICKLINE(C>=O,C,O,0.5,0),COLOR0000E5;
- STICKLINE(C>=O,H,L,0,0),COLOR0000F5;
- STICKLINE(C<O,C,O,3,0),COLOR353500;
- STICKLINE(C<O,C,O,2.5,0),COLOR454500;
- STICKLINE(C<O,C,O,2,0),COLOR555500;
- STICKLINE(C<O,C,O,1.5,0),COLOR656500;
- STICKLINE(C<O,C,O,1,0),COLOR757500;
- STICKLINE(C<O,C,O,0.5,0),COLOR858500;
- STICKLINE(C<O,H,L,0,0),COLOR959500;
- 高:=REFDATE(HHV(H,N),DATE);
- 低:=REFDATE(LLV(L,N),DATE);
- H1:=高-(高-低)*0.191;
- H2:=高-(高-低)*0.382;
- H3:=高-(高-低)*0.5;
- H4:=高-(高-低)*0.618;
- H5:=高-(高-低)*0.809;
- DRAWTEXT(CURRBARSCOUNT=1,高,'高'),COLORGREEN;
- DRAWTEXT(CURRBARSCOUNT=1,H1,'809'),COLORCYAN;
- DRAWTEXT(CURRBARSCOUNT=1,H2,'618'),COLORGRAY;
- DRAWTEXT(CURRBARSCOUNT=1,H3,'中'),COLORYELLOW;
- DRAWTEXT(CURRBARSCOUNT=1,H4,'382'),COLORLIRED;
- DRAWTEXT(CURRBARSCOUNT=1,H5,'191'),COLORMAGENTA;
- DRAWTEXT(CURRBARSCOUNT=1,低,'低'),COLORRED;
- STICKLINE(CURRBARSCOUNT=13,高,高,100,-1),COLORGREEN;
- STICKLINE(CURRBARSCOUNT=13,H1,H1,100,-1),COLORCYAN;
- STICKLINE(CURRBARSCOUNT=13,H2,H2,100,-1),COLORGRAY;
- STICKLINE(CURRBARSCOUNT=13,H3,H3,100,-1),COLORYELLOW;
- STICKLINE(CURRBARSCOUNT=13,H4,H4,100,-1),COLORLIRED;
- STICKLINE(CURRBARSCOUNT=13,H5,H5,100,-1),COLORMAGENTA;
- STICKLINE(CURRBARSCOUNT=13,低,低,100,-1),COLORRED;
DA71637248.png
|