☆☆新年快乐☆☆ (飞狐也有礼品)

操盘手

2009年元旦祝朋友们：新年快乐！万事如意！(飞狐礼品在9楼)

送组合后的分时资金图《分时均线 》和分时量图《大额分析》。

也可以组合到自已喜欢公式中。因大单数和图是分离式的，所以一定要组合

在资金图和炒股指标中。

完全显示要求四天以上的扩展数据，数据不全只显对应量图不显买卖对比。





{分时均线DZH2}
input:p1(10,0,999,1),p2(20,0,999,1),p3(120,0,999,1),p4(250,0,999,1);
MA1:MA(CLOSE,P1);
MA2:MA(CLOSE,P2);
MA3:MA(CLOSE,P3);
MA4:MA(CLOSE,P4);
rcc:=DYNAINFO(3);
s2:=sma(c,3,1);
s6:=sma(c,5,1);
dk:=5*(s2-s6);
kk:=IF(DATATYPE=8,0.95,1);
STICKLINE(dk>0,rcc*kk,rcc*kk+dk,0,1),COLORRED;
STICKLINE(dk<0,rcc*kk,rcc*kk+dk,0,1),COLORCYAN;


DRAWTEXTREL(20,200,BKNAME),COLOR0055FF;
大前诤:="分时引2.大前诤#day";
大前换:="分时引2.大前换#day";
DRAWTEXTREL(0,520,'大前日诤:'+NUMTOSTRN(大前诤,2)),Color00FFFF,LINETHICK3,LAYER0;
DRAWTEXTREL(290,520,'%:'+NUMTOSTRN(大前换,2)),Color00FFFF,LINETHICK3,LAYER0;
前大单净:="分时引2.前总诤#day";
前大单换:="分时引2.前换#day";
DRAWTEXTREL(0,640,'前大单净:'+NUMTOSTRN(前大单净,2)),Color00FFFF,LINETHICK3,LAYER0;
DRAWTEXTREL(290,640,'%:'+NUMTOSTRN(前大单换,2)),Color00FFFF,LINETHICK3,LAYER0;
昨大单净:="分时引2.咋总诤#day";
昨大单换:="分时引2.咋换#day";
DRAWTEXTREL(0,760,'昨大单净:'+NUMTOSTRN(昨大单净,2)),Color00FFFF,LINETHICK3,LAYER0;
DRAWTEXTREL(290,760,'%:'+NUMTOSTRN(昨大单换,2)),Color00FFFF,LINETHICK3,LAYER0;
大单净量:="分时引2.日总诤#day";
大单换:="分时引2.总净换#day";
DRAWTEXTREL(0,880,'大单净量:'+NUMTOSTRN(大单净量,0)),Color00FFFF,LINETHICK3,LAYER0;
DRAWTEXTREL(290,880,'%:'+NUMTOSTRN(大单换,2)),Color00FFFF,LINETHICK2,LAYER0;

===================================================

{大额分析分时和股指分笔用}
input:n(5,0,100);
C1:=CLOSE;
C2:=DYNAINFO(3);
AA1:=CEILING(("辅助002.A2#DAY"/10000));
AA2:=CEILING(("辅助002.A2#DAY"/20000));
A2:=IF(CATEGORY=0,AA2,AA1);
成交额:AMOUNT,LINETHICK0,PRECIS0;
大额线￥万:IF(CATEGORY=0 AND DATATYPE=2,CEILING(A2*N*3 /10000),
IF(CATEGORY=0 AND DATATYPE=1, CEILING(A2*N*15/10000),
IF(CATEGORY=2 AND DATATYPE=2, CEILING(A2*N*7/10000),
IF(CATEGORY=2 AND DATATYPE=1, CEILING(A2*N*12/10000),
IF(CATEGORY=1 AND DATATYPE=1, CEILING(A2*N*7/10000),
IF(CATEGORY=1 AND DATATYPE=2, CEILING(A2*N/10000),
CEILING(A2*N/10000))))))),LINETHICK0,COLOR00FFFF,PRECIS0;
大额线:大额线￥万*10000,COLOR00FFFF,PRECIS0;
mm222:=SUM(AMOUNT,0);
初正1:=SUM(IF(BARPOS<2 AND C1>=C2,mm222,0),0);
初负1:=SUM(IF(BARPOS<2 AND C1<C2,mm222,0),0);
初正:=IF(初正1>大额线 AND BARPOS<2,初正1,0);
初负:=IF(初负1>大额线 AND BARPOS<2,初负1,0);
T00:=IF(C1>REF(c1,1),0.9,-0.9);
T01:=IF(C1<REF(c1,1),-0.9,0.9);
T02:=T00+T01;
TT1:=BARSLAST(CROSS(T02,0));
TT2:=BARSLAST(CROSS(0,T02));
TT:=IF(T02=1.8,1,IF(T02=-1.8,-1,0));
正V1:=IF(TT=1 OR (TT=0 AND TT1>TT2),成交额,0);
负V1:=IF(TT=-1 OR (TT=0 AND TT1<TT2),成交额,0);
正V:=IF(正V1>大额线,正V1,0);
负V:=IF(负V1>大额线,负V1,0);
MB:=IF(正V1>大额线,1,0);
买入B:=SUM(MB,0);
MD:=IF(负V1>大额线,1,0);
卖出B:=SUM(MD,0);
买入最大:=HHV(正V,0)/10000;
卖出最大:=HHV(负V,0)/10000;
正总:初正+SUM(正V,0),LINETHICK0,PRECIS0;
负总:初负+SUM(负V,0),LINETHICK0,PRECIS0;
差％:(正总-负总)/mm222*100,LINETHICK0,PRECIS3;
STICKLINE(TT=1,0,AMOUNT,3,1),COLOR0000FF;
STICKLINE(TT=-1,0,AMOUNT,3,0),COLORFF9900;
STICKLINE(TT=0 AND TT1>TT2,0,AMOUNT,3,1),COLOR00FFFF;
STICKLINE(TT=0 AND TT1<TT2,0,AMOUNT,3,0),COLORFF0000;
STICKLINE(初正>大额线 OR 正V>大额线,0,AMOUNT,3,1),COLORFF00FF;
STICKLINE(初负>大额线 OR 负V>大额线,0,AMOUNT,3,0),COLORFFFF00;
DRAWTEXTREL(250,20,'大额线：'+NUMTOSTRN(大额线￥万,0)+'万 '+'买入：'
+NUMTOSTRN(买入B,0)+'笔 '+'卖出：'+NUMTOSTRN(卖出B,0)+'笔 '
+'净额：'+NUMTOSTRN(差％,3)+'％ '+'最大买：'+NUMTOSTRN(买入最大,0)+'万 '
+'最大卖：'+NUMTOSTRN(卖出最大,0)+'万 '),COLOR00FFFF;



mm0:="分时引1.mm0#day";
mm01:="分时引1.mm01#day";
mm02:="分时引1.mm02#day";
mm1:="分时引1.mm1#day";
mm11:="分时引1.mm11#day";
mm12:="分时引1.mm12#day";
mm2:="分时引1.mm2#day";
mm21:="分时引1.mm21#day";
mm22:="分时引1.mm22#day";
mm3:="分时引1.mm3#day";
mm31:="分时引1.mm31#day";
mm32:="分时引1.mm32#day";
DRAWRECTREL(0,20,mm3,60,RGB(0,200,200)),COLORFFFFFF,LAYER1;
DRAWRECTREL(0,20,mm31,60,RGB(200,0,20)),COLORFFFFFF,LAYER1;
DRAWRECTREL(0,60,mm32,100,RGB(0,200,200)),COLORFFFFFF,LAYER1;
DRAWRECTREL(0,130,mm2,170,RGB(0,200,200)),COLORFFFFFF,LAYER1;
DRAWRECTREL(0,130,mm21,170,RGB(200,0,20)),COLORFFFFFF,LAYER1;
DRAWRECTREL(0,170,mm22,210,RGB(0,200,200)),COLORFFFFFF,LAYER1;
DRAWRECTREL(0,240,mm1,280,RGB(0,200,200)),COLORFFFFFF,LAYER1;
DRAWRECTREL(0,240,mm11,280,RGB(200,0,20)),COLORFFFFFF,LAYER1;
DRAWRECTREL(0,280,mm12,320,RGB(0,200,200)),COLORFFFFFF,LAYER1;
DRAWRECTREL(0,350,mm0,390,RGB(0,200,200)),COLORFFFFFF,LAYER1;
DRAWRECTREL(0,350,mm01,390,RGB(200,0,20)),COLORFFFFFF,LAYER1;
DRAWRECTREL(0,390,mm02,430,RGB(0,200,200)),COLORFFFFFF,LAYER1;