老师,请修改一下 (文华财经WH6赢顺V6.7)

投资者咨询:老师,请修改一下 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2019-6-17 15:59
老师,你好!请把以下指标转换成文华可用,谢谢老师!  

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;
WN:=WEEKDAY;
HH11:=IF(WN=1,MAX(REF(HHV(HIGH,N1),N1),REF(REF(HHV(HIGH,N1),N1),N1),REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),N1)),IF(WN=2,REF(MAX(REF(HHV(HIGH,N1),N1),REF(REF(HHV(HIGH,N1),N1),N1),REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),N1)),N1),IF(WN=3,REF(REF(MAX(REF(HHV(HIGH,N1),N1),REF(REF(HHV(HIGH,N1),N1),N1),REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),N1)),N1),N1),IF(WN=4,REF(REF(REF(MAX(REF(HHV(HIGH,N1),N1),REF(REF(HHV(HIGH,N1),N1),N1),REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),N1)),N1),N1),N1),IF(WN=5,REF(REF(REF(REF(MAX(REF(HHV(HIGH,N1),N1),REF(REF(HHV(HIGH,N1),N1),N1),REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),N1)),N1),N1),N1),N1),0)))));//昨天全天的最高价
LL11:=IF(WN=1,MIN(REF(LLV(LOW,N1),N1),REF(REF(LLV(LOW,N1),N1),N1),REF(REF(REF(LLV(LOW,N1),N1),N1),N1),REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),N1)),IF(WN=2,REF(MIN(REF(LLV(LOW,N1),N1),REF(REF(LLV(LOW,N1),N1),N1),REF(REF(REF(LLV(LOW,N1),N1),N1),N1),REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),N1)),N1),IF(WN=3,REF(REF(MIN(REF(LLV(LOW,N1),N1),REF(REF(LLV(LOW,N1),N1),N1),REF(REF(REF(LLV(LOW,N1),N1),N1),N1),REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),N1)),N1),N1),IF(WN=4,REF(REF(REF(MIN(REF(LLV(LOW,N1),N1),REF(REF(LLV(LOW,N1),N1),N1),REF(REF(REF(LLV(LOW,N1),N1),N1),N1),REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),N1)),N1),N1),N1),IF(WN=5,REF(REF(REF(REF(MIN(REF(LLV(LOW,N1),N1),REF(REF(LLV(LOW,N1),N1),N1),REF(REF(REF(LLV(LOW,N1),N1),N1),N1),REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),N1)),N1),N1),N1),N1),0)))));//昨天全天的最低价
CC11:=IF(WN=1,REF(CLOSE,N1),IF(WN=2,REF(REF(CLOSE,N1),N1),IF(WN=3,REF(REF(REF(CLOSE,N1),N1),N1),IF(WN=4,REF(REF(REF(REF(CLOSE,N1),N1),N1),N1),IF(WN=5,REF(REF(REF(REF(REF(CLOSE,N1),N1),N1),N1),N1),0)))));//昨天全天的收盘价





中线:(HH11+LL11+CC11)/3,COLORYELLOW;
压力:2*中线-LL11,COLORYELLOW;
支撑:2*中线-HH11,COLORYELLOW;
R21:=中线+(压力-支撑),COLORYELLOW;
S21:=中线-(压力-支撑),COLORYELLOW;
R31:=HH11-(2*(LL11-中线)),COLORYELLOW;
S31:=LL11-(2*(HH11-中线)),COLORYELLOW;

DRAWNUMBER(ISLASTBAR,中线,中线,0),ALIGN0,COLORWHITE,FONTSIZE30;
DRAWNUMBER(ISLASTBAR,压力,压力,0),ALIGN0,COLORRED,FONTSIZE30;
DRAWNUMBER(ISLASTBAR,支撑,支撑,0),ALIGN0,COLORGREEN,FONTSIZE30;

技术人员回复
日期:2019-6-17 16:11
被引用合约您手动修改下,红色数字改为您要引用合约的文华码

参考:

TT_CLOSE:="MIN$30$C";//跨周期引用
A:="999001$C";//跨品种引用
TT:=TT_CLOSE;
Y:=1;


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<331231,HIGH,0);//跨品种引用有效期限制

N1:=BARSLAST(DATE<>REF(DATE,1))+1;
WN:=WEEKDAY;
HH11:=IF(WN=1,MAX1(REF(HHV(HIGH,N1),N1),REF(REF(HHV(HIGH,N1),N1),N1),REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),N1)),IF(WN=2,REF(MAX1(REF(HHV(HIGH,N1),N1),REF(REF(HHV(HIGH,N1),N1),N1),REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),N1)),N1),IF(WN=3,REF(REF(MAX1(REF(HHV(HIGH,N1),N1),REF(REF(HHV(HIGH,N1),N1),N1),REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),N1)),N1),N1),IF(WN=4,REF(REF(REF(MAX1(REF(HHV(HIGH,N1),N1),REF(REF(HHV(HIGH,N1),N1),N1),REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),N1)),N1),N1),N1),IF(WN=5,REF(REF(REF(REF(MAX1(REF(HHV(HIGH,N1),N1),REF(REF(HHV(HIGH,N1),N1),N1),REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(HHV(HIGH,N1),N1),N1),N1),N1),N1)),N1),N1),N1),N1),0)))));//昨天全天的最高价
LL11:=IF(WN=1,MIN1(REF(LLV(LOW,N1),N1),REF(REF(LLV(LOW,N1),N1),N1),REF(REF(REF(LLV(LOW,N1),N1),N1),N1),REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),N1)),IF(WN=2,REF(MIN1(REF(LLV(LOW,N1),N1),REF(REF(LLV(LOW,N1),N1),N1),REF(REF(REF(LLV(LOW,N1),N1),N1),N1),REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),N1)),N1),IF(WN=3,REF(REF(MIN1(REF(LLV(LOW,N1),N1),REF(REF(LLV(LOW,N1),N1),N1),REF(REF(REF(LLV(LOW,N1),N1),N1),N1),REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),N1)),N1),N1),IF(WN=4,REF(REF(REF(MIN1(REF(LLV(LOW,N1),N1),REF(REF(LLV(LOW,N1),N1),N1),REF(REF(REF(LLV(LOW,N1),N1),N1),N1),REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),N1)),N1),N1),N1),IF(WN=5,REF(REF(REF(REF(MIN1(REF(LLV(LOW,N1),N1),REF(REF(LLV(LOW,N1),N1),N1),REF(REF(REF(LLV(LOW,N1),N1),N1),N1),REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),REF(REF(REF(REF(REF(LLV(LOW,N1),N1),N1),N1),N1),N1)),N1),N1),N1),N1),0)))));//昨天全天的最低价
CC11:=IF(WN=1,REF(CLOSE,N1),IF(WN=2,REF(REF(CLOSE,N1),N1),IF(WN=3,REF(REF(REF(CLOSE,N1),N1),N1),IF(WN=4,REF(REF(REF(REF(CLOSE,N1),N1),N1),N1),IF(WN=5,REF(REF(REF(REF(REF(CLOSE,N1),N1),N1),N1),N1),0)))));//昨天全天的收盘价





中线:(HH11+LL11+CC11)/3,COLORYELLOW;
压力:2*中线-LL11,COLORYELLOW;
支撑:2*中线-HH11,COLORYELLOW;
R21:=中线+(压力-支撑),COLORYELLOW;
S21:=中线-(压力-支撑),COLORYELLOW;
R31:=HH11-(2*(LL11-中线)),COLORYELLOW;
S31:=LL11-(2*(HH11-中线)),COLORYELLOW;

DRAWNUMBER1(ISLASTBAR,中线,中线,0),ALIGN0,COLORWHITE,FONTSIZE30;
DRAWNUMBER1(ISLASTBAR,压力,压力,0),ALIGN0,COLORRED,FONTSIZE30;
DRAWNUMBER1(ISLASTBAR,支撑,支撑,0),ALIGN0,COLORGREEN,FONTSIZE30;