如何计算选定板块今天涨停的品种个数呢?今天以行业板块为例
网友留言1
网友留言2
留言的意思是说,怎样用通达信语言,统计板块涨停的家数?「图片」
初心是:“我想我选的股票所属行业板块,在涨停板块最多的前三里,可能还是用程序选会好一点。”
思路步骤
算法建立
被INSUM函数引用的公式
ZT:CLOSE>=IF((FINANCE(3)=4 OR (DATE>1200822 AND FINANCE(3)=3)),ZTPRICE(REF(CLOSE,1),0.2),ZTPRICE(REF(CLOSE,1),0.1));
2.这里的举例,以行业板块为例来进行算法建立:
选择顺序如下---行情窗口下边标签“板块指数”,然后点击上边标签“行业板块”。
3.利用制表软件EXCEL辅助完成:
a. 鼠标指向左上角的菜单---系统---数据导出,或者小键盘直接输入数字34;
b.出现当前界面,确定一个需要保存的路径;
c.打开保存的文档,选择并剪切B列数据---56个行业名称;
d.将剪切到的行业名称,粘贴至一个新建的表格A列与C列,B列与D列的填入内容见下表;
e.分别选择B1格和D1格,向下拖动B1格右下角以及D1格右下角,得到如下表格;
f.
选择上述表格中的4列56行数据,至计算机操作系统自带的“记事本”软件内:
首先,替换空格为无;
然后,将字母AAAA替换为数字3或者其它“到当前的周期数”数字;
接着,将字母BBBB替换为数字1;
最后,将字母CCCC替换为数字0(与上述替换的1一样,都是函数INSUM的参数)。
如下图:
4.回到行情软件中来,将上述记事本内编辑好的内容,复制粘贴至行情软件的公式编辑器内,做一个副图指标;
5. 将获得的数据复制粘贴至行情软件的公式编辑器内,做一个主图指标;
6.小键盘输入 .401 回车
7.参考下图中的选择
选择已经做好的板块涨停板个数公式ZTB2或者ZTB3均可;自动计算结束后,只需点选第一行数据,重复上述“3.a”步骤,导出至EXCEL进行浏览即可。
8.或者进行K线分析界面,输出公式名称
就是此刻的周五,不知为什么没有数据显示,之前验证算法有效且通过。
完整代码
1.算法建立中的“1.”:
ZT:CLOSE>=IF((FINANCE(3)=4 OR (DATE>1200822 AND FINANCE(3)=3)),ZTPRICE(REF(CLOSE,1),0.2),ZTPRICE(REF(CLOSE,1),0.1));
2.统计用算法:
多元金融:IF(CURRBARSCOUNT<=3,CONST(INSUM('多元金融','ZTB',1,0)),DRAWNULL);
煤炭:IF(CURRBARSCOUNT<=3,CONST(INSUM('煤炭','ZTB',1,0)),DRAWNULL);
运输服务:IF(CURRBARSCOUNT<=3,CONST(INSUM('运输服务','ZTB',1,0)),DRAWNULL);
酒店餐饮:IF(CURRBARSCOUNT<=3,CONST(INSUM('酒店餐饮','ZTB',1,0)),DRAWNULL);
石油:IF(CURRBARSCOUNT<=3,CONST(INSUM('石油','ZTB',1,0)),DRAWNULL);
供气供热:IF(CURRBARSCOUNT<=3,CONST(INSUM('供气供热','ZTB',1,0)),DRAWNULL);
电力:IF(CURRBARSCOUNT<=3,CONST(INSUM('电力','ZTB',1,0)),DRAWNULL);
酿酒:IF(CURRBARSCOUNT<=3,CONST(INSUM('酿酒','ZTB',1,0)),DRAWNULL);
造纸:IF(CURRBARSCOUNT<=3,CONST(INSUM('造纸','ZTB',1,0)),DRAWNULL);
保险:IF(CURRBARSCOUNT<=3,CONST(INSUM('保险','ZTB',1,0)),DRAWNULL);
交通设施:IF(CURRBARSCOUNT<=3,CONST(INSUM('交通设施','ZTB',1,0)),DRAWNULL);
房地产:IF(CURRBARSCOUNT<=3,CONST(INSUM('房地产','ZTB',1,0)),DRAWNULL);
家居用品:IF(CURRBARSCOUNT<=3,CONST(INSUM('家居用品','ZTB',1,0)),DRAWNULL);
传媒娱乐:IF(CURRBARSCOUNT<=3,CONST(INSUM('传媒娱乐','ZTB',1,0)),DRAWNULL);
旅游:IF(CURRBARSCOUNT<=3,CONST(INSUM('旅游','ZTB',1,0)),DRAWNULL);
广告包装:IF(CURRBARSCOUNT<=3,CONST(INSUM('广告包装','ZTB',1,0)),DRAWNULL);
建筑:IF(CURRBARSCOUNT<=3,CONST(INSUM('建筑','ZTB',1,0)),DRAWNULL);
互联网:IF(CURRBARSCOUNT<=3,CONST(INSUM('互联网','ZTB',1,0)),DRAWNULL);
纺织服饰:IF(CURRBARSCOUNT<=3,CONST(INSUM('纺织服饰','ZTB',1,0)),DRAWNULL);
文教休闲:IF(CURRBARSCOUNT<=3,CONST(INSUM('文教休闲','ZTB',1,0)),DRAWNULL);
仓储物流:IF(CURRBARSCOUNT<=3,CONST(INSUM('仓储物流','ZTB',1,0)),DRAWNULL);
食品饮料:IF(CURRBARSCOUNT<=3,CONST(INSUM('食品饮料','ZTB',1,0)),DRAWNULL);
工程机械:IF(CURRBARSCOUNT<=3,CONST(INSUM('工程机械','ZTB',1,0)),DRAWNULL);
日用化工:IF(CURRBARSCOUNT<=3,CONST(INSUM('日用化工','ZTB',1,0)),DRAWNULL);
建材:IF(CURRBARSCOUNT<=3,CONST(INSUM('建材','ZTB',1,0)),DRAWNULL);
医药:IF(CURRBARSCOUNT<=3,CONST(INSUM('医药','ZTB',1,0)),DRAWNULL);
水务:IF(CURRBARSCOUNT<=3,CONST(INSUM('水务','ZTB',1,0)),DRAWNULL);
商业连锁:IF(CURRBARSCOUNT<=3,CONST(INSUM('商业连锁','ZTB',1,0)),DRAWNULL);
商贸代理:IF(CURRBARSCOUNT<=3,CONST(INSUM('商贸代理','ZTB',1,0)),DRAWNULL);
化纤:IF(CURRBARSCOUNT<=3,CONST(INSUM('化纤','ZTB',1,0)),DRAWNULL);
医疗保健:IF(CURRBARSCOUNT<=3,CONST(INSUM('医疗保健','ZTB',1,0)),DRAWNULL);
电信运营:IF(CURRBARSCOUNT<=3,CONST(INSUM('电信运营','ZTB',1,0)),DRAWNULL);
银行:IF(CURRBARSCOUNT<=3,CONST(INSUM('银行','ZTB',1,0)),DRAWNULL);
钢铁:IF(CURRBARSCOUNT<=3,CONST(INSUM('钢铁','ZTB',1,0)),DRAWNULL);
有色:IF(CURRBARSCOUNT<=3,CONST(INSUM('有色','ZTB',1,0)),DRAWNULL);
公共交通:IF(CURRBARSCOUNT<=3,CONST(INSUM('公共交通','ZTB',1,0)),DRAWNULL);
证券:IF(CURRBARSCOUNT<=3,CONST(INSUM('证券','ZTB',1,0)),DRAWNULL);
环境保护:IF(CURRBARSCOUNT<=3,CONST(INSUM('环境保护','ZTB',1,0)),DRAWNULL);
农林牧渔:IF(CURRBARSCOUNT<=3,CONST(INSUM('农林牧渔','ZTB',1,0)),DRAWNULL);
化工:IF(CURRBARSCOUNT<=3,CONST(INSUM('化工','ZTB',1,0)),DRAWNULL);
家用电器:IF(CURRBARSCOUNT<=3,CONST(INSUM('家用电器','ZTB',1,0)),DRAWNULL);
矿物制品:IF(CURRBARSCOUNT<=3,CONST(INSUM('矿物制品','ZTB',1,0)),DRAWNULL);
运输设备:IF(CURRBARSCOUNT<=3,CONST(INSUM('运输设备','ZTB',1,0)),DRAWNULL);
综合类:IF(CURRBARSCOUNT<=3,CONST(INSUM('综合类','ZTB',1,0)),DRAWNULL);
软件服务:IF(CURRBARSCOUNT<=3,CONST(INSUM('软件服务','ZTB',1,0)),DRAWNULL);
电器仪表:IF(CURRBARSCOUNT<=3,CONST(INSUM('电器仪表','ZTB',1,0)),DRAWNULL);
通用机械:IF(CURRBARSCOUNT<=3,CONST(INSUM('通用机械','ZTB',1,0)),DRAWNULL);
汽车类:IF(CURRBARSCOUNT<=3,CONST(INSUM('汽车类','ZTB',1,0)),DRAWNULL);
IT设备:IF(CURRBARSCOUNT<=3,CONST(INSUM('IT设备','ZTB',1,0)),DRAWNULL);
工业机械:IF(CURRBARSCOUNT<=3,CONST(INSUM('工业机械','ZTB',1,0)),DRAWNULL);
电气设备:IF(CURRBARSCOUNT<=3,CONST(INSUM('电气设备','ZTB',1,0)),DRAWNULL);
船舶:IF(CURRBARSCOUNT<=3,CONST(INSUM('船舶','ZTB',1,0)),DRAWNULL);
元器件:IF(CURRBARSCOUNT<=3,CONST(INSUM('元器件','ZTB',1,0)),DRAWNULL);
通信设备:IF(CURRBARSCOUNT<=3,CONST(INSUM('通信设备','ZTB',1,0)),DRAWNULL);
航空:IF(CURRBARSCOUNT<=3,CONST(INSUM('航空','ZTB',1,0)),DRAWNULL);
半导体:IF(CURRBARSCOUNT<=3,CONST(INSUM('半导体','ZTB',1,0)),DRAWNULL);
计算创造价值,分享助力成功,文中代码均可运行。
江丰鱼的文章只在今日头条首发。
联系客服