麻煩老師把下面的這個指標(biāo)改成WH6能用的　[文華財經(jīng)]

• N:=75;P:=5;P1:=10;{N為多少天內(nèi)的高低值參數(shù)，我以自已的初始K線根數(shù)定義。P1、P2為短、長支撐壓力取點(diǎn)參數(shù)}   
• A1:=REF(H,P)=HHV(H,2*P+1);   
• B1:=FILTER(A1,P);   
• C1:=BACKSET(B1,P+1);   
• D1:=FILTER(C1,P);   
• E1:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);   
• F1:=E1>REF(E1,1);   
• 短壓:DRAWLINE(D1,H,F1,H,1),COLORCYAN;   
• A2:=REF(L,P)=LLV(L,2*P+1);   
• B2:=FILTER(A2,P);   
• C2:=BACKSET(B2,P+1);   
• D2:=FILTER(C2,P);   
• E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);   
• F2:=E2>REF(E2,1);   
• 短支:DRAWLINE(D2,L,F2,L,1),COLORLIRED;   
• AA1:=REF(H,P1)=HHV(H,2*P1+1);   
• BB1:=FILTER(AA1,P1);   
• CC1:=BACKSET(BB1,P1+1);   
• DD1:=FILTER(CC1,P1);   
• EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1);   
• FF1:=EE1>REF(EE1,1);   
• 長壓:DRAWLINE(DD1,H,FF1,H,1),COLORGREEN;   
• AA2:=REF(L,P1)=LLV(L,2*P1+1);   
• BB2:=FILTER(AA2,P1);   
• CC2:=BACKSET(BB2,P1+1);   
• DD2:=FILTER(CC2,P1);   
• EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1);   
• FF2:=EE2>REF(EE2,1);   
• 長支:DRAWLINE(DD2,L,FF2,L,1),COLORRED;   
• STICKLINE(C>=O,C,O,3,0),COLOR000045;   
• STICKLINE(C>=O,C,O,2.5,0),COLOR000065;   
• STICKLINE(C>=O,C,O,2,0),COLOR000085;   
• STICKLINE(C>=O,C,O,1.5,0),COLOR0000A5;   
• STICKLINE(C>=O,C,O,1,0),COLOR0000C5;   
• STICKLINE(C>=O,C,O,0.5,0),COLOR0000E5;   
• STICKLINE(C>=O,H,L,0,0),COLOR0000F5;   
• STICKLINE(C<O,C,O,3,0),COLOR353500;   
• STICKLINE(C<O,C,O,2.5,0),COLOR454500;   
• STICKLINE(C<O,C,O,2,0),COLOR555500;   
• STICKLINE(C<O,C,O,1.5,0),COLOR656500;   
• STICKLINE(C<O,C,O,1,0),COLOR757500;   
• STICKLINE(C<O,C,O,0.5,0),COLOR858500;   
• STICKLINE(C<O,H,L,0,0),COLOR959500;   
• 高:=REFDATE(HHV(H,N),DATE);   
• 低:=REFDATE(LLV(L,N),DATE);   
• H1:=高-(高-低)*0.191;   
• H2:=高-(高-低)*0.382;   
• H3:=高-(高-低)*0.5;   
• H4:=高-(高-低)*0.618;   
• H5:=高-(高-低)*0.809;   
• DRAWTEXT(CURRBARSCOUNT=1,高,'高'),COLORGREEN;   
• DRAWTEXT(CURRBARSCOUNT=1,H1,鮁'),COLORCYAN;   
• DRAWTEXT(CURRBARSCOUNT=1,H2,髂'),COLORGRAY;   
• DRAWTEXT(CURRBARSCOUNT=1,H3,'中'),COLORYELLOW;   
• DRAWTEXT(CURRBARSCOUNT=1,H4,駖'),COLORLIRED;   
• DRAWTEXT(CURRBARSCOUNT=1,H5,餗'),COLORMAGENTA;   
• DRAWTEXT(CURRBARSCOUNT=1,低,'低'),COLORRED;   
• STICKLINE(CURRBARSCOUNT=13,高,高,100,-1),COLORGREEN;   
• STICKLINE(CURRBARSCOUNT=13,H1,H1,100,-1),COLORCYAN;   
• STICKLINE(CURRBARSCOUNT=13,H2,H2,100,-1),COLORGRAY;   
• STICKLINE(CURRBARSCOUNT=13,H3,H3,100,-1),COLORYELLOW;   
• STICKLINE(CURRBARSCOUNT=13,H4,H4,100,-1),COLORLIRED;   
• STICKLINE(CURRBARSCOUNT=13,H5,H5,100,-1),COLORMAGENTA;   
• STICKLINE(CURRBARSCOUNT=13,低,低,100,-1),COLORRED;

公式：

N:=75;
P:=5;
P1:=10;
A1:=REF(H,P)=HHV(H,2*P+1);  
B1:=FILTER(A1,P);  
C1:=BACKSET(B1,P+1);  
D1:=FILTER(C1,P);  
E1:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);  
F1:=E1>REF(E1,1);  
短壓:DRAWLINE(D1,H,F1,H,1),COLORCYAN;  
A2:=REF(L,P)=LLV(L,2*P+1);  
B2:=FILTER(A2,P);  
C2:=BACKSET(B2,P+1);  
D2:=FILTER(C2,P);  
E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);  
F2:=E2>REF(E2,1);  
DRAWLINE(D2,L,F2,L,1),COLORRED;  
AA1:=REF(H,P1)=HHV(H,2*P1+1);  
BB1:=FILTER(AA1,P1);  
CC1:=BACKSET(BB1,P1+1);  
DD1:=FILTER(CC1,P1);  
EE1:=BACKSET(ISLASTBAR,BARSLAST(DD1)+1);  
FF1:=EE1>REF(EE1,1);  
DRAWLINE(DD1,H,FF1,H,1),COLORGREEN;  
AA2:=REF(L,P1)=LLV(L,2*P1+1);  
BB2:=FILTER(AA2,P1);  
CC2:=BACKSET(BB2,P1+1);  
DD2:=FILTER(CC2,P1);  
EE2:=BACKSET(ISLASTBAR,BARSLAST(DD2)+1);  
FF2:=EE2>REF(EE2,1);  
DRAWLINE(DD2,L,FF2,L,1),COLORRED;  
STICKLINE1(C>=O,C,O,3,0),COLOR000045;  
STICKLINE1(C>=O,C,O,2.5,0),COLOR000065;  
STICKLINE1(C>=O,C,O,2,0),COLOR000085;  
STICKLINE1(C>=O,C,O,1.5,0),COLOR0000A5;  
STICKLINE1(C>=O,C,O,1,0),COLOR0000C5;  
STICKLINE1(C>=O,C,O,0.5,0),COLOR0000E5;  
STICKLINE1(C>=O,H,L,0,0),COLOR0000F5;  
STICKLINE1(C<O,C,O,3,0),COLOR353500;  
STICKLINE1(C<O,C,O,2.5,0),COLOR454500;  
STICKLINE1(C<O,C,O,2,0),COLOR555500;  
STICKLINE1(C<O,C,O,1.5,0),COLOR656500;  
STICKLINE1(C<O,C,O,1,0),COLOR757500;  
STICKLINE1(C<O,C,O,0.5,0),COLOR858500;  
STICKLINE1(C<O,H,L,0,0),COLOR959500;  
高:=HHV(H,N);  
低:=LLV(L,N);  
H1:=高-(高-低)*0.191;  
H2:=高-(高-低)*0.382;  
H3:=高-(高-低)*0.5;  
H4:=高-(高-低)*0.618;  
H5:=高-(高-低)*0.809;  
STICKLINE1(BARPOS=13,高,高,100,-1),COLORGREEN;  
STICKLINE1(BARPOS=13,H1,H1,100,-1),COLORCYAN;  
STICKLINE1(BARPOS=13,H2,H2,100,-1),COLORGRAY;  
STICKLINE1(BARPOS=13,H3,H3,100,-1),COLORYELLOW;  
STICKLINE1(BARPOS=13,H4,H4,100,-1),COLORRED;  
STICKLINE1(BARPOS=13,H5,H5,100,-1),COLORMAGENTA;  
STICKLINE1(BARPOS=13,低,低,100,-1),COLORRED;