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

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

源码正文：

TS:=350;N:=95{XG51};
DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS){XG51};
DA:=IF(CURRBARSCOUNT>DA1,0,DA1){XG51};
HI:=REFDATE(HHV(H,DA),DATE){XG51};
LO:=REFDATE(LLV(L,DA),DATE){XG51};
C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL){XG51};
GZ:=EXP(LN(HI/LO)/15);
LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA){XG51};
LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA){XG51};
LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA){XG51};
LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA){XG51};
LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA){XG51};
LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA){XG51};
LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA){XG51};
LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA){XG51};
LH9:=SUM(IF(C1>=(HI/POW(GZ,9)) AND C1<LO*POW(GZ,7),V,0),DA){XG51};
LH10:=SUM(IF(C1>=(LO*POW(GZ,5)) AND C1<LO*POW(GZ,6),V,0),DA){XG51};
LH11:=SUM(IF(C1>=(LO*POW(GZ,4)) AND C1<LO*POW(GZ,5),V,0),DA){XG51};
LH12:=SUM(IF(C1>=(LO*POW(GZ,3)) AND C1<LO*POW(GZ,4),V,0),DA){XG51};
LH13:=SUM(IF(C1>=(LO*POW(GZ,2)) AND C1<LO*POW(GZ,3),V,0),DA){XG51};
LH14:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA){XG51};
LH15:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA){XG51};
L1:=REFDATE(HHV(LH1,DA),DATE){XG51};
L2:=REFDATE(HHV(LH2,DA),DATE){XG51};
L3:=REFDATE(HHV(LH3,DA),DATE){XG51};
L4:=REFDATE(HHV(LH4,DA),DATE){XG51};
L5:=REFDATE(HHV(LH5,DA),DATE){XG51};
L6:=REFDATE(HHV(LH6,DA),DATE){XG51};
L7:=REFDATE(HHV(LH7,DA),DATE){XG51};
L8:=REFDATE(HHV(LH8,DA),DATE){XG51};
L9:=REFDATE(HHV(LH9,DA),DATE){XG51};
L10:=REFDATE(HHV(LH10,DA),DATE){XG51};
L11:=REFDATE(HHV(LH11,DA),DATE){XG51};
L12:=REFDATE(HHV(LH12,DA),DATE){XG51};
L13:=REFDATE(HHV(LH13,DA),DATE){XG51};
L14:=REFDATE(HHV(LH14,DA),DATE){XG51};
L15:=REFDATE(HHV(LH15,DA),DATE){XG51};
SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10+L11+L12+L13+L14+L15){XG51};
stICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,
HI*N/100,HI/GZ,0.1,1)COLORA5555A{XG51};
STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,
HI/POW(GZ,1)*N/100,HI/POW(GZ,2),0.1,1)COLORA7777A{XG51};
STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,
HI/POW(GZ,2)*N/100,HI/POW(GZ,3),0.1,1)COLORA5555A{XG51};
STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,
HI/POW(GZ,3)*N/100,HI/POW(GZ,4),0.1,1)COLORA7777A{XG51};
STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,
HI/POW(GZ,4)*N/100,HI/POW(GZ,5),0.1,1)COLORA5555A{XG51};
STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,
HI/POW(GZ,5)*N/100,HI/POW(GZ,6),0.1,1)COLORA7777A{XG51};
STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,
HI/POW(GZ,6)*N/100,HI/POW(GZ,7),0.1,1)COLORA5555A{XG51};
STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,
LO*POW(GZ,7),LO*POW(GZ,8)*N/100,0.1,1)COLORA7777A{XG51};
STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,
LO*POW(GZ,6),LO*POW(GZ,7)*N/100,0.1,1)COLORA5555A{XG51};
STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,
LO*POW(GZ,5),LO*POW(GZ,6)*N/100,0.1,1)COLORA7777A{XG51};
STICKLINE(CEILING(DA*L11/SS)*3>=CURRBARSCOUNT,
LO*POW(GZ,4),LO*POW(GZ,5)*N/100,0.1,1)COLORA5555A{XG51};
STICKLINE(CEILING(DA*L12/SS)*3>=CURRBARSCOUNT,
LO*POW(GZ,3),LO*POW(GZ,4)*N/100,0.1,1)COLORA7777A{XG51};
STICKLINE(CEILING(DA*L13/SS)*3>=CURRBARSCOUNT,
LO*POW(GZ,2),LO*POW(GZ,3)*N/100,0.1,1)COLORA5555A{XG51};
STICKLINE(CEILING(DA*L14/SS)*3>=CURRBARSCOUNT,
LO*POW(GZ,1),LO*POW(GZ,2)*N/100,0.1,1)COLORA7777A{XG51};
STICKLINE(CEILING(DA*L15/SS)*3>=CURRBARSCOUNT,
LO,LO*POW(GZ,1)*N/100,0.0001,1)COLORA5555A{XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){X+G_5!1+C+N+{};

通达信知己知彼未加密选股指标公式源码

源码正文：

VAR1:=ma(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20{XG51};
VAR2:=2*Abs(VAR1){XG51};
VAR3:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1){XG51};
VAR4:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1){XG51};
VAR5:=(HIGH+LOW+CLOSE)/3{XG51};
VAR6:=(VAR5-MA(VAR5,14))/(0.015*AVEDEV(VAR5,14)){XG51};
VAR7:=(VAR5-MA(VAR5,70))/(0.015*AVEDEV(VAR5,70)){XG51};
VAR8:=IF(VAR6>=150 AND VAR6<200 AND VAR7>=150 AND VAR7<200,10,0){XG51};
VAR9:=IF(VAR6<=-150 AND VAR6>-200 AND VAR7<=-150 AND VAR7>-200,-10,VAR8){XG51};
VARA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100{XG51};
VARB:=100-ABS(VARA){XG51};
VARC:=3*SMA((INDEXC-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1)-2*SMA(SMA((INDEXC-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1),15,1){XG51};
VARD:=3*SMA((INDEXO-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1)-2*SMA(SMA((INDEXO-LLV(INDEXL,75))/(HHV(INDEXH,75)-LLV(INDEXL,75))*100,20,1),15,1){XG51};
VARE:=REF(LOW,1)*0.9{XG51};
VARF:=LOW*0.9{XG51};
VAR10:=(VARF*vol+VARE*(CAPITAL-VOL))/CAPITAL{XG51};
VAR11:=ema(VAR10,30){XG51};
VAR12:=VAR11-CLOSE{XG51};
VAR13:=REF(CLOSE,1){XG51};
VAR14:=SMA(MAX(CLOSE-VAR13,0),7,1)/SMA(ABS(CLOSE-VAR13),7,1)*100{XG51};
VAR15:=SMA(MAX(CLOSE-VAR13,0),13,1)/SMA(ABS(CLOSE-VAR13),13,1)*100{XG51};
VAR16:=BARSCOUNT(CLOSE){XG51};
VAR17:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100{XG51};
VAR18:=((-100)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+50)*2{XG51};
VAR19:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100{XG51};
VAR1A:=(SMA(VAR19,4,1)-50)*2{XG51};
VAR1B:=SMA(VAR1A,3,1){XG51};
VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100{XG51};
VAR1D:=SMA(VAR1C,4,1){XG51};
VAR1E:=SMA(VAR1D,3,1){XG51};
VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100{XG51};
VAR20:=IF(VAR17<=25 AND VAR18<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR12>=-0.25 AND VAR14<22 AND VAR15<28 AND VAR16>50,80,0){XG51};
情报: VAR3{XG51};
天线: IF(VARB<90,VARB,100){XG51};
红军: IF(VAR1>0,VAR1,0),COLORWHITE, LINEstICK{XG51};
绿军: IF(VAR1<0,VAR2,0),COLORCYAN,LINESTICK{XG51};
导弹: VAR20{XG51};
预警系统: IF(VAR7>=200 AND VAR6>=150,15,IF(VAR7<=-200 AND VAR6<=-150,-15,VAR9))+60{XG51};
STICKLINE(VAR3>=REF(VAR4,1),VAR3,VAR4,8,0){XG51};
STICKLINE(VAR3<REF(VAR4,1),VAR3,VAR4,8,0){XG51};
VAR21:=CLOSE>MA(CLOSE,20) AND MA(CLOSE,20)>=REF(MA(CLOSE,20),1){XG51};
VAR22:=CLOSE<MA(CLOSE,20) AND MA(CLOSE,20)<REF(MA(CLOSE,20),1){XG51};
VAR23:=红军>50 AND 预警系统>60 AND 天线=100{XG51};
VAR24:=红军>48 AND 预警系统>60 AND 天线<100{XG51};
VAR25:=绿军>38 AND 预警系统<55{XG51};
VAR26:=导弹>50 AND 天线<90{XG51};
VAR27:=VAR3<REF(VAR4,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1){XG51};
VAR28:=VAR3>=REF(VAR4,1) AND CLOSE<REF(CLOSE,1) AND 预警系统=60 AND 导弹=0 AND 绿军>=REF(绿军,1) AND VARC<REF(VARD,1){XG51};
DRAWTEXT(VAR21 AND COUNT(VAR21,30)=1,100,'上升通道，持股待长或高抛低吸！'),COLORLIMAGENTA{XG51};
DRAWTEXT(VAR22 AND COUNT(VAR22,30)=1,90,'下降通道，小心无量阴跌！ '),COLORLIBLUE{XG51};
DRAWTEXT(VAR23 AND COUNT(VAR23,30)=1,70,'上涨过急，需要调整，短线先抛出！ '),COLORWHITE{XG51};
DRAWTEXT(VAR24 AND COUNT(VAR24,30)=1,80,'庄家出货，大跌在即，中线抛出！ '),COLORYELLOW{XG51};
DRAWTEXT(VAR25 AND COUNT(VAR25,30)=1,50,'不必杀跌，应有小反弹 ,跌停除外!'),COLORLICYAN{XG51};
DRAWTEXT(VAR26 AND COUNT(VAR26,30)=1,30,'坚决抢反弹，但巨量封跌停除外 ')COLORCYAN{XG51};
DRAWTEXT(VAR27 AND COUNT(VAR27,30)=1,40,'有大资金进场迹象，关注！')COLORGREEN{XG51};
DRAWTEXT(VAR28 AND COUNT(VAR28,30)=1,20,'见顶回落'){X_G.5~1_C_N_{};