通達信組圖指標：買賣均線主圖+智能解盤副圖，精準趨勢判斷

源代碼

{參數範圍:0-0.9，意思：上到下0.0-0.9，左到右0.0-0.9}

右:=0.7;

上1:=0.6;

上2:=0.8;

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,30); {修改30-60}

情況1:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1>=YYV2)) AND (DSLX>=DSLX1)),1,0));

情況2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1<yyv2>=DSLX1)),1,0));/<yyv2>

情況3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1>YYV2)) AND (DSLX<dslx1>

情況4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1<=YYV2)) AND (DSLX<dslx1>

情況5:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1>=YYV2)) AND (DSLX>=DSLX1)),1,0));

情況6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1<yyv2>=DSLX1)),1,0));/<yyv2>

情況7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1>=YYV2)) AND (DSLX<dslx1>

情況8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1< YYV2)) AND (DSLX<dslx1>

情況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>= DSLX1)),1,0));/<yyv2>

情況11:=CONST(IF(((((YYAVX>=1) AND (REF(YYAVX,1)>0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)),1,0));

情況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>

大盤3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >=YYV2)),1,0));

大盤4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 <yyv2>

大盤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));

DRAWTEXT_FIX(情況1=1 ,右,上1,0,'量能理想,明顯走強,中線參與，倉位在2/3右'),COLORFF00FF;

DRAWTEXT_FIX(情況2=1 ,右,上1,0,'走勢趨強量能不足，短線進場，倉位在1/2右'),COLORFF00FF;

DRAWTEXT_FIX(情況3=1 ,右,上1,0,'量價良好，並沒有明顯走強，短線進場，倉位1/2右。'),COLORFF00FF;

DRAWTEXT_FIX(情況4=1 ,右,上1,0,'形態尚可，量能不足，未完全走強,短線參與，倉位1/3右。'),COLORFF00FF;

DRAWTEXT_FIX(情況5=1 ,右,上1,0,'形態變壞，走勢尚可，重倉減大半，清倉者觀望。'),COLOR00FFFF;

DRAWTEXT_FIX(情況6=1 ,右,上1,0,'隨大盤一起下跌，明顯縮量走勢，考慮大盤風險，減持或清倉。'),COLOR00FFFF;

DRAWTEXT_FIX(情況7=1 ,右,上1,0,'該股放量下跌，走勢明顯偏弱，離場觀望。'),COLORFFFFFF;

DRAWTEXT_FIX(情況8=1 ,右,上1,0,'該股縮量下跌，走勢偏弱，離場觀望。'),COLORFFFF00;

DRAWTEXT_FIX(情況9=1 ,右,上1,0,'該股形態良好，強勢明顯，量能充足，可以繼續持有。'),COLOR00FFFF;

DRAWTEXT_FIX(情況10=1,右,上1,0,'該股上行趨勢不變，強勢依然，但量能開始轉弱，注意風險'),COLOR00FFFF;

DRAWTEXT_FIX(情況11=1,右,上1,0,'該股仍然具備上漲潛力，但股性偏弱，可考慮減倉。'),COLORFFFFFF;

DRAWTEXT_FIX(情況12=1,右,上1,0,'該股走勢趨弱，量能不足，減持大部分籌碼'),COLORFFFF00;

DRAWTEXT_FIX(情況13=1,右,上1,0,'該股形態不佳，注意成交量的變化，但目前不適合參與。'),COLORFFFF00;

DRAWTEXT_FIX(情況14=1,右,上1,0,'該股趨勢不明，股價偏弱，注意量能變化，目前不宜參與。'),COLORFFFF00;

DRAWTEXT_FIX(情況15=1,右,上1,0,'有走強跡象，但量能不足，趨勢不明，不適合操作'),COLORFFFF00;

DRAWTEXT_FIX(情況16=1,右,上1,0,'該股走勢太弱，沒有參與價值。'),COLORFFFFFF;

DRAWTEXT_FIX(大盤1,右,上2,0,'總勢量能理想,2/3倉位, 前一輪下跌，是否最佳買點，否則謹慎介入。'),COLOR00FF00;

DRAWTEXT_FIX(大盤2,右,上2,0,'總勢趨強，量能不足，若前一輪下跌，短線進場1/2，量能放大加倉。'),COLORFF00FF;

DRAWTEXT_FIX(大盤3,右,上2,0,'總勢形態走壞，重倉者可以減去大部分倉位。'),COLORAAAAAA;

DRAWTEXT_FIX(大盤4,右,上2,0,'總勢縮量調整，注意風險，短線清倉觀望。'),COLORFFFFFF;

DRAWTEXT_FIX(大盤5,右,上2,0,'總勢走勢良好，量能理想，可以繼續持有強勢股。'),COLOR00FFFF;

DRAWTEXT_FIX(大盤6,右,上2,0,'總勢形態良好，但量能稍顯不足，隨時準備減倉'),COLOR00FF00;

DRAWTEXT_FIX(大盤7,右,上2,0,'總勢趨勢不明，注意成交量變化，目前不適宜進場。'),COLORFFFFFF;

DRAWTEXT_FIX(大盤8,右,上2,0,'總勢趨勢向下，量能萎縮，不適合進場。'),COLORFFFFFF;

E5:=EMA(C,5),COLORWHITE;

MA5:=MA(C,5);

MA25:MA(C,25),COLORYELLOW;

E12:EMA(C,12),COLORFF00FF;

MA99:MA(C,99),COLOR0000FF;

MA177:MA(C,177),COLOR008000;

DRAWTEXT_FIX(ISLASTBAR,0,0,0,GNBLOCK),COLORYELLOW;

GD:=MAX(HHV(C,30),HHV(O,30)),COLORWHITE,DOTLINE;

E17:=EMA(C,17);

VAR1:=1;

VAR2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100*VAR1;

DF:= SMA(SMA(VAR2,2,1)+3*VAR1,2,1),LINETHICK2,COLORRED;

MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);

HD :=HIGH-REF(HIGH,1);

LD :=REF(LOW,1)-LOW;

DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);

DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);

PDI:= DMP*100/MTR,;

MDI:= DMM*100/MTR;

ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6);

ADXR:=EXPMEMA(ADX,6);

DBQD:=CROSS(DF,20) AND EXIST(C>REF(C,1)*1.095,2) ;

{DRAWTEXT(DBQD,LOW-1.5,'底部啟動'),COLORYELLOW;}

ZT:=C>1.095*REF(C,1);

NPZ:=CROSS(PDI,ADX) AND ADX<30 AND CROSS(DF,50) AND PDI>REF(PDI,1) AND PDI>30

AND REF(COUNT(ZT,6),1)>=2 AND FINANCE(7)<800000000 ;

{DRAWTEXT(NPZ,LOW-1.5,'↖牛胚'),COLORYELLOW;}

A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;

A4:=SMA(A3,3,1);

A5:=SMA(A4,3,1);

A6:=3*A4-2*A5;

A7:=C-REF(C,1);

A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);

買:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)) AND C>MA25 ;

DRAWTEXT(FILTER(買=1,5) ,LOW-0.001,'↖買進'),COLORYELLOW;

STICKLINE(買,OPEN,CLOSE,0.05,0),COLORYELLOW;

九買:=FILTER(買=1,5) AND CROSS(C,MA99) AND C>=1.07*REF(C,1) AND LAST(MA99>REF(MA99,1),10,0);

{DRAWTEXT(九買,LOW-0.45,'↖九買'),COLORRED;}

A9:=買 AND C>1.095*REF(C,1);

{DRAWTEXT(A9,LOW-0.9,'↖絕買'),COLORRED;}

FA:=BARSLAST(CROSS(E12,E5)) AND CROSS(E5,E12);

FB:=FA AND E5>MA25 AND E12>MA25 AND E12>REF(E12,1) AND KDJ.D<50;

{DRAWTEXT(FB,L-0.1,'↖追漲'),COLORFF00FF;}

H1:=EMA(C,5);

H2:=EMA(H1,13);

錢來:=CROSS(H1,H2) AND H2>=REF(H2,1);

{DRAWICON(錢來,L*0.98,9);}

NOTP:=DYNAINFO(8);

NOST:=NOT(FINDSTR(GNBLOCK,'ST'));

BBB:=MACD.MACD<0 AND CROSS(MACD.MACD,REF(MACD.MACD,1)) ;

A34:=100*(C-LLV(L,34))/(HHV(C,34)-LLV(L,34));

WK:=KDJ.D<20 AND KDJ.J<20 AND CROSS(KDJ.J,KDJ.D);

CYC13:=0.01*EMA(AMOUNT,13)/EMA(VOL,13);

CYS:=(CLOSE-CYC13)/CYC13*100;

AAAA:=WINNER(C);

CDFT:= REF(A34,1)<5 AND A34>5 AND NOTP AND NOST AND

REF(CYS,1)

{ DRAWTEXT(CDFT,L-0.01,'↖反彈'),COLORYELLOW; }

SC:=CROSS(MA99,MA25);

TSC:=BARSLAST(SC);

JC:=CROSS(MA25,MA99);

JD1:=ATAN((MA25/REF(MA25,1)-1)*100)*180/3.1416;

JD2:=ATAN((MA99/REF(MA99,1)-1)*100)*180/3.1416;

NJD:=JD1-JD2<25 ;

SS:=MA99>REF(MA99,TSC) AND LAST(MA99>REF(MA99,1),TSC,0);

NTT:= JC AND COUNT(ZT,TSC)>=1 AND NJD AND SS ;

{DRAWTEXT(NTT,MA25-0.25,'↖牛抬頭'),COLORYELLOW;}

ZG:=WINNER(C)>0.95 AND DYNAINFO(37)<0.03;

DIF:=EMA(CLOSE,10)-EMA(CLOSE,20);

DEA:=EMA(DIF,21);

MACD:=(DIF-DEA)*2;

CA:=CROSS(DIF,DEA);

CA1:=BARSLAST(REF(CROSS(DIF,DEA),1));

CB:=REF(CLOSE,CA1+1)>CLOSE AND DIF>REF(DIF,CA1+1) AND CROSS(DIF,DEA);

CC:= CA AND CB AND COUNT(CA,10)=2 AND LAST(DIF<0,13,1) AND LAST(DEA<0,13,1)

AND FINANCE(7)<1000000000 ;

{DRAWTEXT(CC,L-0.25,'↖底買'),COLORYELLOW;}

DIFIF1:=EMA(CLOSE,10) - EMA(CLOSE,20);

DEAEA1:=EMA(DIFIF1,21);

MAC:=2*(DIFIF1-DEAEA1);

DD:= H>REF(H,1) AND L>REF(L,1) AND REF(L,1)=LLV(L,30)

AND REF(L,2)>REF(L,1) AND REF(H,2)>REF(H,1);

DD1:=REF(LLV(L,30),5);

T1:=LLVBARS(REF(L,5),30);

MAC1:=REF(MAC,T1);

DB:= ABS(REF(MAC,1))<0.4*ABS(MAC1) AND REF(MAC,1)<0 AND MAC1<0

AND REF(L,T1)>REF(L,1) AND T1<30 AND T1>4;

ZT5:=C>=1.08*REF(C,1);

HJMD:=EXIST(DB,3) AND EXIST(DD,3) AND DYNAINFO(37)>0 AND COUNT(ZT5,3)>=1;

DRAWTEXT(HJMD,L-0.25,'↖黃金買'),COLORYELLOW;

操盤線:=MA(C,4),NODRAW,COLORRED;

安全線:=MA(C,19),LINETHICK2,COLORYELLOW;

空:=EMA(CLOSE,5);

均衡:=EMA(空,0),COLORFFFFFF;

下趨勢雙線持幣:=HHV(MA(HIGH,3),2),LINETHICK2,COLORGREEN;

上趨勢單線持股:=LLV(MA(HIGH,3),1),LINETHICK2,COLORRED;

{STICKLINE(CROSS(操盤線,安全線) AND (操盤線>安全線) AND

(CLOSE>安全線),OPEN,CLOSE,3,0),COLORYELLOW;

STICKLINE(CROSS(操盤線,安全線) AND (操盤線>安全線) AND

(CLOSE>安全線),H,L,0,0),COLORYELLOW;}

VAR5:=FILTER(均衡>REF(均衡,1) AND 下趨勢雙線持幣REF(CLOSE,1),11) ;

IF(VAR5>=1,L*0.996,DRAWNULL),COLORMAGENTA,CIRCLEDOT;

{DRAWTEXT(VAR5>=1 AND C>MA(C,20),L-0.02,'↖啟動點'),COLORMAGENTA;}

V20:=MA(V,20);

ZD:=L>=0.98*E17 AND L<=1.02*E12 ;

ZF:=O/L<1.035 AND REF(C,1)/O<1.02;

ZTTO:= COUNT(ZT,12)>=1 AND DYNAINFO(37)>0 AND ZD AND ZF ;

DRAWTEXT(VAR5>=1 AND C>MA(C,20) AND ZTTO ,L-0.02,'↖牛啟動點'),COLORMAGENTA;

ZLCM:=EMA(WINNER(CLOSE)*70,3);

SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);

ZSHTL:=SHCM/(ZLCM+SHCM)*100;

ZZLKP:=ZLCM/(ZLCM+SHCM)*100;

QBD:=CROSS(ZZLKP,20) AND ZZLKP>25 AND C>1.05*REF(C,1);

DRAWTEXT(QBD ,L-0.32,'起爆'),COLORYELLOW;

RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

RSV4:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;

短期B:=SMA(RSV1,3,1);

短期A:=SMA(短期B,3,1);

K4:=SMA(RSV4,8,1);

中期波段:=SMA(K4,3,1);

VV1:=SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1);

VV2:=SMA(VV1,3,1);

VV3:=3*VV1-2*VV2;

趨勢:=EMA(VV3,3);

VV4:=(趨勢-REF(趨勢,1))/REF(趨勢,1)*100;

準備資金:=趨勢<13;

開始建倉:=趨勢<13 AND VV4>13;

VA1:=(CLOSE*2+HIGH+LOW)/4*10;

VA2:=EMA(VA1,13);

VA3:=EMA(VA1,34);

VA4:=VA2-VA3;

VA5:=EMA(VA4,5);

VA6:=2*(VA4-VA5)*5.5;

主力進場:=VA6>=0 AND 趨勢<13;

轉折:=REF(中期波段,1)REF(中期波段,1);

先機共振抄底:=EXIST(開始建倉,3) AND EXIST( 主力進場,1) AND 中期波段>REF(中期波段,1);

短線波段:=(EXIST(轉折,1) AND 短期B>=短期A) OR (REF(短期B,1)=短期A AND 中期波段>REF(中期波段,1));

ZTT:=C>REF(C,1)*1.045;

MA60:=MA(C,60);

LSC:= 短線波段 AND C>MA(C,25) AND MACD.MACD>0 AND EXIST(ZTT,8) AND LAST(MA60>REF(MA60,1),4,1) ;

{DRAWTEXT(LSC,L+0.155,'↖暴漲牛'),COLORYELLOW;}

;

倍量柱:=IF(V/REF(V,1)>1.9 AND C>REF(C,1),1,0);

縮量柱:=IF(V

改良縮倍量柱:倍量柱 AND REF(縮量柱,1) AND MA(C,5)>MA(C,20)

AND MA(C,5)>REF(MA(C,5),1) AND MA(C,20)>REF(MA(C,20),1)

AND REF(MA(C,5),1)

AND REF(MA(C,5),2)

AND C>O AND C>MA(C,5) AND C>MA99 AND MACD.MACD>0;

DRAWTEXT(改良縮倍量柱,MA5+0.055,'↖啟飛'),COLORYELLOW;

JQHD1:=HHV(H,15) ;

Y:=MAX(REF(HHV(CLOSE,15),3),REF(HHV(OPEN,15),3));

ZT2:=C>=1.095*REF(C,1);

ZTO:=EXIST(JQHD1,15) AND COUNT(ZT2,12)>=2 AND C>Y+0.03

AND REF(C,1)<0.96*Y AND LAST(H

DRAWTEXT(ZTO,Y,'過左峰'),COLORYELLOW;

KB:=REF(C,1)>1.095*REF(C,2) AND REF(C,2)>1.095*REF(C,3) AND

REF(C,3)>REF(C,4) AND REF(C,4)>REF(C,5) AND V>3*MA(V,4) AND C<1.095*REF(C,1);

TKB:=BARSLAST(KB);

HKB:=MAX(REF(C,TKB),REF(O,TKB));

XXG:=BARSCOUNT(C)<30 ;

牛繼續:=EXIST(KB,8) AND CROSS(C,HKB) AND XXG;

DRAWTEXT(牛繼續,HKB,'↖牛繼續'),COLORYELLOW;

JDD1:=ATAN((C/REF(MA5,1)-1)*100)*180/3.1416;

JDD2:=ATAN((MA25/REF(MA25,1)-1)*100)*180/3.1416;

DYJ:=CROSS(JDD1,30) AND JDD2>15 AND C>MA25 AND REF(JD1,1)<15 AND

MA25>REF(MA25,1) AND MA99>REF(MA99,1) ;

DRAWTEXT(DYJ,L+0.005,'↖仰角'),COLORRED;

LXPS:=LAST(JDD2>REF(JDD2,1),5,1);

{DRAWTEXT(LXPS,L+0.055,'↖金鑰匙'),COLORRED;}

HHHHHA:=REF(MAX(HHV(C,8),HHV(O,8)),1);

LLLLLB:=REF(MIN(LLV(C,8),LLV(O,8)),1);

ZZZZZF:=HHHHHA/LLLLLB<1.045;

BBBBBL:=C>REF(C,1) AND V>REF(V,1)*1.9;

JDDDDD1:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;

TUPO:=ZZZZZF AND CROSS(C,HHHHHA) AND LAST(C>MA25,3,0) AND LAST(MA25>REF(MA25,1),3,0) AND

BBBBBL AND REF(V,1)30;

DRAWTEXT(TUPO,(HHHHHA+0.01)+0.035,'↖箱型突破'),COLORYELLOW;

BL:=C>REF(C,1) AND V>1.9*REF(V,1);

閱讀更多 指標龍捲風 的文章

關鍵字: CONST 通達信 EMA