通达信】缠论中枢(中枢高、中枢低、缺口判断）-指标公式源码{N1:1，100,１0；N2：1，１０0，1０;DISP:=1,３,２};N1:=１0;N2：＝10;DISP：=２;K：=ＩF(PEＲＩＯD=5,1，{日}IF（PERIOＤ＝6,1,｛周}IF(PＥRＩOＤ=７，1,{月}IF(PERIOＤ=8,１,{多分钟}IF(PERＩOD=9,1,{多日}ＩＦ（PERIOD=10，1,{季｝ＩF(ＰＥRIＯD=1１,2,{年}IＦ(PEＲIOＤ=4,１,{60F}ＩF(PERIOD=3,1,{30F}IＦ(PERＩOD=2,1，{15F｝ＩF（PERIOD＝１，1{５Ｆ｝,１｛1F}))）)）))）））)/10;P１:=PEAK(1，K＊N1，1);P2:=PEAＫ(1,K＊Ｎ1,2)；WP1:＝PEAＫBARＳ（１，K＊Ｎ1,1);WＰ2:=PEAＫBARS(1,K*Ｎ1，2）；T１：=TROUGH(２,Ｋ*N2,1);T2:=TROＵＧH(２,Ｋ*N2,2);WT１:=ＴROＵGHＢARS（2，K*N2,１）；WT2:=TROＵGＨBAＲＳ(2,K*N2,2);TJ1:=Ｐ1>T1 ANＤ Ｐ2>Ｔ2 ；ZD:=MAＸ(T1,T2);ZG:=ＭIN(P1,P2)；LL:=MIN（Ｔ1,Ｔ2);ＨH:=ＭＡX(P1,Ｐ2）;TＪ２:＝FILTＥR(ZＧ>ZD,2)；TJ3:＝ZG＝RＥF(ＺG,BAＲSLAＳT(ＴJ２）) ＯR ZD=RＥF(ZＤ，BAＲSＬAＳT(TＪ２));TJ4:＝TJ１＆&TJ２＆＆NOＴ(ＴJ3);TＪ５:=BETＷEＥN（ＺD,REF(ZD,RＥF(BＡRSLAST（TJ4),1)),REF（ZG,REＦ(BARSLAST(ＴＪ4),1)));TJ6:=ＢETWEＥN(ＺG,ＲEF(ZD,REF(BARＳLAST(TJ４),1）),REＦ(ZＧ，REF(ＢARＳＬASＴ（TJ４)，1)))；ＴＪ7:＝ＺG>REＦ（ＺG，REＦ(ＢＡRSLAＳＴ(TＪ４),1))&&ZDREF(HHV（Ｈ,4)，1),4）；局部高点预选B：=BACKＳET（局部高点预选A＝0 AND RＥＦ(局部高点预选A,1）=１,２);局部高点预选C：＝ＩF(局部高点预选B=1 AND REF(局部高点预选Ｂ,1)=0,1,0);缺口判断：=ＩF(L＞REF(H,1),1,IF(H=4 ＯR ＬLＶ(缺口判断,距前高天)=-１ OR LLＶ（L,距前低天+2)RＥF(小值周期,距前低天+1） AＮD 大值周期＞REF(小值周期,距前低天) AＮD 大值周期>REＦ(大值周期,距前高天),1,０）;高保存A：=ＩF(局部高点预选C=１ AＮＤ REF(距前低天,１)＞REF(距前高天，１) AND ＨHV（H，距前低天+1)＞REF（ＨHＶ（Ｈ，距前低天+1)，1)，１,０）;高保存B：=IF（局部高点预选C＝1 AND REF(距前低天,1)<=ＲＥＦ(距前高天，1) ＡＮＤ RＥＦ(低保存S,距前低天)=-1 ANＤ (距前低天>＝４ OR HＨV（缺口判断,距前低天）=1)，1,０）；高保存：=IF(（高保存A＝1 OR 高保存B=1 OＲ 判断=1) AND H＞REF（Ｌ，距前低天+1）,1,0)；预判A:＝IF((距前高天<4 AＮD HHV(缺口判断,距前高天)!=１) OＲ ＲEF(高保存,距前高天）＝0,1,0);判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1）<＝RＥＦ(距前低天,１) ANＤ 预判Ａ=1 AND 小值周期>REF(大值周期,距前高天+1) AＮD 小值周期＞REF(大值周期,距前高天) AND 小值周期>RＥＦ(小值周期,距前低天),－1,０);低保存Ａ:＝ＩF(局部低点预选Ｃ=-1 ＡND ＲEF(距前高天，1)＞ＲEF(距前低天,1) AND LLV(L，距前高天+１)=4 OR ＬLV(缺口判断,距前高天）=-1 OR 判断A=-1）,-1,0);低保存:=IＦ((低保存A=-1 ＯＲ 低保存B=-1） AＮＤ LRＥF(小值周期，距前低天A＋1) ＡND 大值周期>REＦ(小值周期,距前低天A) ANＤ 大值周期>REF(大值周期,距前高天A）,1,0）;高保存XA：=IＦ(局部高点预选C=１ ＡND ＲEF(距前低天A,1)>REF(距前高天Ａ,1) AND ＨHV(Ｈ,距前低天Ａ＋1)>REＦ（ＨHV(Ｈ，距前低天A＋１)，1),1,0);高保存XB:＝ＩF（局部高点预选C=１ AND RＥＦ（距前低天A，1)<=ＲＥF(距前高天A,1) AND REF（低保存,距前低天A)=-1 AND (距前低天Ａ>=4 ＯＲ ＨHV(缺口判断，距前低天A）=1),１,0);高保存X:=IF（(高保存XA=1 ＯR 高保存XＢ=1 OＲ 判断X＝1） ＡＮD H>REF(L,距前低天A＋1),1，0);预判XA:＝IF((距前高天A＜４ AND HHV(缺口判断,距前高天A）!=1） OR REF(高保存XＡ,距前高天A)＝0,1，0);判断XA:=IF(局部低点预选C=-1 ANＤ ＲＥＦ(距前高天A,1)＜=ＲＥF(距前低天A,1) AND 预判XA=1 ANＤ 小值周期>REF(大值周期，距前高天A＋1) ＡND 小值周期＞REF(大值周期,距前高天A） AND 小值周期＞REF(小值周期,距前低天A),－1,０)；低保存XA:=IF(局部低点预选C=-1 ＡND ＲＥＦ(距前高天Ａ,1)＞ＲEF（距前低天A，1) AND LLＶ(L，距前高天A＋1)<ＲEＦ（ＬＬV(L，距前高天A＋１)，1),-１,0)；低保存XB:=IF(局部低点预选C＝－１ AND REＦ（距前高天A,１)<＝RＥＦ(距前低天Ａ，1） AＮＤ (距前高天A>=４ OR ＬＬV(缺口判断,距前高天Ａ）=-1 ＯＲ 判断XＡ=-１)，-1,０)；低保存Ｘ：=ＩF(（低保存XA=-１ OR 低保存XB=－1） ANＤ LREF(小值周期,距前低天YＡ) AND 大值周期>ＲEF(大值周期,距前高天YA)，1，0);高保存YXA：＝IF(局部高点预选C=１ AND REF(距前低天YA，１）>REF(距前高天YA,１) ANＤ HHV(H,距前低天YA+1)>REF(HHＶ(H,距前低天ＹA＋1),１),1,０);高保存YXB:＝IF(局部高点预选C＝1 ANＤ REF(距前低天YA,1）<=REＦ(距前高天YA,１） AND ＲＥF(低保存X,距前低天ＹＡ)=-1 ＡＮD （距前低天YA>＝4 ＯR HHV(缺口判断,距前低天ＹA）＝1),1,0）;高保存YX:=IF((高保存YXA=1 ＯＲ 高保存YXB=１ OR 判断ＹＸ=１) AND Ｈ>REF(L,距前低天ＹA+1)，1,０);预判YXA:=IF((距前高天ＹA<４ AND HHV(缺口判断,距前高天YA)!=1) OR ＲEF(高保存ＹXA,距前高天YA)=0,1,0);判断YＸA:＝IF(局部低点预选C=-１ ＡＮD ＲEＦ(距前高天ＹA，1)<=ＲEF(距前低天YA，１)。