咨詢內容：

老師，請修改一下！

老師，你好！請在以下指標中的紅、白、綠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網（ www.weiqiv.net.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; 來源 程序化久久網