通达信箱顶箱底金振反转主图/选股公式 源码
M:=60; M1:=30; N:=60; N1:=30; 箱顶:MA(REF(HHV(C,30),1),2),LINETHICK2,COLORRED; 箱底:MA(REF(LLV(C,30),1),2),LINETHICK2,COLORRED; DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26); DEA:=EMA(DIFF,9); RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)); K:=SMA(RSV,9,3); D:=SMA(K,9,3); J:=3*K-2*D; A:=CROSS(DIFF,DEA) AND CROSS(K,D) AND CROSS(J,D) AND DIFF<0; A7:=FILTER(A,20); DRAWTEXT(A7,L*0.999,'↑金振'),COLOR0000FF; SA:=CROSS(DEA,DIFF) AND CROSS(D,K) AND CROSS(D,J) AND DIFF>0; A8:=FILTER(SA,20); DRAWTEXT(A8,H,'↓死振'),COLORWHITE; DRAWKLINE(H,O,L,C); G1:=DIFF>REF(DIFF,1) AND DEA>REF(DEA,1); G2:=DIFF<REF(DIFF,1)AND DEA<REF(DEA,1); RSV1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100; K1:=SMA(RSV1,5,1); E1:=SMA(K1,3,1); J1:=3*K1-2*E1; F1:=EMA(J1,12); F2:=REF(F1,1); HH:=HHV(HIGH,3); LL:=LLV(LOW,3); HH1:=BARSLAST((HH>REF(HH,1))); LL1:=BARSLAST((LL<REF(LL,1))); AA1:=(3*C+H+L+O)/6; VAR1:=(8*AA1+7*REF(AA1,1)+6*REF(AA1,2)+5*REF(AA1,3)+4*REF(AA1,4)+3*REF(AA1,5)+2*REF(AA1,6)+REF(AA1,8))/36; VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3; VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3; VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3; VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3; VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3; DRAWBAND(VAR1,RGB(80,50,50),VAR6,RGB(250,250,0)); C1:VAR1,COLORYELLOW,LINETHICK1; C2:VAR6,COLORGREEN,LINETHICK2; C3:IF(VAR1>VAR6 AND VAR6>=REF(VAR6,1),VAR6,DRAWNULL),COLORRED,LINETHICK2; P2:EMA(CLOSE,50),COLORGREEN,LINETHICK3; IF(P2>REF(P2,1), P2,DRAWNULL),COLORRED,LINETHICK3; 多:= CROSS(VAR1>VAR6,0.5) AND CROSS(LL1,HH1); 多1:=BARSLAST(REF(多,1)); 多2:=C>REF(C,多1+1) AND 多; 多3:=FILTER(多2,20) AND P2>REF(P2,1); DRAWTEXT(多3,LL,'↑多'); 空:=CROSS(CROSS(HH1,LL1),0.5) ; 空1:=BARSLAST(REF(空,1)); 空2:=C<REF(C,空1+1) AND 空; 空3:=FILTER(空2,20)AND CROSS(VAR1=VAR6,0.5); DRAWTEXT(空3,HH,'↓空'),COLORYELLOW; BDGD:=C=HHV(C,M); GDSJ:=BARSLAST(FILTER(CROSS(0.08,BDGD),M1))+1; GD:REF(H,GDSJ),COLOR00FF00,POINTDOT,LINETHICK1; TPP:=CROSS(C,REF(GD,1)),COLOR0000FF,POINTDOT,LINETHICK0; STICKLINE(GDSJ<=6,GD,GD,8,0),COLOR0000FF; BDDD:=C=LLV(C,N); DDSJ:=BARSLAST(FILTER(CROSS(0.08,BDDD),N1))+1; DD1:REF(L,DDSJ),COLORYELLOW,POINTDOT,LINETHICK1; STICKLINE(DDSJ<=6,DD1,DD1,8,0),COLORYELLOW; DRAWICON(DDSJ,L,1); LC:=REF(CLOSE,1); WRSI:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100; XG10:=CROSS(20,WRSI); XGT4:=BARSLAST(XG10); AD4:=REF(L,REF(XGT4,1)+1); XG11:=REF(XGT4,1)>20 AND XG10 ; DRAWICON(XG11,L,38); ZS:=REF(CLOSE,1); QS:=SMA(MAX(CLOSE-ZS,0),8,1)/SMA(ABS(CLOSE-ZS),8,1)*100,COLOR0080FF,LINETHICK2; XX:=20; SS:=80; ZZ:=50; XG1:=CROSS(80,QS) ; XG2:=CROSS(QS,15); XG3:=CROSS(QS,19); D1:=FILTER(XG1,10); D2:=FILTER(XG2,10); D3:=FILTER(XG3,10); STICKLINE(D1 AND C<O,C,O,3.6,0 ),COLOR00FFFF; STICKLINE(D3 AND C>O,C,O,3.6,0 ),COLORFF00FF; DRAWICON(D2,L*0.999,25); XGT2:=BARSLAST(XG1); AD2:=REF(L,REF(XGT2,1)+1); XG6:= REF(XGT2,1)>10 AND XG1 ; XGT3:=BARSLAST(XG2); AD3:=REF(L,REF(XGT3,1)+1); XG8:= REF(XGT3,1)>20 AND XG2; BB32: IF(BARSLAST(XG6)<=30 AND (REF(H,BARSLAST(XG6)))=REF(REF(H,BARSLAST(XG6)),1) ,REF(H,BARSLAST(XG6)),DRAWNULL)DOTLINE,COLORMAGENTA; DRAWICON(XG6,H*1.001,2); DRAWICON(XG8,H*1.12,23); A5:=3*SMA((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100,21,1)-2* SMA(SMA((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100,20,1),8,1); AQW:=20; ZQ:=CROSS(A5,AQW); ZQ2:=FILTER(ZQ,20); DRAWTEXT(ZQ2,L*0.999,'↑转'),COLOR0000FF; VAR21:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100; VAR22:=SMA(VAR21,3,1); VAR23:=SMA(VAR22,3,1); VAR24:=SMA(VAR23,3,1); 波:= VAR23; 段:= VAR24; VAR26:=CROSS(VAR23,VAR24) AND VAR23<20; CD:=FILTER(CROSS(VAR23,VAR24),10) ; A26:=HH1>LL1; VAR27:=CROSS(VAR24,VAR23) AND VAR23>80; 小顶:=FILTER(VAR27,5) AND C<VAR6 AND A26 AND NOT(VAR1>VAR6); DRAWTEXT(小顶,HH,'↓空'),COLORGREEN; VAR13:=REF(CLOSE,1); VAR14:=((SMA(MAX((CLOSE - VAR13),0),17,1) / SMA(ABS((CLOSE - VAR13)),17,1)) * 100); 空4:=CROSS(80,VAR14); 高:=FILTER(空4,10); DRAWTEXT(高,HH,'↓高'),COLORMAGENTA; DRAWKLINE(H,O,L,C); 获利比例:WINNER(C)*100,NODRAW; 顶:IF(CURRBARSCOUNT<=60,CONST(IF(ISLASTBAR=1,HHV(H,BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORRED,DOTLINE; 低:IF(CURRBARSCOUNT<=60,CONST(IF(ISLASTBAR=1,LLV(L,BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORGREEN,DOTLINE; STICKLINE(CCI>=200 AND H>=顶,O,C,3,0),COLORBLUE; STICKLINE(CCI<=100 AND L<=低,O,C,3,0),COLORYELLOW;
移动端首页 | PC端
© by gszx.com.cn Mobile Web
通达信箱顶箱底金振反转主图/选股公式 源码
M:=60;
M1:=30;
N:=60;
N1:=30;
箱顶:MA(REF(HHV(C,30),1),2),LINETHICK2,COLORRED;
箱底:MA(REF(LLV(C,30),1),2),LINETHICK2,COLORRED;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9));
K:=SMA(RSV,9,3);
D:=SMA(K,9,3);
J:=3*K-2*D;
A:=CROSS(DIFF,DEA) AND CROSS(K,D) AND CROSS(J,D) AND DIFF<0;
A7:=FILTER(A,20);
DRAWTEXT(A7,L*0.999,'↑金振'),COLOR0000FF;
SA:=CROSS(DEA,DIFF) AND CROSS(D,K) AND CROSS(D,J) AND DIFF>0;
A8:=FILTER(SA,20);
DRAWTEXT(A8,H,'↓死振'),COLORWHITE;
DRAWKLINE(H,O,L,C);
G1:=DIFF>REF(DIFF,1) AND DEA>REF(DEA,1);
G2:=DIFF<REF(DIFF,1)AND DEA<REF(DEA,1);
RSV1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
K1:=SMA(RSV1,5,1);
E1:=SMA(K1,3,1);
J1:=3*K1-2*E1;
F1:=EMA(J1,12);
F2:=REF(F1,1);
HH:=HHV(HIGH,3);
LL:=LLV(LOW,3);
HH1:=BARSLAST((HH>REF(HH,1)));
LL1:=BARSLAST((LL<REF(LL,1)));
AA1:=(3*C+H+L+O)/6;
VAR1:=(8*AA1+7*REF(AA1,1)+6*REF(AA1,2)+5*REF(AA1,3)+4*REF(AA1,4)+3*REF(AA1,5)+2*REF(AA1,6)+REF(AA1,8))/36;
VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;
VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;
VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;
VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
DRAWBAND(VAR1,RGB(80,50,50),VAR6,RGB(250,250,0));
C1:VAR1,COLORYELLOW,LINETHICK1;
C2:VAR6,COLORGREEN,LINETHICK2;
C3:IF(VAR1>VAR6 AND VAR6>=REF(VAR6,1),VAR6,DRAWNULL),COLORRED,LINETHICK2;
P2:EMA(CLOSE,50),COLORGREEN,LINETHICK3;
IF(P2>REF(P2,1), P2,DRAWNULL),COLORRED,LINETHICK3;
多:= CROSS(VAR1>VAR6,0.5) AND CROSS(LL1,HH1);
多1:=BARSLAST(REF(多,1));
多2:=C>REF(C,多1+1) AND 多;
多3:=FILTER(多2,20) AND P2>REF(P2,1);
DRAWTEXT(多3,LL,'↑多');
空:=CROSS(CROSS(HH1,LL1),0.5) ;
空1:=BARSLAST(REF(空,1));
空2:=C<REF(C,空1+1) AND 空;
空3:=FILTER(空2,20)AND CROSS(VAR1=VAR6,0.5);
DRAWTEXT(空3,HH,'↓空'),COLORYELLOW;
BDGD:=C=HHV(C,M);
GDSJ:=BARSLAST(FILTER(CROSS(0.08,BDGD),M1))+1;
GD:REF(H,GDSJ),COLOR00FF00,POINTDOT,LINETHICK1;
TPP:=CROSS(C,REF(GD,1)),COLOR0000FF,POINTDOT,LINETHICK0;
STICKLINE(GDSJ<=6,GD,GD,8,0),COLOR0000FF;
BDDD:=C=LLV(C,N);
DDSJ:=BARSLAST(FILTER(CROSS(0.08,BDDD),N1))+1;
DD1:REF(L,DDSJ),COLORYELLOW,POINTDOT,LINETHICK1;
STICKLINE(DDSJ<=6,DD1,DD1,8,0),COLORYELLOW;
DRAWICON(DDSJ,L,1);
LC:=REF(CLOSE,1);
WRSI:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;
XG10:=CROSS(20,WRSI);
XGT4:=BARSLAST(XG10);
AD4:=REF(L,REF(XGT4,1)+1);
XG11:=REF(XGT4,1)>20 AND XG10 ;
DRAWICON(XG11,L,38);
ZS:=REF(CLOSE,1);
QS:=SMA(MAX(CLOSE-ZS,0),8,1)/SMA(ABS(CLOSE-ZS),8,1)*100,COLOR0080FF,LINETHICK2;
XX:=20;
SS:=80;
ZZ:=50;
XG1:=CROSS(80,QS) ;
XG2:=CROSS(QS,15);
XG3:=CROSS(QS,19);
D1:=FILTER(XG1,10);
D2:=FILTER(XG2,10);
D3:=FILTER(XG3,10);
STICKLINE(D1 AND C<O,C,O,3.6,0 ),COLOR00FFFF;
STICKLINE(D3 AND C>O,C,O,3.6,0 ),COLORFF00FF;
DRAWICON(D2,L*0.999,25);
XGT2:=BARSLAST(XG1);
AD2:=REF(L,REF(XGT2,1)+1);
XG6:= REF(XGT2,1)>10 AND XG1 ;
XGT3:=BARSLAST(XG2);
AD3:=REF(L,REF(XGT3,1)+1);
XG8:= REF(XGT3,1)>20 AND XG2;
BB32: IF(BARSLAST(XG6)<=30
AND (REF(H,BARSLAST(XG6)))=REF(REF(H,BARSLAST(XG6)),1)
,REF(H,BARSLAST(XG6)),DRAWNULL)DOTLINE,COLORMAGENTA;
DRAWICON(XG6,H*1.001,2);
DRAWICON(XG8,H*1.12,23);
A5:=3*SMA((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100,21,1)-2*
SMA(SMA((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100,20,1),8,1);
AQW:=20;
ZQ:=CROSS(A5,AQW);
ZQ2:=FILTER(ZQ,20);
DRAWTEXT(ZQ2,L*0.999,'↑转'),COLOR0000FF;
VAR21:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;
VAR22:=SMA(VAR21,3,1);
VAR23:=SMA(VAR22,3,1);
VAR24:=SMA(VAR23,3,1);
波:= VAR23;
段:= VAR24;
VAR26:=CROSS(VAR23,VAR24) AND VAR23<20;
CD:=FILTER(CROSS(VAR23,VAR24),10) ;
A26:=HH1>LL1;
VAR27:=CROSS(VAR24,VAR23) AND VAR23>80;
小顶:=FILTER(VAR27,5) AND C<VAR6 AND A26 AND NOT(VAR1>VAR6);
DRAWTEXT(小顶,HH,'↓空'),COLORGREEN;
VAR13:=REF(CLOSE,1);
VAR14:=((SMA(MAX((CLOSE - VAR13),0),17,1) / SMA(ABS((CLOSE - VAR13)),17,1)) * 100);
空4:=CROSS(80,VAR14);
高:=FILTER(空4,10);
DRAWTEXT(高,HH,'↓高'),COLORMAGENTA;
DRAWKLINE(H,O,L,C);
获利比例:WINNER(C)*100,NODRAW;
顶:IF(CURRBARSCOUNT<=60,CONST(IF(ISLASTBAR=1,HHV(H,BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORRED,DOTLINE;
低:IF(CURRBARSCOUNT<=60,CONST(IF(ISLASTBAR=1,LLV(L,BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORGREEN,DOTLINE;
STICKLINE(CCI>=200 AND H>=顶,O,C,3,0),COLORBLUE;
STICKLINE(CCI<=100 AND L<=低,O,C,3,0),COLORYELLOW;