【通达信源码分享】飞越彩泓MA主图公式 用法 源码

 2022-09-16 15:18:07    通达信指标网  

飞越彩泓MA主图公式 用法 源码


1、虚线阶梯状部分为锁定筹码区域;

2、蓝黄线为称帝线。蓝线持币,黄线买入或持股。

3、红绿线为多空线。绿线持币,红线买入或持股。


 实际操作用法:

1、底颜色较暗淡的区域为相对的底部,往上趋于暗红较明亮的区域为相对的拉升的区域。

2、称帝线,当蓝色线趋于持平的迹象,适当结合其他指标提示逢低买入;当蓝色线由水平变为黄色时,可以适当加仓,尤其是当多空线变为红色的时候,可以二次加仓;最后有明显倍量的配合,价格越过称帝黄线,果断全仓等待拉升。


公式源码:


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,'★翔博软件★')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<0;


VAR4:=CROSS(SK,0);


VAR6:=CROSS(SK,SD) AND SK>0;


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;


{亮灰}


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;

  •  标签:  

原文链接:https://www.tdxzb.com/?id=579

本文版权:如无特别标注,本站文章均为原创。

相关文章

服务热线

18020657357

微信客服

微信客服