时间窗公式(通达信)

源码正文：

大盘走势常与一些特殊数字有联系，比如5，8，13，21，34，17，55.......临用时去数上涨和下跌的天数很耽搁时间，于是我自编了一个时间窗公式，结合买卖点指标，还有一些价值。现奉献给供大家参考，以回报理想论坛。由于初学编公式，还请高手多多指教。
说明：在重要时间窗，特别是几个时间窗同时出现，前后一两天又有买卖点出现，应考虑是否属于变盘。
柱线的顶点或者底即是此段时间对应的起点。
自编时间窗公式
AA:=HHV(HIGH,2){XG51};
BB:=LLV(LOW,2){XG51};
八日:=REF(LOW,7)=LLV(LOW,11) && AA=HHV(HIGH,11){XG51};
十三日:=REF(LOW,12)=LLV(LOW,15) && AA=HHV(HIGH,15){XG51};
十七日:=REF(LOW,16)=LLV(LOW,20) && AA=HHV(HIGH,20){XG51};
二十一日:=REF(LOW,20)=LLV(LOW,26) && AA=HHV(HIGH,26){XG51};
三十日:=REF(LOW,29)=LLV(LOW,35) && AA=HHV(HIGH,35){XG51};
五十五日:=REF(LOW,54)=LLV(LOW,60) && AA=HHV(HIGH,60){XG51};
八十九日:=REF(LOW,88)=LLV(LOW,95) && AA=HHV(HIGH,95){XG51};
stICKLINE(八日,LOW*0.995,REF(LOW,7),1,1),COLORBLUE{XG51};
STICKLINE(十三日,LOW*0.995,REF(LOW,12),1,1),COLORWHITE{XG51};
STICKLINE(十七日,LOW*0.995,REF(LOW,16),1,1),COLORCYAN{XG51};
STICKLINE(二十一日,LOW*0.995,REF(LOW,20),1,1),COLORLImaGENTA{XG51};
STICKLINE(三十日,LOW*0.995,REF(LOW,29),1,1),COLORYELLOW{XG51};
STICKLINE(五十五日,LOW*0.995,REF(LOW,54),1,1),COLORRED{XG51};
STICKLINE(八十九日,LOW*0.995,REF(LOW,88),1,1),COLORRED{XG51};
DRAWTEXT(八日,REF(LOW,7)*0.985,'8'),COLORBLUE{XG51};
DRAWTEXT(十三日,0.985*REF(LOW,12),'13'),COLORWHITE{XG51};
DRAWTEXT(十七日,0.985*REF(LOW,16),'17'),COLORCYAN{XG51};
DRAWTEXT(二十一日,0.985*REF(LOW,20),'21'),COLORMAGENTA{XG51};
DRAWTEXT(三十日,0.985*REF(LOW,29),'30'),COLORYELLOW{XG51};
DRAWTEXT(五十五日,0.985*REF(LOW,54),'55'),COLORRED{XG51};
DRAWTEXT(八十九日,0.985*REF(LOW,88),'89'),COLORRED{XG51};
八日B:=REF(HIGH,7)=HHV(HIGH,11) && BB=LLV(LOW,11){XG51};
十三日B:=REF(HIGH,12)=HHV(HIGH,15) && BB=LLV(LOW,15){XG51};
十七日B:=REF(HIGH,16)=HHV(HIGH,20) && BB=LLV(LOW,20){XG51};
二十一日B:=REF(HIGH,20)=HHV(HIGH,26) && BB=LLV(LOW,26){XG51};
三十日B:=REF(HIGH,29)=HHV(HIGH,35) && BB=LLV(LOW,35){XG51};
五十五日B:=REF(HIGH,54)=HHV(HIGH,60) && BB=LLV(LOW,60){XG51};
八十九日B:=REF(HIGH,88)=HHV(HIGH,95) && BB=LLV(LOW,95){XG51};
STICKLINE(八日B,HIGH*1.005,REF(HIGH,7),1,1),COLORBLUE{XG51};
STICKLINE(十三日B,HIGH*1.005,REF(HIGH,12),1,1),COLORWHITE{XG51};
STICKLINE(十七日B,HIGH*1.005,REF(HIGH,16),1,1),COLORCYAN{XG51};
STICKLINE(二十一日B,HIGH*1.005,REF(HIGH,20),1,1),COLORMAGENTA{XG51};
STICKLINE(三十日B,HIGH*1.005,REF(HIGH,29),1,1),COLORYELLOW{XG51};
STICKLINE(五十五日B,HIGH*1.005,REF(HIGH,54),1,1),COLORRED{XG51};
STICKLINE(八十九日B,HIGH*1.005,REF(HIGH,88),1,1),COLORRED{XG51};
DRAWTEXT(八日B,REF(HIGH,7)*1.015,'8'),COLORBLUE{XG51};
DRAWTEXT(十三日B,1.015*REF(HIGH,12),'13'),COLORWHITE{XG51};
DRAWTEXT(十七日B,1.015*REF(HIGH,16),'17'),COLORCYAN{XG51};
DRAWTEXT(二十一日B,1.015*REF(HIGH,20),'21'),COLORMAGENTA{XG51};
DRAWTEXT(三十日B,1.015*REF(HIGH,29),'30'),COLORYELLOW{XG51};
DRAWTEXT(五十五日B,1.015*REF(HIGH,54),'55'),COLORRED{XG51};
DRAWTEXT(八十九日B,1.015*REF(HIGH,88),'89'),COLORRED{X_G_5.1_C_N_{};

源码正文：

强弱分界: ma(CLOSE,27),LINETHICK2,COLORRED{XG51};
上极限: 强弱分界+3*stD(CLOSE,21),COLORFF0080{XG51};
下极限:强弱分界-2.9*STD(CLOSE,21),COLOR4080FF{XG51};
风标:ema((EMA(CLOSE,3)+EMA(CLOSE,5)+EMA(CLOSE,8)+EMA(CLOSE,13))/4,2),COLOR00FF00{XG51};
VAR1:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR2:=LLV(LOW,34){XG51};
VAR3:=HHV(HIGH,34){XG51};
VAR4:=EMA((VAR1-VAR2)/(VAR3-VAR2)*100,13);
VAR5:=REF(CLOSE,1){XG51};
VAR6:=SMA(MAX(CLOSE-VAR5,0),7,1)/SMA(Abs(CLOSE-VAR5),7,1)*100{XG51};
VAR7:=EMA((CLOSE-LLV(CLOSE,55))/(HHV(CLOSE,55)-LLV(LOW,55))*100,7){XG51};
VAR8:=EMA((CLOSE-VAR2)/(VAR3-VAR2)*100,5){XG51};
VAR9:=EMA((CLOSE-VAR2)/(VAR3-VAR2)*100,20){XG51};
VAR10:=FILTER(crOSS(VAR8,VAR9) AND VAR9<30 ,5)AND VAR7>REF(VAR7,1)AND C<强弱分界 AND C>O AND VAR4>REF(VAR4,1){XG51};
DRAWICON(REF(L,1)<下极限 AND L>下极限 AND C>O OR VAR10,下极限 ,10){XG51};
DRAWTEXT(VAR10,下极限,'下买'){XG51};
DRAWICON(FILTER(REF(H,1)<风标 AND CROSS(C,风标) AND 风标>REF(风标,1) AND 风标<强弱分界,3)AND C>O,L,1){XG51};
DRAWICON(REF(H,1)>上极限 AND H<上极限 AND L<风标 AND C<O,上极限 ,11){XG51};
DRAWICON( CROSS(80,VAR6)AND L<风标,H*1.03,5){XG51};
DRAWTEXT(CROSS(H,上极限)AND L>风标 AND C/REF(C,10)>1.2 AND VAR8>80,H+0.12,'上卖'),COLOR00FFFF{X-G*5?1-C-N-{};