通达信缠论、笔、分型选股指标公式源码

通达信缠论、笔、分型选股指标公式源码

源码正文：

KX:='CHANLUN@KXIAN'{XG51};
KXG:='CHANLUN@KXG'{XG51};
KXD:='CHANLUN@KXD'{XG51};
KXFX:='CHANLUN@KXFX'{XG51};
笔:='CHANLUN@BI'{XG51};
BILAst:='CHANLUN@BILAST'{XG51};
段:='CHANLUN@DUAN'{XG51};
DUANLAST:='CHANLUN@DUANLAST'{XG51};
中枢:='CHANLUN@ZS'{XG51};
ZSZG:='CHANLUN@ZSZG'{XG51};
ZSZD:='CHANLUN@ZSZD'{XG51};
ZSGG:='CHANLUN@ZSGG'{XG51};
ZSDD:='CHANLUN@ZSDD'{XG51};
ZSZZ:='CHANLUN@ZSZZ'{XG51};
ZSKS:='CHANLUN@ZSKSLAST'{XG51};
ZSJS:='CHANLUN@ZSJSLAST'{XG51};
BIFX:=-REF(笔,BILAST){XG51};
DUANFX:=-REF(段,DUANLAST){XG51};
KXQJ:='CHANLUN@KXQJ'{XG51};
STICKLINE(ZSZG>ZSZD AND DUANFX=1, ZSZG, ZSZD, 10, 1),COLOR8E236B{XG51};
STICKLINE(ZSZG>ZSZD AND DUANFX=-1, ZSZG, ZSZD, 10, 1), COLOR007700{XG51};
DRAWLINE(ZSKS=1, ZSZZ, ZSJS=1, ZSZZ, 0), COLORFFFFFF{XG51};
STICKLINE(KX>0, KXG, KXD, 5, 1),COLOR007700,LINETHICK2{XG51};
STICKLINE(KX<0, KXG, KXD, 5, 1),COLOR00FFFF,LINETHICK2{XG51};
STICKLINE(笔=1, KXG, KXD, 5, 1), colorgreen, LINETHICK2{XG51};
STICKLINE(笔=-1, KXG, KXD, 5, 1), colorred, LINETHICK2{XG51};
STICKLINE(段=1, KXG, KXD, 5, 0), COLOR007700, LINETHICK2{XG51};
STICKLINE(段=-1, KXG, KXD, 5, 0), COLOR0000CC, LINETHICK2{XG51};
DRAWLINE(笔=1,H,笔=-1,L,0),colorblue,LINETHICK2{XG51};
DRAWLINE(笔=-1,L,笔=1,H,0),COLORFF00FF ,LINETHICK2{XG51};
DRAWLINE(段=1,H,段=-1,L,0),COLOR007700, LINETHICK2{XG51};
DRAWLINE(段=-1,L,段=1,H,0),colorred, LINETHICK2{XG51};
DRAWTEXT(笔= 1, H*1.038, ''+H+''), COLORFFFFFF{XG51};
DRAWTEXT(笔=-1, L*0.96, ''+L+''), COLORFFFFFF{XG51};
VAR3:=LLV(H,240){XG51};
VAR4:=100*(C-VAR3)/VAR3{XG51};
VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100{XG51};
VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100{XG51};
VAR7:=0{XG51};
VAR8:=SMA(maX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(Abs(CLOSE-REF(CLOSE,1)),7,1)*100{XG51};
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100{XG51};
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND H>L+0.04,4,0){XG51};
VAR11:=zig(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3){XG51};
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3){XG51};
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3){XG51};
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3){XG51};
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3){XG51};
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3){XG51};
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3){XG51};
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3){XG51};
VAR19:=ema(C,2)-EMA(C,150){XG51};
买１:=VAR10{XG51};
买２:=(VAR11+VAR13+VAR15+VAR17){XG51};
卖１:=(VAR12+VAR14+VAR16+VAR18){XG51};
DRAWTEXT(买１>0 OR 买２>0,L*0.985,'买'),COLOR00FFFF{XG51};
DRAWTEXT(卖１>0,H*1.01,'卖'),COLOR00FFFF{XG51};
APP:=(vol)/((H-L)*(2)-ABS(C-O)){XG51};
ZL:=IF((H>O),(APP)*(H-L),IF((L<O),(APP)*(H-O+C-L),(VOL)/(2))){XG51};
SF:=IF((H>O),0-(APP)*(H-C+O-L),IF((L<O),0-(APP)*(H-L),0-(VOL)/(2))){XG51};
库存能量:=MA(ZL+SF,2){XG51};
库存平均:=MA(ZL+SF,5){XG51};
GET:ZIG(3,5),coloryellow,LINETHICK3{XG51};
PL5:=ZIG(3,5){XG51};
EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3){XG51};
EX1:=PL5<REF(PL5,1) AND REF(PL5,1)>=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3){XG51};
PL10:=ZIG(3,10){XG51};
EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3){XG51};
EX2:=PL10<REF(PL10,1) AND REF(PL10,1)>=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3){XG51};
PL20:=ZIG(3,20){XG51};
EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3){XG51};
EX3:=PL20<REF(PL20,1) AND REF(PL20,1)>=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3){XG51};
走强1:=BArslAST(PL5<REF(PL5,1)){XG51};
走弱1:=BARSLAST(PL5>REF(PL5,1)){XG51};
走强2:=BARSLAST(PL10<REF(PL10,1)){XG51};
走弱2:=BARSLAST(PL10>REF(PL10,1)){XG51};
走强3:=BARSLAST(PL20<REF(PL20,1)){XG51};
走弱3:=BARSLAST(PL20>REF(PL20,1)){XG51};
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0){XG51};
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0){XG51};
DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0){XG51};
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0){XG51};
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0){XG51};
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0){XG51};
DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0){XG51};
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0){XG51};
DRAWTEXT(EN2 AND DTJZ10=1,L*0.93,'[类二买]'),COLORFFFFFF{XG51};
DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'[一买]'),COLORFF00FF{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.05,'[二卖]'),LINETHICK2,COLORFFFF00{XG51};
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.95,'[二买]'),LINETHICK2,COLORFFFF00{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.04,'[一卖]'),LINETHICK3,COLOR00FF00{XG51};
MA5:MA(CLOSE,5),colorwhite,LINETHICK1{XG51};
MA10:MA(CLOSE,10),colorgreen,LINETHICK1{XG51};
MA24:MA(CLOSE,24),colorred,LINETHICK1{XG51};
趋势:ZIG(3,5){XG51};
向上:=crOSS(趋势,REF(趋势,1)){XG51};
向下:=CROSS(REF(趋势,1),趋势){XG51};
上1周期:=SUMBARS(向上,1){XG51};
上2周期:=SUMBARS(向上,2){XG51};
上3周期:=SUMBARS(向上,3){XG51};
下1周期:=SUMBARS(向下,1){XG51};
下2周期:=SUMBARS(向下,2){XG51};
下3周期:=SUMBARS(向下,3){XG51};
A1:=REF(趋势,下1周期){XG51};
A2:=REF(趋势,下2周期){XG51};
高点重叠:=MIN(A1,A2){XG51};
低点重叠:=MAX(REF(趋势,上1周期),REF(趋势,上2周期)){XG51};
高点:=(趋势=高点重叠){XG51};
连线1:=BARSLAST(高点)>上1周期 OR BARSLAST(高点)>下1周期{XG51};
连线2:=BARSLAST(高点)<上2周期 OR BARSLAST(高点)<下2周期{XG51};
低点:=(趋势=低点重叠){XG51};
高1:=SUMBARS(高点,1){XG51};
高2:=SUMBARS(高点,2){XG51};
低1:=SUMBARS(低点,1){XG51};
低2:=SUMBARS(低点,2){XG51};
DRAWTEXT(C,高点重叠,'_____'){XG51};
DRAWTEXT(C,低点重叠,'_____'){X.G_5!1.C.N.{};