分时决策资金指标公式源码[通达信公式]

分时决策资金指标公式源码

A1:=(VOL/CLOSE)/3;
{A222:=IF(A1>0.29 AND CLOSE>REF(CLOSE,1),A1,0);}
{A22:=SUM(A222,0);}
A2:=SUM((IF(((A1>0.29) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);
A3:=SUM((IF(((A1>0.29) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);
A4:=SUM((IF(((A1<0.29) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);
A5:=SUM((IF(((A1<0.29) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);
DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;
A6:=((A2+A3)+A4)+A5;
A7:=IF((ISLASTBAR=1),((100*A2)/A6),0);
A8:=((IF((ISLASTBAR=1),((100*A3)/A6),0)));
A9:=((IF((ISLASTBAR=1),((100*A4)/A6),0)));
A10:=((IF((ISLASTBAR=1),((100*A5)/A6),0)));
机构买盘:(A2),LINETHICK3,COLORFF55FF;
机构卖盘:(A3),LINETHICK3,COLORFFFF55;
散户买盘:(A4),COLOR5555FF;
散户卖盘:(A5),COLOR55FF55;
DRAWTEXT(ISLASTBAR=1,机构买盘*0.9,'机构买盘'),LINETHICK2,COLORFF55FF;
DRAWTEXT(ISLASTBAR=1,机构卖盘,'机构卖盘'),LINETHICK2,COLORFFFF55;
DRAWTEXT(ISLASTBAR=1,散户买盘,'散户买盘'),LINETHICK2,COLOR5555FF;
DRAWTEXT(ISLASTBAR=1,散户卖盘,'散户卖盘'),LINETHICK2,COLOR55FF55;
 

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

源码解析：

A1赋值:(成交量(手)/收盘价)/3
A2赋值:(如果((A1>0.29)AND(收盘价>(昨收))),返回A1,否则返回0)的历史累和
A3赋值:(如果((A1>0.29)AND(收盘价<(昨收))),返回A1,否则返回0)的历史累和
A4赋值:(如果((A1<0.29)AND(收盘价>(昨收))),返回A1,否则返回0)的历史累和
A5赋值:(如果((A1<0.29)AND(收盘价<(昨收))),返回A1,否则返回0)的历史累和
当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色
当满足条件收阳线时,在横轴1纵轴1位置书写文字,画红色
A6赋值:((A2+A3)+A4)+A5
A7赋值:如果(是否最后一个周期=1),返回((100*A2)/A6),否则返回0
A8赋值:((如果(是否最后一个周期=1),返回((100*A3)/A6),否则返回0))
A9赋值:((如果(是否最后一个周期=1),返回((100*A4)/A6),否则返回0))
A10赋值:((如果(是否最后一个周期=1),返回((100*A5)/A6),否则返回0))
输出机构买盘:(A2),线宽为3,COLORFF55FF
输出机构卖盘:(A3),线宽为3,COLORFFFF55
输出散户买盘:(A4),COLOR5555FF
输出散户卖盘:(A5),COLOR55FF55
当满足条件是否最后一个周期=1时,在机构买盘*0.9位置书写文字,线宽为2,COLORFF55FF
当满足条件是否最后一个周期=1时,在机构卖盘位置书写文字,线宽为2,COLORFFFF55
当满足条件是否最后一个周期=1时,在散户买盘位置书写文字,线宽为2,COLOR5555FF
当满足条件是否最后一个周期=1时,在散户卖盘位置书写文字,线宽为2,COLOR55FF55