Ⅰ 求通達信纏論精確筆主圖畫線公式
{精確纏論中樞公式}
{N1:1,100,10;N2:1,100,10;DISP:=1,3,2};
n1:=10;
n2:=10;
DISP:=2;
N1:=10;N2:=10;DISP:=2;
K:=IF(PERIOD=5,1,{日}
IF(PERIOD=6,1,{周}
IF(PERIOD=7,1,{月}
IF(PERIOD=8,1,{多分鍾}
IF(PERIOD=9,1,{多日}
IF(PERIOD=10,1,{季}
IF(PERIOD=11,2,{年}
IF(PERIOD=4,1,{60F}
IF(PERIOD=3,1,{30F}
IF(PERIOD=2,1,{15F}
IF(PERIOD=1,1{5F},1{1F})))))))))))/10;
P1:=PEAK(1,K*N1,1);
P2:=PEAK(1,K*N1,2);
WP1:=PEAKBARS(1,K*N1,1);
WP2:=PEAKBARS(1,K*N1,2);
T1:=TROUGH(2,K*N2,1);
T2:=TROUGH(2,K*N2,2);
WT1:=TROUGHBARS(2,K*N2,1);
WT2:=TROUGHBARS(2,K*N2,2);
TJ1:=P1>T1 AND P2>T2 ;
ZD:=MAX(T1,T2);
ZG:=MIN(P1,P2);
LL:=MIN(T1,T2);
HH:=MAX(P1,P2);
TJ2:=FILTER(ZG>ZD,2);
TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));
TJ4:=TJ1&&TJ2&&NOT(TJ3);
TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF(BARSLAST(TJ4),1));
TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);
ZSD:=IF(TJ8,ZD,DRAWNULL);
ZSG:=IF(TJ8,ZG,DRAWNULL);
ZSH:=IF(TJ8,HH,DRAWNULL);
ZSL:=IF(TJ8,LL,DRAWNULL);
STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;
STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORMAGENTA;
DRAWTEXT(DISP=2,ZSH,'中樞'),COLORWHITE;
中樞高:PLOYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CIRCLEDOT,COLORLIRED;
中樞低:PLOYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8))),CIRCLEDOT,COLORLIGREEN;
{中樞最高:PLOYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLORRED;
中樞最低:PLOYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLORGREEN;}
趨勢高:PLOYLINE(DISP=3,ZIG(1,K*N1)),COLORLIBLUE;
趨勢低:PLOYLINE(DISP=3,ZIG(2,K*N2)),COLORLIBLUE;
局部低點預選A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);
局部低點預選B:=BACKSET(局部低點預選A=0 AND REF(局部低點預選A,1)=1,2);
局部低點預選C:=IF(局部低點預選B=1 AND REF(局部低點預選B,1)=0,-1,0);
局部高點預選A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);
局部高點預選B:=BACKSET(局部高點預選A=0 AND REF(局部高點預選A,1)=1,2);
局部高點預選C:=IF(局部高點預選B=1 AND REF(局部高點預選B,1)=0,1,0);
缺口判斷:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));
距前高天:=BARSLAST(局部高點預選C=1);
距前低天:=BARSLAST(局部低點預選C=-1);
小值周期:=LOWRANGE(L);
大值周期:=TOPRANGE(H);
低保留AA:=IF(局部低點預選C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留AB:=IF(局部低點預選C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判斷,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);
低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);
預判:=IF((距前低天<4 AND HHV(缺口判斷,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);
判斷:=IF(局部高點預選C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 預判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0);
高保留A:=IF(局部高點預選C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);
高保留B:=IF(局部高點預選C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判斷,距前低天)=1),1,0);
高保留:=IF((高保留A=1 OR 高保留B=1 OR 判斷=1) AND H>REF(L,距前低天+1),1,0);
預判A:=IF((距前高天<4 AND HHV(缺口判斷,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0);
判斷A:=IF(局部低點預選C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 預判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);
低保留A:=IF(局部低點預選C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留B:=IF(局部低點預選C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判斷,距前高天)=-1 OR 判斷A=-1),-1,0);
低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0);
距前高天A:=BARSLAST(高保留=1);
距前低天A:=BARSLAST(低保留=-1);
預判X:=IF((距前低天A<4 AND HHV(缺口判斷,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);
判斷X:=IF(局部高點預選C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 預判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);
高保留XA:=IF(局部高點預選C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);
高保留XB:=IF(局部高點預選C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判斷,距前低天A)=1),1,0);
高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判斷X=1) AND H>REF(L,距前低天A+1),1,0);
預判XA:=IF((距前高天A<4 AND HHV(缺口判斷,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0);
判斷XA:=IF(局部低點預選C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 預判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);
低保留XA:=IF(局部低點預選C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0);
低保留XB:=IF(局部低點預選C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判斷,距前高天A)=-1 OR 判斷XA=-1),-1,0);
低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0);
距前高天YA:=BARSLAST(高保留X=1);
距前低天YA:=BARSLAST(低保留X=-1);
預判YX:=IF((距前低天YA<4 AND HHV(缺口判斷,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);
判斷YX:=IF(局部高點預選C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 預判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);
高保留YXA:=IF(局部高點預選C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);
高保留YXB:=IF(局部高點預選C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判斷,距前低天YA)=1),1,0);
高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判斷YX=1) AND H>REF(L,距前低天YA+1),1,0);
預判YXA:=IF((距前高天YA<4 AND HHV(缺口判斷,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0);
判斷YXA:=IF(局部低點預選C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 預判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);
低保留YXA:=IF(局部低點預選C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0);
低保留YXB:=IF(局部低點預選C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判斷,距前高天YA)=-1 OR 判斷YXA=-1),-1,0);
低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0);
AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));
極點保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);
局部極點:IF(極點保留=-1,L,IF(極點保留=1,H,DRAWNULL)) CIRCLEDOT COLORYELLOW;
DRAWLINE(極點保留=-1,局部極點,極點保留=1,局部極點,0)COLORLIRED;
DRAWLINE(極點保留=1,局部極點,極點保留=-1,局部極點,0)COLORYELLOW;
DD1:=BARSLAST(ABS(極點保留)!=1);{
DRAWTEXT(極點保留=1,局部極點,'賣'),COLORGREEN;
DRAWTEXT(極點保留=-1,局部極點,'買'),COLORRED;}
MA5:MA(CLOSE,5),COLORFF00FF,LINETHICK2;判:IF(MA5<REF(MA5,1),MA5,DRAWNULL),COLORWHITE,LINETHICK2;
Ⅱ 纏論常用輔助技術指標——macd篇
Macd指標是許多交易員常用的技術指標，也是纏論原文中描述篇幅最多的技術指標，相比於單純使用基於中樞的區間套定位三類買賣點方法，Macd指標在輔助判斷三類買賣點中相對來說會更便捷，不過由於 MACD 本身的局限性，要精確地判斷背馳與盤整背馳，還是要從中樞本身出發，這里主要介紹Macd輔助判斷三類買賣點的方法。
以2019年4月30日至2019年7月10日這段6h級別趨勢背馳為例：
上圖是一個標準的a+A+b+B+c趨勢背馳結構，A中樞（粉色框A）為12h級別中樞，B中樞（黃色框B）為6h級別中樞，在背馳結構中，中樞A的級別要大於等於B中樞的級別。其中c為B中樞中樞的背馳離開段，當c離開段離開B中樞後，在背馳段中（以c段走勢的起點開始小於b段走勢上漲力度的價格區間屬於背馳段）， 6h級別的Macd綠色柱子變短，這時候就是背馳確認的信號。之後價格被拉回B中樞內部並且形成了一波下跌趨勢。使用macd輔助判斷第一類買賣點相對來說會比較簡單，但是需要注意的是，有的時候使用macd輔助判斷的第一類賣點可能轉化為第三類買點，也就是倘若背馳後價格不被拉回中樞B往往之後會繼續迎來一波新的上漲趨勢，具體的判斷方法以後的文章中會說到。總體來說使用macd輔助判斷背馳的方法准確率大約有80%以上，而使用區間套定位的第一類買賣點的准確率則會更高一些（90%以上）。
第二類買賣點是第一類買賣點形成之後回調或者反彈產生的買賣點，纏論原文中對於第二類買賣點的定義如下： 第二類買點是和第一類買點緊密相連的，因為出現第一類買點後，必然只會出現盤整與上漲的走勢類型，而第一買點出現後的第二段次級別走勢低點就構成第二類買點，根據走勢必完美的原理，其後必然有第三段向上的次級別走勢出現，因此該買點也是絕對安全的。任何級別的第二類買賣點都由次級別相應走勢的第一類買點構成。 這里介紹的方法是使用macd來輔助判斷第二類買賣點的定位。同樣以2019年4月30日至2019年7月10日這段6h級別趨勢背馳為例：
當6h級別頂背馳一賣確認後，價格回到了B中樞區間，並且3h級別的黃白線下穿至零軸下方作為一賣生效的信號，一賣生效後使用3h級別觀察一賣之後的情況：次級別黃白線先下穿至零軸下方後再回抽至零軸上方，Macd柱子變短的時候就是第二類賣點的確認，如果能結合更小的次級別的頂背馳可以定位到更精確的點位。上圖中在箭頭附近位置可以使用1h級別定位到反彈最高點附近的點位。
第三類買賣點是用於對付中樞新生的情況，也就是某級別上漲/下跌趨勢確認後，回調/反彈產生的買賣點。纏論原文中對於第三類買賣點的定義如下： 一個次級別走勢類型向上離開纏中說禪走勢中樞，然後以一個次級別走勢類型回試，其低點不跌破上沿，則構成第三類買點；一個次級別走勢類型向下離開纏中說禪走勢中樞，然後以一個次級別走勢類型回抽，其高點不升破中樞下沿，則構成第三類賣點。任何級別的第三類買賣點都由次級別相應走勢的第一類買賣點構成。 這里介紹的方法是使用macd來輔助判斷第二類買賣點的定位。以2019年4月2號至2019年9月26號的日線上漲趨勢為例：
4月2號放量大陽線突破了底部A日線中樞上沿則確定了日線級別的上漲趨勢，趨勢確認之後，當12h級別在日線中樞上方黃白線回抽至零軸下方macd柱子變短時結合次級別底背馳可定位至精確的買賣點。上圖兩個第三類買點位置使用2h級別可找到相應的底背馳相對精確的點位。
以上就是M這段時間根據纏論原文以及實踐操作總結的Macd指標對於三類買賣點的輔助判斷方法，需要注意的是，纏論中的三類買賣點歸根結底還是以中樞為依據結合走勢必完美原理所保障的必然出現的上漲或者下跌走勢，技術指標只是輔助判斷，只有在熟練掌握纏論形態學以及動力學的基礎上使用技術指標輔助分析才能達到事半功倍的作用。在基礎沒有打好的情況下就沉入技術指標的分析往往是本末倒置。
Ⅲ 纏論箱體指標公式
DRAWGBK(close=close,STRIP(RGB(10,190,255),RGB(255,155,155),0));
VarA:=IF(CLOSE>150,91.3,0.913);
箱下沿:INTPART(CLOSE/VarA)*VarA,pointdot,linethick3,colorgreen;
箱上沿:箱下沿+VarA,pointdot,linethick3,coloryellow;
箱中線:(箱下沿+箱上沿)/2,pointdot,colorwhite,linethick3;
走勢:SMA(FORCAST(CLOSE,18),6,1),COLOR0066cf,LINETHICK2;
FILLRGN(走勢,走勢-0.06,走勢>REF(走勢,1)),COLORff00ff;
var1:=(SMA(HIGH,21,2)*1.05);
Var2:=IF(C/REF(C,1)>1.050ANDV/CAPITAL*100<10ANDC<17ANDH/C<1.01ANDVarA>0,91,0);
STICKLINE(Var2>90,L*0.99,L*0.96,5,0),COLORYELLOW;
DRAWTEXT(Var2>90,LOW*0.98,'追'),COLORYELLOW;
V1:=EMA(EMA(EMA(C,8),13),55);
V2:=(REF(H,1)+REF(L,1))/2;
V3:=MA(C,20)+2*STD(C,20);
DRAWTEXT(CROSS(V2,V3),HIGH*1.06,'→賣'),COLORblue;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,9,0),colorFF5B00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,8,0),colorFF6C00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,7,0),colorFF7B00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,6,0),colorFF9C00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,5,0),colorFFBE00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,3.5,0),colorFFCC00;
STICKLINE((OPEN>=CLOSE),CLOSE,OPEN,1.5,0),colorFFFF00;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,9,0),color070084;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,8,0),color0000A3;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,7,0),color0000B7;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,6,0),color0000CD;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,5,0),color0000E9;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,3,0),color0754E9;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,1.5,0),color076EF3;
STICKLINE((CLOSE>=OPEN),CLOSE,OPEN,1,0),color077BF3;
STICKLINE((CLOSE>OPEN),OPEN,LOW,1,0),color0726CA;
STICKLINE((CLOSE>OPEN),CLOSE,HIGH,1,0),color0726CA;
STICKLINE((OPEN>CLOSE),CLOSE,LOW,1,0),colorDE9100;
STICKLINE((OPEN>CLOSE),OPEN,HIGH,1,0),colorDE9100;
STICKLINE(((((CLOSE/OPEN)>1.04)AND(CLOSE<var1))AND((CLOSE-REF(CLOSE,1))>0)),CLOSE,OPEN,9,0),color0090FF;
STICKLINE(((((CLOSE/OPEN)>1.04)AND(CLOSE<var1))AND((CLOSE-REF(CLOSE,1))>0)),CLOSE,OPEN,8,0),color009FFF;
STICKLINE(((((CLOSE/OPEN)>1.04)AND(CLOSE<var1))AND((CLOSE-REF(CLOSE,1))>0)),CLOSE,OPEN,4,0),color00B5FF;
STICKLINE(((((CLOSE/OPEN)>1.04)AND(CLOSE<var1))AND((CLOSE-REF(CLOSE,1))>0)),CLOSE,OPEN,2,0),color00E4FF;
STICKLINE(((((CLOSE/OPEN)>1.04)AND(CLOSE<var1))AND((CLOSE-REF(CLOSE,1))>0)),OPEN,LOW,0.7,0),color00FFFF;
STICKLINE(((((CLOSE/OPEN)>1.04)AND(CLOSE<var1))AND((CLOSE-REF(CLOSE,1))>0)),CLOSE,HIGH,0.7,0),color00FFFF;
STICKLINE(((((CLOSE<REF(CLOSE,1))AND(CLOSE<REF(CLOSE,1)))AND(HIGH>var1))AND(CLOSE<var1)),OPEN,LOW,0.7,0),colorFF76FF;
STICKLINE(((((CLOSE<REF(CLOSE,1))AND(CLOSE<REF(CLOSE,1)))AND(HIGH>var1))AND(CLOSE<var1)),CLOSE,HIGH,0.7,0),colorFF76FF;
STICKLINE(((((CLOSE<REF(CLOSE,1))AND(CLOSE<REF(CLOSE,1)))AND(HIGH>var1))AND(CLOSE<var1)),CLOSE,OPEN,9,0),colorFF00FF;
STICKLINE(((((CLOSE<REF(CLOSE,1))AND(CLOSE<REF(CLOSE,1)))AND(HIGH>var1))AND(CLOSE<var1)),CLOSE,OPEN,6,0),colorFF62FF;
STICKLINE(((((CLOSE<REF(CLOSE,1))AND(CLOSE<REF(CLOSE,1)))AND(HIGH>var1))AND(CLOSE<var1)),CLOSE,OPEN,4,0),colorFF76FF;
STICKLINE(((((CLOSE<REF(CLOSE,1))AND(CLOSE<REF(CLOSE,1)))AND(HIGH>var1))AND(CLOSE<var1)),CLOSE,OPEN,2,0),colorFFA8FF;
Ⅳ 纏論中樞畫線公式
G:=MA(C,5);
D:=MA(C,10);
HH:=REF(H,5)=HHV(H,11);
LL:=REF(L,5)=LLV(L,11);
FG01:=BACKSET(HH,6)>BACKSET(HH,5) ;
FD01:=BACKSET(LL,6)>BACKSET(LL,5) ;
FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G>D,FG01,
IF(BARSLAST(FD01)>BARSLAST(FG01),FG01,0));
FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D>G,FD01,
IF(BARSLAST(FG01)>BARSLAST(FD01),FD01,0));
FG0:=FG02 AND H=HHV(H,BARSLAST(FD02));
FD0:=FD02 AND L=LLV(L,BARSLAST(FG02));
GP:=IF(FG0,H,DRAWNULL),CIRCLEDOT,COLORCYAN;
DP:=IF(FD0,L,DRAWNULL),CIRCLEDOT,COLORCYAN;
GQ:=L>REF(H,1) AND DAY!=REF(DAY,1);
DQ:=H<REF(L,1) AND DAY!=REF(DAY,1);
GQL:=REF(L,BARSLAST(GQ));
DQH:=REF(H,BARSLAST(DQ));
FGH:=REF(H,BARSLAST(FG0));
FGL:=REF(L,BARSLAST(FG0));
FGH1:=REF(H,BARSLAST(FG0)+1);
FGL1:=REF(L,BARSLAST(FG0)+1);
FGH2:=REF(H,BARSLAST(FG0)+2);
FGL2:=REF(L,BARSLAST(FG0)+2);
FDH:=REF(H,BARSLAST(FD0));
FDL:=REF(L,BARSLAST(FD0));
FDH1:=REF(H,BARSLAST(FD0)+1);
FDL1:=REF(L,BARSLAST(FD0)+1);
FDH2:=REF(H,BARSLAST(FD0)+2);
FDL2:=REF(L,BARSLAST(FD0)+2);
FGZH:=IF(FGL<=FGL1,FGH2,FGH1);
FGZL:=IF(FGH1<FGL,FGL,IF(FGL<=FGL1,FGL2,FGL1));
FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));
FDZL:=IF(FDH>=FDH1,FDL2,FDL1);
FG1:=FGH>FDZH AND FG0;
FD1:=FDL<FGZL AND FD0;
FG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL;
FD:=FD1 AND FDL<FGL AND FDH<FGH AND FDH1<FGH;
BH0:=(H<=REF(H,1) AND L>=REF(L,1)) OR (H>=REF(H,1) AND L<=REF(L,1));
BHG:=COUNT(BH0,BARSLAST(FD0));
BHD:=COUNT(BH0,BARSLAST(FG0));
BGQ:=COUNT(GQ,BARSLAST(FD0));
BDQ:=COUNT(DQ,BARSLAST(FG0));
BK0:=IF(BHG>0,BHG+2+1,IF(BHD,BHD+2+1,3));
BK:=IF(BGQ,BK0-BGQ,IF(BDQ,BK0-BDQ,BK0));
G1X:=(FG AND BARSLAST(FD)>BK);
D1X:=(FD AND BARSLAST(FG)>BK);
G1:=(FG0 AND REF(H,BARSLAST(FG0))>=REF(H,BARSLAST(G1X)) AND BARSLAST(D1X)>BARSLAST(G1X))
OR (FG1 AND COUNT(GQ,BARSLAST(FD1))>0 AND REF(H,BARSLAST(FG1))>REF(H,BARSLAST(G1X)));
D1:=(FD0 AND REF(L,BARSLAST(FD0))<=REF(L,BARSLAST(D1X)) AND BARSLAST(G1X)>BARSLAST(D1X))
OR (FD1 AND COUNT(DQ,BARSLAST(FG1))>0 AND REF(L,BARSLAST(FD1))<REF(H,BARSLAST(D1X)));
G1H:=IF(BARSLAST(D1)>BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1))),;
D1L:=IF(BARSLAST(G1)>BARSLAST(D1),REF(L,BARSLAST(D1)),REF(L,BARSLAST(G1)));
G2:=G1 AND H=HHV(G1H,BARSLAST(D1)+1) AND H>REF(H,1) AND BARSLAST(D1)>BARSLAST(G1);
D2:=D1 AND L=LLV(D1L,BARSLAST(G1)+1) AND L<REF(L,1) AND BARSLAST(G1)>BARSLAST(D1);
G3:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));
D3:=D2 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));
GPB:=IF(G1X,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;
DPB:=IF(D1X,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;
{畫線}
NN:=G3;
UU:=D3;
L1:DRAWLINE(UU,L,NN, H,0),COLORYELLOW,DOTLINE;
L2:DRAWLINE(NN,H,UU, L,0),COLORWHITE,DOTLINE;