通达信倍量加倍量主图 抓起爆点 源码附图
股东人数:GPJYVALUE(1,1,1);
{TJ:BARSLAST(股东人数<>REF(股东人数,1)),NODRAW;
TJS:IF(TJ=0 AND 股东人数>REF(股东人数,1),1,IF(TJ=0 AND 股东人数<REF(股东人数,1),2,0));}
{IF(股东人数>REF(股东人数,1),股东人数,DRAWNULL),COLORFFFF00;};
TJ1:=BARSLAST(股东人数>REF(股东人数,1)),NODRAW;
TJ2:=BARSLAST(股东人数<REF(股东人数,1)),NODRAW;
NOTEXT1:IF(TJ1<TJ2,股东人数,DRAWNULL),COLOR00FF00;
NOTEXT2:IF(TJ1>TJ2,股东人数,DRAWNULL),COLORRED;
股东ZDZ:=MAX(REF(股东人数,1),股东人数);
股东ZXZ:=MIN(REF(股东人数,1),股东人数);
股东SSS:=BARSLAST(REF(股东人数,1)!=股东人数);
股东ZAQ:=(REF(股东人数,1)+股东人数)/2;
股东JSRS:=(REF(股东人数,1)-股东人数)/REF(股东人数,1)*100;
股东ZJRS:=(股东人数-REF(股东人数,1))/REF(股东人数,1)*100;
股东DQ1:=VARCAT(VAR2STR(股东JSRS,2),'%');
股东DQ2:=VARCAT(VAR2STR(股东ZJRS,2),'%');
股东升:=BARSLAST(REF(股东人数,1)>股东人数);
股东降:=BARSLAST(REF(股东人数,1)<股东人数);
股东连降:=COUNT(REF(股东人数,1)!=股东人数,股东降),NODRAW;
股东连升:=COUNT(REF(股东人数,1)!=股东人数,股东升),NODRAW;
股东连降次:=VARCAT('连降:',VARCAT(VAR2STR(股东连降,0),'次'));
股东连升次:=VARCAT('连升:',VARCAT(VAR2STR(股东连升,0),'次'));
DRAWTEXT(股东SSS=0 AND 股东JSRS>0,股东ZAQ,VARCAT(股东DQ1,股东连降次)),COLORRED;
DRAWTEXT(股东SSS=0 AND 股东ZJRS>0,股东ZAQ,VARCAT(股东DQ2,股东连升次)),COLORGREEN;
星期几:=VARCAT(VARCAT('(',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五','')))))),')');
日期:=VARCAT(VARCAT(VARCAT(VARCAT(VARCAT(VARCAT(VAR2STR(YEAR,0),'年'),VAR2STR(MONTH,0)),'月'),VAR2STR(DAY,0)),'日'),星期几);
DRAWTEXT(股东SSS=0 AND 股东JSRS>0,股东ZAQ,日期),COLORRED,DRAWABOVE;
DRAWTEXT(股东SSS=0 AND 股东ZJRS>0,股东ZAQ,日期),,COLORGREEN,DRAWABOVE;
来函数检测结果如下：
该公式没有未来函数
解密、编写股票、期货策略请联系QQ或微信同号：88652583
相关股票指标公式
原理解析：
输出股东人数:GPJYVALUE(1,1,1)
输出{TJ:上次股东人数<>1日前的股东人数距今天数,NODRAW
输出TJS:IF(TJ=0 AND 股东人数>1日前的股东人数,1,IF(TJ=0 AND 股东人数<1日前的股东人数,2,0))
}
{IF(股东人数>1日前的股东人数,股东人数,DRAWNULL),COLORFFFF00
}
TJ1赋值:上次股东人数>1日前的股东人数距今天数,NODRAW
TJ2赋值:上次股东人数<1日前的股东人数距今天数,NODRAW
如果TJ1如果TJ1>TJ2返回股东人数否则返回DRAWNULL
股东ZDZ赋值:1日前的股东人数和股东人数较大值
股东ZXZ赋值:1日前的股东人数和股东人数的较小值
股东SSS赋值:上次1日前的股东人数!=股东人数距今天数
股东ZAQ赋值:(1日前的股东人数+股东人数)/2
股东JSRS赋值:(1日前的股东人数-股东人数)/1日前的股东人数*100
股东ZJRS赋值:(股东人数-1日前的股东人数)/1日前的股东人数*100
股东DQ1赋值:VARCAT(VAR2STR(股东JSRS,2),'%')
股东DQ2赋值:VARCAT(VAR2STR(股东ZJRS,2),'%')
股东升赋值:上次1日前的股东人数>股东人数距今天数
股东降赋值:上次1日前的股东人数<股东人数距今天数
股东连降赋值:COUNT(1日前的股东人数!=股东人数,股东降),NODRAW
股东连升赋值:COUNT(1日前的股东人数!=股东人数,股东升),NODRAW
股东连降次:=VARCAT('连降:',VARCAT(VAR2STR(股东连降,0),'次'))
股东连升次:=VARCAT('连升:',VARCAT(VAR2STR(股东连升,0),'次'))
DRAWTEXT(股东SSS=0 AND 股东JSRS>0,股东ZAQ,VARCAT(股东DQ1,股东连降次)),画红色
DRAWTEXT(股东SSS=0 AND 股东ZJRS>0,股东ZAQ,VARCAT(股东DQ2,股东连升次)),画绿色
星期几赋值:VARCAT(VARCAT('(',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五','')))))),')')
日期赋值:VARCAT(VARCAT(VARCAT(VARCAT(VARCAT(VARCAT(VAR2STR(YEAR,0),'年'),VAR2STR(MONTH,0)),'月'),VAR2STR(DAY,0)),'日'),星期几)
当满足条件股东SSS=0 AND 股东JSRS>0时,在股东ZAQ和日期位置书写文字
当满足条件股东SSS=0 AND 股东ZJRS>0时,在股东ZAQ和日期位置书写文字
