自创通达信指标飞越彩泓MA公式
源码
R1:=(CLOSE REF(CLOSE,1) AND CLOSE REF(CLOSE,2));
R2:=(REF(R1,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R3:=(REF(R2,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R4:=(REF(R3,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R5:=(REF(R4,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R6:=(REF(R5,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R7:=(REF(R6,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R8:=(REF(R7,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R9:=(REF(R8,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
RA:=(REF(R9,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
RB:=(REF(RA,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
RC:=(REF(RB,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
RD:=(CLOSE REF(CLOSE,1) AND CLOSE REF(CLOSE,2));
RE:=(REF(RD,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
RF:=(REF(RE,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R10:=(REF(RF,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R11:=(REF(R10,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R12:=(REF(R11,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R13:=(REF(R12,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R14:=(REF(R13,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R15:=(REF(R14,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R16:=(REF(R15,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R17:=(REF(R16,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R18:=(REF(R17,1) AND CLOSE =REF(CLOSE,1) AND CLOSE =REF(CLOSE,2));
R19:=REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,1) AND R1;
R1A:=((REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,1)) AND RD);
短买春:R19,NODRAW,COLOR00DD00;
秋离场:R1A,NODRAW,COLOR2288EE;
红持股:R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,NODRAW,COLOR0000FF;
急速超跌关注:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100 -14,COLORBBBBBB,NODRAW;
Q1:=CONST(IF(短买春,0,IF(秋离场,180,IF(红持股,220,IF(急速超跌关注,150,100))))),NODRAW;
Q2:=CONST(IF(短买春,150,IF(秋离场,100,IF(红持股,0,IF(急速超跌关注,150,100))))),NODRAW;
Q3:=CONST(IF(短买春,0,IF(秋离场,50,IF(红持股,50,IF(急速超跌关注,150,100))))),NODRAW;
DRAWGBK(C 0,RGB(Q1,Q2,Q3),RGB(0,50,50),0,' ',0);
MT1:=IF(ISLASTBAR,REF((C*2-REF(C,3)),1),DRAWNULL);
MT2:=IF(ISLASTBAR,REF((C*2-REF(C,3)),2),DRAWNULL);
MT3:=IF(ISLASTBAR,C*2-REF(C,3),DRAWNULL);
高:=CONST(REF(HHV(H,150),3)),NODRAW;
低:=CONST(REF(LLV(L,150),3)),NODRAW;
色彩峰:=高-低;
DRAWTEXT(ISLASTBAR,MT2,' ●'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,MT1,' ●'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,MT3,' ●'),COLORYELLOW;
MA5:=MA(C,5);
MA10:=MA(C,10);
MA60:MA(C,60),COLORBROWN,LINETHICK4,POINTDOT;
VAR11:=MA(C,9),COLORRED;
MA20:=MA(C,20);
MA30:=MA(C,30);
五日乖离率:=(C-MA5)/MA5*100;
BB5:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((MA5-REF(MA5,1))/REF(MA5,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW;
BB10:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416;
三拾日乖离率:=(C-MA30)/MA30*100,NODRAW;
VAR1:=(MA20-MA30) REF((MA20-MA30),1) AND MA20 REF(MA20,1) AND MA30 REF(MA30,1);
VAR2:=(MA30-MA20) REF((MA30-MA20),1) AND MA20 REF(MA20,1) AND MA30 REF(MA30,1);
BB30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.1416;
强势狙击:=FILTER(BB30 30 AND BB10 45 AND CROSS(BB5,60),10);
加仓:=FILTER(COUNT(CROSS(BB5,30),5) =1 AND MA5 REF(MA5,1) AND 三拾日乖离率 REF(三拾日乖离率,1) AND MA10 REF(MA10,1)
AND 加速度5 REF(加速度5,1) AND 速度5 REF(速度5,1) ,10) ;
清仓:=FILTER(COUNT(CROSS(30,BB5),5) =1 AND (C MA30 OR O MA30) AND MA5 REF(MA5,1) AND 三拾日乖离率 REF(三拾日乖离率,1) AND MA10 REF(MA10,1),10);
DRAWTEXT(加仓 ,LOW*0.98,'↖绝密买点'),COLOR00FFFF;
MMA3:=MA(CLOSE,30);
ZJ:=AMOUNT/10000;{资金}
TM:=V-MA(V,10);{量填满}
一穿三:=MA5 O AND MA10 O AND MA60 O AND MA5 C AND MA10 C AND MA60 C AND CLOSE OPEN ;
DRAWTEXT(一穿三,L-0.12,'穿三线'),COLORFFFFFF;
STICKLINE(一穿三,H,L,0.5,1),COLORFFFFFF;
STICKLINE(一穿三,O,C,3,1),LINETHICK2,COLORFFFFFF;
C6:=REF(C,1);
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
XX:=LLV(J,2)=LLV(J,8);
Y:=IF(CROSS(J,REF(J+0.01,1)) AND XX AND J 20,30,0);
主力:=EMA( (CLOSE-MA(CLOSE,3))/MA(CLOSE,3),2);
散户:=EMA( (CLOSE-MA(CLOSE,20))/MA(CLOSE,20),7);
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND XX AND J 20,LOW,'短进'),COLORFF00FF;
DRAWTEXT(CROSS(主力,散户) AND 主力 0 AND 散户 0,LOW,'见底'),COLORRED;
DRAWICON(CROSS(主力,散户) AND 主力 0 AND 散户 0,LOW,1);
DRAWTEXT_FIX(ISLASTBAR,0,0.24,0,'★ 飞越彩泓60015759 ★')COLOR0078FF;
称帝:(COST(99)+COST(93)+COST(85))/3,COLORYELLOW,LINETHICK2;
IF(称帝 =REF(称帝,1),称帝,DRAWNULL),COLORYELLOW,LINETHICK2;
IF(称帝 REF(称帝,1),称帝,DRAWNULL),COLORBLUE,LINETHICK2;
X:=(3*C+L+O+H)/6;
多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORGREEN,LINETHICK2;
IF(多空线 =REF(多空线,1),多空线,DRAWNULL),COLORRED,LINETHICK2;
IF(多空线 REF(多空线,1),多空线,DRAWNULL),COLORGREEN,LINETHICK2;
DRAWICON(CROSS( C ,多空线), C ,25),LINETHICK2;
DRAWTEXT(CROSS(C,多空线),LOW,'★低吸 '),COLORFFFFFF;
STICKLINE(CROSS(C ,多空线),0,C,0,0),COLORFFCC66;
BDGD:=C=HHV(C,13);
GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),2))+1;
高点:REF(C,GDSJ),COLORGRAY,LINETHICK4,POINTDOT;
突破1:CROSS(C,REF(高点,1)),COLOR00FFFF,POINTDOT,LINETHICK0;
STICKLINE(GDSJ =6,高点,高点,8,0),COLORGREEN,LINETHICK2;
{45度异动}
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
DRAWTEXT(FILTER(BB13 1 AND EMA(X1,13) REF(EMA(X1,8),1),10),
EMA8,' 45上升'),COLORYELLOW;
{底顶侦探}
VVAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5;
VVAR2:=EMA(EMA(EMA(VVAR1,4),4),4);
SJ:=(VVAR2-REF(VVAR2,1))/REF(VVAR2,1)*100, COLORSTICK;
SD:=MA(SJ,2);
SK:=MA(SJ,1);
VAR3:=CROSS(SK,SD) AND SK
VAR4:=CROSS(SK,0);
VAR6:=CROSS(SK,SD) AND SK
BY:=VAR3, STICK;
DRAWICON(BY,L*0.96,23);
BE:=VAR4 OR VAR6, STICK;
DRAWICON(BE,L*0.96,25);
VAR7:=CROSS(SD,SK);
MC:=VAR7, STICK;
{漓江}
VAR13:=(2*CLOSE+HIGH+LOW)/4;
T:=80, POINTDOT;
VAR14:=LLV(LOW,5);
VAR15:=HHV(HIGH,4);
SK1:=EMA((VAR13-VAR14)/(VAR15-VAR14)*100,4);
SD1:=EMA(0.667*REF(SK1,1)+0.333*SK1,2);
{VAR4:=(HHV(HIGH,4)-VAR1)/(HHV(HIGH,4)-LLV(LOW,4))*100-72;
漓江倒影: SMA(VAR4,4,1), LINESTICK;}
VAR17:=(VAR13-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
VAR18:=SMA(VAR17,2,1);
桂林山水:=SMA(VAR18,2,1), LINESTICK;
二:=COST(20)/COST(10);
三:=COST(30)/COST(20);
四:=COST(40)/COST(30);
五:=COST(50)/COST(40);
低位密三:=三 二 AND 三 四 AND 三
低位密四:=四 二 AND 四 三 AND 四
低位密五:=五 二 AND 五 三 AND 五
STICKLINE(低位密三 0 AND C COST(50),COST(30),COST(30)-0.11,COST(30)-0.12,-1),COLOR00C0C0;
STICKLINE(低位密四 0 AND C COST(50),COST(40),COST(40)-0.11,COST(40)-0.12,-1),COLORGREEN;
STICKLINE(低位密五 0 AND C COST(50),COST(50),COST(50)-0.11,COST(50)-0.12,-1),COLORYELLOW;
DRAWKLINE(H,O,L,C);
{顶底背离}
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'底背离'),COLORRED;
{DRAWICON(CROSS(FF,MA15),(LOW * 0.99),7); }
{顶背离}
RSI1:=((SMA(MAX((CLOSE - (REF(CLOSE,1))),0),3,1) / SMA(ABS((CLOSE - (REF(CLOSE,1)))),3,1))* 100);
DRAWTEXT(CROSS(88,RSI1) AND (MA(C,3)) (EMA(C,3)) ,(HIGH + 0.3),'顶背离'),COLORGREEN;
{DRAWICON(CROSS(88,RSI1) AND (MA(C,3)) (EMA(C,3)) ,(HIGH + 0.3),8); };
DRAWTEXT(REF(C,BARSLAST(REF(CROSS( MACD.DIF , MACD.DEA ),1))+1) C AND
REF( MACD.DIF ,BARSLAST(REF(CROSS( MACD.DIF , MACD.DEA ),1))+1)
MACD.DIF AND CROSS( MACD.DIF , MACD.DEA )
0,L-0.02,'MACD底背离'),COLORRED;{MACD底背离}
DRAWTEXT(REF(C,BARSLAST(REF(CROSS( KDJ.K , KDJ.D ),1))+1) C AND
REF( KDJ.K ,BARSLAST(REF(CROSS( KDJ.K , KDJ.D ),1))+1) KDJ.K AND
CROSS( KDJ.K , KDJ.D ),L-0.10,'KDJ底背离'),COLORBLUE;{KDJ底背离}
DRAWTEXT(REF(C,BARSLAST(REF(CROSS( RSI.RSI1 , RSI.RSI2 ),1))+1) C AND
REF( RSI.RSI1 ,BARSLAST(REF(CROSS( RSI.RSI1 , RSI.RSI2 ),1))+1)
RSI.RSI1 AND CROSS( RSI.RSI1 , RSI.RSI2 )
0,L-0.18,'RSI底背离');{RSI底背离};
DRAWTEXT(REF(C,BARSLAST(REF(CROSS( MACD.DEA , MACD.DIF ),1))+1) C
AND REF( MACD.DIF ,BARSLAST(REF(CROSS( MACD.DEA , MACD.DIF ),1))+1)
MACD.DIF AND CROSS( MACD.DEA , MACD.DIF )
0,H+0.16,'MACD顶背离'),COLORGREEN;{MACD顶背离};
DRAWTEXT(REF(C,BARSLAST(REF(CROSS( KDJ.D , KDJ.K ),1))+1) C
AND REF( KDJ.K ,BARSLAST(REF(CROSS( KDJ.D , KDJ.K ),1))+1)
KDJ.K AND CROSS( KDJ.D , KDJ.K ) 0,H+0.08,'KDJ顶背离');{KDJ顶背离};
{彩色K线}
TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);
TYX4:=MA((C+L+O+H)/4,13);
TYX5:=EMA((C+L+O+H)/4,21);
{空心红}
STICKLINE(C TYX5 AND C O,H,L,0,0),COLORRED;
STICKLINE(C TYX5 AND C O,C,O,3,1),COLORRED;
{深绿}
STICKLINE(C TYX5 AND C O,H,L,0,0),COLOR007700;
STICKLINE(C TYX5 AND C O,C,O,3,0),COLOR005500;
STICKLINE(C TYX5 AND C O,C,O,2,0),COLOR006600;
STICKLINE(C TYX5 AND C O,C,O,1,0),COLOR007700;
{蓝}
STICKLINE(C TYX5 AND C O,H,L,0,0),COLORFFDD44;
STICKLINE(C TYX5 AND C O,C,O,3,0 ),COLORFF7700;
STICKLINE(C TYX5 AND C O,C,O,2,0 ),COLORFFAA22;
STICKLINE(C TYX5 AND C O,C,O,1 ,0 ),COLORFFDD44;
{黄}
STICKLINE(C TYX5 AND C O,H,L,0,0 ),COLOR00EEFF;
STICKLINE(C TYX5 AND C O,C,O,3,0 ),COLOR00AAFF;
STICKLINE(C TYX5 AND C O,C,O,2,0 ),COLOR00CCFF;
STICKLINE(C TYX5 AND C O,C,O,1,0 ),COLOR00EEFF;
{粉红}
STICKLINE(C TYX4 AND C O,H,L,0,0),COLORFF66AA;
STICKLINE(C TYX4 AND C O,C,O,3,0 ),COLORFF11FF;
STICKLINE(C TYX4 AND C O,C,O,2,0 ),COLORFF44FF;
STICKLINE(C TYX4 AND C O,C,O,1,0 ),COLORFF66FF;
{亮灰}{www.goodgupiao.com}
STICKLINE(C TYX4 AND C O,H,L,0,0),COLOR999999;
STICKLINE(C TYX4 AND C O,C,O,3,0),COLOR555555;
STICKLINE(C TYX4 AND C O,C,O,2,0),COLOR777777;
STICKLINE(C TYX4 AND C O,C,O,1,0),COLOR999999;
{深红}
STICKLINE(C TYX3 AND C O,H,L,0,0),COLOR0000DD;
STICKLINE(C TYX3 AND C O,C,O,3,0),COLOR000099;
STICKLINE(C TYX3 AND C O,C,O,2,0),COLOR0000BB;
STICKLINE(C TYX3 AND C O,C,O,1,0),COLOR0000DD;
{涨跌提示}
涨停:=IF((C-REF(C,1))*100/REF(C,1) =(10-0.01*100/REF(C,1)),1,0);
STICKLINE(涨停,OPEN,CLOSE,1.5,0),COLORYELLOW;
