相关标签:
原理解析: 输出INPUT:X(2008,1990,2020) 输出换手率:如果当前流通股本(手)=0,返回大盘的成交量/ESTDATA(12),否则返回成交量(手)/流通股本(股),PRECISION2,线宽为0 输出VARIABLE:WDAY[7]='星期六' 赋值:'星期日' 赋值:'星期一' 赋值:'星期二' 赋值:'星期三' 赋值:'星期四' 赋值:'星期五' FY赋值:年份 FM赋值:月份 FD赋值:日 WD赋值:星期 P赋值:SYSPARAM(1) BB赋值:BARPOS STR1赋值:''+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日 '+WDAY[WD[P]+1] SJ赋值:OPENMINUTES(CURRENTTIME)>1 AND OPENMINUTES(CURRENTTIME)<239 QJ0赋值:成交量(手)/如果最高价=最低价,返回4,否则返回最高价-最低价 JJ赋值:(最高价+最低价+收盘价)/3 输出特大:如果当前流通股本(手)=0,返回QJ0*(JJ-收盘价和开盘价的较小值),否则返回QJ0*如果最高价=最低价,返回1,否则返回(开盘价和收盘价的较小值-最低价),PRECISION0,COLOR0000FF,线宽为0 输出大户:如果当前流通股本(手)=0,返回QJ0*(开盘价和收盘价的较小值-最低价),否则返回QJ0*如果最高价=最低价,返回1,否则返回(JJ-收盘价和开盘价的较小值),PRECISION0,COLORFF00FF,线宽为0 输出中户:如果当前流通股本(手)=0,返回QJ0*(最高价-开盘价和收盘价的较大值),否则返回QJ0*如果最高价=最低价,返回1,否则返回(最高价-开盘价和收盘价的较大值),PRECISION0,COLOR00FF00,线宽为0 输出散户:如果当前流通股本(手)=0,返回QJ0*(收盘价和开盘价的较大值-JJ),否则返回QJ0*如果最高价=最低价,返回1,否则返回(收盘价和开盘价的较大值-JJ),PRECISION0,COLORFF6600,线宽为0 总1赋值:(特大+大户)-(中户+散户) 总赋值:成交量(手) WW赋值:SYSPARAM(2) N1赋值:SYSPARAM(3) NN赋值:N1-WW+1 HH赋值:NN日内总的最高值 LL赋值:NN日内总的最低值 ZG赋值:HH[N1] ZD赋值:LL[N1] 中0赋值:ZD+(ZG-ZD)*0.5 中赋值:中0*0.05 CM赋值:总1的25日累和 ZJ赋值:1日前的总1 ZSB赋值:(总1-1日前的总1)/总*100 ZSA赋值:CM/如果STKTYPE=0,返回成交量(手)的25日累和,否则返回如果STKTYPE=13,返回成交量(手)的10日累和,否则返回当前流通股本(手) CC赋值:上次FM>1日前的FM距今天数日前的收盘价 主力成本赋值:(CC*(特大+大户)*100)/(特大+大户)/100 DF1赋值:收盘价的12日指数移动平均-收盘价的26日指数移动平均 DA1赋值:DF1的9日指数移动平均 QJ6赋值:DF1>DA1 AND DA1<0 QJ7赋值:"KDJ的K">"KDJ的D" AND "KDJ的D"<30 QJ8赋值:DF1<DA1 QJ9赋值:"KDJ的K"<"KDJ的D" AND "KDJ的K">80 W1赋值:大户的5日累和+特大的5日累和 W2赋值:散户的5日累和+中户的5日累和 量振1赋值:特大>大户 AND 大户>散户 量振2赋值:特大<散户 AND 大户<散户 标振1赋值:QJ6 AND QJ7 标振2赋值:QJ8 AND QJ9 A赋值:W1-W2 A0赋值:如果A>0,返回A,否则返回0 B0赋值:如果A<0,返回A,否则返回0 当满足条件总1<0时,在0和-总1+总/2位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLORFF4400 当满足条件总1<0时,在0和-总1+总/2位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFF8800 当满足条件总1<0时,在0和-总1+总/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFFAA00 当满足条件总1<0时,在0和-总1+总/2位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFFCC00 当满足条件总1>0时,在0和+总1+总/2位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR000044 当满足条件总1>0时,在0和+总1+总/2位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR000088 当满足条件总1>0时,在0和+总1+总/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR0000AA 当满足条件总1>0时,在0和+总1+总/2位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0000CC 当满足条件A0时,在0和A0位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR000044 当满足条件A0时,在0和A0位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR000088 当满足条件A0时,在0和A0位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR0000AA 当满足条件A0时,在0和A0位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0000CC 当满足条件B0时,在0和-B0位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR004400 当满足条件B0时,在0和-B0位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR008800 当满足条件B0时,在0和-B0位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00AA00 当满足条件B0时,在0和-B0位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00CC00 当满足条件BB=WW时,在中*0.2和中*9.2位置之间画柱状线,宽度为(散户[P]/总*200)*1.02,1不为0则画空心柱.,画白色,线宽为2 当满足条件BB=WW时,在中*0.8和中*8.6位置之间画柱状线,宽度为散户[P]/总*200,0不为0则画空心柱.,COLORFF8800 当满足条件BB=WW时,在中*10.2和中*19.2位置之间画柱状线,宽度为(中户[P]/总*200)*1.02,1不为0则画空心柱.,画白色,线宽为2 当满足条件BB=WW时,在中*10.8和中*18.6位置之间画柱状线,宽度为中户[P]/总*200,0不为0则画空心柱.,COLORFF00FF 当满足条件BB=WW时,在中*20.2和中*29.2位置之间画柱状线,宽度为(大户[P]/总*200)*1.02,1不为0则画空心柱.,画白色,线宽为2 当满足条件BB=WW时,在中*20.8和中*28.6位置之间画柱状线,宽度为大户[P]/总*200,0不为0则画空心柱.,COLOR0088FF 当满足条件BB=WW时,在中*30.2和中*39.2位置之间画柱状线,宽度为(特大[P]/总*200)*1.02,1不为0则画空心柱.,画白色,线宽为2 当满足条件BB=WW时,在中*30.8和中*38.6位置之间画柱状线,宽度为特大[P]/总*200,0不为0则画空心柱.,COLOR0000FF 当满足条件BB=WW-28时,在中*-0.2和中*40位置之间画柱状线,宽度为500,0不为0则画空心柱.,COLOR000000 DRAWTEXTEX(收盘价,1,420,0,STR1),COLORFFFF00 DRAWTEXTEX(收盘价,1,200,0,STKLABEL+' '+品种名称+''),COLORFFFF00 当满足条件BB=WW时,在中*36位置书写文字,COLOR00FF00 当满足条件BB=WW时,在中*26位置书写文字,COLOR00FF00 当满足条件BB=WW时,在中*16位置书写文字,COLOR00FF00 当满足条件BB=WW时,在中*6位置书写文字,COLOR00FF00 输出周趋势:A0的5日简单移动平均,COLORFF00FF,PRECISION0 输出平滑值:周趋势的5日加权移动平均,COLOR00FF00,PRECISION0 输出买:量振1 AND 标振1 AND 周趋势>平滑值,COLOR0000FF,线宽为0 输出卖:量振2 AND 标振2 AND 周趋势<平滑值,COLOR00FF00,线宽为0 DIFF赋值:收盘价的12日指数移动平均-收盘价的26日指数移动平均 DEA赋值:DIFF的9日指数移动平均 MACD1赋值:2*(DIFF-DEA) CS1赋值:100 CS2赋值:CS1日内MACD1的绝对值的最高值 CS3赋值:100/CS2的绝对值 输出平滑异同平均:(MACD1*CS3+100)/2,线宽为5,COLOR00FF00 CS赋值:MACD 日红赋值:CS>=1日前的CS 日转红赋值:日红 AND 1日前的日红=0 PARTLINE(日红,CS),线宽为5,画红色 AA赋值:0 V1赋值:10日内最低价的最低值 V2赋值:25日内最高价的最高值 价位线赋值:(收盘价-V1)/(V2-V1)*4的4日指数移动平均 当满足条件价位线上穿0.3时,在AA位置书写文字,COLOR0000FF 当满足条件3.7上穿价位线时,在AA位置书写文字,COLORFF00 VERTLINE(价位线上穿0.3),COLOR0000FF,LINEDASHDOT VERTLINE(3.7上穿价位线),COLORFF00,LINEDASHDOT 输出DRAWTEXTEX(收盘价,1,200,130,'主力成本:'+NUMTOSTR(主力成本[P],2)),COLOR00FF00 输出DRAWTEXTEX(收盘价,1,420,130,'主力筹码占流通:'+NUMTOSTR(如果ZSA>0,返回ZSA[P]*100,否则返回0,2)+' %'),COLOR00FF00 输出DRAWTEXTEX(收盘价,1,720,130,'较昨日增减:'+NUMTOSTR(ZSB[P],2)+' %'),COLOR00FF00 DRAWTEXTEX(收盘价 AND 总1[P]<0,1,720,0,'散户主买 主力主卖'),COLORFFEE00 DRAWTEXTEX(收盘价 AND 总1[P]>0,1,720,0,'主力主买 散户主卖'),COLOR0000FF 周仓赋值:总1的5日累和 月仓赋值:总1的25日累和 年仓赋值:总1的240日累和 上周赋值:1日前的周仓 上月赋值:1日前的月仓 上年赋值:上次FY=X距今天数日前的年仓 周增赋值:周仓-上周 月增赋值:月仓-上月 年增赋值:年仓-上年 EXPLAIN(1,''''''''''''''''''='),画白色 输出EXPLAIN(1,'昨日增减:'+NUMTOSTR(ZJ[P]*100/10000,2)+' 万股'),COLORFF8B00 EXPLAIN(1,''''''''''''''''''='),画白色 输出EXPLAIN(1,'上周:'+NUMTOSTR(上周[P]*100/10000,2)+' 万股'),画红色 输出EXPLAIN(1,'增减:'+NUMTOSTR(周增[P]*100/10000,2)+' 万股'),画红色 EXPLAIN(1,''''''''''''''''''='),画白色 输出EXPLAIN(1,'上月:'+NUMTOSTR(上月[P]*100/10000,2)+' 万股'),COLORFF00FF 输出EXPLAIN(1,'增减:'+NUMTOSTR(月增[P]*100/10000,2)+' 万股'),COLORFF00FF EXPLAIN(1,''''''''''''''''''='),画白色 输出EXPLAIN(1,'上年:'+NUMTOSTR(上年[P]*100/10000,2)+' 万股'),COLOR00EE00 输出EXPLAIN(1,'增减:'+NUMTOSTR(年增[P]*100/10000,2)+' 万股'),COLOR00EE00 EXPLAIN(1,''''''''''''''''''='),画白色 wday[3]:='星期二';wday[4]:='星期三';wday[5]:='星期四';wday[6]:='星期五';<br /> fy:=YEAR;fm:=MONTH;fd:=DAY;wd:=WEEKDAY;p:=SYSPARAM(1);BB:=BARPOS;<br /> str1:=''+NUMTOSTR(fy[p],0)+'年'+NUMTOSTR(fm[p],0)+'月'+NUMTOSTR(fd[p],0)+'日 '+wday[wd[p]+1];<br /> SJ:=OPENMINUTES(CURRENTTIME)>1 and OPENMINUTES(CURRENTTIME)<239;<br /> qj0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);jj:=(HIGH+LOW+CLOSE)/3;<br /> 特大:IF(CAPITAL=0,qj0*(jj-MIN(CLOSE,OPEN)),qj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW))),PRECISION0,COLOR0000FF,LINETHICK;<br /> 大户:IF(CAPITAL=0,qj0*(MIN(OPEN,CLOSE)-LOW),qj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN)))),PRECISION0,COLORFF00FF,LINETHICK;<br /> 中户:IF(CAPITAL=0,qj0*(HIGH-MAX(OPEN,CLOSE)),qj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE)))),PRECISION0,COLOR00FF00,LINETHICK;<br /> 散户:IF(CAPITAL=0,qj0*(MAX(CLOSE,OPEN)-jj),qj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj))),PRECISION0,COLORFF6600,LINETHICK;<br /> 总1:=(特大+大户)-(中户+散户);总:=vol;<br /> ww:=SYSPARAM(2);n1:=SYSPARAM(3);nn:=n1-ww+1;hh:=HHV(总,nn);ll:=LLV(总,nn);<br /> ZG:=hh[n1];ZD:=ll[n1];中0:=ZD+(ZG-ZD)*0.5;中:=中0*0.05;CM:=SUM(总1,25);<br /> ZJ:=REF(总1,1);ZSB:=(总1-REF(总1,1))/总*100;<br /> ZSA:=cm/IF(STKTYPE=0,SUM(VOL,25),IF(STKTYPE=13,SUM(VOL,10),CAPITAL));<br /> cc:=REF(CLOSE,BARSLAST(fm>REF(fm,1)));主力成本:=(cc*(特大+大户)*100)/(特大+大户)/100;<br /> DF1:=EMA(CLOSE,12)-EMA(CLOSE,26);DA1:=EMA(DF1,9);<br /> qj6:=df1>da1 and da1<0;qj7:="kdj.k">"kdj.d" and "kdj.d"<30;<br /> qj8:=df1<da1;qj9:="kdj.k"<"kdj.d" and "kdj.k">80;<br /> w1:=SUM(大户,5)+SUM(特大,5);w2:=SUM(散户,5)+SUM(中户,5);<br /> 量振1:=特大>大户 and 大户>散户;量振2:=特大<散户 and 大户<散户;<br /> 标振1:=qj6 and qj7;标振2:=qj8 and qj9;<br /> a:=w1-w2;a0:=IF(a>0,a,0);b0:=IF(a<0,a,0);<br /> STICKLINE(总1<0,0,-总1+总/2,8,0),ColorFF4400;STICKLINE(总1<0,0,-总1+总/2,6,0),ColorFF8800;<br /> STICKLINE(总1<0,0,-总1+总/2,3,0),ColorFFaa00;STICKLINE(总1<0,0,-总1+总/2,1,0),ColorFFcc00;<br /> STICKLINE(总1>0,0,+总1+总/2,8,0),Color000044;STICKLINE(总1>0,0,+总1+总/2,6,0),Color000088;<br /> STICKLINE(总1>0,0,+总1+总/2,3,0),Color0000aa;STICKLINE(总1>0,0,+总1+总/2,1,0),Color0000cc;<br /> STICKLINE(a0,0,a0,8,0),Color000044;STICKLINE(a0,0,a0,5,0),Color000088;<br /> STICKLINE(a0,0,a0,3,0),Color0000aa;STICKLINE(a0,0,a0,1,0),Color0000cc;<br /> STICKLINE(b0,0,-b0,8,0),Color004400;STICKLINE(b0,0,-b0,5,0),Color008800;<br /> STICKLINE(b0,0,-b0,3,0),Color00aa00;STICKLINE(b0,0,-b0,1,0),Color00cc00;<br /> STICKLINE(BB=ww,中*0.2,中*9.2,(散户[P]/总*200)*1.02,1),COLORWHITE,LINETHICK2;<br /> STICKLINE(BB=ww,中*0.8,中*8.6,散户[P]/总*200,0),COLORFF8800;<br /> STICKLINE(BB=ww,中*10.2,中*19.2,(中户[P]/总*200)*1.02,1),COLORWHITE,LINETHICK2;<br /> STICKLINE(BB=ww,中*10.8,中*18.6,中户[P]/总*200,0),COLORFF00FF;<br /> STICKLINE(BB=ww,中*20.2,中*29.2,(大户[P]/总*200)*1.02,1),COLORWHITE,LINETHICK2;<br /> STICKLINE(BB=ww,中*20.8,中*28.6,大户[P]/总*200,0),COLOR0088FF;<br /> STICKLINE(BB=ww,中*30.2,中*39.2,(特大[P]/总*200)*1.02,1),COLORWHITE,LINETHICK2;<br /> STICKLINE(BB=ww,中*30.8,中*38.6,特大[P]/总*200,0),COLOR0000FF;<br /> STICKLINE(BB=ww-28,中*-0.2,中*40,500,0),COLOR000000;<br /> DRAWTEXTEX(CLOSE,1,420,0,str1),ColorffFF00;<br /> DRAWTEXTEX(CLOSE,1,200,0,STKLABEL+' '+STKNAME+''),ColorffFF00;<br /> DRAWTEXT(BB=ww,中*36,'特大:'+NUMTOSTR(特大[P]/总*100,2)+' %'),COLOR00FF00;<br /> DRAWTEXT(BB=ww,中*26,'大户:'+NUMTOSTR(大户[P]/总*100,2)+' %'),COLOR00FF00;<br /> DRAWTEXT(BB=ww,中*16,'中户:'+NUMTOSTR(中户[P]/总*100,2)+' %'),COLOR00FF00;<br /> DRAWTEXT(BB=ww,中*6,'散户:'+NUMTOSTR(散户[P]/总*100,2)+' %'),COLOR00FF00;<br /> 周趋势:MA(a0,5),ColorFF00FF,PRECISION0;<br /> 平滑值:WMA(周趋势,5),Color00FF00,PRECISION0;<br /> 买:量振1 and 标振1 and 周趋势>平滑值,Color0000FF,LINETHICK;<br /> 卖:量振2 and 标振2 and 周趋势<平滑值,Color00FF00,LINETHICK;<br /> DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);<br /> DEA:=EMA(DIFF,9);<br /> MACD1:=2*(DIFF-DEA);<br /> CS1:=100;<br /> CS2:=HHV(ABS(MACD1),CS1);<br /> CS3:=ABS(100/CS2);<br /> MACD:(MACD1*CS3+100)/2,LINETHICK5,color00FF00;<br /> CS:=MACD;<br /> 日红:=CS>=REF(CS,1);<br /> 日转红:=日红 AND REF(日红,1)=0;<br /> PARTLINE(日红,CS),LINETHICK5,colorred;<br /> AA:=0;<br /> V1:=LLV(LOW,10);<br /> V2:=HHV(HIGH,25);<br /> 价位线:=EMA((CLOSE-V1)/(V2-V1)*4,4);<br /> DRAWTEXT(CROSS(价位线,0.3),AA,'买'),color0000FF;<br /> DRAWTEXT(CROSS(3.7,价位线),AA,'卖'),colorFF00;<br /> VERTLINE(CROSS(价位线,0.3)),color0000FF,LINEDASHDOT;<br /> VERTLINE(CROSS(3.7,价位线)),colorFF00,LINEDASHDOT;DRAWTEXTEX(CLOSE,1,200,130,'主力成本:'+NUMTOSTR(主力成本[p],2)),COLOR00FF00;<br /> DRAWTEXTEX(CLOSE,1,420,130,'主力筹码占流通:'+NUMTOSTR(IF(ZSA>0,ZSA[P]*100,0),2)+' %'),COLOR00FF00;<br /> DRAWTEXTEX(CLOSE,1,720,130,'较昨日增减:'+NUMTOSTR(ZSB[P],2)+' %'),COLOR00FF00;<br /> DRAWTEXTEX(c and 总1[P]<0,1,720,0,'散户主买 主力主卖'),COLORffee00;<br /> DRAWTEXTEX(c and 总1[P]>0,1,720,0,'主力主买 散户主卖'),COLOR0000ff;<br /> 周仓:=SUM(总1,5);月仓:=SUM(总1,25);年仓:=SUM(总1,240);上周:=REF(周仓,1);上月:=REF(月仓,1);<br /> 上年:=REF(年仓,BARSLAST(fy=X));周增:=周仓-上周;月增:=月仓-上月;年增:=年仓-上年;<br /> EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'昨日增减:'+NUMTOSTR(zj[p]*100/10000,2)+' 万股'),ColorFF8B00;<br /> EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'上周:'+NUMTOSTR(上周[p]*100/10000,2)+' 万股'),COLORred;<br /> EXPLAIN(1,'增减:'+NUMTOSTR(周增[p]*100/10000,2)+' 万股'),COLORred;<br /> EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'上月:'+NUMTOSTR(上月[p]*100/10000,2)+' 万股'),COLORFF00FF;<br /> EXPLAIN(1,'增减:'+NUMTOSTR(月增[p]*100/10000,2)+' 万股'),COLORFF00FF;<br /> EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'上年:'+NUMTOSTR(上年[p]*100/10000,2)+' 万股'),COLOR00EE00;<br /> EXPLAIN(1,'增减:'+NUMTOSTR(年增[p]*100/10000,2)+' 万股'),COLOR00EE00;<br /> EXPLAIN(1,'==================================='),colorwhite;
公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】