当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：新涨跌停板，涨跌停板代码的改进（通达信主图 源码 测试图）
软件名称：[B]新涨跌停板，涨跌停板代码的改进（通达信主图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：0 Bytes
官方主页：Home Page
更新时间：2021-05-17 07:59:25
软件简介:
关于涨跌停板代码的改进讨论
广陵三少老师
1、整理了一下，代码更清晰，比如日期+19000000，显示为20200824更为直观，多年后仍然记得是什么时候改的规则，比DATE>=1200824更易读懂；
2、INBLOCK也可以用CODELIKE或NAMELIKE代替；
3、根据《深圳证券交易所创业板交易特别规定》第2.1条的规定，创业板开始ST后仍然是20%的涨跌幅；
4、其他的比如翘板、炸板、连扳等等，应该比较好拓展了，自己动手改改就好了；
计算原则：以深交所为例，一共以下三句话：
3.3.16 涨跌幅限制价咯的计算公式为：涨跌幅限制价咯=前收盘价×(1±涨跌幅限制比例)。
计算结果按照四舍五入原则取至价咯最小变动单位。
涨跌幅限制价咯与前收盘价之差的绝对值低于价咯最小变动单位的，以前收盘价增减一个价咯最小变动单位为涨跌幅限制价咯。
第一句好理解；
第二句A股的最小变动价咯是0.01元（基金、债券、债券质押式回购交易的申报价咯最小变动单位为0.001元人民币；B股的申报价咯最小变动单位为0.01港元。 - -如果适用其他市场按这个来），若有用除以100，再Round；
第三句话A股应该用不到；
所以：
源码如下：（应该是对的，有疑问可以沟通交流）
{涨跌停新源码-三少}
RQ:=IF(DATE+19000000>=20200824,1,0);{2020月8月24日，创业板开始20%涨跌幅，创业板ST开始20%涨跌幅}
KCB:=IF(INBLOCK('科创板'),1,0);
CYB:=IF(INBLOCK('创业板') AND RQ,1,0);
STB:=IF(INBLOCK('ST板块'),1,0);
TSB:=IF(INBLOCK('ST板块') AND CODELIKE('300') AND RQ,1,0);{2020月8月24日创业板ST开始20%涨跌幅}
DT05:=ROUND(REF(C,1)*95)/100;
DT10:=ROUND(REF(C,1)*90)/100;
DT20:=ROUND(REF(C,1)*80)/100;
跌停:=(C<=DT20 AND C=L AND (KCB OR CYB OR TSB)) OR (C<=DT10 AND C=L AND NOT(KCB OR CYB OR TSB))
OR (C<=DT05 AND C=L AND STB AND NOT(TSB));
ZT05:=ROUND(REF(C,1)*105)/100;
ZT10:=ROUND(REF(C,1)*110)/100;
ZT20:=ROUND(REF(C,1)*120)/100;
涨停:=(C>=ZT20 AND C=H AND (KCB OR CYB OR TSB)) OR (C>=ZT10 AND C=H AND NOT(KCB OR CYB OR TSB))
OR (C>=ZT05 AND C=H AND STB AND NOT(TSB));
///////////////////////////////////////////////////////////////////////////////
原来没ST后来ST的好像不好处理，应该没有什么时候ST的函数
{新涨跌停 - 圣虎战狼}
幅度:=IF(INBLOCK('科创板') OR INBLOCK('创业板'),0.2,IF(INBLOCK('ST板块'),0.05,0.1));
涨幅:=REF(CLOSE,1)*(1+幅度);
跌幅:=REF(CLOSE,1)*(1-幅度);
{全涨跌停 - 含科创板以及新ST创业}
涨停:=IF(FRACPART(涨幅*100)>=0.45,(INTPART(涨幅*100)+1)/100,INTPART(涨幅*100)/100);
跌停:=IF(FRACPART(跌幅*100)>=0.45,(INTPART(跌幅*100)+1)/100,INTPART(跌幅*100)/100);
{涨跌停颜色}
STICKLINE(PERIOD=5 AND CLOSE>=涨停,CLOSE,OPEN,3.1,0),COLORYELLOW;
STICKLINE(PERIOD=5 AND CLOSE>=涨停,CLOSE,OPEN,1.5,0),COLORRED;
STICKLINE(PERIOD=5 AND CLOSE<=跌停,CLOSE,OPEN,3.1,0),COLORFFFF00;
STICKLINE(PERIOD=5 AND CLOSE<=跌停,CLOSE,OPEN,1.5,0),COLORFF0000;
{覆盖处理之前规则的涨跌停}
日期:=IF(DATE+19000000<20200823,1,0);{2020月8月24日，创业板开始20%涨跌幅，创业板ST开始20%涨跌幅}
原涨停:=REF(CLOSE,1)*1.1;
原跌停:=REF(CLOSE,1)*0.9;
涨停1:=IF(FRACPART(原涨停*100)>=0.45,(INTPART(原涨停*100)+1)/100,INTPART(原涨停*100)/100);
跌停1:=IF(FRACPART(原跌停*100)>=0.45,(INTPART(原跌停*100)+1)/100,INTPART(原跌停*100)/100);
{涨跌停颜色 - 覆盖处理}
STICKLINE(PERIOD=5 AND CLOSE>=涨停1 AND INBLOCK('创业板') AND 日期,CLOSE,OPEN,3.1,0),COLORYELLOW;
STICKLINE(PERIOD=5 AND CLOSE>=涨停1 AND INBLOCK('创业板') AND 日期,CLOSE,OPEN,1.5,0),COLORRED;
STICKLINE(PERIOD=5 AND CLOSE<=跌停1 AND INBLOCK('创业板') AND 日期,CLOSE,OPEN,3.1,0),COLORYELLOW;
STICKLINE(PERIOD=5 AND CLOSE<=跌停1 AND INBLOCK('创业板') AND 日期,CLOSE,OPEN,1.2,0),COLOR00FF00;
[url=http://www.70822.com/soft/sort013/sort05/down-155899.html]新涨跌停板，涨跌停板代码的改进（通达信主图 源码 测试图）[/url]