通达信【大额分析】分时用源码
{【大额分析】 TDX分时用}
TJ:=FILTER(C,239)>0,NODRAW;
TJJ:=SUM(TJ,0),NODRAW;
LTA:=FINANCE(7)+300000000;
C1:=CLOSE;
V1:=TIME;
A1:=COUNT(BARSCOUNT(C)=1 AND TIME<102000 ,0 );
T:=IF(V1<130000,(FLOOR(V1/10000)-9.5)*60+(FLOOR(V1/100)-100*FLOOR(V1/10000)),
(FLOOR(V1/10000)-11)*60+(FLOOR(V1/100)-100*FLOOR(V1/10000))),NODRAW;
成交:=AMOUNT,NODRAW;
总_亿百万:SUM(AMOUNT,T)/1000000,NODRAW;
VV3:=总_亿百万*1000000/T;
SS:=IF(CAPITAL>150000000,0.3,IF(CAPITAL>20000000,0.5,IF(CAPITAL>10000000,0.8,IF(CAPITAL<200000,5,IF(CAPITAL<1000000,3,
IF(CAPITAL<5000000,1.5,1)))))),NODRAW;
VV5:=(REF(VV3,T-1)/CEILING(REF(VV3,T-1)/CAPITAL *10000+0.1))*SS,NODRAW;
大额线:=IF(REF(VV3,T)=REF(VV3,T-1),VV5,REF(VV3,T)),NODRAW;
线位:大额线/1000000,NODRAW;
初正1:=IF(T=1 AND DYNAINFO(4)>=DYNAINFO(3),总_亿百万*1000000,0);
初负1:=IF(T=1 AND DYNAINFO(4)<DYNAINFO(3),总_亿百万*1000000,0);
初正:=CONST(SUM(IF(初正1>=大额线 AND T=1,初正1,0),T)),NODRAW;
初负:=CONST(SUM(IF(初负1>=大额线 AND T=1,初负1,0),T)),NODRAW;
初正2:=CONST(SUM(IF(初正1<大额线 AND T=1,初正1,0),T)),NODRAW;
初负2:=CONST(SUM(IF(初负1<大额线 AND T=1,初负1,0),T)),NODRAW;
T00:=IF(C1>REF(C1,1),0.9,-0.9);
T01:=IF(C1<REF(C1,1),-0.9,0.9);
T02:=T00+T01,NODRAW;
TT1:=BARSLAST(CROSS(T02,+1.5)),NODRAW;
TT2:=BARSLAST(CROSS(-1.5,T02)),NODRAW;
TT:=IF(T02=1.8,1,IF(T02=-1.8,-1,0));
正V1:=IF(TT=1 OR (TT=0 AND TT1<TT2),成交,0),NODRAW;
负V1:=IF(TT=-1 OR (TT=0 AND TT1>TT2),成交,0),NODRAW;
正负0:=IF(成交!= 0 AND (正V1=0 AND 负V1=0),成交,0);
正V0:=IF(正负0!= 0 AND REF(正V1,1)!= 0 ,正负0,0);
负V0:=IF(正负0!= 0 AND REF(负V1,1)!= 0 ,正负0,0);
正V11:=正V1+正V0;
负V11:=负V1+负V0;
正总1:=初正1+SUM(正V11,T),NODRAW,COLOR0000FF;
负总1:=初负1+SUM(负V11,T),NODRAW,COLOR00FF00;
正V:=IF(正V11>=大额线,正V11,0);
负V:=IF(负V11>=大额线,负V11,0);
正V2:=IF(正V11<大额线,正V11,0);
负V2:=IF(负V11<大额线,负V11,0);
大正总:(IF(TJJ<2,初正,0)+SUM(正V,T))/1000000,NODRAW,COLOR0000FF;
大负总:(IF(TJJ<2,初负,0)+SUM(负V,T))/1000000,NODRAW,COLOR00FF00;
大净:(大正总-大负总),NODRAW;
差％:(大正总-大负总)/(大正总+大负总)*100,COLOR00FF00,NODRAW;
正总2:=IF(TJJ<2,初正2,0)+SUM(正V2,T),NODRAW,COLOR0000FF;
负总2:=IF(TJJ<2,初负2,0)+SUM(负V2,T),NODRAW,COLOR00FF00;
小净:(正总2-负总2)/10000,NODRAW;
小差％:(正总2-负总2)/(正总2+负总2)*100,COLOR00FF00,NODRAW;
大额线*100,COLOR00FFFF;
STICKLINE(TT=1 OR 正V0!= 0,0,AMOUNT*100,3,1),COLOR0000FF;
STICKLINE(TT=-1 OR 负V0!= 0,0,AMOUNT*100,3,0),COLOR00FF00;
STICKLINE(TT=0 AND TT1<TT2,0,AMOUNT*100,3,1),COLOR00FFFF;
STICKLINE(TT=0 AND TT1>TT2,0,AMOUNT*100,3,0),COLORFF0000;
STICKLINE(正V>大额线,0,AMOUNT*100,3,1),COLORFF00FF;
STICKLINE(负V>大额线,0,AMOUNT*100,3,0),COLORFFFFFF;
STICKLINE(T=1 AND 初正1>0,0,初正1*100,3,0),COLOR00FFFF;
STICKLINE(T=1 AND 初负1>0,0,初负1*100,3,0),COLORFF0000;
STICKLINE(T=1 AND 初正>0,0,初正*100,3,0),COLORFF00FF;
STICKLINE(T=1 AND 初负>0,0,初负*100,3,0),COLORFFFFFF;
