本帖最后由 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; 
 
 |