本帖最后由 wqm 于 2025-5-23 09:55 编辑
{公式名: 时间之窗_源码(上证指数的时间窗口) 易得专用} {2025.5.22以前使用该公式的网友，请到5楼复制代码替换原代码}
{理念:二十年前曾有人统计，在上证指数运行的最早十年中(1990.12.19算起)，它的波动周期是13.5天。而且还有人认为，上证指数的波动似乎还与农历节气相关。
说明:转势日期有三天的误差。不是按交易日来计算的。如果转势日期是星期天则顺延。配合农历转势的日期来辨别。如果转势日期与农历转势日期前后相差1-2天(特别是带*号的大节气)，似乎效果有点明显。写这公式是十几年前的事了。最初是用循环来计算的。随着年份加长，循环次数越多，运行速度越慢而改成如下这样。具体效果如何还请各位观察、优化。此公式仅提供参考！
操作:若现在运行在上涨趋势中。转势日期就是调整期的开始。}
AAA:=DATETOD1970(date)-DATETOD1970(901219) ;
AAB:=INTPART(AAA/14)*14+14;
RQ:=D1970TODATE(DATETOD1970(901219)+AAB);
XQ:=DayOfWeek(RQ+1000000);
星期:=IFS(XQ=1,'一',IFS(XQ=2,'二',IFS(XQ=3,'三',IFS(XQ=4,'四',
IFS(XQ=5,'五',IFS(XQ=6,'六',IFS(XQ=0,'日',0)))))));
BAA:=IF(BARSTATUS=2,MONTH*100+DAY,0);
JQRQ:=IF(BAA<120,120,IF(BAA<204,204,IF(BAA<219,219,IF(BAA<306,306,
IF(BAA<321,321,IF(BAA<405,405,IF(BAA<420,420,IF(BAA<506,506,
IF(BAA<521,521,IF(BAA<606,606,IF(BAA<621,621,IF(BAA<707,707,
IF(BAA<723,723,IF(BAA<808,808,IF(BAA<823,823,IF(BAA<908,908,
IF(BAA<923,923,IF(BAA<1008,1008,IF(BAA<1023,1023,IF(BAA<1107,1107,
IF(BAA<1122,1122,IF(BAA<1207,1207,IF(BAA<1222,1222,106))))))))))))
)))))))))));
JQ:=IFS(BAA<=106,'小寒',IFS(BAA<=120,'大寒',IFS(BAA<=204,'*立春',
IFS(BAA<=219,'雨水',IFS(BAA<=306,'惊蛰',IFS(BAA<=321,'*春分',
IFS(BAA<=405,'清明',IFS(BAA<=420,'谷雨',IFS(BAA<=506,'*立夏',
IFS(BAA<=521,'小满',IFS(BAA<=606,'芒种',IFS(BAA<=621,'*夏至',
IFS(BAA<=707,'小暑',IFS(BAA<=723,'大暑',IFS(BAA<=808,'*立秋',
IFS(BAA<=823,'处暑',IFS(BAA<=908,'白露',IFS(BAA<=923,'*秋分',
IFS(BAA<=1008,'寒露',IFS(BAA<=1023,'霜降',IFS(BAA<=1107,'*立冬',
IFS(BAA<=1122,'小雪',IFS(BAA<=1207,'大雪',IFS(BAA<=1222,'*冬至',
0))))))))))))))))))))))));
JQXQ:=DayOfWeek((YEAR-1900)*10000+JQRQ);
节气星期:=IFS(JQXQ=1,'一',IFS(JQXQ=2,'二',IFS(JQXQ=3,'三',IFS(JQXQ=4,'四',
IFS(JQXQ=5,'五',IFS(JQXQ=6,'六',IFS(JQXQ=0,'日','')))))));
福:='转势: '+NUMTOSTRN(RQ+20000000,0)+' (星期'+星期+'), 农历转势: '+
JQ+' '+NUMTOSTRN(JQRQ,0)+'(星期'+节气星期+'),';
DRAWTEXTABS(10,75,福),coloryellow;
|
|Archiver|小黑屋|易得程序化
( 粤ICP备2022064048号 )
发表于 2025-5-17 11:11:15
楼主
