通达信红柱寻庄指标公式

来函数检测结果如下：
该公式没有未来函数

N:=5;QJ0:=(HIGH+LOW+CLOSE)/3;
QJ1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));
QJ2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-QJ0);
QJ3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);
QJ4:=IF(HIGH=LOW,1,QJ0-MIN(CLOSE,OPEN));
QJ5:=VOL/(IF(HIGH=LOW,4,HIGH-LOW));
QJ6:="MACD.DIF">"MACD.DEA" AND "MACD.DEA"<0;
QJ7:="KDJ.K">"KDJ.D" AND "KDJ.D"<30;
QJ8:="MACD.DIF"<"MACD.DEA";
QJ9:="KDJ.K"<"KDJ.D" AND "KDJ.K">80;
特大: QJ4*QJ5,NODRAW;大单: QJ3*QJ5,NODRAW;
中单: QJ1*QJ5,NODRAW;小单: QJ2*QJ5,NODRAW;
W1:=SUM(大单,N)+SUM(特大,N);W2:=SUM(小单,N)+SUM(中单,N);
量振1:=特大>大单 AND 大单>小单;
量振2:=特大<小单 AND 大单<小单;
标振1:=QJ6 AND QJ7;
标振2:=QJ8 AND QJ9;
A:=W1-W2;A0:=IF(A>0,A,0);B0:=IF(A<0,A,0);
STICKLINE(A0,0,A0,3,0),COLOR000044;
STICKLINE(A0,0,A0,2.5,0),COLOR000088;
STICKLINE(A0,0,A0,1.5,0),COLOR0000AA;
STICKLINE(A0,0,A0,1,0),COLOR0000CC;
STICKLINE(B0,0,-B0,3,0),COLOR004400;
STICKLINE(B0,0,-B0,2.5,0),COLOR008800;
STICKLINE(B0,0,-B0,1.5,0),COLOR00AA00;
STICKLINE(B0,0,-B0,1,0),COLOR00CC00;
周量值: MA(A,5),COLORFFFFFF;
平滑值: EMA(周量值,5),COLOR00FFFF;
STICKLINE(标振1 AND 量振1 AND 周量值>平滑值,0,A0,3,0),COLORYELLOW; 
DRAWTEXT(标振1 AND 量振1 AND 周量值>平滑值,A0,'振'),COLORYELLOW;

原理解析：
N赋值:5
QJ0赋值:(最高价+最低价+收盘价)/3
QJ1赋值:IF(最高价=最低价,1,最高价-OPEN和收盘价较大值)
QJ2赋值:IF(最高价=最低价,1,收盘价和OPEN较大值-QJ0)
QJ3赋值:IF(最高价=最低价,1,OPEN和收盘价的较小值-最低价)
QJ4赋值:IF(最高价=最低价,1,QJ0-收盘价和OPEN的较小值)
如果最高价=最低价返回4否则返回最高价-最低价
QJ6赋值:"MACD.DIF">"MACD.DEA" AND "MACD.DEA"<0
QJ7赋值:"KDJ.K">"KDJ.D" AND "KDJ.D"<30
QJ8赋值:"MACD.DIF"<"MACD.DEA"
QJ9赋值:"KDJ.K"<"KDJ.D" AND "KDJ.K">80
输出特大: QJ4*QJ5,NODRAW
输出大单: QJ3*QJ5,NODRAW
输出中单: QJ1*QJ5,NODRAW
输出小单: QJ2*QJ5,NODRAW
W1赋值:N的大单日累和+N的特大日累和
W2赋值:N的小单日累和+N的中单日累和
量振1赋值:特大>大单 AND 大单>小单
量振2赋值:特大<小单 AND 大单<小单
标振1赋值:QJ6 AND QJ7
标振2赋值:QJ8 AND QJ9
A赋值:W1-W2
如果A>0返回A否则返回0
如果A<0返回A否则返回0
当满足条件A0时,在0和A0之间画柱状线
当满足条件A0时,在0和A0之间画柱状线
当满足条件A0时,在0和A0之间画柱状线
当满足条件A0时,在0和A0之间画柱状线
当满足条件B0时,在0和-B0之间画柱状线
当满足条件B0时,在0和-B0之间画柱状线
当满足条件B0时,在0和-B0之间画柱状线
当满足条件B0时,在0和-B0之间画柱状线
输出周量值: A的5日简单移动平均,COLORFFFFFF
输出平滑值: 周量值的5日指数移动平均,COLOR00FFFF
当满足条件标振1 AND 量振1 AND 周量值>平滑值时,在0和A0之间画柱状线
当满足条件标振1 AND 量振1 AND 周量值>平滑值时,在A0和'振'位置书写文字