通达信短线皇帝主图未加密选股指标公式源码

通达信短线皇帝主图未加密选股指标公式源码

源码正文：

DRAWGBK(C>O,RGB(8,28,47),RGB(0,0,0),0,'1',0){XG51};
DRAWKLINE(H,O,L,C){XG51};
长期循环线:ema(C,68)COLORLIRED,LINETHICK1,CIRCLEDOT{XG51};
IF(长期循环线>REF(长期循环线,1),长期循环线,DRAWNULL),COLORWHITE,LINETHICK1,CIRCLEDOT{XG51};
IF(长期循环线<REF(长期循环线,1),长期循环线,DRAWNULL),COLORLIRED,LINETHICK1,CIRCLEDOT{XG51};
操作线:Ema(C,12),COLORLIRED,LINETHICK2{XG51};
IF(操作线>REF(操作线,1),操作线,DRAWNULL),COLORBLUE,LINETHICK2{XG51};
IF(操作线<REF(操作线,1),操作线,DRAWNULL),COLORLIRED,LINETHICK2{XG51};
MA8:EMA(C,23),COLORWHITE,POINTDOT{XG51};
IF(MA8<REF(MA8,1),MA8,DRAWNULL),COLORCYAN,POINTDOT{XG51};
MA9:EMA(C,25),COLORWHITE,POINTDOT{XG51};
IF(MA9<REF(MA9,1),MA9,DRAWNULL),COLORCYAN,POINTDOT{XG51};
短循环线:EMA(C,24),COLORWHITE,DOTLINE{XG51};
IF(短循环线>REF(短循环线,1),短循环线,DRAWNULL),COLORWHITE,DOTLINE{XG51};
IF(短循环线<REF(短循环线,1),短循环线,DRAWNULL),COLORCYAN,DOTLINE{XG51};
总股本:=stRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿'){XG51};
流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿'){XG51};
市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿'){XG51};
上市日期:=STRCAT(' 上市天数: ',CON2STR(FINANCE(42),0)){XG51};
股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(总股本,流通盘),市值),上市日期)){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.02,0.06,0,股本市值),COLORBROWN{XG51};
DRAWTEXT_FIX(ISLASTBAR=1 ,0.295,0.01,1,'【 操作原则 】: 小三线顺上短线做多；五线顺上中线做多 '),COLORBLACK{XG51};
DRAWTEXT_FIX(1,0.02,0.115,0,'行业地域：'),COLORBROWN{XG51};
DRAWTEXT_FIX(1,0.07,0.115,0,HYBLOCK),COLORBROWN{XG51};
DRAWTEXT_FIX(1,0.12,0.115,0,GNBLOCK),COLORBROWN;{XG51};
AAA:=(3*C+H+L+O)/6{XG51};
VAR1AA:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)
+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36{XG51};
波段线:VAR1AA,COLORWHITE,LINETHICK1{XG51};

SHORT:=12;LONG:=26;MID:=9{XG51};
dif:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG){XG51};
DEA:=EMA(DIF,MID){XG51};
空头:STICKLINE((REF(macd,1)>MacD ) AND (C<波段线 OR (C>波段线 AND 波段线<REF(波段线,1))),C,O,3,0),COLOR808000{XG51};
STICKLINE((REF(MACD,1)> MACD AND C<波段线),H,L,0,0),COLOR808000{XG51};
头:STICKLINE(C<波段线,C,O,3,0),COLOR808000{XG51};
STICKLINE(( C<波段线),H,L,0,0),COLOR808000{XG51};
STICKLINE(空头,C,O,2.8,0),COLOR555500{XG51};
STICKLINE(空头,C,O,2,0),COLOR888800{XG51};
STICKLINE(空头,C,O,1.5,0),COLORAAAA00{XG51};
STICKLINE(空头,C,O,1,0),COLORCCCC00{XG51};
STICKLINE(空头,C,O,0.5,0),COLOREEEE00{XG51};
STICKLINE(头,C,O,2.8,0),COLOR555500{XG51};
STICKLINE(头,C,O,2,0),COLOR888800{XG51};
STICKLINE(头,C,O,1.5,0),COLORAAAA00{XG51};
STICKLINE(头,C,O,1,0),COLORCCCC00{XG51};
STICKLINE(头,C,O,0.5,0),COLOREEEE00{XG51};
AAK:=CLOSE/REF(C,1)>=1.097 AND C=H AND C>EMA(C,68){XG51};
STICKLINE(AAK,C,O,1.5,0),COLORBLUE{XG51};
STICKLINE(AAK,O,C,0.2,0),COLOR0000FF{XG51};
超短:=100*(C-LLV(L,3))/(HHV(C,3)-LLV(L,3)){XG51};
短期:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)){XG51};
中期:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)){XG51};
中长:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20)){XG51};
长期:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)){XG51};
T2X:=MA(C,20)>REF(MA(C,20),1){XG51};
T3X:= V>MA(V,5) AND V>MA(V,63){XG51};
T4:=MACD.DIF>REF(MACD.DIF,1) AND MACD.DIF>MACD.DEA{XG51};
T5:= kdj.K>REF(kdJ.K,1) AND KDJ.K>50{XG51};
T6:=短期>=99 AND 中期>=99 AND 中长>=99 AND 长期>=99{XG51};
T7:=H>=REF(C,1)*1.099 AND C>REF(C,1){XG51};
TTS:=T2X AND T3X AND T4 AND T5 AND T6,NODRAW{XG51};
涨停1:=C>=REF(C,1)*1.0990 AND C=H AND C>EMA(C,24){XG51};
STICKLINE(涨停1 AND TTS,O,C,2,0),COLOR0000FF{XG51};
STICKLINE(涨停1 AND TTS,O,O+(C-O)*2/3,2,0),COLORBLUE{XG51};
STICKLINE(涨停1 AND TTS,O,O+(C-O)*1/2.5,2,0),COLORFF80FF{XG51};
箱底:=TROUGH(C,10,1)*1.02{XG51};
箱底1:=TROUGH(C,10,1)*1.02{XG51};
价低箱底:=COUNT(L<箱底,3){XG51};
底箱:=TROUGH(C,10,1)*1.05,COLOR008888,LINETHICK1,DOTLINE{XG51};
白银:=(EMA(C,24)<EMA(C,68) AND C>EMA(C,24) AND C<EMA(C,68))
OR (EMA(C,24)>EMA(C,68) AND C<EMA(C,24) AND C>EMA(C,68)) AND 价低箱底>=1 AND 箱底<EMA(C,24)
AND C>波段线 AND EMA(C,12)>REF(EMA(C,12),1) AND crOSS(C,底箱),COLOR00AAAA,NODRAW{XG51};
DRAWTEXT((EMA(C,24)<EMA(C,68) AND C>EMA(C,24) AND C<EMA(C,68))
OR (EMA(C,24)>EMA(C,68) AND C<EMA(C,24) AND C>EMA(C,68)) AND 价低箱底>=1 AND 箱底<EMA(C,24)
AND C>波段线 AND EMA(C,12)>REF(EMA(C,12),1) AND CROSS(C,底箱),L*0.98,'↖白银'),COLORA8A8A8{XG51};
STICKLINE(白银,OPEN,CLOSE,3.5,0),COLOR5F5F5F{XG51};
STICKLINE(白银,OPEN,CLOSE,3.0,0),COLOR6E6E6E{XG51};
STICKLINE(白银,OPEN,CLOSE,2.5,0),COLOR747474{XG51};
STICKLINE(白银,OPEN,CLOSE,2.0,0),COLOR919191{XG51};
STICKLINE(白银,OPEN,CLOSE,1.5,0),COLORA8A8A8{XG51};
STICKLINE(白银,OPEN,CLOSE,1.0,0),COLORCDCDCD{XG51};
STICKLINE(白银,OPEN,CLOSE,0.5,0),COLOREBEBEB{XG51};
STICKLINE(白银,OPEN,CLOSE,0.1,0),COLORRED{XG51};
杂银:=C<EMA(C,24) AND C<EMA(C,68) AND 价低箱底>=1 AND 箱底<EMA(C,24)
AND C>波段线 AND EMA(C,12)>REF(EMA(C,12),1) AND CROSS(C,底箱),COLOR00AAAA,NODRAW{XG51};
DRAWTEXT(C<EMA(C,24) AND C<EMA(C,68) AND 价低箱底>=1 AND 箱底<EMA(C,24)
AND C>波段线 AND EMA(C,12)>REF(EMA(C,12),1) AND CROSS(C,底箱),L*0.98,'↖杂银'),COLORA8A8A8{XG51};
BG1:=(C-O){XG51};
STICKLINE(杂银,OPEN,C,3.5,0),COLOR5F5F5F{XG51};
STICKLINE(杂银,OPEN,C,1,0),COLORB3F5F9{XG51};
STICKLINE(杂银,OPEN,O+BG1/2,3.5,0),COLOR5F5F5F{XG51};
STICKLINE(杂银,OPEN,O+BG1/2,3.0,0),COLOR6E6E6E{XG51};
STICKLINE(杂银,OPEN,O+BG1/2,2.5,0),COLOR747474{XG51};
STICKLINE(杂银,OPEN,O+BG1/2,2.0,0),COLOR919191{XG51};
STICKLINE(杂银,OPEN,O+BG1/2,1.5,0),COLORA8A8A8{XG51};
STICKLINE(杂银,OPEN,O+BG1/2,1.0,0),COLORCDCDCD{XG51};
STICKLINE(杂银,OPEN,O+BG1/2,0.5,0),COLOREBEBEB{XG51};
STICKLINE(杂银,OPEN,O+BG1/2,0.1,0),COLORRED{XG51};
白金:C>EMA(C,24) AND C>EMA(C,68) AND EMA(C,24)>EMA(C,68) AND (EMA(C,24)>REF(EMA(C,24),1)
AND EMA(C,68)>REF(EMA(C,68),1)) AND 价低箱底>=1 AND 箱底<EMA(C,24) AND C>波段线 AND
EMA(C,12)>REF(EMA(C,12),1) AND CROSS(C,底箱),COLOR00AAAA,NODRAW{XG51};
DRAWTEXT(C>EMA(C,24) AND C>EMA(C,68) AND EMA(C,24)>EMA(C,68) AND (EMA(C,24)>REF(EMA(C,24),1)
AND EMA(C,68)>REF(EMA(C,68),1)) AND 价低箱底>=1 AND 箱底<EMA(C,24) AND C>波段线 AND
EMA(C,12)>REF(EMA(C,12),1) AND CROSS(C,底箱),L*0.98,'↖白金'),COLOR00CCCC{XG51};
STICKLINE(白金,OPEN,CLOSE,3.5,0),COLOR008888{XG51};
STICKLINE(白金,OPEN,CLOSE,1.6,0),COLOR00AAAA{XG51};
STICKLINE(白金,OPEN,CLOSE,0.8,0),COLOR00CCCC{XG51};
STICKLINE(白金,OPEN,CLOSE,0.2,0),COLOR00FFFF{XG51};
黄金:C>EMA(C,24) AND C>EMA(C,68) AND EMA(C,24)<EMA(C,68)
AND 价低箱底>=1 AND 箱底<EMA(C,24) AND C>波段线 AND
EMA(C,12)>REF(EMA(C,12),1) AND CROSS(C,底箱),COLOR00AAAA,NODRAW{XG51};
DRAWTEXT(C>EMA(C,24) AND C>EMA(C,68) AND EMA(C,24)<EMA(C,68)
AND 价低箱底>=1 AND 箱底<EMA(C,24) AND C>波段线 AND
EMA(C,12)>REF(EMA(C,12),1) AND CROSS(C,底箱),L*0.98,'↖黄金'),COLOR00CCCC{XG51};
BG:=(C-O){XG51};
STICKLINE(黄金,OPEN,C,3.5,0),COLOR008888{XG51};
STICKLINE(黄金,OPEN,C,1,0),COLORRED{XG51};
STICKLINE(黄金,OPEN,O+BG/2,3.5,0),COLOR008888{XG51};
STICKLINE(黄金,OPEN,O+BG/2,1.6,0),COLOR00AAAA{XG51};
STICKLINE(黄金,OPEN,O+BG/2,0.8,0),COLOR00CCCC{XG51};
STICKLINE(黄金,OPEN,O+BG/2,0.2,0),COLOR00FFFF{XG51};
IF(波段线<REF(波段线,1),波段线,DRAWNULL),COLORCYAN,LINETHICK1{XG51};
攻击线:MA(C,3),COLORBROWN,LINETHICK1,DOTLINE{XG51};
IF(攻击线>REF(攻击线,1),攻击线,DRAWNULL),COLORRED,LINETHICK1,DOTLINE{XG51};
IF(攻击线<REF(攻击线,1),攻击线,DRAWNULL),COLORBROWN,LINETHICK1,DOTLINE{XG51};
低点转折:=DRAWICON(CROSS(zig(3,6),REF(ZIG(3,6),1)),L*0.98,9) {XG51};
DRAWTEXT((低点转折=1),L*0.99,'买'),COLOR1665F8{XG51};
高点转折:=DRAWICON(CROSS(REF(ZIG(3,4),1),ZIG(3,4)),H*1.015,15){XG51};
DRAWTEXT((高点转折=1),H*1.01,'卖'),COLOR77EE3E{XG51};
金叉:=CROSS(KDJ.J,KDJ.D){XG51};
死叉:=CROSS(KDJ.D,KDJ.J){XG51};
CO1:=(C-O){XG51};
STICKLINE(金叉,O,C,0,0),COLORBLUE{XG51};
STICKLINE(金叉,O,O+CO1/2,0.01,0),COLORBLUE{XG51};
STICKLINE(金叉,O,O+CO1/2,0,0),COLORWHITE{XG51};
STICKLINE(金叉,O,O+CO1/5,3.4,0),COLOR335555{XG51};
STICKLINE(金叉,O,O+CO1/5,2,0),COLOR338888{XG51};
STICKLINE(金叉,O,O+CO1/5,1.5,0),COLOR33AAAA{XG51};
STICKLINE(金叉,O,O+CO1/5,1,0),COLOR33CCCC{XG51};
STICKLINE(金叉,O,O+CO1/5,0,0),COLOR33EEEE{XG51};
金:=CROSS(MACD.DIF,MACD.DEA){XG51};
CO11:=(C-O){XG51};
STICKLINE(金,O,C,0,0),COLORBLUE{XG51};
STICKLINE(金,O,O+CO11/2,0.3,0),COLORBLUE{XG51};
STICKLINE(金,O,O+CO11/2,0,0),COLORWHITE{XG51};
STICKLINE(金,O,O+CO11/5,3.4,0),COLOR000055{XG51};
STICKLINE(金,O,O+CO11/5,2,0),COLOR000088{XG51};
STICKLINE(金,O,O+CO11/5,1.5,0),COLOR0000AA{XG51};
STICKLINE(金,O,O+CO11/5,1,0),COLOR0000CC{XG51};
STICKLINE(金,O,O+CO11/5,0,0),COLOR0000EE{XG51};
STICKLINE(死叉,O,O+CO1/5,1.4,0),COLOR4BFE59{X!G?5!1!C!N!{};

通达信敢死资金能量未加密选股指标公式源码

源码正文：

DRAWBAND(3*(ema(C,3)-Ema(C,8)-EMA(EMA(C,3)-EMA(C,8),20))*5+20,RGB(250,80,80),20,RGB(0,180,180 )){XG51};
DRAWTEXT(ISLAstBAR,20.5,' 资金'),COLORLIMAGENTA {XG51};
A:=vol*CLOSE{XG51};
B:=SUM(A,1)/SUM(VOL,1){XG51};
B1:=EMA(B,8){XG51};
敢死队:(B-B1)*100/B,NODRAW,COLORWHITE{XG51};
DRAWBAND(敢死队+35,RGB(250,0,00),35,RGB(0,255,0)){XG51};
DRAWTEXT(ISLASTBAR,35.5,' 敢死队'),COLORWHITE{XG51};
资金趋势:3*(EMA(C,3)-EMA(C,8)-EMA(EMA(C,3)-EMA(C,8),20))*5,NODRAW,COLORLIMAGENTA{XG51};
VAR2:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*200*10{XG51};
能量: SMA(VAR2,5,1)/100,COLORWHITE{XG51};
DRAWBAND(能量>REF(能量,1),RGB(250,0,120),0,RGB(0,180,180)){XG51};
STICKLINE(能量>REF(能量,1),0,能量,2.5,0),COLOR7800FF{XG51};
STICKLINE(能量<REF(能量,1),0,能量,2.5,0),COLORFF7800{XG51};
危险区:18,COLOR208FFF{XG51};
次险区:15,COLORFF33FF,DOTLINE{XG51};
VAR3:=VOL/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
VAR4:=(IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2))/(IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1))-IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2))*(-1)/IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+CLOSE-LOW),VOL/2))){XG51};
VAR5:=AMOUNT/(100*VOL){XG51};
VAR6:=MA(VAR5,40){XG51};
VAR7:=100*(CLOSE-VAR6)/VAR6{XG51};
底部区: IF(VAR4>0 AND VAR7<-12 AND CLOSE/OPEN>1.07,300,200)/100,COLORFFFF00,DOTLINE{XG51};
DRAWTEXT(ISLASTBAR,1.5,' 能量'),COLOR7800FF {XG51};
量堆:=COUNT(V>=REF(V,1)*2,BArslAST(crOSS(C,MA(C,20)))){XG51};
量堆1:=IF(量堆=1,1000,0)/100,COLORBLUE,LINETHICK3{X-G_5~1-C-N-{};