分时叠加大盘[标准]+大盘5分钟力度和总体力度
1.先建大盘引用指标
{大盘引用}
昨收: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;
{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
