通达信成交筹码主图选股指标公式源码

通达信成交筹码主图选股指标公式源码

源码正文：

VAR1:=YEAR=Y AND MONTH=M AND DAY=D{XG51};
KK:=CONst(BARSSINCE(VAR1)){XG51};
VAR2:=BARSSINCE(VAR1){XG51};
VAR3:=SUM(vol,0){XG51};
VAR4:=REF(VAR3,VAR2){XG51};
HS:(VAR3-VAR4)/CAPITAL*100,NODRAW{XG51};
高:=CONST(HHV(H,KK)){XG51};
低:=CONST(LLV(L,KK)){XG51};
STICKLINE(CURRBARSCOUNT=KK,高,低,0,0){XG51};
XX:=(高-低){XG51};
均价:=AMOUNT/V/100,NODRAW{XG51};
L0:=低+XX*0/11,NODRAW{XG51};
L1:=低+XX*1.0505/11,NODRAW{XG51};
L2:=低+XX*2.101/11,NODRAW{XG51};
L3:=低+XX*3.1515/11,NODRAW{XG51};
L4:=低+XX*4.202/11,NODRAW{XG51};
L5:=低+XX*5.5/11,NODRAW{XG51};
L6:=低+XX*6.908/11,NODRAW{XG51};
L7:=低+XX*7.9585/11,NODRAW{XG51};
L8:=低+XX*8.889/11,NODRAW{XG51};
L9:=低+XX*9.9495/11,NODRAW{XG51};
L10:=低+XX*11/11,NODRAW{XG51};
MLZ:=SUM((CURRBARSCOUNT<KK+1)*V,KK),NODRAW{XG51};
M1:=SUM((CURRBARSCOUNT<KK+1 AND RANGE(均价,L0-0.001,L1+0.001))*V,KK)/MLZ*100,COLORFF5555,NODRAW{XG51};
STICKLINE(CURRBARSCOUNT<CONST(INTPART(M1*2)),L1,L1*0.99,5,0),COLORFF5555{XG51};
M2:=SUM((CURRBARSCOUNT<KK+1 AND RANGE(均价,L1,L2+0.001))*V,KK)/MLZ*100,COLORFFAA55,NODRAW{XG51};
STICKLINE(CURRBARSCOUNT<CONST(INTPART(M2*2)),L2,L2*0.99,5,0),COLORFFAA55{XG51};
M1_2:maX(M1,M2),NODRAW{XG51};
M3:=SUM((CURRBARSCOUNT<KK+1 AND RANGE(均价,L2,L3+0.001))*V,KK)/MLZ*100,COLORAAFF55,NODRAW{XG51};
STICKLINE(CURRBARSCOUNT<CONST(INTPART(M3*2)),L3,L3*0.99,5,0),COLORAAFF55{XG51};
M4:=SUM((CURRBARSCOUNT<KK+1 AND RANGE(均价,L3,L4+0.001))*V,KK)/MLZ*100,COLOR5FFF00,NODRAW{XG51};
STICKLINE(CURRBARSCOUNT<CONST(INTPART(M4*2)),L4,L4*0.99,5,0),COLOR5FFF00{XG51};
M3_4:MAX(M3,M4),NODRAW{XG51};
M5:=SUM((CURRBARSCOUNT<KK+1 AND RANGE(均价,L4,L5+0.001))*V,KK)/MLZ*100,COLORFFFFF0,NODRAW{XG51};
STICKLINE(CURRBARSCOUNT<CONST(INTPART(M5*2)),L5,L5*0.99,5,0),COLORFFFFF0{XG51};
M6:=SUM((CURRBARSCOUNT<KK+1 AND RANGE(均价,L5,L6+0.001))*V,KK)/MLZ*100,COLORFF0FFF,NODRAW{XG51};
STICKLINE(CURRBARSCOUNT<CONST(INTPART(M6*2)),L6,L6*0.99,5,0),COLORFF0FFF{XG51};
M5_6:MAX(M5,M6),NODRAW{XG51};
M7:=SUM((CURRBARSCOUNT<KK+1 AND RANGE(均价,L6,L7+0.001))*V,KK)/MLZ*100,COLOR509FDD,NODRAW{XG51};
STICKLINE(CURRBARSCOUNT<CONST(INTPART(M7*2)),L7,L7*0.99,5,0),COLOR509FDD{XG51};
M8:=SUM((CURRBARSCOUNT<KK+1 AND RANGE(均价,L7,L8+0.001))*V,KK)/MLZ*100,COLORAA5DDD,NODRAW{XG51};
STICKLINE(CURRBARSCOUNT<CONST(INTPART(M8*2)),L8,L8*0.99,5,0),COLORAA5DDD{XG51};
M7_8:MAX(M7,M8),NODRAW{XG51};
M9:=SUM((CURRBARSCOUNT<KK+1 AND RANGE(均价,L8,L9+0.001))*V,KK)/MLZ*100,COLOR0055DD,NODRAW{XG51};
STICKLINE(CURRBARSCOUNT<CONST(INTPART(M9*2)),L9,L9*0.99,5,0),COLOR0055DD{XG51};
M10:=SUM((CURRBARSCOUNT<KK+1 AND RANGE(均价,L9,L10+0.001))*V,KK)/MLZ*100,COLORFF6EC7,NODRAW{XG51};
STICKLINE(CURRBARSCOUNT<CONST(INTPART(M10*2)),L10,L10*0.99,5,0),COLORFF6EC7{XG51};
M9_10:MAX(M9,M10),NODRAW{XG51};
筹码累计:M1+M2+M3+M4+M5+M6+M7+M8+M9+M10,NODRAW{XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){X_G-5-1_C_N_{};