五星連珠A副圖指標(biāo)公式源碼[通達(dá)信公式]
五星連珠A副圖指標(biāo)公式源碼
?
?
原理解析：
?
?來源:程序化99（ www.kzuj.com.cn ）
源碼：
?
?
K2:=EMA(C,5);
K3:=EMA(C,10);
K5:=EMA(C,30);
K6:=2*(K2-K5);
K7:=2*(K2-K3);
K8:=2*(K7+K6);
中線指示:STICKLINE(CROSS(K8,0),0,40,8,0),COLORRED,LINETHICK2;
P1:= MA(CLOSE,2);
P2:= MA(CLOSE,5);
DIFF :=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA :=EMA(DIFF,9);
VMA1:=MA (VOL,2)/100000;
VMA2:=MA(VOL,5)/100000;
PPDAY:= BARSLAST(CROSS(P1,P2));
VVDAY:= BARSLAST(CROSS(VMA1,VMA2));
MACDDAY:= BARSLAST(CROSS(DIFF,DEA));
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
金叉:IF(REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA),25,0),LINETHICK2,COLORAACCFF;
SJCJD:= IF((PPDAY<=3 AND VVDAY<=3 AND MACDDAY<=3)AND (DIFF<0),1,0);
STICKLINE(SJCJD,50,60,6,0),COLORWHITE,LINETHICK2;
短趨勢(shì):=((3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1)-50)*1.032+50);
VAR2:=(2*CLOSE+HIGH+LOW+OPEN)/5;
VAR3:=LLV(LOW,34);
VAR4:=HHV(HIGH,34);
長(zhǎng)趨勢(shì):=EMA((VAR2-VAR3)/(VAR4-VAR3)*100,13),COLOR00FF00;
判斷底:SQRT(SQRT(FLOOR(SQRT(MA(1/WINNER(CLOSE)*100,4)/10000))))*15;
VAR5:=CROSS(短趨勢(shì),長(zhǎng)趨勢(shì))AND 長(zhǎng)趨勢(shì)<25;
STICKLINE(VAR5,60,70,8,0) ,COLORGREEN;
XX:=((((CLOSE-MA(CLOSE,34))/MA(CLOSE,34))*100)*5);
B001:=(((((CLOSE-MA(CLOSE,42))/MA(CLOSE,42)))*100)*5);
B002:=(((((CLOSE-MA(CLOSE,67))/MA(CLOSE,67)))*100)*5);
B003:=(((XX+B001)/2)-B002);
B004:=(((0-100)*(VAR4-CLOSE))/(VAR4- VAR3));
B005:=(((0-100)*(HHV(HIGH,42) - CLOSE))/(HHV(HIGH,42) - LLV(LOW,42)));
B006:=(((0-100)*(HHV(HIGH,72) - CLOSE))/(HHV(HIGH,72) - LLV(LOW,72)));
B007:=EMA((((B004+B005)/2)-B006),6);
B008:=REF(CLOSE,1);
B009:=((((SMA(MAX((CLOSE - B008),0),19,1) / SMA(ABS((CLOSE - B008)),19,1)) * 100) - 50) * 1.25);
B010:=((((SMA(MAX((CLOSE - B008),0),34,1) / SMA(ABS((CLOSE - B008)),34,1)) * 100) - 50) * 1.25);
B011:=((((SMA(MAX((CLOSE - B008),0),72,1) / SMA(ABS((CLOSE - B008)),72,1)) * 100) - 50) * 1.25);
多頭:EMA(((((B009 + B010)/2) - B011) * 5),6),LINETHICK2;
空頭:=(((-1*((B007 + B003) + 多頭))/3) * 1.5);
多均:EMA(多頭,4),LINETHICK2;
空均:=EMA(空頭,4);
C026:=WINNER(CLOSE);
W:=(DMA(C026,(VOL/CAPITAL)) * 100);
XD1:=EMA(W,6);
莊家控盤:((W-XD1)*15),COLORSTICK,LINETHICK2;
STICKLINE(CROSS(多頭,空均),80,70,8,0),COLORYELLOW;
VARB1:=(2*CLOSE+HIGH+LOW)/4;
VARB2:=LLV(LOW,34);
VARB3:=HHV(HIGH,34);
VARB4:=MA(HIGH,8);
XX1:=EMA((VARB1-VARB2)/(VARB3-VARB2)*100,13);
YY:=EMA(0.667*REF(XX1,1)+0.333*XX1,2) , ;
STICKLINE(CROSS(XX1,20) AND YY<XX1 AND VARB4>REF(VARB4,1),70,80,8,0),COLORFF0000;
逃頂:IF(FILTER(CROSS(YY,XX) AND XX>80 ,3),70,90),COLORFF0000,LINETHICK2;
DRAWTEXT(CROSS(多頭,多均)AND 多均<-15,多均,''),COLORRED;
DRAWTEXT(CROSS(多均,多頭)AND 多均>35,多均+7,''),COLOR00FF00;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;
?
?
公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】
?
有思路，想編寫各種指標(biāo)公式，程序化交易模型，選股公式，預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 511411198 進(jìn)行 有償 編寫！（不貴！點(diǎn)擊查看價(jià)格！）
相關(guān)文章
-
沒有相關(guān)內(nèi)容
會(huì)員登錄/注冊(cè)