[求助]请教老师帮忙修改指标 (文华财经WH6赢顺V6.7)

 参考：

P:=0;
KT:=BARSLAST(DATE<>REF(DATE,1))+1;
KH:=HHV(KT,1300);
TTT:=ABS(TIME-REF(TIME,1));
TT:=LLV(TTT,100);
HK:=HHV(H,KT);
LK:=LLV(L,KT);
N:=IFELSE((HK-LK)>LK/(189/2),189,189*2);
HKH:=IFELSE(HK-HK/N<LK,LK,HK-HK/N);
LKL:=IFELSE(LK+LK/N>HK,HK,LK+LK/N);
HLK:=LK+(HK-LK)/2;
FILLRGN(1,HK,HKH,RGB(0,64,0));
FILLRGN(1,LK,LKL,RGB(64,0,128));
DRAWNUMBER( ISLASTBAR,HLK,HLK,P,COLORYELLOW);
DRAWNUMBER( ISLASTBAR,HK,HK,P,COLORGREEN);
DRAWNUMBER( ISLASTBAR,HKH,HKH,P,COLORGREEN);
DRAWNUMBER( ISLASTBAR,LK,LK,P,RGB(128,0,255));
DRAWNUMBER( ISLASTBAR,LKL,LKL,P,RGB(128,0,255));
POLYLINE(1,HLK,COLORYELLOW);
POLYLINE(1,HK,COLORGREEN);
POLYLINE(1,HKH,COLORGREEN);
POLYLINE(1,LK,RGB(128,0,255));
POLYLINE(1,LKL,RGB(128,0,255));
G:=IFELSE(H=HHV(H,5),1,0);
D:=IFELSE(L=LLV(L,5),1,0);
GB:=BARSLAST(REF(G,2)=1&&REF(G,1)=0&&G=0)+2;
S:=IFELSE(REF(G,2)=1&&REF(G,1)=0&&G=0,REF(H,2),REF(H,GB));
XB:=BARSLAST(REF(D,2)=1&&REF(D,1)=0&&D=0)+2;
X:=IFELSE(REF(D,2)=1&&REF(D,1)=0&&D=0,REF(L,2),REF(L,XB));
SB:=BARSLAST(H>MA(C,1));
ZB:=BARSLAST(L<=MA(C,5));
SYL:=IFELSE(H>=MA(C,1),S,REF(S,SB));
XZC:=IFELSE((L<=MA(C,5)),X,REF(X,ZB));
C1:=CROSS(C,SYL);
C2:=CROSS(XZC,C);
K1:=BARSLAST(C1);
K2:=BARSLAST(C2);
GG:=IFELSE(K1<K2,REF(XZC,1),REF(SYL,1));
UB:=C>GG;
US:=C<GG;
MB:=IFELSE(UB=1,0,BARSLAST(UB=1));
MS:=IFELSE(US=1,0,BARSLAST(US=1));
YG:=MB<MS;
YD:=MS<MB;
DRAWLINE(YG=1,H, YG=1,C,COLORRED);
DRAWLINE(YG=1,L, YG=1,O,COLORRED);
DRAWLINE(YD=1,H, YD=1,C,COLORCYAN);
DRAWLINE(YD=1,L, YD=1,O,COLORCYAN);
STICKLINE(YG=1,O,C,COLORRED,1);
STICKLINE(YD=1,O,C,COLORCYAN,1);
STICKLINE(O>=C&&YG=1,O,C,COLORRED,0);
STICKLINE(O>=C&&YD=1,O,C,COLORCYAN,0);
T:=BACKSET(ISLASTBAR,16)-BACKSET(ISLASTBAR,15);
//DRAWTEXT(TT<>3&&T=1,(HHV(H,55)+LLV(L,55))/2,Ɖ分钟周期专用');

 参考：

KT:=BARSLAST(DATE<>REF(DATE,1))+1;
KH:=HHV(KT,1300);
TTT:=ABS(TIME-REF(TIME,1));
TT:=LLV(TTT,100);
HK:=HHV(H,KT);
LK:=LLV(L,KT);
N:=IFELSE((HK-LK)>LK/(189/2),189,189*2);
HKH:=IFELSE(HK-HK/N<LK,LK,HK-HK/N);
LKL:=IFELSE(LK+LK/N>HK,HK,LK+LK/N);
HLK:=LK+(HK-LK)/2;
FILLRGN(1,HK,HKH,RGB(0,64,0));
FILLRGN(1,LK,LKL,RGB(64,0,128));
DRAWNUMBER( ISLASTBAR,HLK,HLK,P,COLORYELLOW);
DRAWNUMBER( ISLASTBAR,HK,HK,P,COLORGREEN);
DRAWNUMBER( ISLASTBAR,HKH,HKH,P,COLORGREEN);
DRAWNUMBER( ISLASTBAR,LK,LK,P,RGB(128,0,255));
DRAWNUMBER( ISLASTBAR,LKL,LKL,P,RGB(128,0,255));
POLYLINE(1,HLK,COLORYELLOW);
POLYLINE(1,HK,COLORGREEN);
POLYLINE(1,HKH,COLORGREEN);
POLYLINE(1,LK,RGB(128,0,255));
POLYLINE(1,LKL,RGB(128,0,255));
G:=IFELSE(H=HHV(H,5),1,0);
D:=IFELSE(L=LLV(L,5),1,0);
GB:=BARSLAST(REF(G,2)=1&&REF(G,1)=0&&G=0)+2;
S:=IFELSE(REF(G,2)=1&&REF(G,1)=0&&G=0,REF(H,2),REF(H,GB));
XB:=BARSLAST(REF(D,2)=1&&REF(D,1)=0&&D=0)+2;
X:=IFELSE(REF(D,2)=1&&REF(D,1)=0&&D=0,REF(L,2),REF(L,XB));
SB:=BARSLAST(H>MA(C,1));
ZB:=BARSLAST(L<=MA(C,5));
SYL:=IFELSE(H>=MA(C,1),S,REF(S,SB));
XZC:=IFELSE((L<=MA(C,5)),X,REF(X,ZB));
C1:=CROSS(C,SYL);
C2:=CROSS(XZC,C);
K1:=BARSLAST(C1);
K2:=BARSLAST(C2);
GG:=IFELSE(K1<K2,REF(XZC,1),REF(SYL,1));
UB:=C>GG;
US:=C<GG;
MB:=IFELSE(UB=1,0,BARSLAST(UB=1));
MS:=IFELSE(US=1,0,BARSLAST(US=1));
YG:=MB<MS;
YD:=MS<MB;
DRAWLINE(YG=1,H, YG=1,C,COLORRED);
DRAWLINE(YG=1,L, YG=1,O,COLORRED);
DRAWLINE(YD=1,H, YD=1,C,COLORCYAN);
DRAWLINE(YD=1,L, YD=1,O,COLORCYAN);
STICKLINE(YG=1,O,C,COLORRED,1);
STICKLINE(YD=1,O,C,COLORCYAN,1);
STICKLINE(O>=C&&YG=1,O,C,COLORRED,0);
STICKLINE(O>=C&&YD=1,O,C,COLORCYAN,0);
T:=BACKSET(ISLASTBAR,16)-BACKSET(ISLASTBAR,15);
//DRAWTEXT(TT<>3&&T=1,(HHV(H,55)+LLV(L,55))/2,Ɖ分钟周期专用');

 参考：

AL:=(C+L+H)/3;
AO:=SMA(AL,13,1)-SMA(AL,34,1);
BBD:(AO-SMA(AO, 5,1))*100,NODRAW;
BBDA:SMA(BBD,5,2);
RSV1:=BBD;
RSV2:=BBDA;
//BBD彩色柱体}
VAR11:=IF(DATE<321230 AND DATE>900101,1,0);
BBD1:=IF(BBD>=REF(BBD,1)*VAR11,BBD,NULL);
BBD2:=IF(BBD<REF(BBD,1)*VAR11,BBD,NULL);
STICKLINE(BBD1,0,BBD,COLORWHITE,0);
STICKLINE(BBD1,0,BBD,COLORWHITE,0);
STICKLINE(BBD1,0,BBD,COLORWHITE,0);
STICKLINE(BBD1,0,BBD,COLORWHITE,0);
STICKLINE(BBD2,0,BBD,3,0),COLORWHITE;
STICKLINE(BBD2,0,BBD,1.5,0),COLORWHITE;
STICKLINE(BBD2,0,BBD,1,0),COLORWHITE;
STICKLINE(BBD2,0,BBD,0.5,0),COLORWHITE;
SV1:=BARSLAST(REF(CROSS(RSV1,RSV2),1));
SV1A:=REF(CLOSE,SV1+1)>CLOSE AND RSV1>REF(RSV1,SV1+1) AND CROSS(RSV1,RSV2);
上涨BBD:IF(SV1A,RSV2,NULL);

SV2:=BARSLAST(REF(CROSS(RSV2,RSV1),1));
SV2A:=REF(CLOSE,SV2+1)<CLOSE AND REF(RSV1,SV2+1)>RSV1 AND CROSS(RSV2,RSV1);
下跌BBD:IF(SV2A,RSV2,NULL);
TJ1:=((((LLV(BBD,4) > 0) AND (BBD < REF(BBD,1))) AND (REF(BBD,1) > REF(BBD,2))) AND (REF(BBD,2) > REF(BBD,3)));
TJ2:=((((HHV(BBD,4) < 0) AND (BBD > REF(BBD,1))) AND (REF(BBD,1) < REF(BBD,2))) AND (REF(BBD,2) <REF(BBD,3)));