以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  金字塔软件问题提交  (http://weistock.com/bbs/list.asp?boardid=2)
----  [建议]期权板块分类  (http://weistock.com/bbs/dispbbs.asp?boardid=2&id=99906)
--  作者：fantasynew
--  发布时间：2016/7/1 10:21:59
--  [建议]期权板块分类

期权合约加起来有几十个，大多情况下不需要同时看这么多。

常用的有看同月合约，同类型合约，同价格合约。建议丰富期权的板块分类，方便操作。

自己花了几天时间实现了部分自动板块分类功能，主要卡在到期日（合约换月）非交易日的情况不好处理。

 

比如

 

当月合约   50dangyue

下月合约   50xiayue

季月合约   50jiyue

隔季月      50gejiyue

 

行权价2100合约  50ETF2100  所有月份行权价为2100的合约

2100call   50call2100  所有月份行权价为2100的认购合约

2100put   50put2100  所有月份行权价为2100的认沽合约

 

T型报价里不能按行权价来筛选，而且表头不能用公式，搞个自动分类板块会方便的多
--  作者：fantasynew
--  发布时间：2016/7/1 10:33:08
--  

以下内容为程序代码:

1     Y:=YEAR;
2     YY:=STRRIGHT(NUMTOSTR(Y,0),2);
3     MT:=MONTH;    //真实月份
4     //FDW:=DAYOFWEEK((Y-1900)*10000+MT*100+1);    //本月第一天星期几
5     FDW:=0;
6     FW3:=IF(FDW＜=3,3-FDW+22,7-(FDW-3)+22);    //本月第四个周三是几号
7     //DAY1:=STRCAT(STRCAT(YY,NUMTOSTREX(MT,0,2)),\'01\');    //本月第一天日期
8     tt:=DAYOFWEEK(1160616);
9     D:=DAY;
10     D1900:=(Y-1900)*10000+MT*100+D;
11     
12     M:=MT;
13     当月:=STRCAT(YY,NUMTOSTREX(M,0,2));
14     次月:=IF(M=12,STRCAT(STRRIGHT(NUMTOSTR(Y+1,0),2),\'01\'),STRCAT(YY,NUMTOSTREX(M+1,0,2)));
15     下季月:=IF(M=2 OR M=3 OR M=4,6,IF(M=5 OR M=6 OR M=7,9,IF(M=8 OR M=9 OR M=10,12,3)));
16     下下季月:=IF(M=2 OR M=3 OR M=4,9,IF(M=5 OR M=6 OR M=7,12,IF(M=8 OR M=9 OR M=10,3,6)));

或者帮忙补一下，如何用公式判断节假日影响下的到期日
--  作者：admin
--  发布时间：2016/7/1 11:36:05
--  
1,可以在动态显示盘依据自定义的指标进行筛选下
--  作者：FexTel
--  发布时间：2016/7/1 11:37:23
--  
到期日直接有函数可以取的，你是要实现什么呢？OPTIONINFO(  8)