分时叠加大盘[标准]+大盘5分钟力度和总体力度[大智慧公式]

相关标签:

分时叠加大盘[标准]+大盘5分钟力度和总体力度


1.先建大盘引用指标

原理解析：
输出昨收:1日前的收盘价,线宽为0 BS赋值:统计0日中满足成交量(手)>0的天数 KB1赋值:BS=1 AND 前收盘价<开盘价 KS1赋值:BS=1 AND 前收盘价>开盘价 KB2赋值:上次(收盘价>1日前的收盘价ORBS=1)距今天数+KS1 KS2赋值:上次(收盘价<1日前的收盘价ORBS=1)距今天数+KB1 BV赋值:如果KB2<KS2,返回成交额(元)/100000000,否则返回0 SV赋值:如果KB2>KS2,返回成交额(元)/100000000,否则返回0 输出资金差:BV的历史累和-SV的历史累和 N赋值:BARPOS和5的较小值 输出资金差2:BV的N日累和-SV的N日累和 2.再建指标A)POLYLINE(收盘价,收盘价),线宽为2,画黑色 TC赋值:字符串比较 DPSH赋值:"SH000001$收盘价"/0日内STKINDI('SH000001','大盘引用.昨收[取日线数据]')的最高值 DPSZ赋值:"399001$收盘价"/0日内STKINDI('399001','大盘引用.昨收[取日线数据]')的最高值 DPC赋值:如果属于某板块,返回前收盘价*如果TC=0,返回DPSZ,否则返回DPSH,否则返回收盘价 POLYLINE(收盘价>0,DPC),画洋红色,LAYER0 收盘价,画白色,LAYER0 输出B)总:STKINDI('SH000001','大盘引用.资金差#TICK') 输出五分:STKINDI('SH000001','大盘引用.资金差2[取1分钟数据]'),线宽为0 当满足条件五分>0时,在五分和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR5050FF 当满足条件五分<=0时,在五分和0位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORFFFF00

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

源码：

{大盘引用}
昨收:REF(C,1),LINETHICK0;
BS:=COUNT(V>0,0);
KB1:=BS=1 AND DYNAINFO(3)<DYNAINFO(4);
KS1:=BS=1 AND DYNAINFO(3)>DYNAINFO(4);
KB2:=BARSLAST((C>REF(C,1) OR BS=1))+KS1;
KS2:=BARSLAST((C<REF(C,1) OR BS=1))+KB1;
BV:=IF(KB2<KS2,AMOUNT/100000000,0);
SV:=IF(KB2>KS2,AMOUNT/100000000,0);
资金差:SUM(BV,0)-SUM(SV,0);
N:=MIN(BARPOS,5);
资金差2:SUM(BV,N)-SUM(SV,N);

2.再建指标

A)
{叠加大盘}
POLYLINE(C,C),LINETHICK2,COLORBLACK;{要股价粗线删除这句}
TC:=STRCMP(STRLEFT(MARKETLABEL,2),'SZ');
DPSH:="SH000001$CLOSE"/HHV(STKINDI('SH000001','大盘引用.昨收#DAY'),0);
DPSZ:="399001$CLOSE"/HHV(STKINDI('399001','大盘引用.昨收#DAY'),0);
DPC:=IF(INBLOCK('A股板块'),DYNAINFO(3)*IF(TC=0,DPSZ,DPSH),C);
POLYLINE(C>0,DPC),COLORMAGENTA,LAYER0;
C,COLORWHITE,LAYER0;

B)
{大盘力度}
总:STKINDI('SH000001','大盘引用.资金差#TICK');
五分:STKINDI('SH000001','大盘引用.资金差2#MIN1'),LINETHICK0;
STICKLINE(五分>0,五分,0,1,0),Color5050FF;
STICKLINE(五分<=0,五分,0,1,0),ColorFFFF00;

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