相關標簽:

?

雪狐-實盤分析系統
KK:=DATE<1091230;
Q:=DATACOUNT;
R:=DYNAINFO(3);
HH:=DYNAINFO(5);
LL:=DYNAINFO(6);
F:=MAX(HH-R,R-LL);
FF:=F/R*100;
Q1:=IF(FF<1,0.9898*R,R-F*1.01);
Q2:=IF(FF<1,0.9798*R,R-2*F*1.0125);
Q3:=IF(FF<1,0.9698*R,R-3*F*1.014);
Q4:=IF(FF<1,0.9898*R,R+F*1.01);
DRAWTEXT(TIME=93100,Q4*0.995,'〖概念-題材〗：\n'+BLKNAME),ALIGN4,colorFFCC00;
PARTLINE(KK,EMA(COST(50),500)),color808080;
PARTLINE(KK,EMA(COST(50),640)),color808080;
PARTLINE(KK,EMA(COST(50),1000)),color808080;
PARTLINE(KK,EMA(COST(50),1280)),color808080;
PARTLINE(KK,EMA(COST(50),1920)),color808080;
PARTLINE(KK,EMA(COST(50),2100)),color808080;
PARTLINE(KK,EMA(COST(50),2300)),color808080;
PARTLINE(KK,EMA(COST(50),2500)),color808080;
PARTLINE(KK,EMA(COST(50),2800)),color808080;
PARTLINE(KK,EMA(COST(50),3200)),color808080;
PARTLINE(KK,EMA(COST(50),3600)),color808080;
PARTLINE(KK,EMA(COST(50),4000)),color808080;
PARTLINE(KK,EMA(COST(50),4200)),color808080;
PARTLINE(KK,EMA(COST(50),4600)),color808080;
PARTLINE(KK,EMA(COST(50),5000)),color808080;
PARTLINE(KK,EMA(COST(50),5500)),color808080;
PARTLINE(KK,EMA(COST(50),6120)),color808080;
PARTLINE(KK,EMA(COST(50),7680)),color808080;
PARTLINE(KK,EMA(COST(50),12240)),color808080;
PARTLINE(KK,EMA(COST(50),15360)),color808080;
ZS:=DYNAINFO(3);
DK:=(SMA(CLOSE,2,1)-SMA(CLOSE,6,1))*2;
KK:=IF(CLOSE AND KK,ZS+DK,0);
KK1:=IF(DK>0,KK,ZS);
KK20:=IF(DK<0,KK,ZS);
STICKLINE(KK1,ZS,KK1,2,0),colorFF;
STICKLINE(KK20,ZS,KK20,2,0),colorFF00;
主買:=SUM(IF(BUYVOL AND TIME>93000,BUYVOL,0),0);
VAR10:=INDEXC;
RC:=DYNAINFO(3);
OO:=OPEN;
CH:=HHV(MAX(HIGH,RC),0);
CL:=LLV(MIN(LOW,RC),0);
PH:=HHV(VAR10,0);
PL:=LLV(VAR10,0);
B:=(CH-CL)/(PH-PL)*0.8;
Y:=(CH+CL-B*(PH+PL))/2;
P:=VAR10*B[DATACOUNT]+Y[DATACOUNT];
PP:P-(P[1]-OO[1]),colorFF00FF;
JD:=INTPART(MINUTE);
JDPS:=BARPOS=1 OR JD<>REF(JD,1);
JDPE:=REFX(JDPS,1) OR ISLASTBAR;
JDTS:=BARSLAST(JDPS)+1;
PKL:=IF(FINANCE(7)*CLOSE/1000000000>=0.8,FINANCE(7)*CLOSE*3/1000,FINANCE(7)*CLOSE*5/1000);
FA:=IF(BUYVOL AND VOL*CLOSE>=PKL,VOL,0);
WA1:=SUM(FA,JDTS);
JD1:=INTPART(MINUTE);
JDPS1:=BARPOS=1 OR JD1<>REF(JD1,1);
JDPE1:=REFX(JDPS1,1) OR ISLASTBAR;
JDTS1:=BARSLAST(JDPS1)+1;
FA1:=IF(SELLVOL AND VOL*CLOSE>=PKL,VOL,0);
WA2:=SUM(FA1,JDTS1);
RS:=WA1;
RH:=HHV(RS,0);
RL:=LLV(RS,0);
RB:=(Q1-Q2)/(RH-RL);
RY:=(Q1+Q2-RB*(RH+RL))/2;
DP:=RS*RB[Q]+RY[Q];
R2:=WA2;
RH2:=HHV(R2,0);
RL2:=LLV(R2,0);
RB2:=(Q1-Q2)/(RH2-RL2);
RY2:=(Q1+Q2-RB2*(RH2+RL2))/2;
DP2:=R2*RB2[Q]+RY2[Q];
STICKLINE(DP2 AND KK,Q2,DP2,2,0),colorFF00;
STICKLINE(DP AND KK,Q2,DP,2,0),colorFF00FF;
ZV:="VOL.MA1##min60"(5,1,1);
T1:=IF(HOUR<12,570,660);
T:=HOUR*60+MINUTE-T1;
量比:=IF(TIME>93100 AND KK,主買/T/(ZV/240),0);
R8:=量比/100;
RH8:=HHV(R8,0);
RL8:=LLV(R8,0);
RB8:=(Q2-Q3)/(RH8-RL8);
RY8:=(Q2+Q3-RB8*(RH8+RL8))/2;
DP8:R8*RB8[Q]+RY8[Q],colorFF;
A1:=IF(TIME>93000,SUM((CLOSE=BIDPRICE(1))*VOL,0),Q2);
A2:=IF(TIME>93000,SUM(BIDVOL(1),0),Q2);
B1:=IF(TIME>93000,SUM((CLOSE=ASKPRICE(1))*VOL,0),Q2);
B2:=IF(TIME>93000,SUM(ASKVOL(1),0),Q2);
VAR1:=A1/A2*10;
VAR2:=B1/B2*10;
R:=VAR1;
RH:=HHV(R,0);
RL:=LLV(R,0);
RB:=(Q1-Q2)/(RH-RL);
RY:=(Q1+Q2-RB*(RH+RL))/2;
DP:R*RB[Q]+RY[Q],colorFF;
R1:=VAR2;
RH1:=HHV(R1,0);
RL1:=LLV(R1,0);
RB1:=(Q1-Q2)/(RH1-RL1);
RY1:=(Q1+Q2-RB1*(RH1+RL1))/2;
DP1:R1*RB1[Q]+RY1[Q],colorFFCC00;
X:=CLOSE;
X1:=X[1];
X2:=X[2];
X3:=IF(BUYVOL,VOL,0);
G1:=X3[1];
G2:=X3[2];
G3:=FINANCE(7)<30000;
G4:=DYNAINFO(4)>=DYNAINFO(3);
DRAWTEXT(TIME=93100,Q4*0.995,'〖概念-題材〗：\n'+BLKNAME),ALIGN4,colorFFCC00;
DRAWTEXT(TIME=93100,Q2*0.995,'〖大資金量比〗'),colorFFFF;
DRAWTEXT(TIME=93100,Q1*0.998,'〖掛單成交比〗'),colorFF00;

{程序化交易 www.kzuj.com.cn }

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?