老師,請修改一下! [博易POBO]
咨詢內容:
?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; 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; 來源 程序化久久網
老師,請修改一下!
老師,你好!請在以下指標中的紅、白、綠3色橫線的最右邊價格對應橫線的價格,謝謝老師。?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網( m.kzuj.com.cn )
博易技術人員: 老師,你好!請在以下指標中的紅、白、綠3色橫線的最右邊加上對應橫線的價格,謝謝老師。?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; 來源 程序化久久網
有思路,想編寫各種指標公式,交易模型,選股公式,還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信號:cxh99cxh99 進行 有償收費 編寫!
(注:由于人數限制,QQ或微信請選擇方便的一個聯系我們就行,加好友時請簡單備注下您的需求,否則無法通過。謝謝您!)
相關文章
-
沒有相關內容