飞狐指标——主力分析副图.doc

X:=2008;DRAWGBK(CLOSE,COLORRGB(200,200,50),COLORRGB(100,50,50),1);流通:IF(CAPITAL=0,ESTDATA(12)/10000,FINANCE(7)/10000),LINETHICK0,PRECISION2,Color00BFFF;jj:=(HIGH+LOW+CLOSE)/3;qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW);qj1:=IF(CAPITAL=0,qj0*(jj-MIN(CLOSE,OPEN),qj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW);qj2:=IF(CAPITAL=0,qj0*(MIN(OPEN,CLOSE)-LOW),qj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN);qj3:=IF(CAPITAL=0,qj0*(HIGH-MAX(OPEN,CLOSE),qj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE);qj4:=IF(CAPITAL=0,qj0*(MAX(CLOSE,OPEN)-jj),qj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj);总1:=(qj1+qj2)-(qj3+qj4);总:=qj1+qj2+qj3+qj4;w1:=(qj1+qj2);CM:=SUM(总1,24);ZJ:=REF(总1,1);w2:=(abs(qj1)+abs(qj2)+abs(qj3)+abs(qj4);ZSA:=cm/IF(CAPITAL=0,ESTDATA(12),FINANCE(7);ZSB:=(总1-ref(总1,1)/总*100;DIFF:=EMA(w1,12)-EMA(w1,26);DEA:=EMA(DIFF,9);jg:=(CLOSE-LLV(LOW,34)/(HHV(HIGH,34)-LLV(LOW,34)*100;yh:=cross(diff,dea) and jg95;SW:=yh=1;SS:=bh=1;VERTLINE(sw),COLOR0000FF,LINEDOT;VERTLINE(ss),COLOR00FF00,LINEDOT;A:=BARSLAST(SW);B:=BARSLAST(SS);起点:=IF(A and AB,A,0);终点:=IF(B and BA,B,0);cc:=AMOUNT/VOL/100;主力成本:=(cc*w1*100)/w1/100;换手率:IF(CAPITAL=0,INDEXV/ESTDATA(12),VOL/FINANCE(7),PRECISION2,LINETHICK0;控制画线高度ww:=SYSPARAM(2);n1:=SYSPARAM(3);nn:=n1-ww+1;hh:=HHV(w2,nn);ll:=LLV(w2,nn);最高:=hhn1;最低:=lln1;中:=最低+(最高-最低)*0.5;显示时间variable:wday7=星期六;wday1:=星期日;wday2:=星期一;wday3:=星期二;wday4:=星期三;wday5:=星期四;wday6:=星期五;fy:=YEAR;fm:=MONTH;fd:=DAY;wd:=WEEKDAY;p:=SYSPARAM(1);str1:=+NUMTOSTR(fyp,0)+年+NUMTOSTR(fmp,0)+月+NUMTOSTR(fdp,0)+日 +wdaywdp+1,Colorred;STICKLINE(总10,0,-总1+总/2,8,0),ColorFF4400;STICKLINE(总10,0,-总1+总/2,6,0),ColorFF8800;STICKLINE(总10,0,-总1+总/2,3,0),ColorFFaa00;STICKLINE(总10,0,+总1+总/2,8,0),Color000044;STICKLINE(总10,0,+总1+总/2,6,0),Color000088;STICKLINE(总10,0,+总1+总/2,3,0),Color0000aa;STICKLINE(总10,0,+总1+总/2,1,0),Color0000cc;m1:ma(sum(总1,5),5);m2:wma(m1,5);STICKLINE(BARPOS=ww+10,中*-1,中*2.1,200,0),Color2E8B57;VERTLINE(BARPOS=ww+20),COLOREE00EE,LINETHICK2;VERTLINE(BARPOS=ww),COLOREE00EE,LINETHICK2;STICKLINE(BARPOS=ww+10,中*1.7,中*1.7,200,0),COLOREE00EE;STICKLINE(BARPOS=ww+10,中*0.3,中*0.3,200,0),COLOR666666;STICKLINE(BARPOS=ww+10,中*-0.9,中*-0.9,200,0),COLOREE00EE;STICKLINE(BARPOS=ww+2 and qj1p0,中*0.3,中*0.3+(qj1p),30,0),COLOR00FFFF;STICKLINE(BARPOS=ww+2 and qj1p0,中*0.3,中*0.3+(qj2p),30,0),COLOR0000FF;STICKLINE(BARPOS=ww+7 and qj2p0,中*0.3,中*0.3+(qj3p),30,0),COLORFF00FF;STICKLINE(BARPOS=ww+12 and qj3p0,中*0.3,中*0.3+(qj4p),30,0),COLORFF6600;STICKLINE(BARPOS=ww+17 and qj4p0,中*0.3,中*0.3-(qj4p),30,0),COLOR00FF00;DRAWTEXT(BARPOS=ww+1,中*0.2,特n+NUMTOSTR(qj1p/总p*100,0),PXDN5,COLORWHITE;DRAWTEXT(BARPOS=ww+6,中*0.2,大n+NUMTOSTR(qj2p/总p*100,0),PXDN5,COLORWHITE;DRAWTEXT(BARPOS=ww+11,中*0.2,中n+NUMTOSTR(qj3p/总p*100,0),PXDN5,COLORWHITE;DRAWTEXT(BARPOS=ww+16,中*0.2,小n+NUMTOSTR(qj4p/总p*100,0),PXDN5,COLORWHITE;DRAWTEXTEX(CLOSE,1,230,0,str1),ColorffFF00;DRAWTEXTEX(CLOSE,1,230,130,主力成本:+NUMTOSTR(主力成本p,2)+元),Colorred;DRAWTEXTEX(CLOSE,1,520,130,主力筹码占流通:+NUMTOSTR(ZSAP,2)+ %),Colorred;DRAWTEXTEX(CLOSE,1,770,130,本日较昨日增减:+NUMTOSTR(ZSBP,2)+ %),Colorred;DRAWTEXTEX(CLOSE,1,520,0,估算主力进入:+NUMTOSTR(起点P,0)+(天) ),Colorred;DRAWTEXTEX(CLOSE,1,770,0,判断主力回吐:+NUMTOSTR(终点P,0)+(天) ),Colorred;DRAWTEXT(BARPOS=ww+1 and 总1P0,中*-0.6, 主力主买),Colorred;DRAWTEXT(BARPOS=ww+11 and 总1P0,中*-0.6, 散户主卖),Colorred;DRAWTEXT(BARPOS=ww+11 and 总1P0,中*-0.6, 主力主卖),Colorred;增减仓周仓:=SUM(总1,5);月仓:=SUM(总1,25);年仓:=SUM(总1,240);上周:=REF(周仓,1);上月:=REF(月仓,1);上年:=REF(年仓,BARSLAST(YEAR=x);周增:=周仓-上周;月增:=月仓-上月;年增:=年仓-上年;解盘EXPLAIN(1,=),colorwhite;EXPLAIN(1,今日增减:+NUMTOSTR(总1p*100)/10000,2)+ 万股),COLOrffff00;EXPLAIN(1,昨日增减:+NUMTOSTR(zjp*100/10000,2)+ 万股),ColorFF8B00;EXPLAIN(1,=),colorwhite;EXPLAIN(1,周仓:+NUMTOSTR(周仓p*100/10000,2)+ 万股),COLORred;EXPLAIN(1,上周:+NUMTOSTR(上周p*100/10000,2)+ 万股),COLORred;EXPLAIN(1,增减:+NUMTOSTR(周增p*100/10000,2)+ 万股),COLORred;EXPLAIN(1,=),colorwhite;EXPLAIN(1,月仓:+NUMTOSTR(月仓p*100/10000,2)+ 万股),COLORFF00FF;EXPLAIN(1,上月:+NUMTOSTR(上月p*100/10000,2)+ 万股),COLORFF00FF;EXPLAIN(1,增减:+NUMTOSTR(月增p*100/10000,2)+ 万股),COLORFF00FF;EXPLAIN(1,=)