黄金分时买卖主图指标通达信指标公式源码 下载本文

内容发布更新时间 : 2024/4/28 3:33:20星期一 下面是文章的全部内容请认真阅读。

一个黄金分时买卖,用着感觉还不错

\

DOTLINE;DRAWNUMBER(CURRBARSCOUNT=1,\ELLOW;

\

DRAWNUMBER(CURRBARSCOUNT=1,\\NH#DAY\

\L#DAY\

\DAY\{黄金分割}

HH:=CONST(HHV(C,0)); LL:=CONST(LLV(C,0)); HL:=HH-LL;

A76:=0.764*HL+LL,COLORCYAN,POINTDOT; A61:=0.618*HL+LL,COLORCYAN,POINTDOT; A38:=0.382*HL+LL,COLORCYAN,POINTDOT; A23:=0.236*HL+LL,COLORCYAN,POINTDOT; A51:=0.495*HL+LL,COLORCYAN,POINTDOT; A52:=0.505*HL+LL,COLORCYAN,POINTDOT;

DRAWBAND(HH,RGB(0,30,30),A76,RGB(0,30,30)); DRAWBAND(A23,RGB(0,30,30),LL,RGB(0,30,30));

DRAWBAND(A76,RGB(100,30,100),A61,RGB(100,30,100)); DRAWBAND(A38,RGB(100,30,100),A23,RGB(100,30,100)); DRAWBAND(A61,RGB(100,90,0),A38,RGB(100,90,0));

DRAWBAND(A51,RGB(180,100,100),A52,RGB(180,100,100)); DRAWTEXT(CURRBARSCOUNT=240,HH*0.999,'高'),COLORCYAN;

DRAWTEXT(CURRBARSCOUNT=240,LL*1.001,'低'),COLORMAGENTA; DRAWTEXT(CURRBARSCOUNT=240,A76,'压'),COLORCYAN; DRAWTEXT(CURRBARSCOUNT=240,A23,'撑'),COLORMAGENTA; DRAWTEXT(CURRBARSCOUNT=240,A52,'中'),COLOR00FFFF; {分时量}

预测量:=\.预测量#DAY\主买:=\.主买#DAY\前量:=\.前量#DAY\昨量:=\.昨量#DAY\今量:=\.今量#DAY\前4:=\.前4#DAY\前5:=\.前5#DAY\前总:=前量; 昨总:=昨量;

总:=今量,NODRAW; BMM:=MAX(前总,昨总);

AMM:=IF(总/BMM>2,BMM*3,BMM);

MM:=500/AMM; KP:=DYNAINFO(4); ZX:=DYNAINFO(7); A1:=IF(ZX>=KP,255,0); A2:=IF(ZX>=KP,0,255); A3:=IF(ZX>=KP,0,255);

DRAWRECTREL(0,160,MM*预测量,190,RGB(90,90,90)); DRAWRECTREL(0,160,MM*今量,190,RGB(A1,A2,A3)); DRAWRECTREL(0,160,MM*主买,190,RGB(250,250,280)); ZO:=\.ZO#DAY\ZC:=\.ZC#DAY\A4:=IF(ZC>=ZO,255,0); A5:=IF(ZC>=ZO,0,255); A6:=IF(ZC>=ZO,0,255);

DRAWRECTREL(0,120,MM*昨量,150,RGB(A4,A5,A6)); JO:=\.JO#DAY\JC:=\.JC#DAY\A7:=IF(JC>=JO,255,0); A8:=IF(JC>=JO,0,255); A9:=IF(JC>=JO,0,255);

DRAWRECTREL(0,80,MM*前量,110,RGB(A7,A8,A9)); JO3:=\.JO3#DAY\JC3:=\.JC3#DAY\A10:=IF(JC3>=JO3,255,0); A11:=IF(JC3>=JO3,0,255); A12:=IF(JC3>=JO3,0,255);

DRAWRECTREL(0,40,MM*前4,70,RGB(A10,A11,A12));

JO4:=\.JO4#DAY\JC4:=\.JC4#DAY\A13:=IF(JC4>=JO4,255,0); A14:=IF(JC4>=JO4,0,255); A15:=IF(JC4>=JO4,0,255);

DRAWRECTREL(0,0,MM*前5,30,RGB(A13,A14,A15)); {分时K}

ZS:=DYNAINFO(3); ZG:=DYNAINFO(5); ZD:=DYNAINFO(6);

OP:=500-(KP/ZS-1)*1200; CL:=500-(ZX/ZS-1)*1200; HI:=500-(ZG/ZS-1)*1200; LO:=500-(ZD/ZS-1)*1200;

N1:=IF(TIME>=130000 OR TIME<91500,360,860); Z1:=IF(ZX>=KP,255,0); Z2:=IF(ZX>=KP,0,255); Z3:=IF(ZX>=KP,0,255);

DRAWRECTREL(N1+35,HI,N1+35,LO,RGB(Z1,Z2,Z3)); Q1:=IF(ZX>=KP,255,0); Q2:=IF(ZX>=KP,0,255); Q3:=IF(ZX>=KP,0,255);

DRAWRECTREL(N1+25,OP,N1+45,CL,RGB(Q1,Q2,Q3)); ZH:=\.ZH#DAY\ZL:=\.ZL#DAY\

ZKP:=500-(ZO/ZS-1)*1200; ZCP:=500-(ZC/ZS-1)*1200; ZZG:=500-(ZH/ZS-1)*1200; ZZD:=500-(ZL/ZS-1)*1200; Z4:=IF(ZC>=ZO,255,0); Z5:=IF(ZC>=ZO,0,255); Z6:=IF(ZC>=ZO,0,255);

DRAWRECTREL(N1+5,ZZG,N1+5,ZZD,RGB(Z4,Z5,Z6)); Q4:=IF(ZC>=ZO,255,0); Q5:=IF(ZC>=ZO,0,255); Q6:=IF(ZC>=ZO,0,255);

DRAWRECTREL(N1-5,ZKP,N1+15,ZCP,RGB(Q4,Q5,Q6)); JH:=\.JH#DAY\JL:=\.JL#DAY\

ZZKP:=500-(JO/ZS-1)*1200; ZZCP:=500-(JC/ZS-1)*1200; ZZZG:=500-(JH/ZS-1)*1200; ZZZD:=500-(JL/ZS-1)*1200; Z7:=IF(JC>=JO,255,0);