咨詢內(nèi)容:
老師,請修改一下!
老師,你好!請在以下指標(biāo)中的紅、白、綠3色橫線的最右邊價格對應(yīng)橫線的價格,謝謝老師。
?TT_CLOSE:= STKDATA('',4,'CLOSE');//跨周期引用
A:="020405$CLOSE";//跨品種引用
TT:=TT_CLOSE;
REF_TT:=REF(CLOSE,1);
MM:= INTPART((MINUTE)/Y);
N:=BARSLAST(HOUR<>REF(HOUR,1))+1;
HH1:=REF(HHV(H,N),N);//昨天全天的最高價
LL1:=REF(LLV(L,N),N);//昨天全天的最低價
CC1:=REF(CLOSE,N);//昨天全天的收盤價
CO:=VALUEWHEN(DATE<>REF(DATE,1),OPEN),COLORBLUE;//今開盤
ZX:=(HH1+LL1+CC1)/3,COLORWHITE;
R1:=2*ZX-LL1,COLORRED;
S1:=2*ZX-HH1,COLORGREEN;
R2:=ZX+(R1-S1),COLORRED;
S2:=ZX-(R1-S1),COLORGREEN;
R3:=HH1-(2*(LL1-ZX)),COLORRED;
S3:=LL1-(2*(HH1-ZX)),COLORGREEN;
AH:=IF(DATE<1190620,HIGH,0);//跨品種引用有效期限制
N1:=BARSLAST(DATE<>REF(DATE,1))+1;
HH11:=REF(HHV(AH,N1),N1);//昨天全天的最高價
LL11:=REF(LLV(L,N1),N1);//昨天全天的最低價
CC11:=REF(CLOSE,N1);//昨天全天的收盤價
ZX1:(HH11+LL11+CC11)/3,COLORWHITE;
R11:2*ZX1-LL11,COLORRED;
S11:2*ZX1-HH11,COLORGREEN;
R21:=ZX1+(R11-S11),COLORRED;
S21:=ZX1-(R11-S11),COLORGREEN;
R31:=HH11-(2*(LL11-ZX1)),COLORRED;
S31:=LL11-(2*(HH11-ZX1)),COLORGREEN;
?
?來源:程序化99網(wǎng)( m.kzuj.com.cn )
博易技術(shù)人員:
老師,你好!請在以下指標(biāo)中的紅、白、綠3色橫線的最右邊加上對應(yīng)橫線的價格,謝謝老師。
?TT_CLOSE:= STKDATA('',4,'CLOSE');//跨周期引用
A:="020405$CLOSE";//跨品種引用
TT:=TT_CLOSE;
REF_TT:=REF(CLOSE,1);
MM:= INTPART((MINUTE)/Y);
N:=BARSLAST(HOUR<>REF(HOUR,1))+1;
HH1:=REF(HHV(H,N),N);//昨天全天的最高價
LL1:=REF(LLV(L,N),N);//昨天全天的最低價
CC1:=REF(CLOSE,N);//昨天全天的收盤價
CO:=VALUEWHEN(DATE<>REF(DATE,1),OPEN),COLORBLUE;//今開盤
ZX:=(HH1+LL1+CC1)/3,COLORWHITE;
R1:=2*ZX-LL1,COLORRED;
S1:=2*ZX-HH1,COLORGREEN;
R2:=ZX+(R1-S1),COLORRED;
S2:=ZX-(R1-S1),COLORGREEN;
R3:=HH1-(2*(LL1-ZX)),COLORRED;
S3:=LL1-(2*(HH1-ZX)),COLORGREEN;
AH:=IF(DATE<1190620,HIGH,0);//跨品種引用有效期限制
N1:=BARSLAST(DATE<>REF(DATE,1))+1;
HH11:=REF(HHV(AH,N1),N1);//昨天全天的最高價
LL11:=REF(LLV(L,N1),N1);//昨天全天的最低價
CC11:=REF(CLOSE,N1);//昨天全天的收盤價
ZX1:(HH11+LL11+CC11)/3,COLORWHITE;
R11:2*ZX1-LL11,COLORRED;
S11:2*ZX1-HH11,COLORGREEN;
R21:=ZX1+(R11-S11),COLORRED;
S21:=ZX1-(R11-S11),COLORGREEN;
R31:=HH11-(2*(LL11-ZX1)),COLORRED;
S31:=LL11-(2*(HH11-ZX1)),COLORGREEN;
TT_CLOSE:=STKDATA('',4,'CLOSE');//跨周期引用
A:="020405$CLOSE";//跨品種引用
TT:=TT_CLOSE;
REF_TT:=REF(CLOSE,1);
MM:=INTPART((MINUTE)/Y);
N:=BARSLAST(HOUR<>REF(HOUR,1))+1;
HH1:=REF(HHV(H,N),N);//昨天全天的最高價
LL1:=REF(LLV(L,N),N);//昨天全天的最低價
CC1:=REF(CLOSE,N);//昨天全天的收盤價
CO:=VALUEWHEN(DATE<>REF(DATE,1),OPEN),COLORBLUE;//今開盤
ZX:=(HH1+LL1+CC1)/3,COLORWHITE;
R1:=2*ZX-LL1,COLORRED;
S1:=2*ZX-HH1,COLORGREEN;
R2:=ZX+(R1-S1),COLORRED;
S2:=ZX-(R1-S1),COLORGREEN;
R3:=HH1-(2*(LL1-ZX)),COLORRED;
S3:=LL1-(2*(HH1-ZX)),COLORGREEN;
AH:=IF(DATE<1190620,HIGH,0);//跨品種引用有效期限制
N1:=BARSLAST(DATE<>REF(DATE,1))+1;
HH11:=REF(HHV(AH,N1),N1);//昨天全天的最高價
LL11:=REF(LLV(L,N1),N1);//昨天全天的最低價
CC11:=REF(CLOSE,N1);//昨天全天的收盤價
ZX1:(HH11+LL11+CC11)/3,COLORWHITE;
R11:2*ZX1-LL11,COLORRED;
S11:2*ZX1-HH11,COLORGREEN;
R21:=ZX1+(R11-S11),COLORRED;
S21:=ZX1-(R11-S11),COLORGREEN;
R31:=HH11-(2*(LL11-ZX1)),COLORRED;
S31:=LL11-(2*(HH11-ZX1)),COLORGREEN;
DRAWNUMBER(ISLASTBAR,ZX1,ZX1,0),ALIGN0,COLORWHITE;
DRAWNUMBER(ISLASTBAR,R11,R11,0),ALIGN0,COLORRED;
DRAWNUMBER(ISLASTBAR,S11,S11,0),ALIGN0,COLORGREEN;
來源 程序化久久網(wǎng)