太陽操盤指標源碼及使用方法(主圖+副圖)[大智慧公式]

相關標簽: 通達信操盤主 副 、 通達操盤主 副 、 主升浪操盤 、 5分鐘k線操盤方法大全 、 外匯冠軍的操盤方法 、 操盤 方法 、 九贏操盤線使用說明 、 操盤必讀 、 模擬操盤軟件 、

{太陽操盤主圖}

FL:MA(CLOSE,17)+ABS(MA(CLOSE,17)-ref(MA(CLOSE,17),2)),PRECIS2,colorf4e202;
FS:MA(CLOSE,17)+MA(CLOSE,17)-ref(MA(CLOSE,17),2),PRECIS2,colorf4e202,LINETHICK1;
CG:IF(MA(CLOSE,17)<FS,FS,MA(CLOSE,17)),PRECIS2,colorf4e202,LINETHICK1;
MA6:=MA(CLOSE,6);
MA18:=MA(CLOSE,18);
MA3:=(3)*(MA18) - (2)*(MA6);
小波段:(3)*(MA6) - (2)*(MA18),LINETHICK1,COLOR87B08B;
PARTLINE(cg,cg=fs and cg=fl,RGB(241,225,22)),LINETHICK2;
PARTLINE(小波段,小波段<ref(小波段,1),RGB(0,225,255),小波段>ref(小波段,1),RGB(241,225,22)),LINETHICK1;
牛熊線:MA(C,89),PRECIS2,colorred,LINETHICK2;
{高位減倉}{本文來源 黑馬炒股秘籍網(wǎng)}
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
Y:=EMA(CLOSE,10);
LL:=ref(CLOSE,2);
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.tumamayizhan.com',CURRENTTIME>180000 and (CXH=4 OR CXH=9));
MM:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);
DB:=IF(((MM < ref(MM,1)) AND (MM > 79)),MM,0);
DRAWicon(DB,(HIGH * 1.005),2);
DRAWTEXT(DB,(HIGH * 1.05),'減倉'),LINETHICK2,colorFF6699;

=======================================================================

{太陽倉位副圖}

參數(shù)
{參數(shù)1 p1: 5, 2 ,20}
{參數(shù)2 p2: 4, 2 ,20}

源碼:

減倉線:70, POINTDOT,COLOryelLOW;
增倉線:45, POINTDOT,colorf4e202;
var1:=LLV(LOW,P1);
var2:=HHV(HIGH,P1);
黃線上穿增: EMA((CLOSE-var1)/(var2-var1)*100,P2),COLOryelLOW,LINETHICK1;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.tumamayizhan.com',CURRENTTIME>180000 and (CXH=4 OR CXH=9));
黃線下穿減: EMA(0.667*ref(黃線上穿增,1)+0.333*黃線上穿增,2),colorf4e202,LINETHICK1;
FL:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-ref(MA(CLOSE,17),2));
FS:=MA(CLOSE,17)+MA(CLOSE,17)-ref(MA(CLOSE,17),2);
CG:=IF(MA(CLOSE,17)<FS,FS,MA(CLOSE,17));
DRAWTEXT(CROSS(黃線上穿增,黃線下穿減) AND 黃線上穿增<45 and cg=fl and cg=fs,25,'增倉'),COLOR00FF00;
DRAWTEXT(CROSS(黃線上穿增,var2) AND 黃線上穿增<45 and cg=fl and cg=fs,27,'●'),COLORFFFFFF;
DRAWTEXT(CROSS(黃線下穿減,黃線上穿增) AND 黃線上穿增>70 and cg=fl and cg=fs,85,'減倉'),COLOR00FF00;
DRAWTEXT(CROSS(黃線下穿減,黃線上穿增) AND 黃線上穿增>70 and cg=fl and cg=fs,82,'●'),COLOR00FF00;