龙听期货论坛 » 量化策略·公式·源码库 » 五星连珠B副图指标公式源码[通达信公式]

龙听 发表于 2018-12-4 14:08

五星连珠B副图指标公式源码[通达信公式]

[code]
K2:=EMA(C,5),COLORFFFF00;
K3:=EMA(C,10),COLORFFFF00;
K5:=EMA(C,30),COLORFFFF00;KK5:=EMA(INDEXC,30),COLORFFFF00;
K6:=2*(K2-K5);K7:=2*(K2-K3);K8:=2*(K7+K6),COLORRED;
STICKLINE(CROSS(K8,0),0,50,8,0) ,COLORRED;
K1:=IF(K8>REF(K8,5) AND K3<REF(K3,5) ,1,0 ),COLORYELLOW;
K21:=IF(K8>REF(K8,7) AND K3<REF(K3,7) ,1,0 ),COLORYELLOW;
K31:=IF(K8>REF(K8,9) AND K3<REF(K3,9) ,1,0 ),COLORYELLOW;
K4:=IF(K8>REF(K8,11) AND K3<REF(K3,11) ,1,0 ),COLORYELLOW;
NDAY1 := 3;
DOWN := CLOSE/LLV(LOW,60)<=1.2;
PMA1 := MA(CLOSE,2);
PMA2 := MA(CLOSE,5);
DIF :=EMA(CLOSE,12) - EMA(CLOSE,26),COLORWHITE;
DEA :=EMA(DIF,9),COLORGREEN;
VMA1:=MA (VOL,2)/100000,COLORRED;
VMA2:=MA(VOL,5)/100000,COLORYELLOW;
PPDAY := BARSLAST(CROSS(PMA1,PMA2));
VVDAY := BARSLAST(CROSS(VMA1,VMA2));
MACDDAY := BARSLAST(CROSS(DIF,DEA));
A1:=BARSLAST(REF(CROSS("MACD.DIF"(5,12,9),"MACD.DEA"(5,12,9)),1));
背离、W底、金叉:REF(C,A1+1)>C AND REF("MACD.DIF"(5,12,9),A1+1)<"MACD.DIF"(5,12,9) AND
CROSS("MACD.DIF"(5,12,9),"MACD.DEA"(5,12,9)),,COLORRED;
SJCJD:= IF((PPDAY<=NDAY1 AND VVDAY<=NDAY1 AND MACDDAY<=NDAY1 ) AND (DIF<0),1,0);
STICKLINE(SJCJD,50,60,6,0),COLORWHITE,LINETHICK2;
MACD:= 2*(DIF-DEA), COLORSTICK;
短趋势:((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),COLORRED;
VARA2:=(2*CLOSE+HIGH+LOW+OPEN)/5;
VARA3:=LLV(LOW,34);
VARA4:=HHV(HIGH,34);
长趋势:EMA((VARA2-VARA3)/(VARA4-VARA3)*100,13),COLOR00FF00;
判断底:SQRT(SQRT(FLOOR(SQRT(MA(1/WINNER(CLOSE)*100,4)/10000))))*5;
VARA5:=CROSS(短趋势,长趋势)AND 长趋势<25;
VARA6:=CROSS(短趋势,长趋势)AND 长趋势<50;
STICKLINE(VARA5,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) * (HHV(HIGH,34) - CLOSE)) / (HHV(HIGH,34) - LLV(LOW,34)));
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);
B012:=EMA(((((B009 + B010) / 2) - B011) * 5),6);
B013:=((((0 - 1) * ((B007 + B003) + B012)) / 3) * 1.5);
B014:=B012;
B015:=B013;
B016:=EMA(B012,4);
B017:=B012;
KKM1:=B013;
DPM1:=EMA(B013,4);
多头:=B017,COLOR0000FF;
空头:=KKM1,COLOR00FF00;
多均:=B016;
空均:=DPM1;
B018:=IF(CROSS(B017,KKM1),28,0);
XD:=5 ;
VARX:=B017;
C023:=KKM1;
C024:=B016;
C025:=DPM1;
C026:=WINNER(CLOSE);
W:=(DMA(C026,((VOL / CAPITAL) * 1)) * 100);
HWXWINNER:=W;
XD1:=EMA(W,6);
XWXMH:=XD1;
XD2:=MA(W,14);
庄家控盘:((HWXWINNER - XWXMH) * 10),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),80,90,6,0),COLORFF0000;
逃顶:IF(FILTER(CROSS(YY,XX) AND XX>80 ,3),60,90),COLORFF0000;
[/code]

查看完整版本: 五星连珠B副图指标公式源码[通达信公式]