一组大智慧主图及副图指标公式（四色谱 四量图 决策曲线 中期方向线）

以下是一组大智慧主图及副图指标公式（四色谱 四量图 决策曲线 中期方向线）

在论坛，向老师们学习了很多。为回报论坛，奉上一组大智慧指标指标，供有缘人下载使用。希望大家在股市中赚钱，赚大钱！！！
 

四色谱
M3:=MA(CLOSE,3);
 M13:=MA(CLOSE,13);
 M34:=MA(CLOSE,34);
 X:=BARSLAST(REF(CROSS(C,MA(C,120)),1)) AND CROSS(MA(C,20),MA(C,120));
 PARTLINE(M34<REF(M34,1),M34),COLORGREEN,LINETHICK0;
 STICKLINE(M3>=M13 AND M34>=REF(M34,1) ,H ,L ,0.01,0 ),COLORRED;
 STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,8,0 ),COLORRED;
 STICKLINE(M3>=M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,8 ,0 ),COLORRED;
 STICKLINE(M3<M13 AND M34>=REF(M34,1) ,H ,L ,0.01 ,0 ),COLORYELLOW;
 STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C>=O ,O ,C ,8 ,0),COLORYELLOW;
 STICKLINE(M3<M13 AND M34>=REF(M34,1) AND C<O ,O ,C ,8 ,0 ),COLORYELLOW;
 STICKLINE(M3<M13 AND M34<REF(M34,1) ,H ,L ,0.01 ,0 ),COLORGREEN;
 STICKLINE(M3<M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,8 ,0 ),COLORGREEN;
 STICKLINE(M3<M13 AND M34<REF(M34,1) AND C<O ,O ,C ,8 ,0 ),COLORGREEN;
 STICKLINE(M3>=M13 AND M34<REF(M34,1) ,H ,L ,0.01,0 ),COLORMAGENTA;
 STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C>=O ,O ,C ,8 ,0 ),COLORMAGENTA;

STICKLINE(M3>=M13 AND M34<REF(M34,1) AND C<O ,O ,C ,8 ,0 ),COLORMAGENTA;
 DRAWTEXT(X,MA(C,120)-0.13,’牛股‘),COLORYELLOW,LINETHICK3;

四量图
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
马线:=MA(牛线,6);
 STICKLINE(C>牛线,2.5,4,8,0),COLORRED{COLORGREEN},LINETHICK2;
 STICKLINE(C<马线,2.5,4,8,0),COLORGREEN{COLORRED},LINETHICK2;
 STICKLINE(牛线>=C AND C>=马线,2.5,4,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2;
 A:=MAX(MA(C,60),MA(C,120));
 B:=MIN(MA(C,60),MA(C,120));
 STICKLINE(C>=A,0.5,2,8,0),COLORRED{COLORGREEN},LINETHICK2;
 STICKLINE(C<=B,0.5,2,8,0),COLORGREEN{COLORRED},LINETHICK2;
 STICKLINE(A>=C AND C>=B,0.5,2,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2;

{R:=0;}
 E:=MAX(MA(C,45),MA(C,90));
 F:=MIN(MA(C,45),MA(C,90));
 STICKLINE(C>E,-1.5,0,8,0),COLORRED{COLORGREEN},LINETHICK2;
 STICKLINE(C<F,-1.5,0,8,0),COLORGREEN{COLORRED},LINETHICK2;
 STICKLINE(E>=C AND C>=F,-1.5,0,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2;
 J:=MAX(MA(C,30),MA(C,60));
 K:=MIN(MA(C,30),MA(C,60));
 STICKLINE(C>J,-3.5,-2,8,0),COLORRED{COLORGREEN},LINETHICK2;
 STICKLINE(C<K,-3.5,-2,8,0),COLORGREEN{COLORRED},LINETHICK2;
 STICKLINE(J>=C AND C>=K,-3.5,-2,8,0),COLORGREEN{COLORMAGENTA}{COLORYELLOW},LINETHICK2;

决策曲线
{决策曲线28种指标采样}
 {MA1}
 MA1:=MA(CLOSE,5);
 MA2:=MA(CLOSE,10);
 P01:=IF(MA1>MA2,1,IF(MA2>MA1,-1,0));
 MA3:=MA(CLOSE,3);
 MA4:=MA(CLOSE,5);
 P02:=IF(MA3>MA4,1,IF(MA4>MA3,-1,0));
 MA5:=MA(CLOSE,12);
 MA6:=MA(CLOSE,50);
 P03:=IF(MA5>MA6,1,IF(MA6>MA5,-1,0));
 {KDJ}
 RSV:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
 K:=EMA(RSV,3);
 D:=EMA(K,3);
 P04:=IF(K>D,1,IF(D>K,-1,0));
 {MACD}
 DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
 DEA:=EMA(DIF,9);
 MACD:=(DIF-DEA)*2;
 P05:=IF(DIF>DEA,1,IF(DEA>DIF,-1,0));
 {TRIX}
 TR2:=EMA(EMA(EMA(CLOSE,12),12),12);
 TRIX:=(TR2-REF(TR2,1))/REF(TR2,1)*100;
 MATRIX:=MA(TRIX,9) ;
 P06:=IF(TRIX>MATRIX,1,IF(MATRIX>TRIX,-1,0));
 {DMI}
 TR1:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),7);
 HD :=HIGH-REF(HIGH,1);
 LD :=REF(LOW,1)-LOW;
 DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),7);
 DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),7);
 PDI:= DMP*100/TR1;
 MDI:= DMM*100/TR1;
 ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,7);
 ADXR:=EMA(ADX,7);
 P07:=IF(PDI>MDI AND ADX>PDI AND ADX>50,3,IF(PDI<MDI AND ADX>MDI AND ADX>50,-3,0));
 {RSI}
 LC:=REF(CLOSE,1);{40}
 RSI1:=EMA(MAX(CLOSE-LC,0),5)/EMA(ABS(CLOSE-LC),5)*100;
 P08:=IF(RSI1>80,1,IF(RSI1<20,-1,0));
 {CCI}
 TYP:=(HIGH+LOW+CLOSE)/3;
 CCI:=(TYP-MA(TYP,8))/(0.015*AVEDEV(TYP,8));
 P09:=IF(CCI>180,2,IF(CCI<-180,-2,0));
 {W%R}
 WR1:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100;
 P10:= IF(WR1>80,1,IF(WR1<20,-1,0));
 {OSC}
 OSC:=100*(CLOSE-MA(CLOSE,20));
 P11:=IF(OSC>0,1,IF(OSC<0,-1,0));
 {MTM}
 MOM:=CLOSE-REF(CLOSE,7);
 P12:=IF(MOM>0,1,IF(MOM<0,-1,0));
 {DPO}
 DPO:=CLOSE-REF(MA(CLOSE,11),11/2+1);
 P13:=IF(DPO>0,1,IF(DPO<0,-1,0));
 {布林线}
MB:=MA(CLOSE,12);
 R:=(CLOSE-MB)*(CLOSE-MB);
 X1:=MA(R,12);
 X2:=SQRT(X1);
 D1:=1;
 UPPERB:=MB+(D1*X2);
 LOWERB:=MB-(D1*X2);
 P14:=IF(CLOSE>UPPERB,2,IF(CLOSE<LOWERB,-2,0));
 {BRAR}
 BR:=SUM(MAX(0,HIGH-REF(CLOSE,1)),14)/SUM(MAX(0,REF(CLOSE,1)-LOW),14)*100;
 AR:=SUM(HIGH-OPEN,14)/SUM(OPEN-LOW,14)*100;
 P15:=IF(BR>350 OR AR>180,3,IF(BR<45 OR AR<45,-3,0));

中期方向线
 时间:DATE+1900/00/00,LINETHICK0 ,COLORWHITE;
 EXP12:=EMA(C,12);
 EXP50:=EMA(C,50);
 DIR:EXP12-EXP50,LINETHICK0;
 FILLRGN(DIR,0,DIR>0,RGB(190,0,0),DIR<0,RGB(0,130,0));
 MB:EMA(DIR,20),LINETHICK0;
 UPPER:MB+1.96*STD(DIR,10),COLORYELLOW;
 LOWER:MB-1.96*STD(DIR,10),COLORCYAN;