庄买我买（副图指标公式、公式、源码、演示图）[通达信公式]

相关标签:

{庄买我买}

原理解析：
输出A1:(不定周期成交量/收盘价)/2,画青色,线宽为1 输出A222:如果A1>0.29ANDCLOSE>1日前的收盘价,返回A1,否则返回0,画红色,线宽为1 A2赋值:如果A1>100ANDCLOSE>1日前的收盘价,返回A1,否则返回0的历史累和 A3赋值:如果A1>100ANDCLOSE<1日前的收盘价,返回A1,否则返回0的历史累和 A4赋值:如果A1<100ANDCLOSE>1日前的收盘价,返回A1,否则返回0的历史累和 A5赋值:如果A1<100ANDCLOSE<1日前的收盘价,返回A1,否则返回0的历史累和 A6赋值:A2+A3+A4+A5 输出主买:(A2/A6)*100,画红色,线宽为1,NODRAW 输出主卖:(A3/A6)*100,线宽为1,画青色,NODRAW 输出散买:(A4/A6)*100,线宽为1,画洋红色,NODRAW 输出散卖:(A5/A6)*60,线宽为1,画绿色,NODRAW 输出主力差:(主买-主卖)*60,画黄色,线宽为1 如果主力差<=1日前的主力差,返回主力差,否则返回无效数,画淡青色,线宽为1 如果主力差>1日前的主力差,返回主力差,否则返回无效数,画黄色,线宽为1 当满足条件主力差>1日前的主力差时,在主力差和1日前的A222位置之间画柱状线,宽度为1,0不为0则画空心柱.,画红色 当满足条件主力差<=1日前的主力差时,在主力差和1日前的A222位置之间画柱状线,宽度为1,0不为0则画空心柱.,画青色 当满足条件主力差<=1日前的主力差时,在A1和1日前的A222位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,画淡青色 T赋值:A1的有效数据周期数 当满足条件A1上穿1日前的A222的10日过滤时,在A1和主力差*0.99位置之间画柱状线,宽度为1,0不为0则画空心柱.,画白色 当满足条件A1上穿1日前的A222的10日过滤时,在A1*0.99位置书写文字,画白色 当满足条件A222上穿1日前的A1的15日过滤时,在A222*0.99和主力差位置之间画柱状线,宽度为1,0不为0则画空心柱.,画黄色 当满足条件A222上穿1日前的A1的15日过滤时,在A1位置书写文字,画黄色 当满足条件是否最后一个周期=1时,在A1位置书写文字,画青色 当满足条件是否最后一个周期=1时,在A222位置书写文字,画红色

 来源:程序化99（ WWW.CXH99.COM ）

源码：

A1:(DVOL/C)/2,COLORCYAN,LINETHICK1;
A222:IF(A1>0.29 AND CLOSE>REF(CLOSE,1),A1,0),COLORRED,LINETHICK1;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A6:=A2+A3+A4+A5;
主买:(A2/A6)*100,COLORRED,LINETHICK1,NODRAW;
主卖:(A3/A6)*100,LINETHICK1,COLORCYAN,NODRAW;
散买:(A4/A6)*100,LINETHICK1,COLORMAGENTA,NODRAW;
散卖:(A5/A6)*60,LINETHICK1,COLORGREEN,NODRAW;
主力差:(主买-主卖)*60,COLORYELLOW,LINETHICK1;
IF(主力差<= REF(主力差,1),主力差,DRAWNULL),COLORLICYAN,LINETHICK1;
IF(主力差> REF(主力差,1),主力差,DRAWNULL),COLORYELLOW,LINETHICK1;
STICKLINE(主力差>REF(主力差,1),主力差,REF(A222,1),1,0),COLORRED;
STICKLINE(主力差<=REF(主力差,1),主力差,REF(A222,1),1,0),COLORCYAN;
STICKLINE(主力差<=REF(主力差,1),A1,REF(A222,1),0.5,0),COLORLICYAN;
{STICKLINE(主力差>REF(主力差,1),A1,REF(A222,1),0.5,0),COLORMAGENTA;}
T:=BARSCOUNT(A1);
STICKLINE(FILTER(CROSS(A1,REF(A222,1)),10),A1,主力差*0.99,1,0),COLORWHITE;
DRAWTEXT(FILTER(CROSS(A1,REF(A222,1)),10),A1*0.99,'S'),COLORWHITE;
STICKLINE(FILTER(CROSS(A222,REF(A1,1)),15),A222*0.99,主力差,1,0),COLORYELLOW;
DRAWTEXT(FILTER(CROSS(A222,REF(A1,1)),15), A1,'B'),COLORYELLOW;
DRAWTEXT(ISLASTBAR=1,A1,'S'),COLORCYAN;
DRAWTEXT(ISLASTBAR=1,A222,'B'),COLORRED;

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】