龍骨架主圖指標(biāo)公式源碼主圖（無(wú)源碼的請(qǐng)下載附件導(dǎo)入）

{指標(biāo)介紹：
當(dāng)主圖MACD三線(xiàn)交叉向上,、股價(jià)穿越交叉線(xiàn),，即為股票的強(qiáng)勢(shì)起漲點(diǎn),。
圖中：紅線(xiàn)為日線(xiàn)MACD,，粉線(xiàn)為周線(xiàn)MACD,，黃線(xiàn)為月線(xiàn)MACD,。
當(dāng)紅,、粉兩線(xiàn)逐步融合,、和黃線(xiàn)接近并交叉融合時(shí),，提示龍尾正在形成。再橫盤(pán),、再融合,、再交叉，如此演變二至三個(gè)周期左右,，龍身長(zhǎng)成,，露出龍頭。之后,，龍頭一路飛騰,，甚至直沖云霄。}

DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);
DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);
DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1);
DRAWKLINE(H,O,L,C);
DRAWTEXT_FIX(FINANCE(51)<>0,0.85,0.02,0,'含可轉(zhuǎn)債')COLORYELLOW;
{尋龍?jiān)E色帶}
強(qiáng)弱分界:=Ema(COst(85),10){,PRECISION2,LINEDOT},COLORRED,DOTLINE;
分界:=EMA(COST(99),10){,PRECISION2,LINEDOT},COLORGREEN,DOTLINE;
{DRAWBAND(強(qiáng)弱分界,RGB(80,80,20), 分界,RGB(60,60,18));
DRAWKLINE(H,O,L,C);}
{龍骨架——macd日周月共振主圖}
月DIF:=(EMA(CLOSE,12*4*4)-EMA(CLOSE,26*4*4));
月DEA:=EMA(月DIF,9*4*4);
月MacD:=2*(月DIF-月DEA),COLORSTICK,COLOR111111;
月柱:=月MACD,COLOR99EEEE,LINETHICK3;
周DIF:=(EMA(CLOSE,12*4)-EMA(CLOSE,26*4));
周DEA:=EMA(周DIF,9*4),COLORWHITE,DOTLINE;
周MACD:=2*(周DIF-周DEA),COLORSTICK,COLOR111111;
周柱:=周MACD,COLORFFCC00,LINETHICK2;
日DIF:=(EMA(CLOSE,12)-EMA(CLOSE,26));
日DEA:=EMA(日DIF,9);
日MACD:=2*(日DIF-日DEA),COLORWHITE;
日柱:=日MACD,COLORRED;
{MACD日周月共振線(xiàn)}
{頂部}
VAR10:=日柱;
VAR11:=HHV(HHV(LOW,14),40);
上一:EMA(EMA(VAR11,14)+2*STD(VAR11,14),8),LINETHICK2,COLORRED;
VAR20:=周柱;
VAR21:=HHV(HHV(LOW,14),120);
上二:EMA(EMA(VAR21,14)+2*STD(VAR21,14),8),,LINETHICK2,COLORMAGENTA;
VAR30:=月柱;
VAR31:=HHV(HHV(LOW,14),240);
上三:EMA(EMA(VAR31,14)+2*STD(VAR31,14),8),LINETHICK3,COLORYELLOW;
{底部}
VAR15:=LLV(LLV(HIGH,14),40);
VAR16:=LLV(MA((L+H+C)/3,8),40),COLORFF00FF;
下一:=EMA(EMA(VAR15,14)+2*STD(VAR15,14),8),LINETHICK1,COLORCYAN;
VAR25:=LLV(LLV(HIGH,14),120);
VAR26:=LLV(MA((L+H+C)/3,8),120),COLORFF00FF;
下二:=EMA(EMA(VAR25,14)+2*STD(VAR25,14),8),LINETHICK2,COLORGREEN;
VAR35:=LLV(LLV(HIGH,14),240);
VAR36:=LLV(MA((L+H+C)/3,8),240),COLORFF00FF;
下三:=EMA(EMA(VAR35,14)+2*STD(VAR35,14),8),LINETHICK3,COLORBLUE;
{漲停k線(xiàn)}
漲停:=IF(REF(C,1)*1.1-C<0.01 ,1,0);
STICKLINE(漲停,OPEN,CLOSE,3,0),COLORRED;
STICKLINE(漲停,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(漲停,H,L,0,0),COLORYELLOW;
{無(wú)拋壓縮量板}
無(wú)量停板7:=MA(C,5)>REF(MA(C,5),1) AND C/REF(C,1)>1.099 AND V<MA(V,5)COLOR7210CD;
STICKLINE(無(wú)量停板7,C,O,3,0) ,COLOR7210CD;
{板塊市值業(yè)績(jī)}
Z111:=STRCAT(HYBLOCK,'----'); 
Z211:=STRCAT(Z111,FGBLOCK);
Z311:=STRCAT(Z211,DYBLOCK); 
Z411:=STRCAT(Z311,'----'); 
DRAWTEXT_FIX(1,0.00,0.06,0,'【主題概念】：')COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.07,0.06,0,STRCAT(Z411,GNBLOCK)),COLORCYAN;
DRAWTEXT_FIX(1,0.07,0.24,0,EXTERNSTR(0,14))COLORYELLOW;
總股本:=STRCAT(STRCAT(' 總股本:',CON2STR(TOTALCAPITAL/1000000,2)),'億');
流通盤(pán):=STRCAT(STRCAT(' 流通盤(pán):',CON2STR(CAPITAL/1000000,2)),'億');
全流通:=STRCAT(STRCAT(' 全流通:',CON2STR(CAPITAL/TOTALCAPITAL*100,2)),'％');
市值:=STRCAT(STRCAT(' 流通市值:',CON2STR((CAPITAL/1000000)*C,2)),'億');
上市日期:=STRCAT(' 上市日期: ',CON2STR(HHV((BARSCOUNT(C)=0)*(DATE+19000000),0),0));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.005,0,上市日期),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.099,0.005,0,總股本),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.175,0.005,0,流通盤(pán)),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.260,0.005,0,市值),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.12,0,STRCAT(STRSPACE(DYBLOCK),HYBLOCK)),COLORCYAN;
DRAWTEXT_FIX(FINANCE(51)<>0,0.1,0.12,0,'含可轉(zhuǎn)債')COLORYELLOW;