纏論均線指標(biāo)公式源碼

騎牛相馬 2013-11-18

展開全文

{均線}
MA5:MA(C,5), colorwhite;
MA13:MA(C,13), coloryellow;
MA21:MA(C,21), colormagenta;
MA34:MA(C,34), colorgreen;
MA55:MA(C,55), colorf00ff0, linethick2;
MA89:MA(C,89), colorgray;
MA144:MA(C,144), colorblue;
MA233:MA(C,233), colorf0f000,linethick2;

{布林曲線}
MID :MA(CLOSE,26),pointdot,colorwhite;
UPPER:MID + 2*STD(CLOSE,26),linethick0,coloryellow, dotline;
LOWER:MID - 2*STD(CLOSE,26),linethick0,colorgreen, dotline;
收口:=UPPER-LOWER;
partline(MID,MID>=ref(MID,1),rgb(255,255,0),MID<ref(MID,1),rgb(0,255,0)),linethick1, dotline;
partline(UPPER,UPPER>=ref(UPPER,1),rgb(255,255,0),UPPER<ref(UPPER,1),rgb(0,255,0)),linethick1, dotline;
partline(LOWER,LOWER>ref(LOWER,1),rgb(255,255,0),LOWER<=ref(LOWER,1),rgb(0,255,0)),linethick1, dotline;
{
partline(UPPER,收口>=ref(收口,1),rgb(255,255,0),收口<ref(收口,1),rgb(0,255,0)),linethick1, dotline;
partline(LOWER,收口>=ref(收口,1),rgb(255,255,0),收口<ref(收口,1),rgb(0,255,0)),linethick1, dotline;
}
{纏中說禪}
分型:="chanlun@kxian"; {這個放第一個要不會出問題滴-_-~~}
筆:="chanlun@bi";
bilast:="chanlun@bilast";
段:="chanlun@duan";
duanlast:="chanlun@duanlast";
jxyl:="chanlun@JXYL2";
jxzc:="chanlun@JXZC2";

drawline(筆=1,h,筆=-1,l,0),coloryellow, linethick2;
drawline(筆=-1,l,筆=1,h,0),coloryellow, linethick2;
drawline(段=1,h,段=-1,l,0),colorblue, linethick2;
drawline(段=-1,l,段=1,h,0),colorblue, linethick2;

DRAWTEXT(筆=1, h, ''+h+'/T'+bilast+'/MA:'+jxyl), coloryellow, align1, valign2;
DRAWTEXT(筆=-1, l, ''+l+'/T'+bilast+'/MA:'+ jxzc), colorCyan, align1;