飞狐指标-主力分析副图.docx

0fl为析VS'需-机疙■MP IIlin土;.:-.■NA1e202t6LK" 'Hrf-i■'.2fJLI/0G/2<佛 Kt1#&俱t*t<£224t議沁TtMDL»«92IM^L1oe 03.'OL:J/,.4:2空4「:♦•戟X:=2008;DRAWGBK(CLOSE,COLORRGB(200,200,50),COLORRGB(100,50,50),1);流通:IF(CAPITAL=0,ESTDATA(12)/10000,FINANCE(7)/10000),HICK0,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)andjg<10;bh:=cross(dea,diff)andjg>95;SW:=yh=1;SS:=bh=1;VERTLINE(sw),COLOR0000FF,LINEDOT;VERTLINE(ss),COLOR00FF00,LINEDOT;A:=BARSLAST(SW);B:=BARSLAST(SS);起点:=IF(AandA<B,A,O);终点:=IF(BandB<A,B,0);cc:=AMOUNT/VOL/100主力成本:=(cc*w1*100)/w1/100;换手率:IF(CAPITAL=0,INDEXV/ESTDATA(12),VOL/FINANCE(7)),PRECISION2,HICK0;{控制画线高度}ww:=SYSPARAM(2);n1:=SYSPARAM(3);nn:=n1-ww+1;hh:=HHV(w2,nn);ll:=LLV(w2,nn);最高:=hh[n1];最低:=ll[n1]; 中:=最低+(最高-最低)*;{显示时间}variable:wday[7]='星期六';wday[1]:='星期日';wday[2]:='星期一';wday[3]:='星期二';wday[4]:='星期三';wday[5]:='星期四';wday[6]:='星期五';fy:=YEAR;fm:=MONTH;fd:=DAY;wd:=WEEKDAY;p:=SYSPARAM(1);str1:=''+NUMTOSTR(fy[p],0)+'年'+NUMTOSTR(fm[p],0)+'月'+NUMTOSTR(fd[p],0)+'日'+wday[wd[p]+1],Colorred;STICKLINE(总1<0,0,-总1+总/2,8,0),ColorFF4400;STICKLINE(总1<0,0,-总1+总/2,6,0),ColorFF8800;STICKLINE(总1<0,0,-总1+总/2,3,0),ColorFFaa00;STICKLINE(总1<0,0,-总1+总/2,1,0),00;STICKLINE(总1>0,0,+总1+总/2,8,0),Color000044;STICKLINE(总1>0,0,+总1+总/2,6,0),Color000088;STICKLINE(总1>0,0,+总1+总/2,3,0),Color0000aa;STICKL