不同软件函数机制不同，改写效果可能有差异，请理解：
短高H:=(20*H+19*REF(H,1)+18*REF(H,2)+17*REF(H,3)+16*REF(H,4)+15*REF(H,5)+14*REF(H,6)
+13*REF(H,7)+12*REF(H,8)+11*REF(H,9)+10*REF(H,10)+9*REF(H,11)+8*REF(H,12)
+7*REF(H,13)+6*REF(H,14)+5*REF(H,15)+4*REF(H,16)+3*REF(H,17)+2*REF(H,18)+
REF(H,20))/210,COLORBLUE,LINETHICK1;
短低L:=(20*L+19*REF(L,1)+18*REF(L,2)+17*REF(L,3)+16*REF(L,4)+15*REF(L,5)+14*REF(L,6)
+13*REF(L,7)+12*REF(L,8)+11*REF(L,9)+10*REF(L,10)+9*REF(L,11)+8*REF(L,12)
+7*REF(L,13)+6*REF(L,14)+5*REF(L,15)+4*REF(L,16)+3*REF(L,17)+2*REF(L,18)+
REF(L,20))/210,COLORBLUE,LINETHICK1;
D90H:=EMA(短高H,90)-(EMA(短高H,90)-EMA(短低L,90))*0.2,COLORRED,LINETHICK1;
D90L:=EMA(短低L,90)+(EMA(短高H,90)-EMA(短低L,90))*0.2,COLORRED,LINETHICK1;
CC:=H;
25NN:=25;
25AA:=REFX(MA(CC,25NN),25NN/2);
25AA1:=IF(ISNULL(25AA),MA(CC,25NN-INTPART(25NN/2)),25AA);
25BB:=REFX(MA(CC,25NN),25NN/2-1);
25BB1:=IF(ISNULL(25BB),MA(C,25NN-(25NN/2-1)),25BB);
25BZ:=IF(MOD(25NN,2)<>0,25AA1,25BB1);
L25AA:=REFX(MA(L,25NN),25NN/2);
L25AA1:=IF(ISNULL(L25AA),MA(L,25NN-INTPART(25NN/2)),L25AA);
L25BB:=REFX(MA(L,25NN),25NN/2-1);
L25BB1:=IF(ISNULL(L25BB),MA(C,25NN-(25NN/2-1)),L25BB);
L25BZ:=IF(MOD(25NN,2)<>0,L25AA1,L25BB1);
25XX:=25BZ;
X25AA:=REFX(MA(25XX,25NN),25NN/2);
X25AA1:=IF(ISNULL(X25AA),MA(25XX,25NN-INTPART(25NN/2)),X25AA);
X25BB:=REFX(MA(25XX,25NN),25NN/2-1);
X25BB1:=IF(ISNULL(X25BB),MA(C,25NN-(25NN/2-1)),X25BB);
25XB:=IF(MOD(25NN,2)<>0,X25AA1,X25BB1);
25SS:=L25BZ;
S25AA:=REFX(MA(25SS,25NN),25NN/2);
S25AA1:=IF(ISNULL(S25AA),MA(L,25NN-INTPART(25NN/2)),S25AA);
S25BB:=REFX(MA(25SS,25NN),25NN/2-1);
S25BB1:=IF(ISNULL(S25BB),MA(C,25NN-(25NN/2-1)),S25BB);
25SB:=IF(MOD(25NN,2)<>0,S25AA1,S25BB1);
4NN:=4;
4AA:=REFX(MA(CC,4NN),4NN/2);
4AA1:=IF(ISNULL(4AA),MA(CC,4NN-INTPART(4NN/2)),4AA);
4BB:=REFX(MA(CC,4NN),4NN/2-1);
4BB1:=IF(ISNULL(4BB),MA(C,4NN-(4NN/2-1)),4BB);
4BZ:=IF(MOD(4NN,2)<>0,4AA1,4BB1);
L4AA:=REFX(MA(L,4NN),4NN/2);
L4AA1:=IF(ISNULL(L4AA),MA(L,4NN-INTPART(4NN/2)),L4AA);
L4BB:=REFX(MA(L,4NN),4NN/2-1);
L4BB1:=IF(ISNULL(L4BB),MA(C,4NN-(4NN/2-1)),L4BB);
L4BZ:=IF(MOD(4NN,2)<>0,L4AA1,L4BB1);
4XX:=4BZ;
X4AA:=REFX(MA(4XX,4NN),4NN/2);
X4AA1:=IF(ISNULL(X4AA),MA(4XX,4NN-INTPART(4NN/2)),X4AA);
X4BB:=REFX(MA(4XX,4NN),4NN/2-1);
X4BB1:=IF(ISNULL(X4BB),MA(C,4NN-(4NN/2-1)),X4BB);
4XB:=IF(MOD(4NN,2)<>0,X4AA1,X4BB1);
4SS:=L4BZ;
S4AA:=REFX(MA(4SS,4NN),4NN/2);
S4AA1:=IF(ISNULL(S4AA),MA(L,4NN-INTPART(4NN/2)),S4AA);
S4BB:=REFX(MA(4SS,4NN),4NN/2-1);
S4BB1:=IF(ISNULL(S4BB),MA(C,4NN-(4NN/2-1)),S4BB);
4SB:=IF(MOD(4NN,2)<>0,S4AA1,S4BB1);
11NN:=11;
11AA:=REFX(MA(CC,11NN),11NN/2);
11AA1:=IF(ISNULL(11AA),MA(CC,11NN-INTPART(11NN/2)),11AA);
11BB:=REFX(MA(CC,11NN),11NN/2-1);
11BB1:=IF(ISNULL(11BB),MA(C,11NN-(11NN/2-1)),11BB);
11BZ:=IF(MOD(11NN,2)<>0,11AA1,11BB1);
L11AA:=REFX(MA(L,11NN),11NN/2);
L11AA1:=IF(ISNULL(L11AA),MA(L,11NN-INTPART(11NN/2)),L11AA);
L11BB:=REFX(MA(L,11NN),11NN/2-1);
L11BB1:=IF(ISNULL(L11BB),MA(C,11NN-(11NN/2-1)),L11BB);
L11BZ:=IF(MOD(11NN,2)<>0,L11AA1,L11BB1);
11XX:=11BZ;
X11AA:=REFX(MA(11XX,11NN),11NN/2);
X11AA1:=IF(ISNULL(X11AA),MA(11XX,11NN-INTPART(11NN/2)),X11AA);
X11BB:=REFX(MA(11XX,11NN),11NN/2-1);
X11BB1:=IF(ISNULL(X11BB),MA(C,11NN-(11NN/2-1)),X11BB);
11XB:=IF(MOD(11NN,2)<>0,X11AA1,X11BB1);
11SS:=L11BZ;
S11AA:=REFX(MA(11SS,11NN),11NN/2);
S11AA1:=IF(ISNULL(S11AA),MA(L,11NN-INTPART(11NN/2)),S11AA);
S11BB:=REFX(MA(11SS,11NN),11NN/2-1);
S11BB1:=IF(ISNULL(S11BB),MA(C,11NN-(11NN/2-1)),S11BB);
11SB:=IF(MOD(11NN,2)<>0,S11AA1,S11BB1);
14NN:=14;
14AA:=REFX(MA(CC,14NN),14NN/2);
14AA1:=IF(ISNULL(14AA),MA(CC,14NN-INTPART(14NN/2)),14AA);
14BB:=REFX(MA(CC,14NN),14NN/2-1);
14BB1:=IF(ISNULL(14BB),MA(C,14NN-(14NN/2-1)),14BB);
14BZ:=IF(MOD(14NN,2)<>0,14AA1,14BB1);
L14AA:=REFX(MA(L,14NN),14NN/2);
L14AA1:=IF(ISNULL(L14AA),MA(L,14NN-INTPART(14NN/2)),L14AA);
L14BB:=REFX(MA(L,14NN),14NN/2-1);
L14BB1:=IF(ISNULL(L14BB),MA(C,14NN-(14NN/2-1)),L14BB);
L14BZ:=IF(MOD(14NN,2)<>0,L14AA1,L14BB1);
14XX:=14BZ;
X14AA:=REFX(MA(14XX,14NN),14NN/2);
X14AA1:=IF(ISNULL(X14AA),MA(14XX,14NN-INTPART(14NN/2)),X14AA);
X14BB:=REFX(MA(14XX,14NN),14NN/2-1);
X14BB1:=IF(ISNULL(X14BB),MA(C,14NN-(14NN/2-1)),X14BB);
14XB:=IF(MOD(14NN,2)<>0,X14AA1,X14BB1);
14SS:=L14BZ;
S14AA:=REFX(MA(14SS,14NN),14NN/2);
S14AA1:=IF(ISNULL(S14AA),MA(L,14NN-INTPART(14NN/2)),S14AA);
S14BB:=REFX(MA(14SS,14NN),14NN/2-1);
S14BB1:=IF(ISNULL(S14BB),MA(C,14NN-(14NN/2-1)),S14BB);
14SB:=IF(MOD(14NN,2)<>0,S14AA1,S14BB1);
15NN:=15;
15AA:=REFX(MA(CC,15NN),15NN/2);
15AA1:=IF(ISNULL(15AA),MA(CC,15NN-INTPART(15NN/2)),15AA);
15BB:=REFX(MA(CC,15NN),15NN/2-1);
15BB1:=IF(ISNULL(15BB),MA(C,15NN-(15NN/2-1)),15BB);
15BZ:=IF(MOD(15NN,2)<>0,15AA1,15BB1);
L15AA:=REFX(MA(L,15NN),15NN/2);
L15AA1:=IF(ISNULL(L15AA),MA(L,15NN-INTPART(15NN/2)),L15AA);
L15BB:=REFX(MA(L,15NN),15NN/2-1);
L15BB1:=IF(ISNULL(L15BB),MA(C,15NN-(15NN/2-1)),L15BB);
L15BZ:=IF(MOD(15NN,2)<>0,L15AA1,L15BB1);
15XX:=15BZ;
X15AA:=REFX(MA(15XX,15NN),15NN/2);
X15AA1:=IF(ISNULL(X15AA),MA(15XX,15NN-INTPART(15NN/2)),X15AA);
X15BB:=REFX(MA(15XX,15NN),15NN/2-1);
X15BB1:=IF(ISNULL(X15BB),MA(C,15NN-(15NN/2-1)),X15BB);
15XB:=IF(MOD(15NN,2)<>0,X15AA1,X15BB1);
15SS:=L15BZ;
S15AA:=REFX(MA(15SS,15NN),15NN/2);
S15AA1:=IF(ISNULL(S15AA),MA(L,15NN-INTPART(15NN/2)),S15AA);
S15BB:=REFX(MA(15SS,15NN),15NN/2-1);
S15BB1:=IF(ISNULL(S15BB),MA(C,15NN-(15NN/2-1)),S15BB);
15SB:=IF(MOD(15NN,2)<>0,S15AA1,S15BB1);
5NN:=5;
5AA:=REFX(MA(CC,5NN),5NN/2);
5AA1:=IF(ISNULL(5AA),MA(CC,5NN-INTPART(5NN/2)),5AA);
5BB:=REFX(MA(CC,5NN),5NN/2-1);
5BB1:=IF(ISNULL(5BB),MA(C,5NN-(5NN/2-1)),5BB);
5BZ:=IF(MOD(5NN,2)<>0,5AA1,5BB1);
L5AA:=REFX(MA(L,5NN),5NN/2);
L5AA1:=IF(ISNULL(L5AA),MA(L,5NN-INTPART(5NN/2)),L5AA);
L5BB:=REFX(MA(L,5NN),5NN/2-1);
L5BB1:=IF(ISNULL(L5BB),MA(C,5NN-(5NN/2-1)),L5BB);
L5BZ:=IF(MOD(5NN,2)<>0,L5AA1,L5BB1);
5XX:=5BZ;
X5AA:=REFX(MA(5XX,5NN),5NN/2);
X5AA1:=IF(ISNULL(X5AA),MA(5XX,5NN-INTPART(5NN/2)),X5AA);
X5BB:=REFX(MA(5XX,5NN),5NN/2-1);
X5BB1:=IF(ISNULL(X5BB),MA(C,5NN-(5NN/2-1)),X5BB);
5XB:=IF(MOD(5NN,2)<>0,X5AA1,X5BB1);
5SS:=L5BZ;
S5AA:=REFX(MA(5SS,5NN),5NN/2);
S5AA1:=IF(ISNULL(S5AA),MA(L,5NN-INTPART(5NN/2)),S5AA);
S5BB:=REFX(MA(5SS,5NN),5NN/2-1);
S5BB1:=IF(ISNULL(S5BB),MA(C,5NN-(5NN/2-1)),S5BB);
5SB:=IF(MOD(5NN,2)<>0,S5AA1,S5BB1);
8NN:=8;
8AA:=REFX(MA(CC,8NN),8NN/2);
8AA1:=IF(ISNULL(8AA),MA(CC,8NN-INTPART(8NN/2)),8AA);
8BB:=REFX(MA(CC,8NN),8NN/2-1);
8BB1:=IF(ISNULL(8BB),MA(C,8NN-(8NN/2-1)),8BB);
8BZ:=IF(MOD(8NN,2)<>0,8AA1,8BB1);
L8AA:=REFX(MA(L,8NN),8NN/2);
L8AA1:=IF(ISNULL(L8AA),MA(L,8NN-INTPART(8NN/2)),L8AA);
L8BB:=REFX(MA(L,8NN),8NN/2-1);
L8BB1:=IF(ISNULL(L8BB),MA(C,8NN-(8NN/2-1)),L8BB);
L8BZ:=IF(MOD(8NN,2)<>0,L8AA1,L8BB1);
8XX:=8BZ;
X8AA:=REFX(MA(8XX,8NN),8NN/2);
X8AA1:=IF(ISNULL(X8AA),MA(8XX,8NN-INTPART(8NN/2)),X8AA);
X8BB:=REFX(MA(8XX,8NN),8NN/2-1);
X8BB1:=IF(ISNULL(X8BB),MA(C,8NN-(8NN/2-1)),X8BB);
8XB:=IF(MOD(8NN,2)<>0,X8AA1,X8BB1);
8SS:=L8BZ;
S8AA:=REFX(MA(8SS,8NN),8NN/2);
S8AA1:=IF(ISNULL(S8AA),MA(L,8NN-INTPART(8NN/2)),S8AA);
S8BB:=REFX(MA(8SS,8NN),8NN/2-1);
S8BB1:=IF(ISNULL(S8BB),MA(C,8NN-(8NN/2-1)),S8BB);
8SB:=IF(MOD(8NN,2)<>0,S8AA1,S8BB1);
20NN:=20;
20AA:=REFX(MA(CC,20NN),20NN/2);
20AA1:=IF(ISNULL(20AA),MA(CC,20NN-INTPART(20NN/2)),20AA);
20BB:=REFX(MA(CC,20NN),20NN/2-1);
20BB1:=IF(ISNULL(20BB),MA(C,20NN-(20NN/2-1)),20BB);
20BZ:=IF(MOD(20NN,2)<>0,20AA1,20BB1);
L20AA:=REFX(MA(L,20NN),20NN/2);
L20AA1:=IF(ISNULL(L20AA),MA(L,20NN-INTPART(20NN/2)),L20AA);
L20BB:=REFX(MA(L,20NN),20NN/2-1);
L20BB1:=IF(ISNULL(L20BB),MA(C,20NN-(20NN/2-1)),L20BB);
L20BZ:=IF(MOD(20NN,2)<>0,L20AA1,L20BB1);
20XX:=20BZ;
X20AA:=REFX(MA(20XX,20NN),20NN/2);
X20AA1:=IF(ISNULL(X20AA),MA(20XX,20NN-INTPART(20NN/2)),X20AA);
X20BB:=REFX(MA(20XX,20NN),20NN/2-1);
X20BB1:=IF(ISNULL(X20BB),MA(C,20NN-(20NN/2-1)),X20BB);
20XB:=IF(MOD(20NN,2)<>0,X20AA1,X20BB1);
20SS:=L20BZ;
S20AA:=REFX(MA(20SS,20NN),20NN/2);
S20AA1:=IF(ISNULL(S20AA),MA(L,20NN-INTPART(20NN/2)),S20AA);
S20BB:=REFX(MA(20SS,20NN),20NN/2-1);
S20BB1:=IF(ISNULL(S20BB),MA(C,20NN-(20NN/2-1)),S20BB);
20SB:=IF(MOD(20NN,2)<>0,S20AA1,S20BB1);
30NN:=30;
30AA:=REFX(MA(CC,30NN),30NN/2);
30AA1:=IF(ISNULL(30AA),MA(CC,30NN-INTPART(30NN/2)),30AA);
30BB:=REFX(MA(CC,30NN),30NN/2-1);
30BB1:=IF(ISNULL(30BB),MA(C,30NN-(30NN/2-1)),30BB);
30BZ:=IF(MOD(30NN,2)<>0,30AA1,30BB1);
L30AA:=REFX(MA(L,30NN),30NN/2);
L30AA1:=IF(ISNULL(L30AA),MA(L,30NN-INTPART(30NN/2)),L30AA);
L30BB:=REFX(MA(L,30NN),30NN/2-1);
L30BB1:=IF(ISNULL(L30BB),MA(C,30NN-(30NN/2-1)),L30BB);
L30BZ:=IF(MOD(30NN,2)<>0,L30AA1,L30BB1);
30XX:=30BZ;
X30AA:=REFX(MA(30XX,30NN),30NN/2);
X30AA1:=IF(ISNULL(X30AA),MA(30XX,30NN-INTPART(30NN/2)),X30AA);
X30BB:=REFX(MA(30XX,30NN),30NN/2-1);
X30BB1:=IF(ISNULL(X30BB),MA(C,30NN-(30NN/2-1)),X30BB);
30XB:=IF(MOD(30NN,2)<>0,X30AA1,X30BB1);
30SS:=L30BZ;
S30AA:=REFX(MA(30SS,30NN),30NN/2);
S30AA1:=IF(ISNULL(S30AA),MA(L,30NN-INTPART(30NN/2)),S30AA);
S30BB:=REFX(MA(30SS,30NN),30NN/2-1);
S30BB1:=IF(ISNULL(S30BB),MA(C,30NN-(30NN/2-1)),S30BB);
30SB:=IF(MOD(30NN,2)<>0,S30AA1,S30BB1);
40NN:=40;
40AA:=REFX(MA(CC,40NN),40NN/2);
40AA1:=IF(ISNULL(40AA),MA(CC,40NN-INTPART(40NN/2)),40AA);
40BB:=REFX(MA(CC,40NN),40NN/2-1);
40BB1:=IF(ISNULL(40BB),MA(C,40NN-(40NN/2-1)),40BB);
40BZ:=IF(MOD(40NN,2)<>0,40AA1,40BB1);
L40AA:=REFX(MA(L,40NN),40NN/2);
L40AA1:=IF(ISNULL(L40AA),MA(L,40NN-INTPART(40NN/2)),L40AA);
L40BB:=REFX(MA(L,40NN),40NN/2-1);
L40BB1:=IF(ISNULL(L40BB),MA(C,40NN-(40NN/2-1)),L40BB);
L40BZ:=IF(MOD(40NN,2)<>0,L40AA1,L40BB1);
40XX:=40BZ;
X40AA:=REFX(MA(40XX,40NN),40NN/2);
X40AA1:=IF(ISNULL(X40AA),MA(40XX,40NN-INTPART(40NN/2)),X40AA);
X40BB:=REFX(MA(40XX,40NN),40NN/2-1);
X40BB1:=IF(ISNULL(X40BB),MA(C,40NN-(40NN/2-1)),X40BB);
40XB:=IF(MOD(40NN,2)<>0,X40AA1,X40BB1);
40SS:=L40BZ;
S40AA:=REFX(MA(40SS,40NN),40NN/2);
S40AA1:=IF(ISNULL(S40AA),MA(L,40NN-INTPART(40NN/2)),S40AA);
S40BB:=REFX(MA(40SS,40NN),40NN/2-1);
S40BB1:=IF(ISNULL(S40BB),MA(C,40NN-(40NN/2-1)),S40BB);
40SB:=IF(MOD(40NN,2)<>0,S40AA1,S40BB1);
50NN:=50;
50AA:=REFX(MA(CC,50NN),50NN/2);
50AA1:=IF(ISNULL(50AA),MA(CC,50NN-INTPART(50NN/2)),50AA);
50BB:=REFX(MA(CC,50NN),50NN/2-1);
50BB1:=IF(ISNULL(50BB),MA(C,50NN-(50NN/2-1)),50BB);
50BZ:=IF(MOD(50NN,2)<>0,50AA1,50BB1);
L50AA:=REFX(MA(L,50NN),50NN/2);
L50AA1:=IF(ISNULL(L50AA),MA(L,50NN-INTPART(50NN/2)),L50AA);
L50BB:=REFX(MA(L,50NN),50NN/2-1);
L50BB1:=IF(ISNULL(L50BB),MA(C,50NN-(50NN/2-1)),L50BB);
L50BZ:=IF(MOD(50NN,2)<>0,L50AA1,L50BB1);
50XX:=50BZ;
X50AA:=REFX(MA(50XX,50NN),50NN/2);
X50AA1:=IF(ISNULL(X50AA),MA(50XX,50NN-INTPART(50NN/2)),X50AA);
X50BB:=REFX(MA(50XX,50NN),50NN/2-1);
X50BB1:=IF(ISNULL(X50BB),MA(C,50NN-(50NN/2-1)),X50BB);
50XB:=IF(MOD(50NN,2)<>0,X50AA1,X50BB1);
50SS:=L50BZ;
S50AA:=REFX(MA(50SS,50NN),50NN/2);
S50AA1:=IF(ISNULL(S50AA),MA(L,50NN-INTPART(50NN/2)),S50AA);
S50BB:=REFX(MA(50SS,50NN),50NN/2-1);
S50BB1:=IF(ISNULL(S50BB),MA(C,50NN-(50NN/2-1)),S50BB);
50SB:=IF(MOD(50NN,2)<>0,S50AA1,S50BB1);
60NN:=60;
60AA:=REFX(MA(CC,60NN),60NN/2);
60AA1:=IF(ISNULL(60AA),MA(CC,60NN-INTPART(60NN/2)),60AA);
60BB:=REFX(MA(CC,60NN),60NN/2-1);
60BB1:=IF(ISNULL(60BB),MA(C,60NN-(60NN/2-1)),60BB);
60BZ:=IF(MOD(60NN,2)<>0,60AA1,60BB1);
L60AA:=REFX(MA(L,60NN),60NN/2);
L60AA1:=IF(ISNULL(L60AA),MA(L,60NN-INTPART(60NN/2)),L60AA);
L60BB:=REFX(MA(L,60NN),60NN/2-1);
L60BB1:=IF(ISNULL(L60BB),MA(C,60NN-(60NN/2-1)),L60BB);
L60BZ:=IF(MOD(60NN,2)<>0,L60AA1,L60BB1);
60XX:=60BZ;
X60AA:=REFX(MA(60XX,60NN),60NN/2);
X60AA1:=IF(ISNULL(X60AA),MA(60XX,60NN-INTPART(60NN/2)),X60AA);
X60BB:=REFX(MA(60XX,60NN),60NN/2-1);
X60BB1:=IF(ISNULL(X60BB),MA(C,60NN-(60NN/2-1)),X60BB);
60XB:=IF(MOD(60NN,2)<>0,X60AA1,X60BB1);
60SS:=L60BZ;
S60AA:=REFX(MA(60SS,60NN),60NN/2);
S60AA1:=IF(ISNULL(S60AA),MA(L,60NN-INTPART(60NN/2)),S60AA);
S60BB:=REFX(MA(60SS,60NN),60NN/2-1);
S60BB1:=IF(ISNULL(S60BB),MA(C,60NN-(60NN/2-1)),S60BB);
60SB:=IF(MOD(60NN,2)<>0,S60AA1,S60BB1);
90NN:=90;
90AA:=REFX(MA(CC,90NN),90NN/2);
90AA1:=IF(ISNULL(90AA),MA(CC,90NN-INTPART(90NN/2)),90AA);
90BB:=REFX(MA(CC,90NN),90NN/2-1);
90BB1:=IF(ISNULL(90BB),MA(C,90NN-(90NN/2-1)),90BB);
90BZ:=IF(MOD(90NN,2)<>0,90AA1,90BB1);
L90AA:=REFX(MA(L,90NN),90NN/2);
L90AA1:=IF(ISNULL(L90AA),MA(L,90NN-INTPART(90NN/2)),L90AA);
L90BB:=REFX(MA(L,90NN),90NN/2-1);
L90BB1:=IF(ISNULL(L90BB),MA(C,90NN-(90NN/2-1)),L90BB);
L90BZ:=IF(MOD(90NN,2)<>0,L90AA1,L90BB1);
90XX:=90BZ;
X90AA:=REFX(MA(90XX,90NN),90NN/2);
X90AA1:=IF(ISNULL(X90AA),MA(90XX,90NN-INTPART(90NN/2)),X90AA);
X90BB:=REFX(MA(90XX,90NN),90NN/2-1);
X90BB1:=IF(ISNULL(X90BB),MA(C,90NN-(90NN/2-1)),X90BB);
90XB:=IF(MOD(90NN,2)<>0,X90AA1,X90BB1);
90SS:=L90BZ;
S90AA:=REFX(MA(90SS,90NN),90NN/2);
S90AA1:=IF(ISNULL(S90AA),MA(L,90NN-INTPART(90NN/2)),S90AA);
S90BB:=REFX(MA(90SS,90NN),90NN/2-1);
S90BB1:=IF(ISNULL(S90BB),MA(C,90NN-(90NN/2-1)),S90BB);
90SB:=IF(MOD(90NN,2)<>0,S90AA1,S90BB1);
120NN:=120;
120AA:=REFX(MA(CC,120NN),120NN/2);
120AA1:=IF(ISNULL(120AA),MA(CC,120NN-INTPART(120NN/2)),120AA);
120BB:=REFX(MA(CC,120NN),120NN/2-1);
120BB1:=IF(ISNULL(120BB),MA(C,120NN-(120NN/2-1)),120BB);
120BZ:=IF(MOD(120NN,2)<>0,120AA1,120BB1);
L120AA:=REFX(MA(L,120NN),120NN/2);
L120AA1:=IF(ISNULL(L120AA),MA(L,120NN-INTPART(120NN/2)),L120AA);
L120BB:=REFX(MA(L,120NN),120NN/2-1);
L120BB1:=IF(ISNULL(L120BB),MA(C,120NN-(120NN/2-1)),L120BB);
L120BZ:=IF(MOD(120NN,2)<>0,L120AA1,L120BB1);
120XX:=120BZ;
X120AA:=REFX(MA(120XX,120NN),120NN/2);
X120AA1:=IF(ISNULL(X120AA),MA(120XX,120NN-INTPART(120NN/2)),X120AA);
X120BB:=REFX(MA(120XX,120NN),120NN/2-1);
X120BB1:=IF(ISNULL(X120BB),MA(C,120NN-(120NN/2-1)),X120BB);
120XB:=IF(MOD(120NN,2)<>0,X120AA1,X120BB1);
120SS:=L120BZ;
S120AA:=REFX(MA(120SS,120NN),120NN/2);
S120AA1:=IF(ISNULL(S120AA),MA(L,120NN-INTPART(120NN/2)),S120AA);
S120BB:=REFX(MA(120SS,120NN),120NN/2-1);
S120BB1:=IF(ISNULL(S120BB),MA(C,120NN-(120NN/2-1)),S120BB);
120SB:=IF(MOD(120NN,2)<>0,S120AA1,S120BB1);
150NN:=150;
150AA:=REFX(MA(CC,150NN),150NN/2);
150AA1:=IF(ISNULL(150AA),MA(CC,150NN-INTPART(150NN/2)),150AA);
150BB:=REFX(MA(CC,150NN),150NN/2-1);
150BB1:=IF(ISNULL(150BB),MA(C,150NN-(150NN/2-1)),150BB);
150BZ:=IF(MOD(150NN,2)<>0,150AA1,150BB1);
L150AA:=REFX(MA(L,150NN),150NN/2);
L150AA1:=IF(ISNULL(L150AA),MA(L,150NN-INTPART(150NN/2)),L150AA);
L150BB:=REFX(MA(L,150NN),150NN/2-1);
L150BB1:=IF(ISNULL(L150BB),MA(C,150NN-(150NN/2-1)),L150BB);
L150BZ:=IF(MOD(150NN,2)<>0,L150AA1,L150BB1);
150XX:=150BZ;
X150AA:=REFX(MA(150XX,150NN),150NN/2);
X150AA1:=IF(ISNULL(X150AA),MA(150XX,150NN-INTPART(150NN/2)),X150AA);
X150BB:=REFX(MA(150XX,150NN),150NN/2-1);
X150BB1:=IF(ISNULL(X150BB),MA(C,150NN-(150NN/2-1)),X150BB);
150XB:=IF(MOD(150NN,2)<>0,X150AA1,X150BB1);
150SS:=L150BZ;
S150AA:=REFX(MA(150SS,150NN),150NN/2);
S150AA1:=IF(ISNULL(S150AA),MA(L,150NN-INTPART(150NN/2)),S150AA);
S150BB:=REFX(MA(150SS,150NN),150NN/2-1);
S150BB1:=IF(ISNULL(S150BB),MA(C,150NN-(150NN/2-1)),S150BB);
150SB:=IF(MOD(150NN,2)<>0,S150AA1,S150BB1);
高0:=(25XB-25SB)*1+25XB,LINETHICK1,COLORWHITE;
低0:=25SB-(25XB-25SB)*1,LINETHICK1,COLORWHITE;
多头定位:=(高0+低0)/2>(D90H+D90L)/2;
空头定位:=(高0+低0)/2<(D90H+D90L)/2;
波段顶0:=(120XB-120SB)*4+120XB,LINETHICK1,COLORRED;
波段底0:=120SB-(120XB-120SB)*4,LINETHICK1,COLORGREEN;
STICKLINE1(多头定位=1,波段顶0,波段底0,5,0),COLOR001050;
STICKLINE1(空头定位=1,波段顶0,波段底0,5,0),COLOR404050;
中中中:=((15XB+20XB+30XB+40XB)/4+(15SB+20SB+30SB+40SB)/4)/2,NODRAW,COLORGREEN;
EMA中中中:=EMA(中中中,10),NODRAW,COLORWHITE;
A:=(3*C+L+O+H)/6;
B:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)
+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210,COLORRED,LINETHICK1;
D:=MA(B,10),COLORRED,LINETHICK2;
D14:=MA(B,14),COLORRED,LINETHICK2;
D21:=MA(B,21),COLORRED,LINETHICK2;
A1:=MA((3*C+L+O+H)/6,28);
B1:=(20*A1+19*REF(A1,1)+18*REF(A1,2)+17*REF(A1,3)+16*REF(A1,4)+15*REF(A1,5)+14*REF(A1,6)
+13*REF(A1,7)+12*REF(A1,8)+11*REF(A1,9)+10*REF(A1,10)+9*REF(A1,11)+8*REF(A1,12)
+7*REF(A1,13)+6*REF(A1,14)+5*REF(A1,15)+4*REF(A1,16)+3*REF(A1,17)+2*REF(A1,18)+
REF(A1,12))/210,COLORGREEN,LINETHICK1;
D1:=MA(B1,14),COLORGREEN,LINETHICK2;
FILLRGN(B1>D1,B1,D1,RGB(255,0,0));
FILLRGN(B1<D1,B1,D1,RGB(255,255,0));
FILLRGN(D14>D21,D14,D21,RGB(255,0,0));
FILLRGN(D14<D21,D14,D21,RGB(255,255,0));
FILLRGN(B>D,B,D,RGB(255,0,0));
FILLRGN(B<D,B,D,RGB(255,255,0));
中中顶:=(15XB+20XB+30XB+40XB)/4*2-(15SB+20SB+30SB+40SB)/4,LINETHICK2,COLORGREEN;
中中底:=(15SB+20SB+30SB+40SB)/4*2-(15XB+20XB+30XB+40XB)/4,LINETHICK2,COLORGREEN;
短中顶:=(5XB+8XB+11XB+14XB+4XB)/5+((5XB+8XB+11XB+14XB+4XB)/5-(5SB+8SB+11SB+14SB+4SB)/5)/2,NODRAW,COLORWHITE;
短中底:=(5SB+8SB+11SB+14SB)/4-((5XB+8XB+11XB+14XB+4XB)/5-(5SB+8SB+11SB+14SB+4SB)/5)/2,NODRAW,COLORWHITE;
中顶:=(30XB+40XB+50XB+60XB)/4*2.03-(30SB+40SB+50SB+60SB)/4,LINETHICK2,COLORRED;
中底:=(30SB+40SB+50SB+60SB)/4*1.97-(30XB+40XB+50XB+60XB)/4,LINETHICK2,COLORRED;
长顶:=(90XB+120XB+150XB)/3*2.08-(90SB+120SB+150SB)/3,LINETHICK2,COLORYELLOW;
长底:=(90SB+120SB+150SB)/3*1.92-(90XB+120XB+150XB)/3,LINETHICK2,COLORYELLOW;
波段顶:(120XB-120SB)*4+120XB,LINETHICK2,COLORYELLOW;
波段底:120SB-(120XB-120SB)*4,LINETHICK2,COLORYELLOW;
AF长:=EMA((CLOSE+HIGH+LOW)/3,18);
BF长:=REF(AF长,1);
AF中:=EMA((CLOSE+HIGH+LOW)/3,10);
BF中:=REF(AF中,1);
AF5:=EMA((CLOSE+HIGH+LOW)/3,6);
BF5:=REF(AF5,1);
AF3:=EMA((CLOSE+HIGH+LOW)/3,3);
BF3:=REF(AF3,1);
买入定位:=AF长>BF长 OR AF中>BF中 OR AF5>BF5 OR AF3>BF3;
卖出定位:=AF长<BF长 OR AF中<BF中 OR AF5<BF5;
顶底定位:=AF长<BF长 OR AF中<BF中 OR AF5<BF5 OR AF3<BF3;
STICKLINE1(买入定位=1,LOW,HIGH,0.0,1),COLORRED;
STICKLINE1(买入定位=1,CLOSE,OPEN,2,1),COLORRED;
STICKLINE1(AF中<BF中,LOW,HIGH,0.0,0),COLORGREEN;
STICKLINE1(AF中<BF中,CLOSE,OPEN,2,1),COLORGREEN;
STICKLINE1(卖出定位=1 AND 中中顶>中顶,LOW,HIGH,0.0,1),COLORGREEN;
STICKLINE1(卖出定位=1 AND 中中顶>中顶,CLOSE,OPEN,2,1),COLORGREEN;
STICKLINE1(顶底定位=1 AND H>中中顶 AND H>中顶,CLOSE,OPEN,2,1),COLORGREEN;
STICKLINE1(顶底定位=1 AND H>中中顶 AND H>中顶,LOW,HIGH,0.0,1),COLORGREEN;
加仓定位1:=卖出定位=1 AND 中中顶>中顶;
加仓定位2:=顶底定位=1 AND H>中中顶 AND H>中顶;
DRAWTEXT(中中中<EMA中中中 AND CROSS(AF中,BF中) AND 短中底<中中底 AND 短中底<中底,L*0.97,'战神推荐'),COLORFF00FF;
DRAWTEXT(中中中>=EMA中中中 AND CROSS(AF中,BF中) AND 短中底<中中底,L*0.97,'强烈推荐'),COLORFF00FF;
DRAWTEXT(CROSS(BF3,AF3) AND H>中中顶 AND H>中顶,H*1.03,'【逃顶】'),COLORGREEN;
DRAWTEXT(加仓定位1=0 AND 加仓定位2=0 AND CROSS(AF中,BF中) AND 中中中>=EMA中中中,L*0.995,'加'),COLORYELLOW;
DRAWTEXT(CROSS(AF长,BF长) AND 中底<长底,L*0.97,'【抄底】'),COLORRED;
DRAWTEXT(CROSS(AF长,BF长) AND 中底<长底 AND 中底>长底,L*0.97,'中底'),COLORYELLOW;
STICKLINE1(AF中>BF中 AND 短中底<中底 AND 短中底<中底,CLOSE,OPEN,2,0),COLORRED;
DRAWTEXT(AF3>BF3 AND 短中底<中中底 AND H<中中底,L*0.985,'投机'),COLORWHITE;
STICKLINE1(AF3>BF3 AND 短中底<中中底 AND H<中中底,CLOSE,OPEN,2,0),COLORRED;
STICKLINE1(中中中>=EMA中中中 AND CROSS(AF中,BF中) AND AF中<中中中 AND AF中<(中顶+中底)/2 AND H<短中顶,CLOSE,OPEN,3,0),COLORRED;
DRAWTEXT(中中中>=EMA中中中 AND CROSS(AF中,BF中) AND AF中<中中中 AND AF中<(中顶+中底)/2 AND H<短中顶,L*0.97,'【买】'),COLORRED;
DRAWTEXT(CROSS(BF中,AF中) AND 中中中<EMA中中中,H*1.01,'卖'),COLORGREEN;
DRAWICON(AF中<中中中 AND AF中<(中顶+中底)/2 AND H<短中顶 AND CROSS(AF中,BF中) AND 中中中<EMA中中中,L*0.99,1);
DRAWTEXT(CROSS((高0+低0)/2,(D90H+D90L)/2),波段底0*0.965,'【空转多】'),COLORRED;
DRAWTEXT(CROSS((D90H+D90L)/2,(高0+低0)/2),波段顶0*1.04,'【多转空】'),COLORWHITE;
//DX:TRENDLINES(HIGH>=HHV(HIGH,12),HIGH,LOW<=LLV(LOW,12),HHV(HIGH,4));
DRAWLINE1(HIGH>=HHV(HIGH,12),HIGH,LOW<=LLV(LOW,12),HHV(HIGH,4),1),LINETHICK2,COLORMAGENTA;
//KX:TRENDLINES(LOW<=LLV(LOW,12),LOW,HIGH>=HHV(HIGH,12),LLV(LOW,4));
DRAWLINE1(LOW<=LLV(LOW,12),LOW,HIGH>=HHV(HIGH,12),LLV(LOW,4),1),LINETHICK2,COLORWHITE;
DRAWTEXT(ISLASTBAR,波段底,'底'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,波段顶,'顶'),COLORYELLOW;
去掉紫色和白色的线，把最后6行改一下：
//DX:TRENDLINES(HIGH>=HHV(HIGH,12),HIGH,LOW<=LLV(LOW,12),HHV(HIGH,4));
//DRAWLINE1(HIGH>=HHV(HIGH,12),HIGH,LOW<=LLV(LOW,12),HHV(HIGH,4),1),LINETHICK2,COLORMAGENTA;
//KX:TRENDLINES(LOW<=LLV(LOW,12),LOW,HIGH>=HHV(HIGH,12),LLV(LOW,4));
//DRAWLINE1(LOW<=LLV(LOW,12),LOW,HIGH>=HHV(HIGH,12),LLV(LOW,4),1),LINETHICK2,COLORWHITE;
DRAWTEXT(ISLASTBAR,波段底,'底'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,波段顶,'顶'),COLORYELLOW;
