顶线:(1+6/100)*MA(CLOSE,25),COLORLIGRAY;
底线:(1-6/100)*MA(CLOSE,25),COLORLIGRAY;
趋势线:(顶线+底线)/2;
IF(趋势线<=REF(趋势线,1),趋势线,DRAWNULL),COLORGREEN;
IF(趋势线>=REF(趋势线,1),趋势线,DRAWNULL),COLORMAGENTA;
VAR1:=REF(CLOSE,1);
VAR2:=SMA(MAX(CLOSE-VAR1,0),6,1)/SMA(Abs(CLOSE-VAR1),6,1)*100;
STICKLINE(crOSS(84,VAR2),CLOSE,OPEN,2.8,0),COLORGREEN;
VAR3:=CROSS(84,VAR2);
DRAWTEXT(VAR3,HIGH*1.001,2),COLORGREEN;
VAR4:=DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1);
DRAWTEXT(FILTER(bbi>REF(BBI,1)ANDCLOSE>VAR4,10),LOW*0.998,4),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0,0,0,CODE),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,STKNAME),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.2,0,0,HYBLOCK),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.3,0,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.4,0,0,GNBLOCK),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.02,1,0,FGBLOCK),COLORWHITE;
DRAWTEXT_FIX(1,0,0.05,0,STRCAT(9,EXTERNSTR(0,1))),COLORDB11E5;
DRAWTEXT_FIX(1,0,0.1,0,STRCAT(10,EXTERNSTR(0,2))),COLORGREEN;
DRAWTEXT_FIX(1,0,0.15,0,STRCAT(11,EXTERNSTR(0,4))),COLORRED;
VAR5:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR6:=SMA(VAR5,3,1);
VAR7:=SMA(VAR6,3,1);
VAR8:=(VAR6+VAR7)/2;
VAR9:=VAR8>REF(VAR8,1)ANDREF(VAR8,1)<REF(VAR8,2);
VAR10:=VAR8<REF(VAR8,1)ANDREF(VAR8,1)>REF(VAR8,2);
VAR11:=EMA(CLOSE,2);
生命线:EMA(SLOPE(CLOSE,9)*20+CLOSE,37);
IF(生命线<=REF(生命线,1),生命线,DRAWNULL),COLORGREEN,LINETHICK2;
IF(生命线>=REF(生命线,1),生命线,DRAWNULL),COLORRED,LINETHICK2;
升度:生命线/REF(生命线,1)*1000,NODRAW,COLORLIRED;
降度:REF(生命线,1)/生命线*1000,NODRAW;
VAR12:=COUNT(REF(EMA(CLOSE,3),1)<REF(EMA(CLOSE,3),2),5)=5ANDEMA(CLOSE,3)>REF(EMA(CLOSE,3),1);
DRAWICON(VAR12,LOW*0.995,25);
VAR13:=LLV(DMA(CLOSE,vol/CAPITAL),120);
VAR14:=200*(CLOSE-VAR13)/VAR13;
VAR15:=CROSS(VAR14,15);
VAR16:=BArslASTCOUNT(VAR14<15)>25;
DRAWTEXT(VAR15ANDREF(VAR16,1),LOW*0.98,14),COLORYELLOW;
通达信趋势评价指标公式
{GTY:=1241012;
GTY1:=IF(DATE<GTY,1,DRAWNULL);}
GTY1:=1;
主力持仓:=EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3)*GTY1,COLORMAGENTA,LINETHICK2;{=}
警戒线:=80*GTY1,COLORYELLOW;{=}
XIao1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1)*GTY1;
XIAO2:=SMA(Abs(LOW-XIAO1),13,1)/SMA(MAX(LOW-XIAO1,0),10,1)*GTY1;
XIAO3:=EMA(XIAO2,10)*GTY1;
XIAO4:=LLV(LOW,33)*GTY1;
XIAO5:=EMA(IF(LOW<=XIAO4,XIAO3,0),3)*GTY1;
STICKLINE(XIAO5>REF(XIAO5,1),0,XIAO5,3,0)*GTY1,COLOR1ac4E5;
STICKLINE(XIAO5<REF(XIAO5,1),0,XIAO5,3,0)*GTY1,COLORWHITE;
有动作:IF(XIAO5>REF(XIAO5,1),XIAO5,0)*GTY1,COLORRED,NODRAW;
吓唬谁:IF(XIAO5<REF(XIAO5,1),XIAO5,0)*GTY1,COLORGREEN,NODRAW;
VAR1:=(CLOSE>REF(CLOSE,1)ANDCLOSE>REF(CLOSE,2))*GTY1;
VARD:=(CLOSE<REF(CLOSE,1)ANDCLOSE<REF(CLOSE,2))*GTY1;
VARE:=(REF(VARD,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2))*GTY1;
VARF:=(REF(VARE,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2))*GTY1;
VAR10:=(REF(VARF,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2))*GTY1;
VAR11:=(REF(VAR10,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2))*GTY1;
VAR12:=(REF(VAR11,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2))*GTY1;
VAR13:=(REF(VAR12,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2))*GTY1;
VAR14:=(REF(VAR13,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2))*GTY1;
VAR15:=(REF(VAR14,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2))*GTY1;
VAR16:=(REF(VAR15,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2))*GTY1;
VAR17:=(REF(VAR16,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2))*GTY1;
VAR18:=(REF(VAR17,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2))*GTY1;
VAR19:=REF(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13OR
VAR14ORVAR15ORVAR16ORVAR17ORVAR18,1)ANDVAR1;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26)*GTY1;
DEA:=EMA(DIFF,9)*GTY1,COLORFFFF00;
macd:=(DIFF-DEA)*2*GTY1;
A1:=BArslAST(REF(crOSS(DIFF,DEA),1))*GTY1;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1))*GTY1;
底背离:=REF(CLOSE,A1+1)>CLOSEANDDIFF>REF(DIFF,A1+1)ANDCROSS(DIFF,DEA)*GTY1;
顶背离:=REF(CLOSE,A2+1)<CLOSEANDREF(DIFF,A2+1)>DIFFANDCROSS(DEA,DIFF)*GTY1;
④:=IF(底背离,57,0),LINETHICK3,COLORBROWN;
DRAWTEXT(底背离,15,'底背离')*GTY1,COLORYELLOW;
DRAWTEXT(顶背离,50,''),COLORGREEN;
DRAWTEXT(顶背离,40,'顶背离'),COLORGREEN;
DRAwrECTREL(0,0,180,999,RGB(19,38,43));
TT:=240/FROMOPEN;
比:=TT;
YYA4:=MA(CLOSE,20);
YYA5:=(CLOSE>MA(CLOSE,5));
YYA6:=(MA(CLOSE,5)>MA(CLOSE,10));
YYA7:=(CLOSE>MA(CLOSE,10));
YYA8:=(MA(CLOSE,5)>MA(CLOSE,20));
YYA9:=(CLOSE>MA(CLOSE,20));
YYA10:=REF(YYA4,1);
YYA11:=(YYA4>YYA10);
YYAVX:=(((((IF(YYA5,10,(0-10))+IF(YYA6,10,(0-10)))+IF(YYA7,10,(0-10)))+IF(YYA8,10,(0-10)))+IF(YYA9,10,(0-10)))+IF(YYA11,10,(0-10)));
DSLX:=(CLOSE/INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
YYV1:=MA(vol,5);
YYV2:=MA(VOL,10);
情况1:=CONST(IF(((CROSS(YYAVX,1)AND(YYV1>=YYV2))AND(DSLX>=DSLX1)),1,0)),NODRAW;
情况2:=CONST(IF(((CROSS(YYAVX,1)AND(YYV1<YYV2))AND(DSLX>=DSLX1)),1,0));
情况3:=CONST(IF(((CROSS(YYAVX,1)AND(YYV1>YYV2))AND(DSLX<DSLX1)),1,0));
情况4:=CONST(IF(((CROSS(YYAVX,1)AND(YYV1<=YYV2))AND(DSLX<DSLX1)),1,0));
情况5:=CONST(IF(((CROSS(1,YYAVX)AND(YYV1>=YYV2))AND(DSLX>=DSLX1)),1,0));
情况6:=CONST(IF(((CROSS(1,YYAVX)AND(YYV1<YYV2))AND(DSLX>=DSLX1)),1,0));
情况7:=CONST(IF(((CROSS(1,YYAVX)AND(YYV1>=YYV2))AND(DSLX<DSLX1)),1,0));
情况8:=CONST(IF(((CROSS(1,YYAVX)AND(YYV1<YYV2))AND(DSLX<DSLX1)),1,0));
情况9:=CONST(IF(((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1>=YYV2))AND(DSLX>=DSLX1)),1,0));
情况10:=CONST(IF(((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1<YYV2))AND(DSLX>=DSLX1)),1,0));
情况11:=CONST(IF(((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1>=YYV2))AND(DSLX<DSLX1)),1,0)),NODRAW;
情况12:=CONST(IF(((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1<YYV2))AND(DSLX<DSLX1)),1,0));
情况13:=CONST(IF(((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1>=YYV2))AND(DSLX>=DSLX1)),1,0));
情况14:=CONST(IF(((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1<YYV2))AND(DSLX>=DSLX1)),1,0));
情况15:=CONST(IF(((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1>=YYV2))AND(DSLX<DSLX1)),1,0));
情况16:=CONST(IF(((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1<YYV2))AND(DSLX<DSLX1)),1,0));
大盘1:=CONST(IF((CROSS(YYAVX,1)AND(YYV1>=YYV2)),1,0));
大盘2:=CONST(IF((CROSS(YYAVX,1)AND(YYV1<YYV2)),1,0));
大盘3:=CONST(IF((CROSS(1,YYAVX)AND(YYV1>=YYV2)),1,0));
大盘4:=CONST(IF((CROSS(1,YYAVX)AND(YYV1<YYV2)),1,0));
大盘5:=CONST(IF((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1>=YYV2)),1,0));
大盘6:=CONST(IF((((YYAVX>=1)AND(REF(YYAVX,1)>0))AND(YYV1<YYV2)),1,0));
大盘7:=CONST(IF((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1>=YYV2)),1,0));
大盘8:=CONST(IF((((YYAVX<1)AND(REF(YYAVX,1)<0))AND(YYV1<YYV2)),1,0));
mfi:=(HIGH-LOW)*1000000/(VOL*比);
绿灯:=MFI>=REF(MFI,1)ANDVOL*比>=REF(VOL,1);
MMM1:=CONST(绿灯);
衰退:=MFI<REF(MFI,1)ANDVOL*比<REF(VOL,1);
MMM2:=CONST(衰退);
伪装:=MFI>=REF(MFI,1)ANDVOL*比<REF(VOL,1);
MMM3:=CONST(伪装);
蛰伏:=MFI<REF(MFI,1)ANDVOL*比>=REF(VOL,1);
MMM4:=CONST(蛰伏);
WJ:=(H+L+C)/3;
V1:=IF(H=L,1,H-MAX(O,C));
V2:=IF(H=L,1,MAX(C,O)-WJ);
V3:=IF(H=L,1,MIN(O,C)-L);
V4:=IF(H=L,1,WJ-MIN(C,O));
V5:=VOL/IF(H=L,4,H-L);
V6:=(V1*V5);
V7:=(V2*V5);
V8:=(V3*V5);
V9:=(V4*V5);
买盘1:=DYNAINFO(23)*比;
卖盘1:=DYNAINFO(22)*比;
买盘2:=IF(ISLASTBARANDC>300,(V9+V8)*TT,(V9+V8));
卖盘2:=IF(ISLASTBARANDC>300,(V6+V7)*TT,(V6+V7));
买盘:=IF(ISLASTBARANDPERIOD=5ANDC<300,买盘1,买盘2);
卖盘:=IF(ISLASTBARANDPERIOD=5ANDC<300,卖盘1,卖盘2);
{买卖差:=买盘-卖盘;}
量大:=(卖盘+买盘)/REF(VOL,1)>2;
MMM5:=CONST(量大);
量缩:=REF(VOL,1)/(卖盘+买盘)>1.5;
MMM6:=CONST(量缩);
卖量大:=(卖盘-买盘)/买盘>0.4;
MMM7:=CONST(卖量大);
买量大:=(买盘-卖盘)/卖盘>0.4;
MMM8:=CONST(买量大);
DRAWTEXT_FIX(情况1=1,0,0,0,'量能理想,明显走强，中线参与，仓位控制在70%左右。'),COLORFF00FF;
DRAWTEXT_FIX(情况2=1,0,0,0,'走势趋强,量能不足，短线进场，仓位控制在50%左右。'),COLORFF00FF;
DRAWTEXT_FIX(情况3=1,0,0,0,'量价良好,并无明显走强，短线可进场，仓位50%左右。'),COLORFF00FF;
DRAWTEXT_FIX(情况4=1,0,0,0,'形态尚可,量能不足，未全走强，短入，仓位30%左右。'),COLORFF00FF;
DRAWTEXT_FIX(情况5=1,0,0,0,'形态已变坏,走势尚可，重仓者减大半，清仓者%观望。'),COLOR00FFFF;
DRAWTEXT_FIX(情况6=1,0,0,0,'随大盘下跌，明显缩量，考虑大盘风险，减持或清仓。'),COLOR00FFFF;
DRAWTEXT_FIX(情况7=1,0,0,0,'该股放量下跌，走势明显偏弱，不抢反弹，离场观望。'),COLORFFFFFF;
DRAWTEXT_FIX(情况8=1,0,0,0,'该股缩量下跌，走势偏弱无力，人气散失，离场观望。'),COLORFFFF00;
DRAWTEXT_FIX(情况9=1,0,0,0,'该股形态良好，强势明显，量能充足，可以继续持有。'),COLOR00FFFF;
DRAWTEXT_FIX(情况10=1,0,0,0,'上行趋势不变，强势依然，量能开始转弱，注意风险。'),COLOR00FFFF;
DRAWTEXT_FIX(情况11=1,0,0,0,'该股仍然具备上涨潜力，但股性偏弱，可以考虑减仓。'),COLORFFFFFF;
DRAWTEXT_FIX(情况12=1,0,0,0,'该股走势趋弱，量能明显不足，减大部分筹码或空仓。'),COLORFFFF00;
DRAWTEXT_FIX(情况13=1,0,0,0,'该股形态不佳，注意成交量变化，但目前不适合参与。'),COLORFFFF00;
DRAWTEXT_FIX(情况14=1,0,0,0,'该股趋势不明，股价偏弱，注意量能变化，暂不参与。'),COLORFFFF00;
DRAWTEXT_FIX(情况15=1,0,0,0,'有走强迹象，但量能不足，趋势不明朗，不适合操作。'),COLORFFFF00;
DRAWTEXT_FIX(情况16=1,0,0,0,'该股走势太弱，主动性买盘弱，没有太大的参与价值。'),COLORFFFFFF;
DRAWTEXT_FIX(大盘1,0,0.25,0,'总势量能理想,70%仓位,若最佳买点，否则谨慎介入。'),COLOR00FF00;
DRAWTEXT_FIX(大盘2,0,0.25,0,'总势趋强，量不足,若前轮下跌，短进50%，量大加仓。'),COLORFF00FF;
DRAWTEXT_FIX(大盘3,0,0.25,0,'总势形态走坏，重仓者可减去大部分仓位或放空筹码。'),COLORAAAAAA;
DRAWTEXT_FIX(大盘4,0,0.25,0,'总势缩量调整，注意大盘系统风险，短线可清仓观望。'),COLORFFFFFF;
DRAWTEXT_FIX(大盘5,0,0.25,0,'总势走势良好，量能理想，可继续持有或加仓强势股。'),COLORLIGREEN;
DRAWTEXT_FIX(大盘6,0,0.25,0,'总势形态良好，但量能稍显不足，随时准备减仓调仓。'),COLORLIGREEN;
DRAWTEXT_FIX(大盘7,0,0.25,0,'总势趋势不明，注意成交量变化，目前暂不适宜进场。'),COLORFFFFFF;
DRAWTEXT_FIX(大盘8,0,0.25,0,'总势趋势向下，量能萎缩，短线可杀跌，不适合进场。'),COLORFFFFFF;
DRAWTEXT_FIX(MMM1,0,0.5,0,'［绿灯］实计交易量增加。MFI促进指数增加。'),COLORFFFFFF;
DRAWTEXT_FIX(MMM2,0,0.50,0,'［衰退］实计交易量减少。MFI促进指数减少。'),COLORLICYAN;
DRAWTEXT_FIX(MMM3,0,0.50,0,'［伪装］实计交易量减少。MFI促进指数增加。'),COLORLICYAN;
DRAWTEXT_FIX(MMM4,0,0.50,0,'［蛰伏］实计交易量增加。MFI促进指数减少。'),COLORYELLOW;
DRAWTEXT_FIX(MMM5,0,0.75,0,'★今天比昨天的成交量放大一倍以上。'),COLORLIMAGENTA;
DRAWTEXT_FIX(MMM6,0,0.75,0,'★今天比昨天的成交量缩量一半以上。'),COLORYELLOW;
DRAWTEXT_FIX(MMM7,0,1,0,'☆该股今天卖出量大于买入量40％以上。'),COLORRED;
DRAWTEXT_FIX(MMM8,0,1,0,'☆该股今天买入量大于卖出量40％以上。'),COLORYELLOW;
