求电流的公式{分时写入五日K线} 通达信指标公式源码

2020年9月21日发(作者：安世高)

{分时写入五日K线}
{幅图---名字写分时引用}
O1:REF(O,1);
C1:REF(C,1);
H1:REF(H,1);
L1:REF(L,1);
O2:REF(O,2);
C2:REF(C,2);
H2:REF(H,2);
L2:REF(L,2);
O3:REF(O,3);
C3:REF(C,3);
H3:REF(H,3);
L3:REF(L,3);
O4:REF(O,4);
C4:REF(C,4);
H4:REF(H,4);
L4:REF(L,4);
O5:REF(O,5);
C5:REF(C,5);
H5:REF(H,5);
L5:REF(L,5);
O6:REF(O,6);
C6:REF(C,6);
H6:REF(H,6);
L6:REF(L,6);
{放到分时主图代码最前面}
O5:=分时引用.O5#DAY
C5:=分时引用. C5#DAY
H5:=分时引用.H5#DAY
L5:=分时引用.L5#DAY
O4 :=分时引用.O4#DAY
C4:=分时引用.C4#DAY
H4:=分时引用.H4#DA Y
L4:=分时引用.L4#DAY
O3:=分时引用.O3#DAY
C3:=分时引 用.C3#DAY
H3:=分时引用.H3#DAY
L3:=分时引用.L3#DAY
O2:=分时引用.O2#DAY
C2:=分时引用.C2#DAY
H2:=分时引用.H2# DAY
L2:=分时引用.L2#DAY
O1:=分时引用.O1#DAY
C1:=分 时引用.C1#DAY
H1:=分时引用.H1#DAY
L1:=分时引用.L1#DAYO0:=DYNAINFO(4);
C0:=DYNAINFO(7);
H0:=DYNAINFO(5);
L0:=DYNAINFO(6);
HH1:=MAX(H1,H2);
HH2:=MAX(H3,H4);
HH3:=MAX(MAX(H0,H5),MAX(HH1,HH2));
LL1:=MIN(L1,L2);
LL2:=MIN(L3,L4);
LL3:=MIN(MIN(L0,L5),MIN(LL1,LL2));
HL:=999(HH3-LL3);
C52:=999-((C5-LL3)*HL);
H52:=999-((H5-LL3)*HL);
L52:=999-((L5-LL3)*HL);
O52:=999-((O5-LL3)*HL);
C42:=999-((C4-LL3)*HL);
H42:=999-((H4-LL3)*HL);
L42:=999-((L4-LL3)*HL);
O42:=999-((O4-LL3)*HL);
C32:=999-((C3-LL3)*HL);
H32:=999-((H3-LL3)*HL);
L32:=999-((L3-LL3)*HL);
O32:=999-((O3-LL3)*HL);
C22:=999-((C2-LL3)*HL);
H22:=999-((H2-LL3)*HL);
L22:=999-((L2-LL3)*HL);
O22:=999-((O2-LL3)*HL);
C12:=999-((C1-LL3)*HL);
H12:=999-((H1-LL3)*HL);
L12:=999-((L1-LL3)*HL);
O12:=999-((O1-LL3)*HL);
C02:=999-((C0-LL3)*HL);
H02:=999-((H0-LL3)*HL);
L02:=999-((L0-LL3)*HL);
O02:=999-((O0-LL3)*HL);
DRAWRECTREL( 8,H52, 8,L52,RGB(IF(C5>=O5,200,0),IF(C5>=O5,0,200),0));
DRAWRECTREL( 0,C52,16,O52,RGB(IF(C5>=O5,128,0) ,IF(C5>=O5,0,128),0));
DRAWRECTREL(28,H42,28,L 42,RGB(IF(C4>=O4,200,0),IF(C4>=O4,0,200),0));
DRAWRECTREL(20,C42,36,O42,RGB(IF(C4>=O4,128,0),IF( C4>=O4,0,128),0));
DRAWRECTREL(48,H32,48,L32,R GB(IF(C3>=O3,200,0),IF(C3>=O3,0,200),0));
DRAW RECTREL(40,C32,56,O32,RGB(IF(C3>=O3,128,0),IF(C3>= O3,0,128),0));
DRAWRECTREL(68,H22,68,L22,RGB(I F(C2>=O2,200,0),IF(C2>=O2,0,200),0));
DRAWRECT REL(60,C22,76,O22,RGB(IF(C2>=O2,128,0),IF(C2>=O2,0 ,128),0));
DRAWRECTREL(88,H12,88,L12,RGB(IF(C1 >=O1,200,0),IF(C1>=O1,0,200),0));
DRAWRECTREL( 80,C12,96,O12,RGB(IF(C1>=O1,128,0),IF(C1>=O1,0,128 ),0));

DRAWRECTREL(108,H02,108,L02,RGB(IF (C0>=O0,200,0),IF(C0>=O0,0,200),0));
DRAWRECTR EL(100,C02,116,O02,RGB(IF(C0>=O0,128,0),IF(C0>=O0, 0,128),0));