天地合一主图源码
{前面一段源码是0百万波浪(n=8;p=7.5;m=14)}

DRAWGBK(C, COLORRGB(000,80,120), COLORRGB(160,160,160),1);
Var1:=(3*C+O+L+H)/6;
天:EMA((11*Var1+10*REF(Var1,1)+9*REF(Var1,2)+8*REF(Var1,3)+7*REF(Var1,4)+6*REF(Var1,5)+
5*REF(Var1,6)+4*REF(Var1,7)+3*REF(Var1,8)+2*REF(Var1,9)+REF(Var1,10))/66,7);
地:EMA(天,11),COLORRED;
合:天*0.506+地*0.494,COLORGREEN;
一:EMA(地,6);
Var2:=CLOSE*VOL;
CY:=EMA((EMA(Var2,4)/EMA(VOL,4)+EMA(Var2,6)/EMA(VOL,6)+EMA(Var2,13)/
EMA(VOL,13)+EMA(Var2,24)/EMA(VOL,24))/4,1);
CY+P*STD(CY,N),COLORYELLOW;CY-P*STD(CY,N),COLORYELLOW;
REF(CY+P*STD(CY,N),1)COLORRED;
REF(CY-P*STD(CY,N),1)COLORRED;

上轨:MA(C*1.10,M),COLORGREEN;
下轨:MA(C*0.9,M),COLORGREEN;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,0),COLOR1d0286;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,7,0),COLOR2804b7;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,0),COLOR2f05d6;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,5,0),COLOR3405ef;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,4,0),COLOR4518fa;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3,0),COLOR643efb;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,2,0),COLOR714ffb;

STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1,0),COLOR886bfc;

STICKLINE(CLOSE>=OPEN,HIGH,LOW,0,0),COLOR886bfc;

STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,8,0),COLOR762401;

STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,7,0),COLOR962e01;

STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,6,0),COLORb93902;

STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,5,0),COLORdd4402;

STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,4,0),COLORfd530b;

STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,3,0),COLORfd7135;

STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,2,0),COLORfd8c5b;

STICKLINE(CLOSE<=OPEN,CLOSE,OPEN,1,0),COLORfea883;

STICKLINE(CLOSE<=OPEN,HIGH,LOW,0,0),COLORfea883;