通达信资金仓位控制副图指标 源码分享 附图

VAR1:=EMA(CLOSE, 5)/EMA(EMA(CLOSE, 9), 16);

VAR5:=(CLOSE-LLV(LOW, 75))/(HHV(HIGH, 75)-LLV(LOW, 75))*100;

VAR6:=SMA(VAR5, 20, 1);

VAR7:=SMA(VAR6, 15, 1);

VAR8:=100-3*VAR6+2*VAR7;

VAR9:=((EMA(IF(VAR8>REF(VAR8, 1), VAR8, VAR8-3), 3)-50)*(-1)*2/2+50)/10;

VAR10:=EMA(AMOUNT, 13)/EMA(VOL, 13);

VAR11:=(VAR10/REF(VAR10, 1)-1)*100;

VAR12:=VOL/CAPITAL*100;

VAR13:=(HIGH-LOW)/((HIGH+LOW)/2)*100;

VAR14:=(VAR9+VAR12)*VAR13*VAR11;

VAR15:=REF(CLOSE, 1);

VAR18:=(CLOSE-LLV(LOW, 9))/(HHV(HIGH, 9)-LLV(LOW, 9))*100;

VAR19:=SMA(VAR18, 3, 1);

VAR20:=SMA(VAR19, 3, 1);

VAR21:=3*VAR19-2*VAR20;

VAR22:=(CLOSE-LLV(LOW, 26))/(HHV(HIGH, 26)-LLV(LOW, 26))*100;

VAR23:=SMA(VAR22, 6, 1);

VAR24:=SMA(VAR23, 3, 1);

VAR25:=3*VAR23-2*VAR24;

VAR26:=IF(CROSS(VAR21, VAR25) AND VAR25< 20, (-1), 0)+IF(CROSS(VAR25, VAR21) AND VAR25>80, 1, 0);

VAR27:=(HIGH+LOW+CLOSE)/3;

VAR28:=(VAR27-MA(VAR27, 14))/(0.015*AVEDEV(VAR27, 14))/2;

VAR29:=SMA(MAX(CLOSE-VAR15, 0), 6, 1)/SMA(ABS(CLOSE-VAR15), 6, 1)*100;

VAR30:=LLV(LOW, 36);

VAR31:=HHV(HIGH, 36);

VAR32:=EMA((CLOSE-VAR30)/(VAR31-VAR30)*100, 9);

VAR33:=IF(VAR28>100 AND VAR32>50 AND CLOSE>OPEN, 0.5, 0)+IF(VAR29>80 AND VAR32>50 AND CLOSE>OPEN, 0.5, 0);

VAR34:=(CLOSE-LLV(LOW, 100))/(HHV(HIGH, 100)-LLV(LOW, 100))*100;

VAR35:=SMA(VAR34, 21, 1);

VAR36:=SMA(VAR19, 3, 1);

VAR37:=3*VAR35-2*VAR36;

VAR38:=IF(VAR37>80 AND VAR29>88, 0.5, 0);

减四分一:IF((VAR14>50 AND VAR14< 100) OR (VAR26+VAR33+VAR38>0), 25, 0), STICK, COLORWHITE;

减三分一:IF(VAR14>100 AND VAR14< 200, 33, 0), STICK, COLORYELLOW;

减二分一:IF(VAR14>200, 50, 0), STICK, COLORMAGENTA;

减三分二:IF(VAR1>1.100 AND VAR1< 1.150 AND VAR1< REF(VAR1, 1) OR VAR1>1.150 AND VAR1< REF(VAR1, 1), 67, 0), STICK, COLORGREEN;

警示录:MAX(MAX(减四分一, 减三分一), MAX(减二分一, 减三分二)), POINTDOT,LINETHICK2, COLORRED;

原理解析：
VAR1赋值:收盘价的 5日指数移动平均/收盘价的 9日指数移动平均, 16)
VAR5赋值:(收盘价- 75日内最低价最低值)/( 75日内最高价最高值- 75日内最低价最低值)*100
VAR5的 20日[ 1日权重]移动平均
VAR6的 15日[ 1日权重]移动平均
VAR8赋值:100-3*VAR6+2*VAR7
VAR9赋值:((EMA(IF(VAR8> 1日前的VAR8, VAR8, VAR8-3), 3)-50)*(-1)*2/2+50)/10
VAR10:=成交额的 13日指数移动平均/成交量的 13日指数移动平均
VAR11:=(VAR10/ 1日前的VAR10-1)*100
VAR12:=成交量/当前流通股本*100
VAR13:=(最高价-最低价)/((最高价+最低价)/2)*100
VAR14:=(VAR9+VAR12)*VAR13*VAR11
VAR15:= 1日前的收盘价
VAR18:=(收盘价- 9日内最低价最低值)/( 9日内最高价最高值- 9日内最低价最低值)*100
VAR18的 3日[ 1日权重]移动平均
VAR19的 3日[ 1日权重]移动平均
VAR21赋值:3*VAR19-2*VAR20
VAR22赋值:(收盘价- 26日内最低价最低值)/( 26日内最高价最高值- 26日内最低价最低值)*100
VAR22的 6日[ 1日权重]移动平均
VAR23的 3日[ 1日权重]移动平均
VAR25赋值:3*VAR23-2*VAR24
VAR26赋值:IF(VAR21上穿 VAR25 AND VAR25< 20, (-1), 0)+IF(VAR25上穿 VAR21 AND VAR25>80, 1, 0)
VAR27赋值:(最高价+最低价+收盘价)/3
VAR28赋值:(VAR27-VAR27的 14日简单移动平均)/(0.015*AVEDEV(VAR27, 14))/2
VAR29赋值:SMA(收盘价-VAR15和 0较大值, 6, 1)/SMA(收盘价-VAR15的绝对值, 6, 1)*100
VAR30赋值: 36日内最低价最低值
VAR31赋值: 36日内最高价最高值
VAR32赋值:EMA((收盘价-VAR30)/(VAR31-VAR30)*100, 9)
如果VAR28>100 AND VAR32>50 AND 收盘价>开盘价返回 0.5否则返回 0
VAR34赋值:(收盘价- 100日内最低价最低值)/( 100日内最高价最高值- 100日内最低价最低值)*100
VAR34的 21日[ 1日权重]移动平均
VAR19的 3日[ 1日权重]移动平均
VAR37赋值:3*VAR35-2*VAR36
如果VAR37>80 AND VAR29>88返回 0.5否则返回 0
输出减四分一:IF((VAR14>50 AND VAR14< 100) OR (VAR26+VAR33+VAR38>0), 25, 0), STICK, 画白色
如果VAR14>100 AND VAR14< 200返回 33否则返回 0
如果VAR14>200返回 50否则返回 0
输出减三分二:IF(VAR1>1.100 AND VAR1< 1.150 AND VAR1< 1日前的VAR1 OR VAR1>1.150 AND VAR1< 1日前的VAR1, 67, 0), STICK, 画绿色
输出警示录:减四分一和 减三分一较大值, 减二分一和 减三分二较大值), POINTDOT, 线宽为2, 画红色