通达信箱体筹码主图未加密选股指标公式源码

NAMEINCLUDE('*S')通达信箱体筹码主图未加密选股指标公式源码

源码正文：

DRAWGBK(1,RGB(9,13,16),RGB(9,117,153),1,2,1){XG51};
{XG51};
TD:=IF(TOTALBARSCOUNT<117,TOTALBARSCOUNT,117){XG51};
DA:=IF(CURRBARSCOUNT<TD,TD,0){XG51};
HI:REFDATE(HHV(H,DA),DATE),crOSSDOT,LINETHICK3,COLORFFFF00{XG51};
LO:REFDATE(LLV(L,DA),DATE),CROSSDOT,LINETHICK3,COLOR00FF00{XG51};
DY:(HI+LO)/2,CROSSDOT,LINETHICK2,COLORFFFFFF{XG51};
{XG51};
CC:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL){XG51};
GZ:=EXP(LN(HI/LO)/20){XG51};
VH1:=SUM(IF(CC>=HI/GZ,V,0),DA){XG51};
VH2:=SUM(IF(CC>=HI/POW(GZ,2) AND CC<HI/GZ,V,0),DA){XG51};
VH3:=SUM(IF(CC>=(HI/POW(GZ,3)) AND CC<(HI/POW(GZ,2)),V,0),DA){XG51};
VH4:=SUM(IF(CC>=(HI/POW(GZ,4)) AND CC<(HI/POW(GZ,3)),V,0),DA){XG51};
VH5:=SUM(IF(CC>=(HI/POW(GZ,5)) AND CC<(HI/POW(GZ,4)),V,0),DA){XG51};
VH6:=SUM(IF(CC>=(HI/POW(GZ,6)) AND CC<(HI/POW(GZ,5)),V,0),DA){XG51};
VH7:=SUM(IF(CC>=(HI/POW(GZ,7)) AND CC<(HI/POW(GZ,6)),V,0),DA){XG51};
VH8:=SUM(IF(CC>=(HI/POW(GZ,8)) AND CC<(HI/POW(GZ,7)),V,0),DA){XG51};
VH9:=SUM(IF(CC>=(HI/POW(GZ,9)) AND CC<(HI/POW(GZ,8)),V,0),DA){XG51};
VH10:=SUM(IF(CC>=(HI/POW(GZ,10)) AND CC<(HI/POW(GZ,9)),V,0),DA){XG51};
VH11:=SUM(IF(CC>=(HI/POW(GZ,11)) AND CC<(HI/POW(GZ,10)),V,0),DA){XG51};
VH12:=SUM(IF(CC>=(HI/POW(GZ,12)) AND CC<(HI/POW(GZ,11)),V,0),DA){XG51};
VH13:=SUM(IF(CC>=(HI/POW(GZ,13)) AND CC<(HI/POW(GZ,12)),V,0),DA){XG51};
VH14:=SUM(IF(CC>=(HI/POW(GZ,14)) AND CC<(HI/POW(GZ,13)),V,0),DA){XG51};
VH15:=SUM(IF(CC>=(HI/POW(GZ,15)) AND CC<(HI/POW(GZ,14)),V,0),DA){XG51};
VH16:=SUM(IF(CC>=(HI/POW(GZ,16)) AND CC<(HI/POW(GZ,15)),V,0),DA){XG51};
VH17:=SUM(IF(CC>=(HI/POW(GZ,17)) AND CC<(HI/POW(GZ,16)),V,0),DA){XG51};
VH18:=SUM(IF(CC>=(HI/POW(GZ,18)) AND CC<(HI/POW(GZ,17)),V,0),DA){XG51};
VH19:=SUM(IF(CC>=(HI/POW(GZ,19)) AND CC<(HI/POW(GZ,18)),V,0),DA){XG51};
VH20:=SUM(IF(CC>=(HI/POW(GZ,20)) AND CC<(HI/POW(GZ,19)),V,0),DA){XG51};
DV1:=REFDATE(HHV(VH1,DA),DATE){XG51};
DV2:=REFDATE(HHV(VH2,DA),DATE){XG51};
DV3:=REFDATE(HHV(VH3,DA),DATE){XG51};
DV4:=REFDATE(HHV(VH4,DA),DATE){XG51};
DV5:=REFDATE(HHV(VH5,DA),DATE){XG51};
DV6:=REFDATE(HHV(VH6,DA),DATE){XG51};
DV7:=REFDATE(HHV(VH7,DA),DATE){XG51};
DV8:=REFDATE(HHV(VH8,DA),DATE){XG51};
DV9:=REFDATE(HHV(VH9,DA),DATE){XG51};
DV10:=REFDATE(HHV(VH10,DA),DATE){XG51};
DV11:=REFDATE(HHV(VH11,DA),DATE){XG51};
DV12:=REFDATE(HHV(VH12,DA),DATE){XG51};
DV13:=REFDATE(HHV(VH13,DA),DATE){XG51};
DV14:=REFDATE(HHV(VH14,DA),DATE){XG51};
DV15:=REFDATE(HHV(VH15,DA),DATE){XG51};
DV16:=REFDATE(HHV(VH16,DA),DATE){XG51};
DV17:=REFDATE(HHV(VH17,DA),DATE){XG51};
DV18:=REFDATE(HHV(VH18,DA),DATE){XG51};
DV19:=REFDATE(HHV(VH19,DA),DATE){XG51};
DV20:=REFDATE(HHV(VH20,DA),DATE){XG51};
SS:=(DV1+DV2+DV3+DV4+DV5+DV6+DV7+DV8+DV9+DV10+DV11+DV12+DV13+DV14+DV15+DV16+DV17+DV18+DV19+DV20){XG51};
DT:=CURRBARSCOUNT{XG51};
{XG51};
stICKLINE(DT<=CEILING(DA*DV1/SS)*3,HI/POW(GZ,0)*99/100,HI/POW(GZ,1),9,0),COLOR0000AA{XG51};
STICKLINE(DT<=CEILING(DA*DV2/SS)*3,HI/POW(GZ,1)*99/100,HI/POW(GZ,2),9,0),COLOR000099{XG51};
STICKLINE(DT<=CEILING(DA*DV3/SS)*3,HI/POW(GZ,2)*99/100,HI/POW(GZ,3),9,0),COLOR000088{XG51};
STICKLINE(DT<=CEILING(DA*DV4/SS)*3,HI/POW(GZ,3)*99/100,HI/POW(GZ,4),9,0),COLOR000077{XG51};
STICKLINE(DT<=CEILING(DA*DV5/SS)*3,HI/POW(GZ,4)*99/100,HI/POW(GZ,5),9,0),COLOR000066{XG51};
STICKLINE(DT<=CEILING(DA*DV6/SS)*3,HI/POW(GZ,5)*99/100,HI/POW(GZ,6),9,0),COLOR000055{XG51};
STICKLINE(DT<=CEILING(DA*DV7/SS)*3,HI/POW(GZ,6)*99/100,HI/POW(GZ,7),9,0),COLOR00BBBB{XG51};
STICKLINE(DT<=CEILING(DA*DV8/SS)*3,HI/POW(GZ,7)*99/100,HI/POW(GZ,8),9,0),COLOR00AAAA{XG51};
STICKLINE(DT<=CEILING(DA*DV9/SS)*3,HI/POW(GZ,8)*99/100,HI/POW(GZ,9),9,0),COLOR009999{XG51};
STICKLINE(DT<=CEILING(DA*DV10/SS)*3,HI/POW(GZ,9)*99/100,HI/POW(GZ,10),9,0),COLOR008888{XG51};
STICKLINE(DT<=CEILING(DA*DV11/SS)*3,HI/POW(GZ,10)*99/100,HI/POW(GZ,11),9,0),COLOR007777{XG51};
STICKLINE(DT<=CEILING(DA*DV12/SS)*3,HI/POW(GZ,11)*99/100,HI/POW(GZ,12),9,0),COLOR006666{XG51};
STICKLINE(DT<=CEILING(DA*DV13/SS)*3,HI/POW(GZ,12)*99/100,HI/POW(GZ,13),9,0),COLOR005555{XG51};
STICKLINE(DT<=CEILING(DA*DV14/SS)*3,HI/POW(GZ,13)*99/100,HI/POW(GZ,14),9,0),COLOR00BB00{XG51};
STICKLINE(DT<=CEILING(DA*DV15/SS)*3,HI/POW(GZ,14)*99/100,HI/POW(GZ,15),9,0),COLOR00AA00{XG51};
STICKLINE(DT<=CEILING(DA*DV16/SS)*3,HI/POW(GZ,15)*99/100,HI/POW(GZ,16),9,0),COLOR009900{XG51};
STICKLINE(DT<=CEILING(DA*DV17/SS)*3,HI/POW(GZ,16)*99/100,HI/POW(GZ,17),9,0),COLOR008800{XG51};
STICKLINE(DT<=CEILING(DA*DV18/SS)*3,HI/POW(GZ,17)*99/100,HI/POW(GZ,18),9,0),COLOR007700{XG51};
STICKLINE(DT<=CEILING(DA*DV19/SS)*3,HI/POW(GZ,18)*99/100,HI/POW(GZ,19),9,0),COLOR006600{XG51};
STICKLINE(DT<=CEILING(DA*DV20/SS)*3,HI/POW(GZ,19)*99/100,HI/POW(GZ,20),9,0),COLOR005500{XG51};
{XG51};
DRAWKLINE(H,O,L,C){XG51};
STICKLINE(C>O OR (C=O AND (C>=REF(C,1) OR L>REF(H,1))),O,C,3,0),COLOR000099{XG51};
STICKLINE(C>O OR (C=O AND (C>=REF(C,1) OR L>REF(H,1))),O,C,1,0),COLOR6600FF{XG51};
STICKLINE(C>O OR (C=O AND (C>=REF(C,1) OR L>REF(H,1))),O,C,0,0),COLORCC66FF{XG51};
STICKLINE(C<O OR (C=O AND (C< REF(C,1) OR H<REF(L,1))),O,C,3,0),COLORFF9900{XG51};
STICKLINE(C<O OR (C=O AND (C< REF(C,1) OR H<REF(L,1))),O,C,1,0),COLORFFCC00{XG51};
STICKLINE(C<O OR (C=O AND (C< REF(C,1) OR H<REF(L,1))),O,C,0,0),COLORFFFF00{XG51};
{XG51};
UT:=IFF(NAMEINCLUDE('*')通达信火山口未加密选股指标公式源码

源码正文：

火: BArslAst(ema(CLOSE,5)<REF(Ema(CLOSE,5),1)),COLORWHITE{XG51};
山: COUNT(EMA(CLOSE,5)>REF(EMA(CLOSE,5),1),5){XG51};
买入或持股: (山>0,火,0,2,0),COLORWHITE{XG51};
STICKLINE(山>0,火,0,2,0),COLORWHITE{XG51};
下跌→抛出: (山>0,火,山,2,1),COLORF0F000{XG51};
STICKLINE(山>0,火,山,2,1),COLORF0F000{XG51};
观望: STICKLINE(山=0 AND 火=0,0,1,4,1),COLORYELLOW{XG51};
植被: (山<火,火,山,1,0),COLOR00FF00{XG51};
STICKLINE(山<火,火,山,1,0),COLOR00FF00{XG51};
STICKLINE(REF(山,1)=0 AND 山>0,0,-1,2,0),COLORWHITE{XG51};
DRAWTEXT(REF(火,3)>0 AND REF(火,2)>0 AND REF(火,1)>0 AND 火=0 AND REF(火,1)>山,REF(火,1),'¤调整'),COLORBLUE , {XG51};
DRAWTEXT(REF(火,3)>0 AND REF(火,2)>0 AND REF(火,1)>0 AND 火=0 AND REF(火,1)>山,REF(火,1),'●'),COLORLIMAGENTA, {XG51};
DRAWTEXT(REF(火,3)>0 AND REF(火,2)>0 AND REF(火,1)>0 AND 火=0 AND REF(火,1)>山,REF(火,1),'÷'),COLORLIGREEN, {XG51};
kdj:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*10{XG51};
K:SMA(SMA(kdJ,2,1),2,1),COLOR00FF00,{XG51};
D:SMA(SMA(SMA(KDJ,2,1),2,1),3,1),COLORBLUE{XG51};
J:(3*SMA(SMA(KDJ,2,1),2,1)-2*SMA(SMA(SMA(KDJ,2,1),2,1),3,1)),COLORF00FF0{XG51};
LC:=REF(CLOSE,1){XG51};
rsi:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(Abs(CLOSE-LC),4.1,1)*100{XG51};
牛准反弹:crOSS(RSI,11)*10,COLORBLUE{X-G_5~1-C-N-{};