通达信龙腾四海（源码副图帖图）无未来

龙腾四海是在指标库中从数万指标中今晚挑出来给大家分享，此指标只建议学习研究使用，不建议作为买卖依据。
 原作者编写很精简本人未做任何修改。。尊重知识指标原名未做更改。
 除了自己原创的，每次分享指标库中精选的非原创指标，总会收到这样的回复：这是一个很老的指标，或这个是别人的等等此类
 在这里想说一个道理：对于ID注册有十年多年的老革命来说指标见的多不稀奇，但对于刚刚来论坛或刚刚进入股市的新人来说指标再老也是新
 你有不代表别人也有，你不需要不代表别人不需要。分享是一种精神，分享是一种传播。知识的传播。没有知识传播社会就不会进步。
 【股市有风险决策需谨慎】
 
A1:=100*(EMA(C,12)-EMA(C,26))/EMA(C,26);
A2:=EMA(A1,9);
{MACD:(A1-A2)*2,NODRAW;}
海平面: 0,CIRCLEDOT;
龙头:MACD;
SJTJ:=DATE<1590301;
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,3,0),COLOR0000AA;{红色}
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLOR0000CC;
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLOR0000EE;
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,0.1,0),COLOR5555FF;
STICKLINE(MACD>=0 AND MACD>=REF(MACD,1),0,MACD,0,0),COLOR8080FF;
STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,3,0),COLOR770077;{紫色}
STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,2,0),COLOR990099;

STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,1,0),COLORBB00BB;
STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,0,0),COLORDD00DD;
STICKLINE(MACD>=0 AND MACD<REF(MACD,1),0,MACD,0.1,0),COLORFF00FF;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,3,0),COLORFF0000;{蓝色}
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,2,0),COLORFF5500;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLORFF9900;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,0,0),COLORFFFF00;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,3,0),COLOR155500;{绿色}
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,2,0),COLOR208000;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,1,0),COLOR2BAA00;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,0.1,0),COLOR35D500;
STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,0,0),COLOR40FF00;
DIF:=A1,COLORWHITE;DEA:=A2,COLORYELLOW;
DD:=EMA(EMA((C-LLV(L,10))/(HHV(H,10)-LLV(L,10))*100,3),3);
龙尾上升:IF(DIF>REF(DIF,1),MACD,DRAWNULL),COLORRED,LINETHICK1;
龙尾下跌:IF(DIF<REF(DIF,1),MACD,DRAWNULL),COLORGREEN,LINETHICK1;

{IF(DEA>REF(DEA,1),MACD,DRAWNULL),COLORRED,LINETHICK1;
IF(DEA<REF(DEA,1),MACD,DRAWNULL),COLORGREEN,LINETHICK1;}

IF(MACD>海平面,海平面,DRAWNULL),COLORRED,CIRCLEDOT,LINETHICK1;
IF(MACD<海平面,海平面,DRAWNULL),COLOR00FF00,CIRCLEDOT,LINETHICK1;