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

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

源码正文：

A0:=IF(CURRBARSCOUNT=1,BARSSINCE(C>0),DRAWNULL){XG51};
A11:=INTPART(IF(A0>0,A0*0.15,0)){XG51};
stICKLINE(CURRBARSCOUNT<36 AND A11>0,REF(C,A11),REF(C,A11),A0*0.85,-1)COLORBROWN{XG51};
A12:=INTPART(IF(A0>0,A0*0.25,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A12>0,REF(C,A12),REF(C,A12),A0*0.75,-1)COLORBROWN{XG51};
A13:=INTPART(IF(A0>0,A0*0.35,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A13>0,REF(C,A13),REF(C,A13),A0*0.65,-1)COLORBROWN{XG51};
A14:=INTPART(IF(A0>0,A0*0.45,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A14>0,REF(C,A14),REF(C,A14),A0*0.55,0-1)COLORBROWN{XG51};
A15:=INTPART(IF(A0>0,A0*0.55,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A15>0,REF(C,A15),REF(C,A15),A0*0.45,0-1)COLORBROWN{XG51};
A16:=INTPART(IF(A0>0,A0*0.65,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A16>0,REF(C,A16),REF(C,A16),A0*0.35,0-1)COLORBROWN{XG51};
A17:=INTPART(IF(A0>0,A0*0.75,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A17>0,REF(C,A17),REF(C,A17),A0*0.25,0-1)COLORBROWN{XG51};
A18:=INTPART(IF(A0>0,A0*0.85,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A18>0,REF(C,A18),REF(C,A18),A0*0.15,0-1)COLORBROWN{XG51};
A19:=INTPART(IF(A0>0,A0*0.95,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A19>0,REF(C,A19),REF(C,A19),A0*0.05,0-1)COLORBROWN{XG51};
A21:=INTPART(IF(A0>0,A0*0.17,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A21>0,REF(C,A21),REF(C,A21),A0*0.83,-1)COLORLIBLUE;
A22:=INTPART(IF(A0>0,A0*0.27,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A22>0,REF(C,A22),REF(C,A22),A0*0.73,-1)COLORLIBLUE;
A23:=INTPART(IF(A0>0,A0*0.37,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A23>0,REF(C,A23),REF(C,A23),A0*0.63,-1)COLORLIBLUE;
A24:=INTPART(IF(A0>0,A0*0.47,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A24>0,REF(C,A24),REF(C,A24),A0*0.53,0-1)COLORLIBLUE;
A25:=INTPART(IF(A0>0,A0*0.57,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A25>0,REF(C,A25),REF(C,A25),A0*0.43,0-1)COLORLIBLUE;
A26:=INTPART(IF(A0>0,A0*0.67,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A26>0,REF(C,A26),REF(C,A26),A0*0.33,0-1)COLORLIBLUE;
A27:=INTPART(IF(A0>0,A0*0.77,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A27>0,REF(C,A27),REF(C,A27),A0*0.23,0-1)COLORLIBLUE;
A28:=INTPART(IF(A0>0,A0*0.87,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A28>0,REF(C,A28),REF(C,A28),A0*0.13,0-1)COLORLIBLUE;
A29:=INTPART(IF(A0>0,A0*0.97,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A29>0,REF(C,A29),REF(C,A29),A0*0.03,0-1)COLORLIBLUE;
A31:=INTPART(IF(A0>0,A0*0.13,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A31>0,REF(C,A31),REF(C,A31),A0*0.87,-1)COLORLIBLUE;
A32:=INTPART(IF(A0>0,A0*0.23,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A32>0,REF(C,A32),REF(C,A32),A0*0.77,-1)COLORLIBLUE;
A33:=INTPART(IF(A0>0,A0*0.33,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A33>0,REF(C,A33),REF(C,A33),A0*0.67,-1)COLORLIBLUE;
A34:=INTPART(IF(A0>0,A0*0.43,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A34>0,REF(C,A34),REF(C,A34),A0*0.57,0-1)COLORLIBLUE;
A35:=INTPART(IF(A0>0,A0*0.53,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A35>0,REF(C,A35),REF(C,A35),A0*0.47,0-1)COLORLIBLUE;
A36:=INTPART(IF(A0>0,A0*0.63,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A36>0,REF(C,A36),REF(C,A36),A0*0.37,0-1)COLORLIBLUE;
A37:=INTPART(CURRBARSCOUNT<200 AND IF(A0>0,A0*0.73,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A37>0,REF(C,A37),REF(C,A37),A0*0.27,0-1)COLORLIBLUE;
A38:=INTPART(IF(A0>0,A0*0.83,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A38>0,REF(C,A38),REF(C,A38),A0*0.17,0-1)COLORLIBLUE;
A39:=INTPART(IF(A0>0,A0*0.93,0)){XG51};
STICKLINE(CURRBARSCOUNT<36 AND A39>0,REF(C,A39),REF(C,A39),A0*0.07,0-1)COLORLIBLUE;
A1:=INTPART(IF(A0>0,A0*0.1,0)){XG51};
STICKLINE(A1>0,REF(C,A1),REF(C,A1),A0*0.9,0),COLORRED{XG51};
DRAWNUMBER(A1>0,REF(C,A1)*1.01,REF(C,A1))COLORBLUE{XG51};
DRAWTEXT(A1>0,REF(C,A1)*1.01,'_______90%')COLORRED{XG51};
A2:=INTPART(IF(A0>0,A0*0.2,0)){XG51};
STICKLINE(A2>0,REF(C,A2),REF(C,A2),A0*0.8,0){XG51};
DRAWNUMBER(A2>0,REF(C,A2)*1.01,REF(C,A2))COLORBLUE{XG51};
DRAWTEXT(A2>0,REF(C,A2)*1.01,'_______80%')COLORRED{XG51};
A3:=INTPART(IF(A0>0,A0*0.3,0)){XG51};
STICKLINE(A3>0,REF(C,A3),REF(C,A3),A0*0.7,0){XG51};
DRAWNUMBER(A3>0,REF(C,A3)*1.01,REF(C,A3))COLORBLUE{XG51};
DRAWTEXT(A3>0,REF(C,A3)*1.01,'_______70%')COLORRED{XG51};
A4:=INTPART(IF(A0>0,A0*0.4,0)){XG51};
STICKLINE(A4>0,REF(C,A4),REF(C,A4),A0*0.6,0){XG51};
A5:=INTPART(IF(A0>0,A0*0.5,0)){XG51};
STICKLINE(A5>0,REF(C,A5),REF(C,A5),A0*0.5,0){XG51};
A6:=INTPART(IF(A0>0,A0*0.6,0)){XG51};
STICKLINE(A6>0,REF(C,A6),REF(C,A6),A0*0.4,0){XG51};
A7:=INTPART(IF(A0>0,A0*0.7,0)){XG51};
STICKLINE(A7>0,REF(C,A7),REF(C,A7),A0*0.3,0){XG51};
A8:=INTPART(IF(A0>0,A0*0.8,0)){XG51};
STICKLINE(A8>0,REF(C,A8),REF(C,A8),A0*0.2,0){XG51};
A9:=INTPART(IF(A0>0,A0*0.9,0)){XG51};
STICKLINE(A9>0,REF(C,A9),REF(C,A9),A0*0.1,0){XG51};
DRAWKLINE(H,O,L,C){X.G.5_1.C.N.{};

通达信莉波量价启爆未加密选股指标公式源码

源码正文：

MV3:=ema(V,3){XG51};
ma3:=EMA(C,3){XG51};
MV3角度:=ATAN((MV3/REF(MV3,1)-1)*100)*180/3.1416{XG51};
MA3角度:=ATAN((MA3/REF(MA3,1)-1)*100)*180/3.1416{XG51};
MV5:=EMA(V,5){XG51};
MA5:=EMA(C,5){XG51};
MV5角度:=ATAN((MV5/REF(MV5,1)-1)*100)*180/3.1416{XG51};
MA5角度:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416{XG51};
MV10:=EMA(V,10){XG51};
MA10:=EMA(C,10){XG51};
MV10角度:=ATAN((MV10/REF(MV10,1)-1)*100)*180/3.1416{XG51};
MA10角度:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416{XG51};
强弱度:=(MV3角度+MA3角度+MV5角度+MA5角度+MV10角度+MA10角度)/6,COLORFFFFFF{XG51};
QBD:=crOSS(强弱度,50) AND COUNT(强弱度>50,7)<=3{XG51};
启爆点:IF(QBD AND COUNT(QBD,4)=1,50,0),COLOR00FFFF,POINTDOT,NODRAW{XG51};
QbsJ:=BArslAst(CROSS(强弱度,50)){XG51};
操作区:IF(COUNT(COUNT(强弱度>0,3)>=1,QBSJ)>=QBSJ-1,3,0),COLORFF00FF,POINTDOT,NODRAW{XG51};
十九强:IF(强弱度>=80,80,0),COLOR0000FF,LINETHICK2{XG51};
选股:强弱度>=80 AND COUNT(强弱度>=80,5)=1,COLORFFFFFF,POINTDOT,NODRAW{XG51};
预备股:IF(强弱度>=70 AND COUNT(强弱度>70,4)>=3 AND CLOSE>=OPEN,30,0),COLOR00FF00,LINETHICK2{XG51};
GZQ:=BARSLAST(十九强 OR 预备股){XG51};
关注期:IF(BETWEEN(GZQ,0,9),GZQ,0),COLORFF00FF,POINTDOT,NODRAW{XG51};
脱离MA5:(L/MA(C,5)-1)*100,COLORFF9988,POINTDOT,NODRAW{XG51};
DRAWTEXT(十九强 AND 脱离MA5>=3.5,80,'←险'),COLOR00FF00{XG51};
STICKLINE(启爆点,0,50,0,0),COLOR00FFFF{XG51};
STICKLINE(启爆点,0,30,3,0),COLOR00FFFF{XG51};
DRAWTEXT(启爆点=50,50,'←启爆'),COLOR00FFFF{XG51};
STICKLINE(关注期,关注期*3,关注期*5,3,0),COLOR0000FF{XG51};
STICKLINE(关注期 AND C<REF(C,1),关注期*3.5,关注期*4.5,3,1),COLORFFFFFF{XG51};
STICKLINE(操作区 AND 强弱度>0,3,-3,4,1),COLORFF00FF{XG51};
STICKLINE(操作区 AND 强弱度<0,3,-3,4,1),COLOR00FF00{X*G=5~1*C*N*{};