以下是通达信变色轨道主图指标公式源码
通达信变色轨道主图指标公式源码：
M1:=5;
M2:=10;
M3:=20;
M4:=60;
EXP1:EXPMA(CLOSE,M1)LINETHICK2;
EXP2:EXPMA(CLOSE,M2)LINETHICK2;
EXP3:EXPMA(CLOSE,M3)LINETHICK2;
EXP4:EXPMA(CLOSE,M4)LINETHICK2;
expma5:EXPMA(C,5),COLORWHITELINETHICK2;
EXPMA13:EXPMA(C,13),COLORMAGENTALINETHICK2;
牛熊分界线:DMA(MA(CLOSE+REF(CLOSE,5)/CLOSE*0.098,90),),LINETHICK2,COLORYELLOW;
年线:DMA(MA(CLOSE+REF(CLOSE,5)/CLOSE*0.098,250),VOL),COLORCYANLINETHICK2;
CC:=Abs((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=DMA(CLOSE,CC);
上轨:(1+7/100)*DD,CIRCLEDOT,COLORGREEN;
下轨:(1-7/100)*DD,CIRCLEDOT,COLORGREEN;
中轨:(上轨+下轨)/2,CIRCLEDOT,COLORGREEN;
上轨绿:IF(上轨 =REF(上轨,1),上轨,DRAWNULL),CIRCLEDOT,COLORGREEN,LINETHICK1;
上轨红:IF(上轨 =REF(上轨,1),上轨,DRAWNULL),CIRCLEDOTCOLORRED,LINETHICK1;
中轨绿:IF(中轨 =REF(中轨,1),中轨,DRAWNULL),CIRCLEDOT,COLORGREEN,LINETHICK1;
中轨红:IF(中轨 =REF(中轨,1),中轨,DRAWNULL),CIRCLEDOTCOLORRED,LINETHICK1;
下轨绿:IF(下轨 =REF(下轨,1),下轨,DRAWNULL),CIRCLEDOT,COLORGREEN,LINETHICK1;
下轨红:IF(下轨 =REF(下轨,1),下轨,DRAWNULL),CIRCLEDOTCOLORRED,LINETHICK1;
{以下这段源码可要可不要，主要是美化用}
VAR1:=(CLOSE REF(CLOSE,1)ANDCLOSE REF(CLOSE,2));
VAR2:=(REF(VAR1,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR3:=(REF(VAR2,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR4:=(REF(VAR3,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR5:=(REF(VAR4,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR6:=(REF(VAR5,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR7:=(REF(VAR6,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR8:=(REF(VAR7,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR9:=(REF(VAR8,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VARA:=(REF(VAR9,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VARB:=(REF(VARA,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VARC:=(REF(VARB,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VARD:=(CLOSE REF(CLOSE,1)ANDCLOSE REF(CLOSE,2));
VARE:=(REF(VARD,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VARF:=(REF(VARE,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR10:=(REF(VARF,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR11:=(REF(VAR10,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR12:=(REF(VAR11,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR13:=(REF(VAR12,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR14:=(REF(VAR13,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR15:=(REF(VAR14,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR16:=(REF(VAR15,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR17:=(REF(VAR16,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR18:=(REF(VAR17,1)ANDCLOSE =REF(CLOSE,1)ANDCLOSE =REF(CLOSE,2));
VAR19:=((REF(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,1))ANDVAR1);
VAR1A:=((REF(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,1))ANDVARD);
RSV9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
红色持股:=VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,COLOR0000FF,NODRAW;
离场:=IF(红色持股,LLV(C,2),DRAWNULL);
明离场价:=离场,COLORFF99FF,NODRAW;
今离场价:REF(离场,1)COLOR0000FF,NODRAW,COLORGREEN;
青色观望:=VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,COLORFFFF00,NODRAW;
进:=IF(青色观望,HHV(C,2),DRAWNULL);
明进场价:=进,COLOR33AacC,NODRAW,COLORCYAN;
今进场价:REF(明进场价,1),COLORFF0000,NODRAW,COLORRED;
短买:=VAR19,COLOR33AACC,NODRAW;
品红离场:=VAR1A,COLORFF99FF,NODRAW;
急速超跌:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100 -14,COLORFFFFFF,NODRAW;
STICKLINE(C =O,L,H,0,0),COLOR0000CC;
STICKLINE(C O,L,H,0,0),COLOR999900;
STICKLINE(1,C,O,3.5,0),COLOR858500;
STICKLINE(C =O,C,O,3.5,0),COLOR0000E5;
AAA:=(2.5*C+H+L+O)/5.5;
VVAR1:=(4*AAA+3*REF(AAA,1)+2*REF(AAA,2)+REF(AAA,3))/10.18;
VVAR2:=(HHV(VVAR1,5)+HHV(VVAR1,10)+HHV(VVAR1,20))/3;
VVAR3:=(LLV(VVAR1,5)+LLV(VVAR1,10)+LLV(VVAR1,20))/3;
VVAR4:=(HHV(VVAR2,5)+HHV(VVAR2,10)+HHV(VVAR2,20))/3;
VVAR5:=(LLV(VVAR3,5)+LLV(VVAR3,10)+LLV(VVAR3,20))/3;
VVAR6:=(LLV(VVAR1,2)+LLV(VVAR1,4)+LLV(VVAR1,6))/3;
DRAWBAND(VVAR1,RGB(155,50,50),VVAR6,RGB(250,250,0));
:VVAR1,COLORWHITE;
:VVAR6,COLORYELLOW;
N:=20;M:=32;P1:=80;P2:=100;
VAR1:=(C+H+O+L)/4;
卖出:xma(VAR1,N)*(1+P1/1000),COLORGREEN,LINETHICK2;
买入:Xma(VAR1,M)*(1-P2/1000),COLORMAGENTA,LINETHICK2;
三分之一:(卖出-买入)/3+买入,COLORWHITE;
幅度:100*(卖出-买入)/买入,NODRAW;
MA1:=MA(VAR1,3);
stICKLINE(卖出 LOWAND卖出 HIGH,卖出,MAX(卖出,MAX(OPEN,CLOSE)),3,0),COLORGREEN;
STICKLINE(卖出 MIN(C,O)AND卖出 MAX(C,O),卖出,MAX(OPEN,CLOSE),3,0),COLORGREEN;
STICKLINE(卖出 LOWAND卖出 HIGH,卖出,HIGH,0,0),COLORGREEN;
STICKLINE(卖出 LOW,OPEN,CLOSE,3,0),COLORGREEN;
STICKLINE(卖出 LOW,HIGH,LOW,0,0),COLORGREEN;
STICKLINE(买入 LOWAND买入 HIGH,买入,MIN(MIN(OPEN,CLOSE),买入),3,0),COLORMAGENTA;
STICKLINE(买入 MIN(C,O)AND买入 MAX(C,O),买入,MIN(OPEN,CLOSE),3,0),COLORMAGENTA;
STICKLINE(买入 LOWAND买入 HIGH,买入,LOW,0,0),COLORMAGENTA;
STICKLINE(买入 HIGH,OPEN,CLOSE,3,0),COLORMAGENTA;
STICKLINE(买入 HIGH,HIGH,LOW,0,0),COLORMAGENTA;
DRAWTEXT(crOSS(LOW,买入),LOW*0.95,'B'),COLORMAGENTA,LINETHICK2;
DRAWTEXT(CROSS(卖出,HIGH),HIGH*1.02,'S'),COLORGREEN;
AA1:=AMOUNT/V;
BB1:=L1.2;
DD1:=L MA(C,5)*0.921;
EE1:=V MA(V,5)*1.5;
FF1:=BB1ANDCC1ANDDD1ANDEE1;
DRAWTEXT(FF1,(LOW*0.97),'老鼠仓'),COLOR4080FF;
AAA2:=SUM(IF(CLOSE REF(CLOSE,1),vol*C,0),0);
AAA3:=SUM(IF(CLOSE REF(CLOSE,1),VOL*C,0),0);
AAA4:=SUM(IF(CLOSE=REF(CLOSE,1),VOL*C,0),0);
BB4:=0;
B4万元:=DVOL*DCLOSE/100;
B4差:=B4万元-REF(B4万元,1);
B5万元:=DVOL*DCLOSE/100;
B5比:=B5万元/REF(B5万元,1);
净流入万元:=(AAA2-AAA3-0.5*AAA4);
PM:=MA(净流入万元,1);
PMA:=PM/REF(PM,1)
PMB:=REF(PMA,1) 1ANDPMA;
密码:(EMA(MA(B4万元,2),2))/100000,COLORYELLOW,NODRAW;
二日比:=密码/REF(密码,1);
:PMBAND密码 REF(密码,1)AND二日比 1,COLORRED,NODRAW;
MA30:MA(C,30);
{DRAWNUMBER(选股=1,L,密码),COLORYELLOW};
DRAWICON(选股,L*0.975,1);
STICKLINE(红色持股,CLOSE,O,2.8,0),COLOR000055;
STICKLINE(红色持股,CLOSE,O,2,0),COLOR000088;
STICKLINE(红色持股,CLOSE,O,1.5,0),COLOR0000AA;
STICKLINE(红色持股,CLOSE,O,1,0),COLOR0000CC;
STICKLINE(红色持股,CLOSE,O,0.5,0),COLOR0000EE;
STICKLINE(青色观望,CLOSE,O,2.8,0),COLOR555500;
STICKLINE(青色观望,CLOSE,O,2,0),COLOR888800;
STICKLINE(青色观望,CLOSE,O,1.5,0),COLORAAAA00;
STICKLINE(青色观望,CLOSE,O,1,0),COLORCCCC00;
STICKLINE(青色观望,CLOSE,O,0.5,0),COLOREEEE00;
CO:=(C-O);
STICKLINE(急速超跌,O,C-CO/2,2.8,0),COLOR555555;
STICKLINE(急速超跌,O,C-CO/2,2,0),COLOR888888;
STICKLINE(急速超跌,O,C-CO/2,1.5,0),COLORAAAAAA;
STICKLINE(急速超跌,O,C-CO/2,1,0),COLORCCCCCC;
STICKLINE(急速超跌,O,C-CO/2,0.5,0),COLOREEEEEE;
STICKLINE(短买,O,O+CO/3,2.8,0),COLOR335555;
STICKLINE(短买,O,O+CO/3,2,0),COLOR338888;
STICKLINE(短买,O,O+CO/3,1.5,0),COLOR33AAAA;
STICKLINE(短买,O,O+CO/3,1,0),COLOR33CCCC;
STICKLINE(品红离场,O,O+CO/3,2.8,0),COLOR550055;
STICKLINE(品红离场,O,O+CO/3,2,0),COLOR880088;
STICKLINE(品红离场,O,O+CO/3,1.5,0),COLORAA00AA;
STICKLINE(品红离场,O,O+CO/3,1,0),COLORCC00CC;
STICKLINE(品红离场,O,O+CO/3,0.5,0),COLOREE00EE;
WW:STICKLINE(ISLASTBARAND(红色持股ORREF(红色持股,1)=1),今离场价,今离场价,30,1),COLOR0000FF;
WW1:STICKLINE(ISLASTBARAND(青色观望ORREF(青色观望,1)=1),今进场价,今进场价,30,1),COLOR00FF00;
AA:DRAWTEXT(短买,REF(CLOSE,1)-0.2,'↖买'),COLORRED;
BB1:DRAWTEXT(品红离场,REF(CLOSE,1)+0.5,'↙卖'),COLORGREEN;
通达信变色轨道主图指标公式截图
