成交量指标通达信公式源码,通达信成交量改进指标源码

("成交量上配有对未来趋势的智能诊断，可以辅助你看盘。直接上图。{极品量K形态解盘}DRAWGBK(C>0,RGB(10,100,0),RGB(25,15,0),0,'',0);TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1)))));MTIME:=MOD(FROMOPEN,TOTAL);CTIME:=IF(MTIME<0.5,TOTAL,MTIME);VVOL:IF(CURRBARSCOUNT=1,VOLTOTAL/CTIME,DRAWNULL),NODRAW;STICKLINE(CURRBARSCOUNT=1&&(SETCODE=0SETCODE=1),VVOL,0,-1,-1),COLOR00C0C0;成交量:VOL,POINTDOT,COLORYELLOW;AA:=VOL/((HIGH-LOW)2-ABS(CLOSE-OPEN));主买:=IF(CLOSE>OPEN,AA(HIGH-LOW),IF(CLOSEOPEN,AA((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE=REF(C,1),0,VOL,2.2,1),COLORRED;STICKLINE(C0,0,主买,2.2,0),COLORRED;资金异动:=VOL/MA(VOL,55)100,COLORYELLOW;STICKLINE(主卖>0,0,主卖,0.8,0),COLORCYAN;STICKLINE(资金异动>100,0,VOL,0.1,0),COLORYELLOW;成交量比%:主买/VOL100,COLORWHITE,NODRAW;换:VOL/CAPITAL100,POINTDOTCOLORMAGENTA;五换:=SUM(换,5),COLORYELLOW;十换:=SUM(换,10),COLORGREEN;二十换:=SUM(换,20),COLORFFFFFF;三十换:=SUM(换,30),COLORYELLOW;A股:=CAPITAL/1000000,LINETHICK0,COLORWHITE;启:=MA(V,5)COLORMAGENTA,LINETHICK2;洗:=MA(V,35)COLORGREEN,LINETHICK2;异:=MA(V,135)COLORLIBLUE,LINETHICK2;DRAWTEXT(CROSS(启,洗)ANDV>洗ANDV>异AND洗<异,V,'★'),COLORMAGENTA;DRAWTEXT(CROSS(启,异)ANDV>异ANDV>异AND洗<异,V,'★'),COLORYELLOW;T00:=STRCAT('智能诊断：',EXTERNSTR(0,12));DRAWTEXT_FIX(1,0,0.01,0,T00)COLORFFFFFF;{K线形态解盘}TT:=240/FROMOPEN;比:=TT;J12:=(HIGH-((HIGH-LOW)/3));J23:=(LOW+((HIGH-LOW)/3));T1{早晨之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2)<0.95ANDREF(OPEN,1)1.05ANDCLOSE>REF(CLOSE,2)),1,0));T2{黄昏之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2)>1.03ANDREF(OPEN,1)>REF(CLOSE,2)ANDABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02ANDCLOSE/OPEN<0.97ANDCLOSE1.03),1,0));T4{垂死十字}:=CONST(IF((CLOSE=OPENANDCLOSE=LOWANDCLOSE!=HIGH),1,0));T5{早晨十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2)<0.95ANDREF(OPEN,1)1.05ANDCLOSE>REF(CLOSE,2)),1,0));T6{黄昏十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2)>1.05ANDREF(OPEN,1)>REF(CLOSE,2)ANDREF(OPEN,1)=REF(CLOSE,1)ANDCLOSE/OPEN<0.95ANDCLOSE3(MAX(OPEN,CLOSE)-LOW)ANDCLOSE>MA(CLOSE,5)),1,0));T8{倒转锤头}:=CONST(IF((MIN(OPEN,CLOSE)=LOWANDHIGH-LOW>3(MAX(OPEN,CLOSE)-LOW)ANDCLOSE3(HIGH-MIN(OPEN,CLOSE))ANDCLOSE3(HIGH-MIN(OPEN,CLOSE))ANDCLOSE>MA(CLOSE,5)),1,0));T11{穿头破脚}:=CONST(IF(((REF(CLOSE,1)/REF(OPEN,1)>1.03ANDCLOSE/OPEN<0.96ANDCLOSEREF(CLOSE,1))OR(REF(CLOSE,1)/REF(OPEN,1)<0.97ANDCLOSE/OPEN>1.04ANDCLOSE>REF(OPEN,1)ANDOPEN1.03ANDCLOSE/OPEN<0.97ANDOPEN>REF(CLOSE,1)ANDCLOSE1.03ANDOPENREF(CLOSE,1)),1,0));T14{身怀六甲}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1)>0.04ANDABS(CLOSE-OPEN)/CLOSE<0.005ANDMAX(CLOSE,OPEN)MIN(REF(CLOSE,1),REF(OPEN,1))),1,0));T15{十字胎}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1)>0.04ANDCLOSE=OPENANDCLOSEMIN(REF(CLOSE,1),REF(OPEN,1))),1,0));T16{平顶}:=CONST(IF((ABS(HIGH-REF(HIGH,1))/HIGH<0.001),1,0));T17{平底}:=CONST(IF(((ABS(LOW-REF(LOW,1))/LOW<0.001ANDABS(REF(LOW,1)-REF(LOW,2))/REF(LOW,1)<=0.001)),1,0));T18{大阳烛}:=CONST(IF((CLOSE/OPEN>1.05ANDHIGH/LOWREF(OPEN,2)ANDREF(CLOSE,1)>REF(OPEN,1)ANDCLOSE>OPENANDREF(CLOSE,1)>REF(CLOSE,2)ANDCLOSE>REF(CLOSE,1)),1,0));T20{双飞乌鸦}:=CONST(IF((REF(CLOSE,1)REF(OPEN,2)AND(REF(CLOSE,2)-REF(OPEN,2))/REF(OPEN,2)>=2/100ANDREF(OPEN,1)>=REF(CLOSE,1)AND(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<=2/100ANDREF(OPEN,1)<=REF(CLOSE,2)ANDREF(CLOSE,1)>=REF(OPEN,2)ANDC>=OPENAND(CLOSE-OPEN)/OPEN>=2/100ANDCLOSE>=REF(OPEN,1)ANDOPEN<=REF(CLOSE,1)AND(MAX(CLOSE,REF(C,2))-MIN(CLOSE,REF(CLOSE,2)))/MIN(CLOSE,REF(CLOSE,2))<=1/100),1,0));T22{多方炮}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2)ANDREF(CLOSE,1)OPEN),1,0));T23{出水芙蓉}:=CONST(IF(((OPENMAX(EMA(C,20),MAX(EMA(C,40),EMA(C,60))))AND(V/MA(V,30)>1.2ANDC/REF(C,1)>1.049)),1,0));T24{上升三部曲}:=CONST(IF((REF(CLOSE,4)/REF(OPEN,4)>1.03ANDREF(CLOSE,3)REF(HIGH,3)ANDREF(HIGH,4)>REF(HIGH,2)ANDREF(HIGH,4)>REF(HIGH,1)ANDCLOSE/OPEN>1.03ANDCLOSE>REF(CLOSE,4)),1,0));T25{下跌三部曲}:=CONST(IF((REF(CLOSE,4)/REF(OPEN,4)<0.97ANDREF(CLOSE,3)>REF(OPEN,3)ANDREF(CLOSE,2)>REF(OPEN,2)ANDREF(CLOSE,1)>REF(OPEN,1)ANDREF(LOW,4)REF(HIGH,3)ANDREF(HIGH,4)>REF(HIGH,2)ANDREF(HIGH,4)>REF(HIGH,1)ANDCLOSE/OPEN<0.97ANDCLOSEREF(HIGH,1),1,0));T27{三只乌鸦}:=CONST(IF((REF(CLOSE,2)0.667),1,0));T32{长上影}:=CONST(IF(((HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667),1,0));T33{十字星}:=CONST(IF((CLOSE=OPENANDHIGH!=LOW),1,0));T34{大阴烛}:=CONST(IF((OPEN/CLOSE>1.05ANDHIGH/LOWOPENANDABS(CLOSE-REF(CLOSE,1))/CLOSE<0.002)OR(REF(CLOSE,1)>REF(OPEN,1)ANDCLOSE=1.03ANDOREF(O,1)ANDCREF(V,1)ANDMA(V,5)>REF(MA(V,5),1));T38{M10}:=CONST(V比REF(MA(V,5),1));T39{M11}:=CONST(V比>REF(V,1)ANDMA(V,5)=J12),1,0))+IF((CLOSE<=J23),1,0))>1));T42{M14}:=CONST((((AMOUNT/VOL)/100)>REF(HIGH,1)));T43{M15}:=CONST((((AMOUNT/VOL)/100)