通达信机构专用副图源码

VAR2L:=LLV(LOW,72);
VAR3L:=HHV(HIGH,115);
VAR4L:= EMA((CLOSE-VAR2L)/(VAR3L-VAR2L)*100,2);
趋势:VAR4L,COLOR338800,LINETHICK2;
VAR2:=1/WINNER(CLOSE);
VAR3:=MA(CLOSE,13);
VAR4:=100-ABS((CLOSE-VAR3)/VAR3*100);
VAR5:=LLV(LOW,75);
VAR6:=HHV(HIGH,75);
VAR7:=(VAR6-VAR5)/100;
VAR8:=SMA((CLOSE-VAR5)/VAR7,20,1);
VAR9:=SMA((OPEN-VAR5)/VAR7,20,1);
VARA:=3*VAR8-2*SMA(VAR8,15,1);
VARB:=3*VAR9-2*SMA(VAR9,15,1);
VARC:=100-VARB;
仓位:(100-VARA),DOTLINE,COLORGRAY,LINETHICK1;
V10:=PEAKBARS(3,15,1)<10;
V12:=IF(V10=1,50,0);
头部:= IF(V12=50,100,0);
卖出:=IF(头部>REF(头部,1),50,0);
STICKLINE(卖出>0,0,50,5,0),COLORGREEN,LINETHICK5;
DRAWTEXT(卖出>0,60,'清仓'),COLORGREEN;
V9:=TROUGHBARS(3,15,1)<10;
V11:=IF(V9=1,50,0);
底部:= IF(V11=50,50,0);
买入:=IF( 底部>REF(底部,1),40,0);
STICKLINE(买入>0,0,40,5,0),COLOR0099FF,LINETHICK5;
DRAWTEXT(买入>0,50,'抄底'),COLOR0099FF;
VAR27:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR27-REF(VAR27,1))/REF(VAR27,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORBLUE,LINETHICK1;
超跌:IF(控盘<0,控盘,0),COLORBLUE,NODRAW;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED,LINETHICK3;
拉高:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;
VAR28:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR28>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORRED,LINETHICK3;
诱多:=IF(VAR28>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORRED,NODRAW;
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORGREEN,LINETHICK3;
出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLORGREEN,NODRAW;
VAR31:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR32:=SMA(ABS(LOW-VAR31),26,1)/SMA(MAX(LOW-VAR31,0),26,1);
VAR33:=EMA(VAR32,10);
VAR34:=LLV(LOW,33);
VAR35:=EMA(IF(LOW<=VAR34,VAR33,0),3);
低吸:IF(VAR35>REF(VAR35,1),VAR35,0),COLORMAGENTA,NODRAW;
STICKLINE(VAR35>REF(VAR35,1),0,VAR35,1,0 ),COLORMAGENTA,LINETHICK3;
洗盘:IF(VAR35<REF(VAR35,1),VAR35,0),COLORWHITE,NODRAW;
STICKLINE(VAR35<REF(VAR35,1),0,VAR35,1,0),COLORWHITE,LINETHICK3;
买入1:=ZIG(3,10)>REF(ZIG(3,10),1)AND REF(ZIG(3,10),1)<REF(ZIG(3,10),2);
卖出1:=ZIG(3,10)<REF(ZIG(3,10),1)AND REF(ZIG(3,10),1)>REF(ZIG(3,10),2);
DRAWICON(买入1,-1,1);
DRAWICON(卖出1,-1,2);

原理解析：
VAR2L赋值:72日内最低价最低值
VAR3L赋值:115日内最高价最高值
VAR4L赋值: EMA((收盘价-VAR2L)/(VAR3L-VAR2L)*100,2)
输出趋势:VAR4L,COLOR338800, 线宽为2
VAR2赋值:1/收盘价计算的获利盘比例
VAR3赋值:收盘价的13日简单移动平均
VAR4赋值:100-(收盘价-VAR3的绝对值/VAR3*100)
VAR5赋值:75日内最低价最低值
VAR6赋值:75日内最高价最高值
VAR7赋值:(VAR6-VAR5)/100
VAR8赋值:SMA((收盘价-VAR5)/VAR7,20,1)
VAR9赋值:SMA((开盘价-VAR5)/VAR7,20,1)
VAR8的15日[1日权重]移动平均
VAR9的15日[1日权重]移动平均
VARC赋值:100-VARB
输出仓位:(100-VARA),DOTLINE,COLORGRAY,LINETHICK1
V10赋值:PEAKBARS(3,15,1)<10
如果V10=1返回50否则返回0
如果V12=50返回100否则返回0
卖出赋值:IF(头部>1日前的头部,50,0)
当满足条件卖出>0时,在0和50之间画柱状线
当满足条件卖出>0时,在60和'清仓'位置书写文字
V9赋值:TROUGHBARS(3,15,1)<10
如果V9=1返回50否则返回0
如果V11=50返回50否则返回0
买入赋值:IF( 底部>1日前的底部,40,0)
当满足条件买入>0时,在0和40之间画柱状线
当满足条件买入>0时,在50和'抄底'位置书写文字
VAR27:=收盘价的9日指数移动平均,9)
控盘赋值:(VAR27-1日前的VAR27)/1日前的VAR27*1000
当满足条件控盘<0时,在控盘和0之间画柱状线
如果控盘<0返回控盘否则返回0
STICKLINE(控盘>1日前的控盘 AND 控盘>0,控盘,0,1,0),画红色, 线宽为3
输出拉高:IF(控盘>1日前的控盘 AND 控盘>0,控盘,0),画红色,NODRAW
VAR28:=100*收盘价*0.95计算的获利盘比例
STICKLINE(VAR28>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘>0,控盘,0,1,0),画红色, 线宽为3
诱多赋值:IF(VAR28>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘>0,控盘,0),画红色,NODRAW
STICKLINE(控盘<1日前的控盘 AND 控盘>0,控盘,0,1,0),画绿色, 线宽为3
输出出货:IF(控盘<1日前的控盘 AND 控盘>0,控盘,0),画绿色,NODRAW
VAR31:=REF((最低价+开盘价+收盘价+最高价)/4,1)
VAR32:=SMA(最低价-VAR31的绝对值,26,1)/SMA(最低价-VAR31和0较大值,26,1)
VAR33:=VAR32的10日指数移动平均
VAR34:=33日内最低价最低值
如果最低价<=VAR34返回VAR33否则返回0
输出低吸:IF(VAR35>1日前的VAR35,VAR35,0),画洋红色,NODRAW
STICKLINE(VAR35>1日前的VAR35,0,VAR35,1,0 ),画洋红色, 线宽为3
输出洗盘:IF(VAR35<1日前的VAR35,VAR35,0),画白色,NODRAW
STICKLINE(VAR35<1日前的VAR35,0,VAR35,1,0),画白色, 线宽为3
买入1:=ZIG(3,10)>REF(ZIG(3,10),1)AND REF(ZIG(3,10),1)卖出1:=ZIG(3,10)REF(ZIG(3,10),2)
当满足条件买入1时,在-1和1之间画图标
当满足条件卖出1时,在-1和2之间画图标