均衡图源码
原理解析：
填充背景
AA赋值:(120日内最高价的最高值-120日内最低价的最低值)/30
VAR1赋值:(2*收盘价+最高价+最低价)/4
输出转换线:(8日内最高价的最高值+8日内最低价的最低值)/2,画红色,线宽为2
输出基准线:(22日内最高价的最高值+22日内最低价的最低值)/2,画绿色,线宽为2
输出先行线:22日前的收盘价,画黄色
输出云带A:22日前的(转换线+基准线)/2,COLORFFFFFF
输出云带B:22日前的(44日内最高价的最高值+44日内最低价的最低值)/2,COLORFFFFFF
当满足条件云带A=云带B时,在云带A和云带B位置之间画柱状线,宽度为0.1,0不为0则画空心柱.,COLORFF00FF,POINTDOT
当满足条件转换线上穿基准线ANDVAR1云带A和云带B的较大值时,在基准线和最高价的较大值+AA位置书写文字,COLORFF9966
当满足条件收阳线时,在开盘价和最低价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR0000FF
当满足条件收阳线时,在收盘价和最高价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR0000FF
当满足条件开盘价>=收盘价时,在收盘价和最低价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR00FF00
当满足条件开盘价>=收盘价时,在开盘价和最高价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR00FF00
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为10,0不为0则画空心柱.,COLORFF7700
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFF9900
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLORFFBB00
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLORFFCC00
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFFDD00
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFFEE00
当满足条件开盘价>=收盘价时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFFFF00
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为10,0不为0则画空心柱. ,COLOR000055
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱. ,COLOR000066
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为5,0不为0则画空心柱. ,COLOR000077
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱. ,COLOR000099
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱. ,COLOR0000BB
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱. ,COLOR0000DD
当满足条件收阳线时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱. ,COLOR0000FF
VAR9Q赋值:收盘价= 4日内收盘价的最高值AND (1日前的收盘价>=2日前的收盘价 OR 1日前的收盘价>=3日前的收盘价) OR 1日前的收盘价=4日内收盘价的最高值 AND 收盘价>=2日前的收盘价 OR 2日前的收盘价=4日内收盘价的最高值 AND 3日前的收盘价=4日内收盘价的最低值 AND 收盘价>=1日前的收盘价 OR 3日前的收盘价=4日内收盘价的最高值 AND 收盘价>=1日前的收盘价 AND 收盘价>=2日前的收盘价
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为10,0不为0则画空心柱.,COLOR000055
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR000066
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR000077
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR000099
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR0000BB
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR0000DD
当满足条件VAR9Q时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0000FF
VARAQ赋值:收盘价=4日内收盘价的最高值 AND 1日前的收盘价=4日内收盘价的最低值
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为10,0不为0则画空心柱.,COLORFF11FF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLORFF33FF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLORFF55FF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLORFF77FF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF99FF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFFBBFF
当满足条件VARAQ时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFFDDFF
VARBQ赋值:收盘价=4日内收盘价的最低值 AND (1日前的收盘价=2日前的收盘价 OR 2日前的收盘价=4日内收盘价的最低值 AND 1日前的收盘价=1日前的收盘价
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为10,0不为0则画空心柱.,COLOR003300
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR005500
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR007700
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR009900
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR00BB00
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00DD00
当满足条件VARCQ时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00FF00
VARDQ赋值:1日前的收盘价=4日内收盘价的最高值 AND 收盘价3日前的收盘价 OR 3日前的收盘价=4日内收盘价的最高值 AND 1日前的收盘价>2日前的收盘价) AND 2日前的收盘价>=4日前的收盘价 AND 收盘价1日前的LLL)
当满足条件LIFENGCYC>0时,在最低价*0.99位置书写文字,COLORFFFFFF
TIPTEXT(ISNULL(1日后的收盘价),0,' '),画红色
TIPTEXT(ISNULL(1日前的收盘价),0,'同花顺程序化交易')
（ ）
源码：
DRAWGBK(DATE>900103,STRIP(RGB(80,110,255),RGB(120,160,255),2));
AA:=(HHV(HIGH,120)-LLV(LOW,120))/30;
var1:=(2*CLOSE+HIGH+LOW)/4;
转换线:(HHV(H,8)+LLV(L,8))/2,colorred,LINETHICK2;
基准线:(HHV(H,22)+LLV(L,22))/2,colorgreen,linethick2;
先行线:REF(C,22),coloryellow;
云带A:REF((转换线+基准线)/2,22),ColorFFFFFF;
云带B:REF((HHV(H,44)+LLV(L,44))/2,22),ColorFFFFFF;
STICKLINE(云带A=云带B,云带A,云带B,0.1,0),COLORff00ff,POINTDOT;
DRAWTEXT(CROSS(转换线,基准线) AND var1MAX(云带A,云带B),MAX(基准线,HIGH)+AA,'▼'),COLORFF9966;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR0000FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,10,0 ),COLORff7700;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLORff9900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORffbb00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLORffcc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLORffdd00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLORffee00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLORffFF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,10,0) ,COLOR000055;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000bb;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000dd;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000ff;
var9Q:=C= HHV(C,4)AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3)) OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND C>=REF(C,1) AND C>=REF(C,2);
STICKLINE(var9Q,C,(O+C)/2,10,0),color000055;
STICKLINE(var9Q,C,(O+C)/2,6,0),color000066;
STICKLINE(var9Q,C,(O+C)/2,5,0),color000077;
STICKLINE(var9Q,C,(O+C)/2,4,0),color000099;
STICKLINE(var9Q,C,(O+C)/2,3,0),color0000bb;
STICKLINE(var9Q,C,(O+C)/2,2,0),color0000dd;
STICKLINE(var9Q,C,(O+C)/2,1,0),color0000ff;
varaQ:=C=HHV(C,4) AND REF(C,1)=LLV(C,4);
STICKLINE(varaQ,C,(O+C)/2,10,0),colorff11ff;
STICKLINE(varaQ,C,(O+C)/2,6,0),colorff33ff;
STICKLINE(varaQ,C,(O+C)/2,5,0),colorff55ff;
STICKLINE(varaQ,C,(O+C)/2,4,0),colorff77ff;
STICKLINE(varaQ,C,(O+C)/2,3,0),colorff99ff;
STICKLINE(varaQ,C,(O+C)/2,2,0),colorffbbff;
STICKLINE(varaQ,C,(O+C)/2,1,0),colorffddff;
varbQ:=C=LLV(C,4) AND (REF(C,1)HHV(C,4) AND C=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)=REF(C,1);
STICKLINE(varcQ,O,(O+C)/2,10,0),color003300;
STICKLINE(varcQ,O,(O+C)/2,6,0),color005500;
STICKLINE(varcQ,O,(O+C)/2,5,0),color007700;
STICKLINE(varcQ,O,(O+C)/2,4,0),color009900;
STICKLINE(varcQ,O,(O+C)/2,3,0),color00bb00;
STICKLINE(varcQ,O,(O+C)/2,2,0),color00dd00;
STICKLINE(varcQ,O,(O+C)/2,1,0),color00ff00;
vardQ:=REF(C,1)=HHV(C,4) AND CREF(C,3) OR REF(C,3)=HHV(C,4) AND REF(C,1)>REF(C,2)) AND REF(C,2)>=REF(C,4) AND CREF(LLL,1));
DRAWTEXT(LIFENGCYC>0,LOW*0.99,'☆'),colorffffff;
TIPTEXT(ISNULL(REFX(CLOSE,1)),0,' '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'');