老師幫忙優(yōu)化一下 謝謝 [文華財(cái)經(jīng)]
-
咨詢內(nèi)容：
?老師 這個(gè) 源碼 能加上? ?站上EMA34??K線上出笑臉嗎? 跌破 EMA34 K線出? 哭臉? ? 線寬可以調(diào)成2嗎 ??謝謝?
-
文華技術(shù)人員：
?
EMA13:EMA(C,13),LINETHICK2;
EMA34:EMA(C,34),LINETHICK2;
DRAWICON(CROSS(C>EMA(C,34),0.5),H,1);
DRAWICON(CROSS(C<EMA(C,34),0.5),H,2);
A:=IF(HIGH>=REF(HIGH,1) AND HIGH>=REF(HIGH,2) AND HIGH>=REF(HIGH,3) AND HIGH>=REF(HIGH,4) AND HIGH>=REF(HIGH,5),LOW,0);
B:=IF(LOW<=REF(LOW,1) AND LOW<=REF(LOW,2) AND LOW<=REF(LOW,3) AND LOW<=REF(LOW,4) AND LOW<=REF(LOW,5),HIGH,888888);
P1:=IF(A>REF(L,1),REF(L,1),0);
P2:=IF(A>REF(L,2) AND A<=REF(L,1),REF(L,2),0);
P3:=IF(A>REF(L,3) AND A<=REF(L,1) AND A<=REF(L,2),REF(L,3),0);
P4:=IF(A>REF(L,4) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3),REF(L,4),0);
P5:=IF(A>REF(L,5) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4),REF(L,5),0);
P6:=IF(A>REF(L,6) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5),REF(L,6),0);
P7:=IF(A>REF(L,7) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6),REF(L,7),0);
P8:=IF(A>REF(L,8) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6) AND A<=REF(L,7),REF(L,8),0);
P9:=IF(A>REF(L,9) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6) AND A<=REF(L,7) AND A<=REF(L,8),REF(L,9),0);
P10:=IF(A>REF(L,10) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6) AND A<=REF(L,7) AND A<=REF(L,8) AND A<=REF(L,9),REF(L,10),0);
AA:=P1+P2+P3+P4+P5+P6+P7+P8+P9+P10;
PP1:=IF(AA>REF(L,1),REF(L,1),0);
PP2:=IF(AA>REF(L,2) AND AA<=REF(L,1),REF(L,2),0);
PP3:=IF(AA>REF(L,3) AND AA<=REF(L,1) AND AA<=REF(L,2),REF(L,3),0);
PP4:=IF(AA>REF(L,4) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3),REF(L,4),0);
PP5:=IF(AA>REF(L,5) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4),REF(L,5),0);
PP6:=IF(AA>REF(L,6) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5),REF(L,6),0);
PP7:=IF(AA>REF(L,7) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6),REF(L,7),0);
PP8:=IF(AA>REF(L,8) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6) AND AA<=REF(L,7),REF(L,8),0);
PP9:=IF(AA>REF(L,9) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6) AND AA<=REF(L,7) AND AA<=REF(L,8),REF(L,9),0);
PP10:=IF(AA>REF(L,10) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6) AND AA<=REF(L,7) AND AA<=REF(L,8) AND AA<=REF(L,9),REF(L,10),0);
AAA:=PP1+PP2+PP3+PP4+PP5+PP6+PP7+PP8+PP9+PP10;
C1:=VALUEWHEN(AAA>0,AAA);
T1:=IF(B<REF(H,1),REF(H,1),0);
T2:=IF(B<REF(H,2) AND B>=REF(H,1),REF(H,2),0);
T3:=IF(B<REF(H,3) AND B>=REF(H,1) AND B>=REF(H,2),REF(H,3),0);
T4:=IF(B<REF(H,4) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3),REF(H,4),0);
T5:=IF(B<REF(H,5) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4),REF(H,5),0);
T6:=IF(B<REF(H,6) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5),REF(H,6),0);
T7:=IF(B<REF(H,7) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6),REF(H,7),0);
T8:=IF(B<REF(H,8) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6) AND B>=REF(H,7),REF(H,8),0);
T9:=IF(B<REF(H,9) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6) AND B>=REF(H,7) AND B>=REF(H,8),REF(H,9),0);
T10:=IF(B<REF(H,10) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6) AND B>=REF(H,7) AND B>=REF(H,8) AND B>=REF(H,9),REF(H,10),0);
BB:=IF((T1+T2+T3+T4+T5+T6+T7+T8+T9+T10)=0,888888,T1+T2+T3+T4+T5+T6+T7+T8+T9+T10);
TT1:=IF(BB<REF(H,1),REF(H,1),0);
TT2:=IF(BB<REF(H,2) AND BB>=REF(H,1),REF(H,2),0);
TT3:=IF(BB<REF(H,3) AND BB>=REF(H,1) AND BB>=REF(H,2),REF(H,3),0);
TT4:=IF(BB<REF(H,4) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3),REF(H,4),0);
TT5:=IF(BB<REF(H,5) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4),REF(H,5),0);
TT6:=IF(BB<REF(H,6) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5),REF(H,6),0);
TT7:=IF(BB<REF(H,7) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6),REF(H,7),0);
TT8:=IF(BB<REF(H,8) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6) AND BB>=REF(H,7),REF(H,8),0);
TT9:=IF(BB<REF(H,9) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6) AND BB>=REF(H,7) AND BB>=REF(H,8),REF(H,9),0);
TT10:=IF(BB<REF(H,10) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6) AND BB>=REF(H,7) AND BB>=REF(H,8) AND BB>=REF(H,9),REF(H,10),0);
BBB:=TT1+TT2+TT3+TT4+TT5+TT6+TT7+TT8+TT9+TT10;
D:=VALUEWHEN(BBB>0,BBB);
UD:=IF(CLOSE>D AND REF(CLOSE,1)<=D,1,IF(CLOSE<C1 AND REF(CLOSE,1)>=C1,-3,0));
K:=VALUEWHEN(UD<>0,UD);
G:=IF(K=1,C1,D),COLORRED;
POLYLINE1(L>0,G),COLORYELLOW; TMP:=-K; DRAWLINE(TMP>0.00001,HIGH,TMP>0.00001,OPEN,0),COLORCYAN; DRAWLINE(TMP>0.00001,LOW,TMP>0.00001,CLOSE,0),COLORCYAN; DRAWLINE(TMP<-0.00001,HIGH,TMP<-0.00001,CLOSE,0),COLORRED; DRAWLINE(TMP<-0.00001,LOW,TMP<-0.00001,OPEN,0),COLORRED;
DRAWLINE(ABS(TMP)<0.00001,LOW,ABS(TMP)<0.00001,OPEN,0),COLORWHITE; DRAWLINE(ABS(TMP)<0.00001,HIGH,ABS(TMP)<0.00001,OPEN,0),COLORWHITE; STICKLINE1(TMP>0,OPEN,CLOSE,3,1),COLORCYAN; STICKLINE1(TMP>0,L,H,0,1),COLORCYAN; STICKLINE1(TMP<=0,OPEN,CLOSE,3,1),COLORRED; STICKLINE1(TMP<=0,H,MAX(C,O),0,0),COLORRED; STICKLINE1(TMP<=0,L,MIN(C,O),0,1),COLORRED;
STICKLINE1(TMP>0 AND C>O,OPEN,CLOSE,3,1),COLORCYAN; STICKLINE1(TMP>0 AND C>O,OPEN,L,0,1),COLORCYAN; STICKLINE1(TMP>0 AND C>O,C,H,0,1),COLORCYAN; STICKLINE1(TMP>0 AND C<O,OPEN,CLOSE,3,0),COLORCYAN; STICKLINE1(TMP>0 AND C<O,OPEN,L,0,0),COLORCYAN; STICKLINE1(TMP>0 AND C<O,C,H,0,0),COLORCYAN;
STICKLINE1(TMP<=0 AND C>O,OPEN,CLOSE,3,1),COLORRED; STICKLINE1(TMP<=0 AND C>O,OPEN,L,0,1),COLORRED; STICKLINE1(TMP<=0 AND C>O,C,H,0,1),COLORRED; STICKLINE1(TMP<=0 AND C<O,OPEN,CLOSE,3,0),COLORRED; STICKLINE1(TMP<=0 AND C<O,OPEN,L,0,0),COLORRED; STICKLINE1(TMP<=0 AND C<O,C,H,0,0),COLORRED;
?
?來源: www.tumamayizhan.com
-
文華客服：
?老師 最后 最后一次? 再幫忙優(yōu)化一下? 加上一條EMA5 線寬是1就行? K線上能關(guān)掉變色嗎 還原成普通K 線? ? 老師辛苦? 謝謝您了
?
-
網(wǎng)友回復(fù)：
?參考：
?EMA13:EMA(C,13),LINETHICK2; EMA34:EMA(C,34),LINETHICK2; EMA5:EMA(C,5),LINETHICK1; DRAWICON(CROSS(C>EMA(C,34),0.5),H,1); DRAWICON(CROSS(C<EMA(C,34),0.5),H,2); A:=IF(HIGH>=REF(HIGH,1) AND HIGH>=REF(HIGH,2) AND HIGH>=REF(HIGH,3) AND HIGH>=REF(HIGH,4) AND HIGH>=REF(HIGH,5),LOW,0); B:=IF(LOW<=REF(LOW,1) AND LOW<=REF(LOW,2) AND LOW<=REF(LOW,3) AND LOW<=REF(LOW,4) AND LOW<=REF(LOW,5),HIGH,888888); P1:=IF(A>REF(L,1),REF(L,1),0); P2:=IF(A>REF(L,2) AND A<=REF(L,1),REF(L,2),0); P3:=IF(A>REF(L,3) AND A<=REF(L,1) AND A<=REF(L,2),REF(L,3),0); P4:=IF(A>REF(L,4) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3),REF(L,4),0); P5:=IF(A>REF(L,5) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4),REF(L,5),0); P6:=IF(A>REF(L,6) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5),REF(L,6),0); P7:=IF(A>REF(L,7) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6),REF(L,7),0); P8:=IF(A>REF(L,8) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6) AND A<=REF(L,7),REF(L,8),0); P9:=IF(A>REF(L,9) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6) AND A<=REF(L,7) AND A<=REF(L,8),REF(L,9),0); P10:=IF(A>REF(L,10) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6) AND A<=REF(L,7) AND A<=REF(L,8) AND A<=REF(L,9),REF(L,10),0); AA:=P1+P2+P3+P4+P5+P6+P7+P8+P9+P10; PP1:=IF(AA>REF(L,1),REF(L,1),0); PP2:=IF(AA>REF(L,2) AND AA<=REF(L,1),REF(L,2),0); PP3:=IF(AA>REF(L,3) AND AA<=REF(L,1) AND AA<=REF(L,2),REF(L,3),0); PP4:=IF(AA>REF(L,4) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3),REF(L,4),0); PP5:=IF(AA>REF(L,5) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4),REF(L,5),0); PP6:=IF(AA>REF(L,6) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5),REF(L,6),0); PP7:=IF(AA>REF(L,7) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6),REF(L,7),0); PP8:=IF(AA>REF(L,8) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6) AND AA<=REF(L,7),REF(L,8),0); PP9:=IF(AA>REF(L,9) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6) AND AA<=REF(L,7) AND AA<=REF(L,8),REF(L,9),0); PP10:=IF(AA>REF(L,10) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6) AND AA<=REF(L,7) AND AA<=REF(L,8) AND AA<=REF(L,9),REF(L,10),0); AAA:=PP1+PP2+PP3+PP4+PP5+PP6+PP7+PP8+PP9+PP10; C1:=VALUEWHEN(AAA>0,AAA); T1:=IF(B<REF(H,1),REF(H,1),0); T2:=IF(B<REF(H,2) AND B>=REF(H,1),REF(H,2),0); T3:=IF(B<REF(H,3) AND B>=REF(H,1) AND B>=REF(H,2),REF(H,3),0); T4:=IF(B<REF(H,4) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3),REF(H,4),0); T5:=IF(B<REF(H,5) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4),REF(H,5),0); T6:=IF(B<REF(H,6) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5),REF(H,6),0); T7:=IF(B<REF(H,7) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6),REF(H,7),0); T8:=IF(B<REF(H,8) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6) AND B>=REF(H,7),REF(H,8),0); T9:=IF(B<REF(H,9) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6) AND B>=REF(H,7) AND B>=REF(H,8),REF(H,9),0); T10:=IF(B<REF(H,10) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6) AND B>=REF(H,7) AND B>=REF(H,8) AND B>=REF(H,9),REF(H,10),0); BB:=IF((T1+T2+T3+T4+T5+T6+T7+T8+T9+T10)=0,888888,T1+T2+T3+T4+T5+T6+T7+T8+T9+T10); TT1:=IF(BB<REF(H,1),REF(H,1),0); TT2:=IF(BB<REF(H,2) AND BB>=REF(H,1),REF(H,2),0); TT3:=IF(BB<REF(H,3) AND BB>=REF(H,1) AND BB>=REF(H,2),REF(H,3),0); TT4:=IF(BB<REF(H,4) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3),REF(H,4),0); TT5:=IF(BB<REF(H,5) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4),REF(H,5),0); TT6:=IF(BB<REF(H,6) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5),REF(H,6),0); TT7:=IF(BB<REF(H,7) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6),REF(H,7),0); TT8:=IF(BB<REF(H,8) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6) AND BB>=REF(H,7),REF(H,8),0); TT9:=IF(BB<REF(H,9) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6) AND BB>=REF(H,7) AND BB>=REF(H,8),REF(H,9),0); TT10:=IF(BB<REF(H,10) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6) AND BB>=REF(H,7) AND BB>=REF(H,8) AND BB>=REF(H,9),REF(H,10),0); BBB:=TT1+TT2+TT3+TT4+TT5+TT6+TT7+TT8+TT9+TT10; D:=VALUEWHEN(BBB>0,BBB); UD:=IF(CLOSE>D AND REF(CLOSE,1)<=D,1,IF(CLOSE<C1 AND REF(CLOSE,1)>=C1,-3,0)); K:=VALUEWHEN(UD<>0,UD); G:=IF(K=1,C1,D),COLORRED;
POLYLINE1(L>0,G),COLORYELLOW; TMP:=-K; /*DRAWLINE(TMP>0.00001,HIGH,TMP>0.00001,OPEN,0),COLORCYAN; DRAWLINE(TMP>0.00001,LOW,TMP>0.00001,CLOSE,0),COLORCYAN; DRAWLINE(TMP<-0.00001,HIGH,TMP<-0.00001,CLOSE,0),COLORRED; DRAWLINE(TMP<-0.00001,LOW,TMP<-0.00001,OPEN,0),COLORRED;
DRAWLINE(ABS(TMP)<0.00001,LOW,ABS(TMP)<0.00001,OPEN,0),COLORWHITE; DRAWLINE(ABS(TMP)<0.00001,HIGH,ABS(TMP)<0.00001,OPEN,0),COLORWHITE; STICKLINE1(TMP>0,OPEN,CLOSE,3,1),COLORCYAN; STICKLINE1(TMP>0,L,H,0,1),COLORCYAN; STICKLINE1(TMP<=0,OPEN,CLOSE,3,1),COLORRED; STICKLINE1(TMP<=0,H,MAX(C,O),0,0),COLORRED; STICKLINE1(TMP<=0,L,MIN(C,O),0,1),COLORRED;
STICKLINE1(TMP>0 AND C>O,OPEN,CLOSE,3,1),COLORCYAN; STICKLINE1(TMP>0 AND C>O,OPEN,L,0,1),COLORCYAN; STICKLINE1(TMP>0 AND C>O,C,H,0,1),COLORCYAN; STICKLINE1(TMP>0 AND C<O,OPEN,CLOSE,3,0),COLORCYAN; STICKLINE1(TMP>0 AND C<O,OPEN,L,0,0),COLORCYAN; STICKLINE1(TMP>0 AND C<O,C,H,0,0),COLORCYAN;
STICKLINE1(TMP<=0 AND C>O,OPEN,CLOSE,3,1),COLORRED; STICKLINE1(TMP<=0 AND C>O,OPEN,L,0,1),COLORRED; STICKLINE1(TMP<=0 AND C>O,C,H,0,1),COLORRED; STICKLINE1(TMP<=0 AND C<O,OPEN,CLOSE,3,0),COLORRED; STICKLINE1(TMP<=0 AND C<O,OPEN,L,0,0),COLORRED; STICKLINE1(TMP<=0 AND C<O,C,H,0,0),COLORRED; */
EMA13:EMA(C,13);
EMA34:EMA(C,34);
DRAWICON(CROSS(C>EMA(C,34),0.5),H,1);
DRAWICON(CROSSDOWN(C<EMA(C,34),0.5),H,2);
A:=IF(HIGH>=REF(HIGH,1) AND HIGH>=REF(HIGH,2) AND HIGH>=REF(HIGH,3) AND HIGH>=REF(HIGH,4) AND HIGH>=REF(HIGH,5),LOW,0);
B:=IF(LOW<=REF(LOW,1) AND LOW<=REF(LOW,2) AND LOW<=REF(LOW,3) AND LOW<=REF(LOW,4) AND LOW<=REF(LOW,5),HIGH,888888);
P1:=IF(A>REF(L,1),REF(L,1),0);
P2:=IF(A>REF(L,2) AND A<=REF(L,1),REF(L,2),0);
P3:=IF(A>REF(L,3) AND A<=REF(L,1) AND A<=REF(L,2),REF(L,3),0);
P4:=IF(A>REF(L,4) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3),REF(L,4),0);
P5:=IF(A>REF(L,5) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4),REF(L,5),0);
P6:=IF(A>REF(L,6) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5),REF(L,6),0);
P7:=IF(A>REF(L,7) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6),REF(L,7),0);
P8:=IF(A>REF(L,8) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6) AND A<=REF(L,7),REF(L,8),0);
P9:=IF(A>REF(L,9) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6) AND A<=REF(L,7) AND A<=REF(L,8),REF(L,9),0);
P10:=IF(A>REF(L,10) AND A<=REF(L,1) AND A<=REF(L,2) AND A<=REF(L,3) AND A<=REF(L,4) AND A<=REF(L,5) AND A<=REF(L,6) AND A<=REF(L,7) AND A<=REF(L,8) AND A<=REF(L,9),REF(L,10),0);
AA:=P1+P2+P3+P4+P5+P6+P7+P8+P9+P10;
PP1:=IF(AA>REF(L,1),REF(L,1),0);
PP2:=IF(AA>REF(L,2) AND AA<=REF(L,1),REF(L,2),0);
PP3:=IF(AA>REF(L,3) AND AA<=REF(L,1) AND AA<=REF(L,2),REF(L,3),0);
PP4:=IF(AA>REF(L,4) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3),REF(L,4),0);
PP5:=IF(AA>REF(L,5) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4),REF(L,5),0);
PP6:=IF(AA>REF(L,6) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5),REF(L,6),0);
PP7:=IF(AA>REF(L,7) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6),REF(L,7),0);
PP8:=IF(AA>REF(L,8) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6) AND AA<=REF(L,7),REF(L,8),0);
PP9:=IF(AA>REF(L,9) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6) AND AA<=REF(L,7) AND AA<=REF(L,8),REF(L,9),0);
PP10:=IF(AA>REF(L,10) AND AA<=REF(L,1) AND AA<=REF(L,2) AND AA<=REF(L,3) AND AA<=REF(L,4) AND AA<=REF(L,5) AND AA<=REF(L,6) AND AA<=REF(L,7) AND AA<=REF(L,8) AND AA<=REF(L,9),REF(L,10),0);
AAA:=PP1+PP2+PP3+PP4+PP5+PP6+PP7+PP8+PP9+PP10;
C1:=VALUEWHEN(AAA>0,AAA);
T1:=IF(B<REF(H,1),REF(H,1),0);
T2:=IF(B<REF(H,2) AND B>=REF(H,1),REF(H,2),0);
T3:=IF(B<REF(H,3) AND B>=REF(H,1) AND B>=REF(H,2),REF(H,3),0);
T4:=IF(B<REF(H,4) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3),REF(H,4),0);
T5:=IF(B<REF(H,5) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4),REF(H,5),0);
T6:=IF(B<REF(H,6) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5),REF(H,6),0);
T7:=IF(B<REF(H,7) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6),REF(H,7),0);
T8:=IF(B<REF(H,8) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6) AND B>=REF(H,7),REF(H,8),0);
T9:=IF(B<REF(H,9) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6) AND B>=REF(H,7) AND B>=REF(H,8),REF(H,9),0);
T10:=IF(B<REF(H,10) AND B>=REF(H,1) AND B>=REF(H,2) AND B>=REF(H,3) AND B>=REF(H,4) AND B>=REF(H,5) AND B>=REF(H,6) AND B>=REF(H,7) AND B>=REF(H,8) AND B>=REF(H,9),REF(H,10),0);
BB:=IF((T1+T2+T3+T4+T5+T6+T7+T8+T9+T10)=0,888888,T1+T2+T3+T4+T5+T6+T7+T8+T9+T10);
TT1:=IF(BB<REF(H,1),REF(H,1),0);
TT2:=IF(BB<REF(H,2) AND BB>=REF(H,1),REF(H,2),0);
TT3:=IF(BB<REF(H,3) AND BB>=REF(H,1) AND BB>=REF(H,2),REF(H,3),0);
TT4:=IF(BB<REF(H,4) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3),REF(H,4),0);
TT5:=IF(BB<REF(H,5) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4),REF(H,5),0);
TT6:=IF(BB<REF(H,6) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5),REF(H,6),0);
TT7:=IF(BB<REF(H,7) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6),REF(H,7),0);
TT8:=IF(BB<REF(H,8) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6) AND BB>=REF(H,7),REF(H,8),0);
TT9:=IF(BB<REF(H,9) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6) AND BB>=REF(H,7) AND BB>=REF(H,8),REF(H,9),0);
TT10:=IF(BB<REF(H,10) AND BB>=REF(H,1) AND BB>=REF(H,2) AND BB>=REF(H,3) AND BB>=REF(H,4) AND BB>=REF(H,5) AND BB>=REF(H,6) AND BB>=REF(H,7) AND BB>=REF(H,8) AND BB>=REF(H,9),REF(H,10),0);
BBB:=TT1+TT2+TT3+TT4+TT5+TT6+TT7+TT8+TT9+TT10;
D:=VALUEWHEN(BBB>0,BBB);
UD:=IF(CLOSE>D AND REF(CLOSE,1)<=D,1,IF(CLOSE<C1 AND REF(CLOSE,1)>=C1,-3,0));
K:=VALUEWHEN(UD<>0,UD);
G:=IF(K=1,C1,D),COLORRED;
POLYLINE1(L>0,G),COLORYELLOW;
TMP:=-K;
DRAWLINE(TMP>0.00001,HIGH,TMP>0.00001,OPEN,0),COLORCYAN;
DRAWLINE(TMP>0.00001,LOW,TMP>0.00001,CLOSE,0),COLORCYAN;
DRAWLINE(TMP<-0.00001,HIGH,TMP<-0.00001,CLOSE,0),COLORRED;
DRAWLINE(TMP<-0.00001,LOW,TMP<-0.00001,OPEN,0),COLORRED;
DRAWLINE(ABS(TMP)<0.00001,LOW,ABS(TMP)<0.00001,OPEN,0),COLORWHITE;
DRAWLINE(ABS(TMP)<0.00001,HIGH,ABS(TMP)<0.00001,OPEN,0),COLORWHITE;
STICKLINE1(TMP>0,OPEN,CLOSE,3,1),COLORCYAN;
STICKLINE1(TMP>0,L,H,0,1),COLORCYAN;
STICKLINE1(TMP<=0,OPEN,CLOSE,3,1),COLORRED;
STICKLINE1(TMP<=0,H,MAX(C,O),0,0),COLORRED;
STICKLINE1(TMP<=0,L,MIN(C,O),0,1),COLORRED;
STICKLINE1(TMP>0 AND C>O,OPEN,CLOSE,3,1),COLORCYAN;
STICKLINE1(TMP>0 AND C>O,OPEN,L,0,1),COLORCYAN;
STICKLINE1(TMP>0 AND C>O,C,H,0,1),COLORCYAN;
STICKLINE1(TMP>0 AND C<O,OPEN,CLOSE,3,0),COLORCYAN;
STICKLINE1(TMP>0 AND C<O,OPEN,L,0,0),COLORCYAN;
STICKLINE1(TMP>0 AND C<O,C,H,0,0),COLORCYAN;
STICKLINE1(TMP<=0 AND C>O,OPEN,CLOSE,3,1),COLORRED;
STICKLINE1(TMP<=0 AND C>O,OPEN,L,0,1),COLORRED;
STICKLINE1(TMP<=0 AND C>O,C,H,0,1),COLORRED;
STICKLINE1(TMP<=0 AND C<O,OPEN,CLOSE,3,0),COLORRED;
STICKLINE1(TMP<=0 AND C<O,OPEN,L,0,0),COLORRED;
STICKLINE1(TMP<=0 AND C<O,C,H,0,0),COLORRED;
?
?來源:程序化99
有思路，想編寫各種指標(biāo)公式，交易模型，選股公式，還原公式的朋友
可聯(lián)系技術(shù)人員 QQ: 262069696 或微信號(hào)：cxh99cxh99 進(jìn)行 有償收費(fèi) 編寫！
（怎么收費(fèi)，代編流程等詳情請(qǐng)點(diǎn)擊閱讀！）
(注：由于人數(shù)限制，QQ或微信請(qǐng)選擇方便的一個(gè)聯(lián)系我們就行，加好友時(shí)請(qǐng)簡(jiǎn)單備注下您的需求，否則無法通過。謝謝您！)
相關(guān)文章
-
沒有相關(guān)內(nèi)容
會(huì)員登錄/注冊(cè)