告别亏损！这份机构私藏的缠论指标公式，让我近期爆赚30%+

这个指标的核心，是用代码把缠论那套多级别分析体系给实现了。它主要干了这么几件事儿：

1. 识别不同级别的“笔”：
   • 它像侦探一样，盯着价格的高点（HHV）和低点（LLV） 来回比较。
   • 分别在本级别（BOLL20）、高一级别（BOLL120）、再高一级别（BOLL600） 上，把这些连续的高低点连成线，形成所谓的“笔”。
   • 关键技巧是用 BACKSET 这个函数倒回去找笔的起点和终点，然后用 DRAWLINE 动态地把这些点连成线，画在图上。
2. 画出“中枢”区域：
   • 缠论里，中枢是价格反复震荡的地方。这里规定，连续3笔的价格有重叠部分，就算一个中枢。
   • 代码里会记录最近几笔的高点（HH2/HH1）和低点（LL2/LL1）。
   • 把这些高点里最低的、低点里最高的找出来，一组合，就画出了一个矩形框（通常是黄色或紫色），这就是中枢的“舞台”。
3. 提示买卖机会：
   • 拐点预警： 当出现可能反转的“底分型”或“顶分型”结构时，它会在K线的低点或高点标个星星（☆） 提醒你。
   • 背驰侦查： 它会对比价格创了新高/新低时，MACD的能量柱（A3/A4条件） 有没有跟着变强或减弱。如果价格新高但能量弱了（顶背驰），或价格新低但能量强了（底背驰），就是个重要信号。
   • 趋势风向标： 看一条叫“牛熊线”（慢速EMA34）和“重心线”的关系。它们金叉（牛熊线上穿）可能预示上涨，死叉（牛熊线下穿）可能预示下跌，帮你定多空大方向。
4. 联动多个时间周期：
   • 这个指标的精妙之处在于不同级别是联动的。比如：
     • 本级别的几笔连起来，可能就构成了高一级别的一段走势（线段）。
     • 高一级别的几段走势，又能组成更高一级别的大趋势。
   • 图上甚至会直接在高一级别笔的起点处标注“本级别线段”，让你一眼看清级别之间的演化关系。
5. 动态支撑和压力位：
   • 它不光看缠论结构，还用了一套轮动算法（轮LD/轮HD） 来计算当前可能的支撑和阻力位。
   • 对于做日内交易的，它还特别关注开盘价、以及前一天的最高/最低价区间，并且贴心地提供了开关（夜盘/白盘开关）让你按需启用这些关键位。

几个核心公式举例：

• 找笔的起点 (LX): 它用条件判断和回溯(BACKSET)来定位符合缠论定义的笔的起始低点。
• 算中枢上沿 (上沿): 就是取最近几笔有效高点中的那个最小值 (MIN(HH2, HH1))。
• 定趋势方向 (主趋势线): 用了双重的EMA(34) 来平滑价格，得到一个反映核心趋势的慢速线。

总结来说，这个指标就像个缠论助手：
它通过五个层层嵌套的分析级别（本级别到高二级别），把复杂的缠论结构（笔、中枢）清晰地画在图上。同时，它还结合了MACD背驰信号的验证，以及动态计算的支撑压力位，给交易者提供一个基于缠论、量化的多周期综合分析视角。

笔:=1;
中枢Ⅰ:=1;
白盘:=0;
夜盘:=0;
轮低高:=1;
区间:=1;
SJ:=1;
MA8:=1,NODRAW;//*MA8,,RGB(191,6,30),NOTEXT

SJFH:=1;
日方向:=(SETTLE)*SJFH*SJ,COLORLIGHTRED,LINETHICK2, NOTEXT;
DRAWTEXT(ISLASTBAR,日方向,'^^^ '),COLORWHITE;
DRAWTEXT(C>日方向 AND ISLASTBAR,日方向,' ^^^^^^^^^^^^^ '),COLORWHITE;
DRAWTEXT(C<日方向 AND ISLASTBAR,日方向,' ^^^^^^^^^^^^^ '),COLORGREEN;
DRAWTEXT(C<日方向 AND ISLASTBAR,日方向*SJFH,' ☆'),FONTSIZE26,COLORGREEN;
DRAWTEXT(C>日方向 AND ISLASTBAR,日方向*SJFH,' ☆'),FONTSIZE26,COLORYELLOW;

段Ⅲ:=0;
中枢Ⅲ:=0;
出入NG:=BACKSET(ISLASTBAR,SUMBARS(DAYBARPOS=1,4));
//DRAWHORIZONTALLINE(出入NG && (DAYBARPOS=1)*MA8,H,COLORCYAN),DASHDOTDOT,LINETHICK2;
//DRAWNUMBER(出入NG && REFX(DAYBARPOS=1,1)||ISLASTBAR,VALUEWHEN(DAYBARPOS=1,H),VALUEWHEN(DAYBARPOS=1,H),2,COLORCYAN),ALIGN2,VALIGN1;
ⅢKU1:=IF(HIGH=HHV(HIGH,100),1,0);
ⅢKD1:=IF(LOW=LLV(LOW,100),1,0);
ⅢUL:=IF(REF(ⅢKU1,2)=1 AND REF(ⅢKU1,1)=0
AND ⅢKU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(ⅢKU1,2)=1
AND REF(ⅢKU1,1)=0 AND ⅢKU1=0)));
ⅢDL:=IF(REF(ⅢKD1,2)=1 AND REF(ⅢKD1,1)=0
AND ⅢKD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(ⅢKD1,2)=1
AND REF(ⅢKD1,1)=0 AND ⅢKD1=0)));
ⅢHVX:=H>ⅢUL AND H>REF(H,1);
ⅢLVX:=L<ⅢDL AND L<REF(L,1);
ⅢGP:=BARSLAST(ⅢHVX);
ⅢDP:=BARSLAST(ⅢLVX);
ⅢIP:=IF(ⅢGP=0,ⅢDP,ⅢGP)>3;
ⅢHHV1:=ⅢHVX AND ⅢIP AND H>=HHV(H,BARSLAST(ⅢLVX));
ⅢLV1:=ⅢLVX AND ⅢIP AND L<=LLV(L,BARSLAST(ⅢHVX));
DRAWLINE1(CROSS(BACKSET(ⅢHHV1,BARSLAST(ⅢLV1)+1),0.5),LOW,CROSS(BACKSET(ⅢLV1,BARSLAST(ⅢHHV1)+1),0.5),HIGH,0),COLORYELLOW,LINETHICK2;
DRAWLINE1(CROSS(BACKSET(ⅢLV1,BARSLAST(ⅢHHV1)+1),0.5),HIGH,CROSS(BACKSET(ⅢHHV1,BARSLAST(ⅢLV1)+1),0.5),LOW,0),COLORMAGENTA,LINETHICK2;
ⅢLX:(CROSS(BACKSET(ⅢHHV1,BARSLAST(ⅢLV1)+1),0.5))*MA8,NODRAW,NOTEXT;
ⅢHX:(CROSS(BACKSET(ⅢLV1,BARSLAST(ⅢHHV1)+1),0.5))*MA8,NODRAW,NOTEXT;
ⅢHH12:(CROSS(ⅢHX=1,0.5))*MA8, NOTEXT;
ⅢLL12:(CROSS(ⅢLX=1,0.5))*MA8, NOTEXT;
VERTLINE1(CROSS(BACKSET(ISLASTBAR,BARSLAST(ⅢHH12)+1),0.5)),COLORGREEN,LINETHICK2;
VERTLINE1(CROSS(BACKSET(ISLASTBAR,BARSLAST(ⅢLL12)+1),0.5)),COLORRED,LINETHICK2;
//2、本级别Ⅱ (BOLL60)笔：
//DRAWLINE1(笔*LX,L,HX,H,0),RGB(168,168,168),DOT;//画笔，虚线；
//DRAWLINE1(笔*HX,H,LX,L,0),RGB(168,168,168),DOT;//画笔，虚线；
XⅢZ:BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,12)),NODRAW,NOTEXT;
XⅢ8:CROSS(BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,8)),0.5),NODRAW,NOTEXT;
XⅢ9:CROSS(BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,9)),0.5),NODRAW,NOTEXT;
XⅢ12:CROSS(BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,12)),0.5),NODRAW,NOTEXT;
XⅢ13:CROSS(BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,13)),0.5),NODRAW,NOTEXT;
DRAWLINE1(段Ⅲ*ⅢLX&&XⅢZ,L,ⅢHX&&XⅢZ,H,0),COLORBLUE,LINETHICK1;//画笔，虚线；
DRAWLINE1(段Ⅲ*ⅢHX&&XⅢZ,H,ⅢLX&&XⅢZ,L,0),COLORBLUE,LINETHICK1;//画笔，虚线；
//BOLL26最后一笔(未完成)；
HⅢH:=(ⅢHX)*MA8;
LⅢL:=(ⅢLX)*MA8;
DRAWLINE3(段Ⅲ*ISLASTBAR&&BARSLAST(HⅢH)<BARSLAST(LⅢL),段Ⅲ*VALUEWHEN(HⅢH,H),段Ⅲ*BARSLAST(HⅢH),1,LLV(L,BARSLAST(HⅢH)),LLVBARS(L,BARSLAST(HⅢH)),0),RGB(255,0,0),LINETHICK2;//BOLL26最后一笔(未完成)，向下笔；
DRAWLINE3(段Ⅲ*ISLASTBAR&&BARSLAST(HⅢH)>BARSLAST(LⅢL),段Ⅲ*VALUEWHEN(LⅢL,L),段Ⅲ*BARSLAST(LⅢL),1,HHV(H,BARSLAST(LⅢL)),HHVBARS(H,BARSLAST(LⅢL)),0),RGB(255,0,0),LINETHICK2;//BOLL26最后一笔(未完成)，向上笔；
////////2、画倒数1234的笔；
//2.1、倒数第4笔（已完成）；
ⅢBADS4:=BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,4));
ⅢBBDS4:=BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,5));
DRAWLINE1(段Ⅲ*ⅢLX&&ⅢBBDS4=1&&ⅢBADS4=0,L,ⅢHX,H,0),RGB(255,0,0),LINETHICK1;//向上笔（倒数4），黄色；
DRAWLINE1(段Ⅲ*ⅢHX&&ⅢBBDS4=1&&ⅢBADS4=0,H,ⅢLX,L,0),RGB(255,0,0),LINETHICK1;//向下笔（倒数4），黄色；
//2.2、倒数第2笔（已完成）；
ⅢBADS2:=BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,2));
ⅢBBDS2:=BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,3));
DRAWLINE1(段Ⅲ*ⅢLX&&ⅢBBDS2=1&&ⅢBADS2=0,L,ⅢHX,H,0),COLORBLUE,LINETHICK1;//向上笔（倒数2），紫红色；
DRAWLINE1(段Ⅲ*ⅢHX&&ⅢBBDS2=1&&ⅢBADS2=0,H,ⅢLX,L,0),COLORBLUE,LINETHICK1;//向下笔（倒数2），紫红色；
//2.3、倒数第3笔（已完成）；
ⅢBADS3:=BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,3));
ⅢBBDS3:=BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,4));
DRAWLINE1(段Ⅲ*ⅢLX&&ⅢBBDS3=1&&ⅢBADS3=0,L,ⅢHX,H,0),COLORBLUE,LINETHICK1;//向上笔（倒数3），紫红色；
DRAWLINE1(段Ⅲ*ⅢHX&&ⅢBBDS3=1&&ⅢBADS3=0,H,ⅢLX,L,0),COLORBLUE,LINETHICK1;//向下笔（倒数3），紫红色；
//2.4、倒数第1笔（已完成）；
ⅢBADS1:=BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,1));
ⅢBBDS1:=BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,2));
DRAWLINE1(段Ⅲ*ⅢLX&&ⅢBBDS1=1&&ⅢBADS1=0,L,ⅢHX,H,0),COLORBLUE,LINETHICK1;//向上笔（倒数1），紫红色；
DRAWLINE1(段Ⅲ*ⅢHX&&ⅢBBDS1=1&&ⅢBADS1=0,H,ⅢLX,L,0),COLORBLUE,LINETHICK1;//向下笔（倒数1），紫红色；
////////3、计算笔的长度；
//3.1、BOLL26笔（已完成）的每笔长度；
ⅢBX1:=CROSS(BACKSET(ISLASTBAR&&BARSLAST(HⅢH)<BARSLAST(LⅢL),LLVBARS(L,BARSLAST(HⅢH))+1),0.5);
ⅢBX2:=CROSS(BACKSET(ISLASTBAR&&BARSLAST(HⅢH)>BARSLAST(LⅢL),HHVBARS(H,BARSLAST(LⅢL))+1),0.5);
////////4、笔终点标注文字记号；
//4.1、笔（已完成）终点标注文字；
ⅢBAA:=IF(ⅢLX,L,H);
ⅢBBB:=BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,4));
DRAWTEXT(段Ⅲ*ⅢBBB&&ⅢHX&&COUNT(ⅢHX,BARSLASTCOUNT(ⅢBBB))=1,H,'G2 '),ALIGN0,FONTSIZE18,COLORBLUE;//倒数第2个高点标注文字；
DRAWTEXT(段Ⅲ*ⅢBBB&&ⅢHX&&COUNT(ⅢHX,BARSLASTCOUNT(ⅢBBB))=2,H,'G1 '),ALIGN0,FONTSIZE18,COLORBLUE;//倒数第1个高点标注文字；
DRAWTEXT(段Ⅲ*ⅢBBB&&ⅢLX&&COUNT(ⅢLX,BARSLASTCOUNT(ⅢBBB))=1,L,'D2 '),ALIGN0,VALIGN0,FONTSIZE18,COLORBLUE;//倒数第2个低点标注文字；
DRAWTEXT(段Ⅲ*ⅢBBB&&ⅢLX&&COUNT(ⅢLX,BARSLASTCOUNT(ⅢBBB))=2,L,'D1 '),ALIGN0,VALIGN0,FONTSIZE18,COLORBLUE;//倒数第1个低点标注文字；
ⅢBAA0:=BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,5));
DRAWTEXT(段Ⅲ*CROSS(ⅢBAA0>=1,0.5) && ⅢLX,L,'D3 '),ALIGN0,VALIGN0,FONTSIZE18,COLORBLUE;//倒数第3个低点标注文字；
DRAWTEXT(段Ⅲ*CROSS(ⅢBAA0>=1,0.5) && ⅢHX,H,'G3 '),ALIGN0,FONTSIZE18,COLORBLUE;//倒数第3个高点标注文字；
ⅢBAA1:=BACKSET(ISLASTBAR,SUMBARS(ⅢLX||ⅢHX,6));
DRAWTEXT(段Ⅲ*CROSS(ⅢBAA1>=1,0.5) && ⅢLX,L,'D4 '),ALIGN0,VALIGN0,FONTSIZE18,COLORBLUE;//倒数第4个低点标注文字；
DRAWTEXT(段Ⅲ*CROSS(ⅢBAA1>=1,0.5) && ⅢHX,H,'G4 '),ALIGN0,FONTSIZE18,COLORBLUE;//倒数第4个高点标注文字；
DRAWLINE1(段Ⅲ*XⅢ9,IF(CROSS(ⅢLX=1,0.5),L,H),XⅢ8,IF(CROSS(ⅢHX=1,0.5),H,L),0),COLORBLUE,LINETHICK2;
DRAWLINE1(段Ⅲ*XⅢ13,IF(CROSS(ⅢLX=1,0.5),L,H),XⅢ12,IF(CROSS(ⅢHX=1,0.5),H,L),0),COLORBLUE,LINETHICK2;
//4.2、笔（未完成）的最后1笔标注文字；
ⅢAM26:=BACKSET(ISLASTBAR&&BARSLAST(HⅢH)>BARSLAST(LⅢL),HHVBARS(H,BARSLAST(LⅢL))+1);
ⅢBM26:=BACKSET(ISLASTBAR&&BARSLAST(HⅢH)<BARSLAST(LⅢL),LLVBARS(L,BARSLAST(HⅢH))+1);
DRAWTEXT(CROSS(ⅢAM26,0.5),H,' G0 ？ '),ALIGN0,FONTSIZE18,COLORRED;//最后一笔（未完成）标注文字；
DRAWTEXT(CROSS(ⅢBM26,0.5),L,' D0 ？ '),ALIGN0,VALIGN0,FONTSIZE18,COLORRED;//最后一笔（未完成）标注文字；
////可能的转折点标记文字；
ⅢZQ126:=SUMBARS(CROSS(ⅢAM26,0.5),1);
ⅢTT126:=BACKSET(ISLASTBAR,LLVBARS(L,ⅢZQ126)+1);
DRAWTEXT(CROSS(ⅢTT126,0.5),L,' ☆'),ALIGN1,VALIGN0,FONTSIZE30,COLORRED;//////可能的转折低点标记文字；
ⅢZQ226:=SUMBARS(CROSS(ⅢBM26,0.5),1);
ⅢTT226:=BACKSET(ISLASTBAR,HHVBARS(H,ⅢZQ226)+1);
DRAWTEXT(CROSS(ⅢTT226,0.5),H,' ☆'),ALIGN1,VALIGN2,FONTSIZE30,COLORGREEN;//////可能的转折高点标记文字；
//1、BOLL600垂直线；
ⅢA600:=CROSS(ⅢLX=1,0.5)&&COUNT(CROSS(ⅢLX=1,0.5),BARSLAST(CROSS(ⅢHX=1,0.5))+1)=1;
ⅢB600:=CROSS(ⅢHX=1,0.5)&&COUNT(CROSS(ⅢHX=1,0.5),BARSLAST(CROSS(ⅢLX=1,0.5))+1)=1;
VERTLINE1(BACKSET(ISLASTBAR,SUMBARS(ⅢB600||ⅢA600,1))&&ⅢB600),RGB(0,128,255),DOT,LINETHICK1;//画垂直线
VERTLINE1(BACKSET(ISLASTBAR,SUMBARS(ⅢA600||ⅢB600,1))&&ⅢA600),RGB(0,128,255),DOT,LINETHICK1;//画垂直线

//2、BOLL600横线；
ⅢX600:=BACKSET(ISLASTBAR,BARSLAST(CROSS(ⅢLX=1,0.5)||CROSS(ⅢHX=1,0.5))+1);
DRAWSL(CROSS(ⅢX600,0.5)&&CROSS(ⅢLX=1,0.5),L,0,999,2,RGB(0,151,151)),LINETHICK2;//画横线
DRAWSL(CROSS(ⅢX600,0.5)&&CROSS(ⅢHX=1,0.5),H,0,999,2,RGB(0,151,151)),LINETHICK2;//画横线
DRAWNUMBER1(ISLASTBAR&&BARSLAST(CROSS(ⅢLX=1,0.5))<BARSLAST(CROSS(ⅢHX=1,0.5)), VALUEWHEN(CROSS(ⅢLX=1,0.5),L), VALUEWHEN(CROSS(ⅢLX=1,0.5),L),2),ALIGN0,COLORRED;//写数值
DRAWNUMBER1(ISLASTBAR&&BARSLAST(CROSS(ⅢLX=1,0.5))>BARSLAST(CROSS(ⅢHX=1,0.5)), VALUEWHEN(CROSS(ⅢHX=1,0.5),H), VALUEWHEN(CROSS(ⅢHX=1,0.5),H),2),ALIGN0,COLORRED;//写数值
DRAWTEXT(ISLASTBAR&&BARSLAST(CROSS(ⅢLX=1,0.5))<BARSLAST(CROSS(ⅢHX=1,0.5)), VALUEWHEN(CROSS(ⅢLX=1,0.5),L), ' 高3级别涨笔起点'),VALIGN2,COLORRED;//标注文字
DRAWTEXT(ISLASTBAR&&BARSLAST(CROSS(ⅢLX=1,0.5))>BARSLAST(CROSS(ⅢHX=1,0.5)), VALUEWHEN(CROSS(ⅢHX=1,0.5),H), ' 高3级别跌笔起点'),VALIGN2,COLORRED;//标注文字
DRAWTEXT(BACKSET(ISLASTBAR,SUMBARS(ⅢB600||ⅢA600,1))&&ⅢA600, REFX1(VALUEWHEN(CROSS(ⅢLX=1,0.5),L),100000), ' 高3级别涨笔起点'),VALIGN2,COLORRED;//标注文字
DRAWTEXT(BACKSET(ISLASTBAR,SUMBARS(ⅢA600||ⅢB600,1))&&ⅢB600, REFX1(VALUEWHEN(CROSS(ⅢHX=1,0.5),H),100000), ' 高3级别跌笔起点'),VALIGN2,COLORRED;//标注文字
/////////// 三、高1级别 (BOLL120)的笔（本级别线段）、中枢，高1级别笔起点：
//5.2、BOLL120横线；
ⅢX120:=BACKSET(ISLASTBAR,BARSLAST(CROSS(ⅢLX=1,0.5)||CROSS(ⅢHX=1,0.5))+1);
DRAWSL(CROSS(ⅢX120,0.5)&&CROSS(ⅢLX=1,0.5),L,0,999,2,RGB(168,168,168)),DASH;//画横线
DRAWSL(CROSS(ⅢX120,0.5)&&CROSS(ⅢHX=1,0.5),H,0,999,2,RGB(168,168,168)),DASH;//画横线
DRAWTEXT(ISLASTBAR&&BARSLAST(CROSS(ⅢLX=1,0.5))<BARSLAST(CROSS(ⅢHX=1,0.5)), VALUEWHEN(CROSS(ⅢLX=1,0.5),L), ' 本级别线段 (高1级别升笔起点)'),VALIGN2,RGB(168,168,168);//标注文字
DRAWTEXT(ISLASTBAR&&BARSLAST(CROSS(ⅢLX=1,0.5))>BARSLAST(CROSS(ⅢHX=1,0.5)), VALUEWHEN(CROSS(ⅢHX=1,0.5),H), ' 本级别线段 (高1级别降笔起点)'),VALIGN2,RGB(168,168,168);//标注文字
//中枢Ⅱ:=1;
//笔枢Ⅱ:=1;
//////////画笔中枢框;
ⅢHH2:=VALUEWHEN(ⅢBBB&&CROSS(ⅢHX=1,0.5)&&COUNT(CROSS(ⅢHX=1,0.5),BARSLASTCOUNT(ⅢBBB))=1,H);
ⅢHH1:=VALUEWHEN(ⅢBBB&&CROSS(ⅢHX=1,0.5)&&COUNT(CROSS(ⅢHX=1,0.5),BARSLASTCOUNT(ⅢBBB))=2,H);
ⅢLL2:=VALUEWHEN(ⅢBBB&&CROSS(ⅢLX=1,0.5)&&COUNT(CROSS(ⅢLX=1,0.5),BARSLASTCOUNT(ⅢBBB))=1,L);
ⅢLL1:=VALUEWHEN(ⅢBBB&&CROSS(ⅢLX=1,0.5)&&COUNT(CROSS(ⅢLX=1,0.5),BARSLASTCOUNT(ⅢBBB))=2,L);
//画笔中枢框;

//画笔中枢框延伸部分;
ⅢL1缠:=CROSS(BACKSET(ISLASTBAR,BARSLAST(CROSS(ⅢLX=1,0.5))+1),0.5);
ⅢL2缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅢLX=1,0.5),2)),0.5);
ⅢL3缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅢLX=1,0.5),3)),0.5),ICON(1,'ICO2');
ⅢL4缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅢLX=1,0.5),4)),0.5),ICON(1,'ICO2');
ⅢH1缠:=CROSS(BACKSET(ISLASTBAR,BARSLAST(CROSS(ⅢHX=1,0.5))+1),0.5);
ⅢH2缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅢHX=1,0.5),2)),0.5);
ⅢH3缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅢHX=1,0.5),3)),0.5);
ⅢH4缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅢHX=1,0.5),4)),0.5),ICON(1,'ICO1');
Ⅲ笔期:=BARSLAST(CROSS(ⅢBBB,0.5)),RGB(255,0,255);
ⅢTJX笔升降:=CROSS(ⅢHX=1,0.5)||CROSS(ⅢLX=1,0.5),NODRAW;
ⅢHHX笔升降:=REFX1(VALUEWHEN(ⅢTJX笔升降,H),10000);
ⅢLLX笔升降:=REFX1(LLV(L,BARSLAST(ⅢTJX笔升降)+1),10000);
ⅢHH1X笔升降:=REFX1(HHV(H,BARSLAST(ⅢTJX笔升降)+1),10000);
Ⅲ笔降:=(C-ⅢHH1X笔升降 ),NODRAW,COLORLIGHTGREEN;
Ⅲ笔升:=(C-ⅢLLX笔升降 ),NODRAW,COLORRED;
Ⅲ笔涨:=IF(Ⅲ笔升>Ⅲ笔降,Ⅲ笔升,NULL),COLORRED;
Ⅲ笔跌:=IF(Ⅲ笔升>Ⅲ笔降,Ⅲ笔降,NULL),COLORGREEN;
Ⅲ笔反:=IF(Ⅲ笔升<Ⅲ笔降,Ⅲ笔升,NULL),COLORYELLOW,NODRAW;
Ⅲ笔回:=IF(Ⅲ笔升<Ⅲ笔降,Ⅲ笔降,NULL),COLORCYAN,NODRAW;
//填充中枢；
ⅢHHH2:=REFX1(VALUEWHEN(ⅢBBB&&CROSS(ⅢHX=1,0.5)&&COUNT(CROSS(ⅢHX=1,0.5),BARSLASTCOUNT(ⅢBBB))=1,H),99999);
ⅢHHH1:=REFX1(VALUEWHEN(ⅢBBB&&CROSS(ⅢHX=1,0.5)&&COUNT(CROSS(ⅢHX=1,0.5),BARSLASTCOUNT(ⅢBBB))=2,H),99999);
ⅢLLL2:=REFX1(VALUEWHEN(ⅢBBB&&CROSS(ⅢLX=1,0.5)&&COUNT(CROSS(ⅢLX=1,0.5),BARSLASTCOUNT(ⅢBBB))=1,L),99999);
ⅢLLL1:=REFX1(VALUEWHEN(ⅢBBB&&CROSS(ⅢLX=1,0.5)&&COUNT(CROSS(ⅢLX=1,0.5),BARSLASTCOUNT(ⅢBBB))=2,L),99999);
ⅢAA:BACKSET(ISLASTBAR,MAX(BARSLAST(ⅢH2缠),BARSLAST(ⅢL2缠))+1),NODRAW,NOTEXT;
ⅢBB:BACKSET(ISLASTBAR,MIN(BARSLAST(ⅢH1缠),BARSLAST(ⅢL1缠))+1),NODRAW,NOTEXT;
ⅢZXZ:(IF(ISNULL( ⅢAA),0,ⅢAA)+IF(ISNULL( ⅢBB),0,ⅢBB))=1|| REF((IF(ISNULL( ⅢAA),0,ⅢAA)+IF(ISNULL( ⅢBB),0,ⅢBB))=1,1),NODRAW,NOTEXT;
Ⅱ笔段:=0;
//缠论线开关:=0;//笔中枢;
ⅡKU1:=IF(HIGH=HHV(HIGH,60),1,0);
ⅡKD1:=IF(LOW=LLV(LOW,60),1,0);
ⅡUL:=IF(REF(ⅡKU1,2)=1 AND REF(ⅡKU1,1)=0
AND ⅡKU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(ⅡKU1,2)=1
AND REF(ⅡKU1,1)=0 AND ⅡKU1=0)));
ⅡDL:=IF(REF(ⅡKD1,2)=1 AND REF(ⅡKD1,1)=0
AND ⅡKD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(ⅡKD1,2)=1
AND REF(ⅡKD1,1)=0 AND ⅡKD1=0)));
ⅡHVX:=H>ⅡUL AND H>REF(H,1);
ⅡLVX:=L<ⅡDL AND L<REF(L,1);
ⅡGP:=BARSLAST(ⅡHVX);
ⅡDP:=BARSLAST(ⅡLVX);
ⅡIP:=IF(ⅡGP=0,ⅡDP,ⅡGP)>3;
ⅡHHV1:=ⅡHVX AND ⅡIP AND H>=HHV(H,BARSLAST(ⅡLVX));
ⅡLV1:=ⅡLVX AND ⅡIP AND L<=LLV(L,BARSLAST(ⅡHVX));
ⅡLX:(CROSS(BACKSET(ⅡHHV1,BARSLAST(ⅡLV1)+1),0.5))*MA8,NODRAW,NOTEXT;
ⅡHX:(CROSS(BACKSET(ⅡLV1,BARSLAST(ⅡHHV1)+1),0.5))*MA8,NODRAW,NOTEXT;
ⅡHH12:(CROSS(ⅡHX=1,0.5))*MA8, NOTEXT;
ⅡLL12:(CROSS(ⅡLX=1,0.5))*MA8, NOTEXT;
VERTLINE1(CROSS(BACKSET(ISLASTBAR,BARSLAST(ⅡHH12)+1),0.5)),COLORCYAN,LINETHICK1;
VERTLINE1(CROSS(BACKSET(ISLASTBAR,BARSLAST(ⅡLL12)+1),0.5)),COLORLIGHTRED,LINETHICK1;
XⅡZ:BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,12)),NODRAW,NOTEXT;
XⅡ8:CROSS(BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,8)),0.5),NODRAW,NOTEXT;
XⅡ9:CROSS(BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,9)),0.5),NODRAW,NOTEXT;
XⅡ12:CROSS(BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,12)),0.5),NODRAW,NOTEXT;
XⅡ13:CROSS(BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,13)),0.5),NODRAW,NOTEXT;
DRAWLINE1(Ⅱ笔段*ⅡLX&&XⅡZ,L,ⅡHX&&XⅡZ,H,0),RGB(255,128,255),LINETHICK1;//画笔，虚线；
DRAWLINE1(Ⅱ笔段*ⅡHX&&XⅡZ,H,ⅡLX&&XⅡZ,L,0),RGB(255,128,255),LINETHICK1;//画笔，虚线；
//BOLL26最后一笔(未完成)；
HⅡH:=(ⅡHX)*MA8;
LⅡL:=(ⅡLX)*MA8;
DRAWLINE3(Ⅱ笔段*ISLASTBAR&&BARSLAST(HⅡH)<BARSLAST(LⅡL),Ⅱ笔段*VALUEWHEN(HⅡH,H),Ⅱ笔段*BARSLAST(HⅡH),1,LLV(L,BARSLAST(HⅡH)),LLVBARS(L,BARSLAST(HⅡH)),0),RGB(255,128,64),LINETHICK2;//BOLL26最后一笔(未完成)，向下笔；
DRAWLINE3(Ⅱ笔段*ISLASTBAR&&BARSLAST(HⅡH)>BARSLAST(LⅡL),Ⅱ笔段*VALUEWHEN(LⅡL,L),Ⅱ笔段*BARSLAST(LⅡL),1,HHV(H,BARSLAST(LⅡL)),HHVBARS(H,BARSLAST(LⅡL)),0),RGB(255,128,64),LINETHICK2;//BOLL26最后一笔(未完成)，向上笔；
////////2、画倒数1234的笔；
//2.1、倒数第4笔（已完成）；
ⅡBADS4:=BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,4));
ⅡBBDS4:=BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,5));
DRAWLINE1(Ⅱ笔段*ⅡLX&&ⅡBBDS4=1&&ⅡBADS4=0,L,ⅡHX,H,0),RGB(255,128,64),LINETHICK1;//向上笔（倒数4），黄色；
DRAWLINE1(Ⅱ笔段*ⅡHX&&ⅡBBDS4=1&&ⅡBADS4=0,H,ⅡLX,L,0),RGB(255,128,64),LINETHICK1;//向下笔（倒数4），黄色；
//2.2、倒数第2笔（已完成）；
ⅡBADS2:=BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,2));
ⅡBBDS2:=BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,3));
DRAWLINE1(Ⅱ笔段*ⅡLX&&ⅡBBDS2=1&&ⅡBADS2=0,L,ⅡHX,H,0),RGB(255,128,255),LINETHICK1;//向上笔（倒数2），紫红色；
DRAWLINE1(Ⅱ笔段*ⅡHX&&ⅡBBDS2=1&&ⅡBADS2=0,H,ⅡLX,L,0),RGB(255,128,255),LINETHICK1;//向下笔（倒数2），紫红色；
//2.3、倒数第3笔（已完成）；
ⅡBADS3:=BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,3));
ⅡBBDS3:=BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,4));
DRAWLINE1(Ⅱ笔段*ⅡLX&&ⅡBBDS3=1&&ⅡBADS3=0,L,ⅡHX,H,0),RGB(255,128,255),LINETHICK1;//向上笔（倒数3），紫红色；
DRAWLINE1(Ⅱ笔段*ⅡHX&&ⅡBBDS3=1&&ⅡBADS3=0,H,ⅡLX,L,0),RGB(255,128,255),LINETHICK1;//向下笔（倒数3），紫红色；
//2.4、倒数第1笔（已完成）；
ⅡBADS1:=BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,1));
ⅡBBDS1:=BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,2));
DRAWLINE1(Ⅱ笔段*ⅡLX&&ⅡBBDS1=1&&ⅡBADS1=0,L,ⅡHX,H,0),RGB(255,128,255),LINETHICK1;//向上笔（倒数1），紫红色；
DRAWLINE1(Ⅱ笔段*ⅡHX&&ⅡBBDS1=1&&ⅡBADS1=0,H,ⅡLX,L,0),RGB(255,128,255),LINETHICK1;//向下笔（倒数1），紫红色；
////////3、计算笔的长度；
//3.1、BOLL26笔（已完成）的每笔长度；
DRAWNUMBER1(Ⅱ笔段*REFX(ⅡLX,5),REFX(L,5),REFX((L-VALUEWHEN(ⅡHX,H)),5),2),ALIGN2,VALIGN2,RGB(255,128,255);//向下笔（已完成）长度，保留2位小数；
DRAWNUMBER1(Ⅱ笔段*REFX(ⅡHX,5),REFX(H,5),REFX((H-VALUEWHEN(ⅡLX,L)),5),2),ALIGN2,VALIGN0,RGB(255,128,255);//向上笔（已完成）长度，保留2位小数；
//BOLL26最后一笔（未完成）长度；
ⅡBX1:=CROSS(BACKSET(ISLASTBAR&&BARSLAST(HⅡH)<BARSLAST(LⅡL),LLVBARS(L,BARSLAST(HⅡH))+1),0.5);
ⅡBX2:=CROSS(BACKSET(ISLASTBAR&&BARSLAST(HⅡH)>BARSLAST(LⅡL),HHVBARS(H,BARSLAST(LⅡL))+1),0.5);
DRAWNUMBER1(Ⅱ笔段*REFX(ⅡBX1,5),REFX(L,5),REFX((L-VALUEWHEN(ⅡHX,H)),5),2),ALIGN2,VALIGN2,RGB(255,128,255);//向下笔（未完成）长度，保留2位小数；
DRAWNUMBER1(Ⅱ笔段*REFX(ⅡBX2,5),REFX(H,5),REFX((H-VALUEWHEN(ⅡLX,L)),5),2),ALIGN2,VALIGN0,RGB(255,128,255);//向上笔（未完成）长度，保留2位小数；
////////4、笔终点标注文字记号；
//4.1、笔（已完成）终点标注文字；
ⅡBAA:=IF(ⅡLX,L,H);
ⅡBBB:=BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,4));
DRAWTEXT(Ⅱ笔段*ⅡBBB&&ⅡHX&&COUNT(ⅡHX,BARSLASTCOUNT(ⅡBBB))=1,H,'G2 '),ALIGN0,FONTSIZE18,RGB(255,128,255);//倒数第2个高点标注文字；
DRAWTEXT(Ⅱ笔段*ⅡBBB&&ⅡHX&&COUNT(ⅡHX,BARSLASTCOUNT(ⅡBBB))=2,H,'G1 '),ALIGN0,FONTSIZE18,RGB(255,128,255);//倒数第1个高点标注文字；
DRAWTEXT(Ⅱ笔段*ⅡBBB&&ⅡLX&&COUNT(ⅡLX,BARSLASTCOUNT(ⅡBBB))=1,L,'D2 '),ALIGN0,VALIGN0,FONTSIZE18,RGB(255,128,255);//倒数第2个低点标注文字；
DRAWTEXT(Ⅱ笔段*ⅡBBB&&ⅡLX&&COUNT(ⅡLX,BARSLASTCOUNT(ⅡBBB))=2,L,'D1 '),ALIGN0,VALIGN0,FONTSIZE18,RGB(255,128,255);//倒数第1个低点标注文字；
ⅡBAA0:=BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,5));
DRAWTEXT(Ⅱ笔段*CROSS(ⅡBAA0>=1,0.5) && ⅡLX,L,'D3 '),ALIGN0,VALIGN0,FONTSIZE18,RGB(155,155,155);//倒数第3个低点标注文字；
DRAWTEXT(Ⅱ笔段*CROSS(ⅡBAA0>=1,0.5) && ⅡHX,H,'G3 '),ALIGN0,FONTSIZE18,RGB(155,155,155);//倒数第3个高点标注文字；
ⅡBAA1:=BACKSET(ISLASTBAR,SUMBARS(ⅡLX||ⅡHX,6));
DRAWTEXT(Ⅱ笔段*CROSS(ⅡBAA1>=1,0.5) && ⅡLX,L,'D4 '),ALIGN0,VALIGN0,FONTSIZE18,RGB(155,155,155);//倒数第4个低点标注文字；
DRAWTEXT(Ⅱ笔段*CROSS(ⅡBAA1>=1,0.5) && ⅡHX,H,'G4 '),ALIGN0,FONTSIZE18,RGB(155,155,155);//倒数第4个高点标注文字；
DRAWLINE1(Ⅱ笔段*XⅡ9,IF(CROSS(ⅡLX=1,0.5),L,H),XⅡ8,IF(CROSS(ⅡHX=1,0.5),H,L),0),RGB(255,128,64),LINETHICK2;
DRAWLINE1(Ⅱ笔段*XⅡ13,IF(CROSS(ⅡLX=1,0.5),L,H),XⅡ12,IF(CROSS(ⅡHX=1,0.5),H,L),0),RGB(255,128,64),LINETHICK2;
//4.2、笔（未完成）的最后1笔标注文字；
ⅡAM26:=BACKSET(ISLASTBAR&&BARSLAST(HⅡH)>BARSLAST(LⅡL),HHVBARS(H,BARSLAST(LⅡL))+1);
ⅡBM26:=BACKSET(ISLASTBAR&&BARSLAST(HⅡH)<BARSLAST(LⅡL),LLVBARS(L,BARSLAST(HⅡH))+1);
DRAWTEXT(CROSS(ⅡAM26,0.5),H,' G0 ？ '),ALIGN0,FONTSIZE18,RGB(255,128,64);//最后一笔（未完成）标注文字；
DRAWTEXT(CROSS(ⅡBM26,0.5),L,' D0 ？ '),ALIGN0,VALIGN0,FONTSIZE18,RGB(255,128,64);//最后一笔（未完成）标注文字；
////可能的转折点标记文字；
ⅡZQ126:=SUMBARS(CROSS(ⅡAM26,0.5),1);
ⅡTT126:=BACKSET(ISLASTBAR,LLVBARS(L,ⅡZQ126)+1);
DRAWTEXT(CROSS(ⅡTT126,0.5),L,' ☆'),ALIGN1,VALIGN0,FONTSIZE26,COLORMAGENTA;//////可能的转折低点标记文字；
ⅡZQ226:=SUMBARS(CROSS(ⅡBM26,0.5),1);
ⅡTT226:=BACKSET(ISLASTBAR,HHVBARS(H,ⅡZQ226)+1);
DRAWTEXT(CROSS(ⅡTT226,0.5),H,' ☆'),ALIGN1,VALIGN2,FONTSIZE26,COLORCYAN;//////可能的转折高点标记文字；
//5.2、BOLL120横线；
ⅡX120:=BACKSET(ISLASTBAR,BARSLAST(CROSS(ⅡLX=1,0.5)||CROSS(ⅡHX=1,0.5))+1);
DRAWSL(CROSS(ⅡX120,0.5)&&CROSS(ⅡLX=1,0.5),L,0,999,2,RGB(168,168,168)),DASH;//画横线
DRAWSL(CROSS(ⅡX120,0.5)&&CROSS(ⅡHX=1,0.5),H,0,999,2,RGB(168,168,168)),DASH;//画横线
DRAWTEXT(ISLASTBAR&&BARSLAST(CROSS(ⅡLX=1,0.5))<BARSLAST(CROSS(ⅡHX=1,0.5)), VALUEWHEN(CROSS(ⅡLX=1,0.5),L), ' 本级别线段 (高1级别升笔起点)'),VALIGN2,RGB(168,168,168);//标注文字
DRAWTEXT(ISLASTBAR&&BARSLAST(CROSS(ⅡLX=1,0.5))>BARSLAST(CROSS(ⅡHX=1,0.5)), VALUEWHEN(CROSS(ⅡHX=1,0.5),H), ' 本级别线段 (高1级别降笔起点)'),VALIGN2,RGB(168,168,168);//标注文字
//1、BOLL600垂直线；
A600:=CROSS(ⅡLX=1,0.5)&&COUNT(CROSS(ⅡLX=1,0.5),BARSLAST(CROSS(ⅡHX=1,0.5))+1)=1;
B600:=CROSS(ⅡHX=1,0.5)&&COUNT(CROSS(ⅡHX=1,0.5),BARSLAST(CROSS(ⅡLX=1,0.5))+1)=1;
VERTLINE1(BACKSET(ISLASTBAR,SUMBARS(B600||A600,1))&&B600),RGB(0,128,255),DOT,LINETHICK1;//画垂直线
VERTLINE1(BACKSET(ISLASTBAR,SUMBARS(A600||B600,1))&&A600),RGB(0,128,255),DOT,LINETHICK1;//画垂直线

//2、BOLL600横线；
X600:=BACKSET(ISLASTBAR,BARSLAST(CROSS(ⅡLX=1,0.5)||CROSS(ⅡHX=1,0.5))+1);
DRAWSL(CROSS(X600,0.5)&&CROSS(ⅡLX=1,0.5),L,0,999,2,RGB(0,128,255)),LINETHICK2;//画横线
DRAWSL(CROSS(X600,0.5)&&CROSS(ⅡHX=1,0.5),H,0,999,2,RGB(0,128,255)),LINETHICK2;//画横线
DRAWNUMBER1(ISLASTBAR&&BARSLAST(CROSS(ⅡLX=1,0.5))<BARSLAST(CROSS(ⅡHX=1,0.5)), VALUEWHEN(CROSS(ⅡLX=1,0.5),L), VALUEWHEN(CROSS(ⅡLX=1,0.5),L),2),ALIGN0,RGB(0,128,255);//写数值
DRAWNUMBER1(ISLASTBAR&&BARSLAST(CROSS(ⅡLX=1,0.5))>BARSLAST(CROSS(ⅡHX=1,0.5)), VALUEWHEN(CROSS(ⅡHX=1,0.5),H), VALUEWHEN(CROSS(ⅡHX=1,0.5),H),2),ALIGN0,RGB(0,128,255);//写数值
DRAWTEXT(ISLASTBAR&&BARSLAST(CROSS(ⅡLX=1,0.5))<BARSLAST(CROSS(ⅡHX=1,0.5)), VALUEWHEN(CROSS(ⅡLX=1,0.5),L), ' 高2级别涨笔起点'),VALIGN0,RGB(0,128,255);//标注文字
DRAWTEXT(ISLASTBAR&&BARSLAST(CROSS(ⅡLX=1,0.5))>BARSLAST(CROSS(ⅡHX=1,0.5)), VALUEWHEN(CROSS(ⅡHX=1,0.5),H), ' 高2级别跌笔起点'),VALIGN0,RGB(0,128,255);//标注文字
DRAWTEXT(BACKSET(ISLASTBAR,SUMBARS(B600||A600,1))&&A600, REFX1(VALUEWHEN(CROSS(ⅡLX=1,0.5),L),100000), ' 高2级别涨笔起点'),VALIGN0,RGB(77,166,255);//标注文字
DRAWTEXT(BACKSET(ISLASTBAR,SUMBARS(A600||B600,1))&&B600, REFX1(VALUEWHEN(CROSS(ⅡHX=1,0.5),H),100000), ' 高2级别跌笔起点'),VALIGN0,RGB(77,166,255);//标注文字
/////////// 三、高1级别 (BOLL120)的笔（本级别线段）、中枢，高1级别笔起点：
中枢Ⅱ:=0;

//笔枢Ⅰ:=1;
//////////画笔中枢框;
ⅡHH2:=VALUEWHEN(ⅡBBB&&CROSS(ⅡHX=1,0.5)&&COUNT(CROSS(ⅡHX=1,0.5),BARSLASTCOUNT(ⅡBBB))=1,H);
ⅡHH1:=VALUEWHEN(ⅡBBB&&CROSS(ⅡHX=1,0.5)&&COUNT(CROSS(ⅡHX=1,0.5),BARSLASTCOUNT(ⅡBBB))=2,H);
ⅡLL2:=VALUEWHEN(ⅡBBB&&CROSS(ⅡLX=1,0.5)&&COUNT(CROSS(ⅡLX=1,0.5),BARSLASTCOUNT(ⅡBBB))=1,L);
ⅡLL1:=VALUEWHEN(ⅡBBB&&CROSS(ⅡLX=1,0.5)&&COUNT(CROSS(ⅡLX=1,0.5),BARSLASTCOUNT(ⅡBBB))=2,L);
//画笔中枢框;
ⅡNG:=BARSLASTCOUNT(ⅡHH2>0 || ⅡHH1>0 || ⅡLL2>0 || ⅡLL1>0)=1;
ⅡNGG:=BARSLASTCOUNT(ⅡHH2>0 && ⅡHH1>0 && ⅡLL2>0 && ⅡLL1>0)=1;
ⅡAA沿:BACKSET(中枢Ⅱ*ⅡNGG,SUMBARS(ⅡNG,1)),NODRAW,NOTEXT;
Ⅱ上沿:IF(EXIST( BACKSET(中枢Ⅱ*ⅡNGG,SUMBARS(ⅡNG,1)),BARPOS),REFX1(VALUEWHEN(ⅡAA沿=1,MIN(ⅡHH2,ⅡHH1)),1000),NULL),RGB(255,0,255),NOTEXT;
Ⅱ下沿:IF(EXIST( BACKSET(中枢Ⅱ*ⅡNGG,SUMBARS(ⅡNG,1)),BARPOS),REFX1(VALUEWHEN(ⅡAA沿=1,MAX(ⅡLL2,ⅡLL1)),1000),NULL),RGB(255,0,255),NOTEXT;
Ⅱ中间:=IF(EXIST( BACKSET(中枢Ⅱ*ⅡNGG,SUMBARS(ⅡNG,1)),BARPOS),(REFX1(VALUEWHEN(ⅡAA沿=1,MAX(ⅡLL2,ⅡLL1)),1000)+REFX1(VALUEWHEN(ⅡAA沿=1,MIN(ⅡHH2,ⅡHH1)),1000))/2,NULL),RGB(128,128,255),NOTEXT;

//画笔中枢框延伸部分;
ⅡL1缠:=CROSS(BACKSET(ISLASTBAR,BARSLAST(CROSS(ⅡLX=1,0.5))+1),0.5);
ⅡL2缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅡLX=1,0.5),2)),0.5);
ⅡL3缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅡLX=1,0.5),3)),0.5),ICON(1,'ICO2');
ⅡL4缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅡLX=1,0.5),4)),0.5),ICON(1,'ICO2');
ⅡH1缠:=CROSS(BACKSET(ISLASTBAR,BARSLAST(CROSS(ⅡHX=1,0.5))+1),0.5);
ⅡH2缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅡHX=1,0.5),2)),0.5);
ⅡH3缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅡHX=1,0.5),3)),0.5);
ⅡH4缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(ⅡHX=1,0.5),4)),0.5),ICON(1,'ICO1');
Ⅱ笔期:=BARSLAST(CROSS(ⅡBBB,0.5)),RGB(255,0,255);
ⅡTJX笔升降:=CROSS(ⅡHX=1,0.5)||CROSS(ⅡLX=1,0.5),NODRAW;
ⅡHHX笔升降:=REFX1(VALUEWHEN(ⅡTJX笔升降,H),10000);
ⅡLLX笔升降:=REFX1(LLV(L,BARSLAST(ⅡTJX笔升降)+1),10000);
ⅡHH1X笔升降:=REFX1(HHV(H,BARSLAST(ⅡTJX笔升降)+1),10000);
Ⅱ笔降:=(C-ⅡHH1X笔升降 ),NODRAW,COLORLIGHTGREEN;
Ⅱ笔升:=(C-ⅡLLX笔升降 ),NODRAW,COLORRED;
Ⅱ:=IF(Ⅱ笔升>Ⅱ笔降,Ⅱ笔升,NULL),COLORRED;
跌:=IF(Ⅱ笔升>Ⅱ笔降,Ⅱ笔降,NULL),COLORGREEN;
Ⅱ反:=IF(Ⅱ笔升<Ⅱ笔降,Ⅱ笔升,NULL),COLORYELLOW,NODRAW;
Ⅱ回:=IF(Ⅱ笔升<Ⅱ笔降,Ⅱ笔降,NULL),COLORCYAN,NODRAW;


//填充中枢；
ⅡHHH2:=REFX1(VALUEWHEN(ⅡBBB&&CROSS(ⅡHX=1,0.5)&&COUNT(CROSS(ⅡHX=1,0.5),BARSLASTCOUNT(ⅡBBB))=1,H),99999);
ⅡHHH1:=REFX1(VALUEWHEN(ⅡBBB&&CROSS(ⅡHX=1,0.5)&&COUNT(CROSS(ⅡHX=1,0.5),BARSLASTCOUNT(ⅡBBB))=2,H),99999);
ⅡLLL2:=REFX1(VALUEWHEN(ⅡBBB&&CROSS(ⅡLX=1,0.5)&&COUNT(CROSS(ⅡLX=1,0.5),BARSLASTCOUNT(ⅡBBB))=1,L),99999);
ⅡLLL1:=REFX1(VALUEWHEN(ⅡBBB&&CROSS(ⅡLX=1,0.5)&&COUNT(CROSS(ⅡLX=1,0.5),BARSLASTCOUNT(ⅡBBB))=2,L),99999);
ⅡAA:BACKSET(ISLASTBAR,MAX(BARSLAST(ⅡH2缠),BARSLAST(ⅡL2缠))+1),NODRAW,NOTEXT;
ⅡBB:BACKSET(ISLASTBAR,MIN(BARSLAST(ⅡH1缠),BARSLAST(ⅡL1缠))+1),NODRAW,NOTEXT;
ⅡZXZ:(IF(ISNULL( ⅡAA),0,ⅡAA)+IF(ISNULL( ⅡBB),0,ⅡBB))=1|| REF((IF(ISNULL( ⅡAA),0,ⅡAA)+IF(ISNULL( ⅡBB),0,ⅡBB))=1,1),NODRAW,NOTEXT;

//缠论线开关:=0;//笔中枢;ⅢⅡ
KU1:=IF(HIGH=HHV(HIGH,22),1,0);
KD1:=IF(LOW=LLV(LOW,22),1,0);
UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0
AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1
AND REF(KU1,1)=0 AND KU1=0)));
DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0
AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1
AND REF(KD1,1)=0 AND KD1=0)));
HVX:=H>UL AND H>REF(H,1);
LVX:=L<DL AND L<REF(L,1);
GP:=BARSLAST(HVX);
DP:=BARSLAST(LVX);
IP:=IF(GP=0,DP,GP)>3;
HHV1:=HVX AND IP AND H>=HHV(H,BARSLAST(LVX));
LV1:=LVX AND IP AND L<=LLV(L,BARSLAST(HVX));
DRAWLINE1(CROSS(MA8*笔*BACKSET(HHV1,BARSLAST(LV1)+1),0.5),LOW,CROSS(MA8*笔*BACKSET(LV1,BARSLAST(HHV1)+1),0.5),HIGH,0),COLORGREEN,LINETHICK2;
DRAWLINE1(CROSS(MA8*笔*BACKSET(LV1,BARSLAST(HHV1)+1),0.5),HIGH,CROSS(MA8*笔*BACKSET(HHV1,BARSLAST(LV1)+1),0.5),LOW,0),COLORMAGENTA,LINETHICK2;
LX:(CROSS(BACKSET(HHV1,BARSLAST(LV1)+1),0.5))*MA8,NODRAW,NOTEXT;
HX:(CROSS(BACKSET(LV1,BARSLAST(HHV1)+1),0.5))*MA8,NODRAW,NOTEXT;
HH12:(CROSS(HX=1,0.5))*MA8, NOTEXT;
LL12:(CROSS(LX=1,0.5))*MA8, NOTEXT;
VERTLINE1(CROSS(BACKSET(ISLASTBAR,BARSLAST(HH12)+1),0.5)),DOT,COLORGREEN,LINETHICK1;
VERTLINE1(CROSS(BACKSET(ISLASTBAR,BARSLAST(LL12)+1),0.5)),DOT,COLORMAGENTA,LINETHICK1;

//1、本级别 (BOLL20)笔：
DRAWLINE1(笔*LX,L,HX,H,0),RGB(168,168,168),DOT;//画笔，虚线；
DRAWLINE1(笔*HX,H,LX,L,0),RGB(168,168,168),DOT;//画笔，虚线；
XZ:BACKSET(ISLASTBAR,SUMBARS(LX||HX,12)),NODRAW,NOTEXT;
X8:CROSS(BACKSET(ISLASTBAR,SUMBARS(LX||HX,8)),0.5),NODRAW,NOTEXT;
X9:CROSS(BACKSET(ISLASTBAR,SUMBARS(LX||HX,9)),0.5),NODRAW,NOTEXT;
X12:CROSS(BACKSET(ISLASTBAR,SUMBARS(LX||HX,12)),0.5),NODRAW,NOTEXT;
X13:CROSS(BACKSET(ISLASTBAR,SUMBARS(LX||HX,13)),0.5),NODRAW,NOTEXT;
DRAWLINE1(笔*LX&&XZ,L,HX&&XZ,H,0),RGB(128,128,255),LINETHICK1;//画笔，虚线；
DRAWLINE1(笔*HX&&XZ,H,LX&&XZ,L,0),RGB(128,128,255),LINETHICK1;//画笔，虚线；
//BOLL26最后一笔(未完成)；
HH:=(HX)*MA8;
LL:=(LX)*MA8;
DRAWLINE3(笔*ISLASTBAR&&BARSLAST(HH)<BARSLAST(LL),笔*VALUEWHEN(HH,H),笔*BARSLAST(HH),1,LLV(L,BARSLAST(HH)),LLVBARS(L,BARSLAST(HH)),0),RGB(200,200,0),LINETHICK1;//BOLL26最后一笔(未完成)，向下笔；
DRAWLINE3(笔*ISLASTBAR&&BARSLAST(HH)>BARSLAST(LL),笔*VALUEWHEN(LL,L),笔*BARSLAST(LL),1,HHV(H,BARSLAST(LL)),HHVBARS(H,BARSLAST(LL)),0),RGB(200,200,0),LINETHICK1;//BOLL26最后一笔(未完成)，向上笔；
////////2、画倒数1234的笔；
//2.1、倒数第4笔（已完成）；
BADS4:=BACKSET(ISLASTBAR,SUMBARS(LX||HX,4));
BBDS4:=BACKSET(ISLASTBAR,SUMBARS(LX||HX,5));
DRAWLINE1(笔*LX&&BBDS4=1&&BADS4=0,L,HX,H,0),RGB(200,200,0),LINETHICK2;//向上笔（倒数4），黄色；
DRAWLINE1(笔*HX&&BBDS4=1&&BADS4=0,H,LX,L,0),RGB(200,200,0),LINETHICK2;//向下笔（倒数4），黄色；
//2.2、倒数第2笔（已完成）；
BADS2:=BACKSET(ISLASTBAR,SUMBARS(LX||HX,2));
BBDS2:=BACKSET(ISLASTBAR,SUMBARS(LX||HX,3));
DRAWLINE1(笔*LX&&BBDS2=1&&BADS2=0,L,HX,H,0),RGB(128,128,255),LINETHICK1;//向上笔（倒数2），紫红色；
DRAWLINE1(笔*HX&&BBDS2=1&&BADS2=0,H,LX,L,0),RGB(128,128,255),LINETHICK1;//向下笔（倒数2），紫红色；
//2.3、倒数第3笔（已完成）；
BADS3:=BACKSET(ISLASTBAR,SUMBARS(LX||HX,3));
BBDS3:=BACKSET(ISLASTBAR,SUMBARS(LX||HX,4));
DRAWLINE1(笔*LX&&BBDS3=1&&BADS3=0,L,HX,H,0),RGB(128,128,255),LINETHICK1;//向上笔（倒数3），紫红色；
DRAWLINE1(笔*HX&&BBDS3=1&&BADS3=0,H,LX,L,0),RGB(128,128,255),LINETHICK1;//向下笔（倒数3），紫红色；
//2.4、倒数第1笔（已完成）；
BADS1:=BACKSET(ISLASTBAR,SUMBARS(LX||HX,1));
BBDS1:=BACKSET(ISLASTBAR,SUMBARS(LX||HX,2));
DRAWLINE1(笔*LX&&BBDS1=1&&BADS1=0,L,HX,H,0),RGB(128,128,255),LINETHICK1;//向上笔（倒数1），紫红色；
DRAWLINE1(笔*HX&&BBDS1=1&&BADS1=0,H,LX,L,0),RGB(128,128,255),LINETHICK1;//向下笔（倒数1），紫红色；
////////3、计算笔的长度；
//3.1、BOLL26笔（已完成）的每笔长度；
DRAWNUMBER1(笔*REFX(LX,5),REFX(L,5),REFX((L-VALUEWHEN(HX,H)),5),2),ALIGN2,VALIGN0,RGB(128,128,255);//向下笔（已完成）长度，保留2位小数；
DRAWNUMBER1(笔*REFX(HX,5),REFX(H,5),REFX((H-VALUEWHEN(LX,L)),5),2),ALIGN2,VALIGN2,RGB(128,128,255);//向上笔（已完成）长度，保留2位小数；
//BOLL26最后一笔（未完成）长度；
BX1:=CROSS(BACKSET(ISLASTBAR&&BARSLAST(HH)<BARSLAST(LL),LLVBARS(L,BARSLAST(HH))+1),0.5);
BX2:=CROSS(BACKSET(ISLASTBAR&&BARSLAST(HH)>BARSLAST(LL),HHVBARS(H,BARSLAST(LL))+1),0.5);
DRAWNUMBER1(笔*REFX(BX1,5),REFX(L,5),REFX((L-VALUEWHEN(HX,H)),5),2),ALIGN2,VALIGN0,RGB(128,128,255);//向下笔（未完成）长度，保留2位小数；
DRAWNUMBER1(笔*REFX(BX2,5),REFX(H,5),REFX((H-VALUEWHEN(LX,L)),5),2),ALIGN2,VALIGN0,RGB(128,128,255);//向上笔（未完成）长度，保留2位小数；
////////4、笔终点标注文字记号；
//4.1、笔（已完成）终点标注文字；
BAA:=IF(LX,L,H);
BBB:=BACKSET(ISLASTBAR,SUMBARS(LX||HX,4));
DRAWTEXT(笔*BBB&&HX&&COUNT(HX,BARSLASTCOUNT(BBB))=1,H,' H2 '),ALIGN2,FONTSIZE18,RGB(128,128,255);//倒数第2个高点标注文字；
DRAWTEXT(笔*BBB&&HX&&COUNT(HX,BARSLASTCOUNT(BBB))=2,H,' H1 '),ALIGN2,FONTSIZE18,RGB(128,128,255);//倒数第1个高点标注文字；
DRAWTEXT(笔*BBB&&LX&&COUNT(LX,BARSLASTCOUNT(BBB))=1,L,' L2 '),ALIGN2,VALIGN0,FONTSIZE18,RGB(128,128,255);//倒数第2个低点标注文字；
DRAWTEXT(笔*BBB&&LX&&COUNT(LX,BARSLASTCOUNT(BBB))=2,L,' L1 '),ALIGN2,VALIGN0,FONTSIZE18,RGB(128,128,255);//倒数第1个低点标注文字；
BAA0:=BACKSET(ISLASTBAR,SUMBARS(LX||HX,5));
DRAWTEXT(笔*CROSS(BAA0>=1,0.5) && LX,L,' L3'),ALIGN2,VALIGN0,FONTSIZE18,RGB(155,155,155);//倒数第3个低点标注文字；
DRAWTEXT(笔*CROSS(BAA0>=1,0.5) && HX,H,' H3'),ALIGN2,FONTSIZE18,RGB(155,155,155);//倒数第3个高点标注文字；
BAA1:=BACKSET(ISLASTBAR,SUMBARS(LX||HX,6));
DRAWTEXT(笔*CROSS(BAA1>=1,0.5) && LX,L,' L4'),ALIGN2,VALIGN0,FONTSIZE18,RGB(155,155,155);//倒数第4个低点标注文字；
DRAWTEXT(笔*CROSS(BAA1>=1,0.5) && HX,H,' H4'),ALIGN2,FONTSIZE18,RGB(155,155,155);//倒数第4个高点标注文字；
DRAWLINE1(笔*X9,IF(CROSS(LX=1,0.5),L,H),X8,IF(CROSS(HX=1,0.5),H,L),0),COLORYELLOW,LINETHICK1;
DRAWLINE1(笔*X13,IF(CROSS(LX=1,0.5),L,H),X12,IF(CROSS(HX=1,0.5),H,L),0),COLORYELLOW,LINETHICK1;
//4.2、笔（未完成）的最后1笔标注文字；
AM26:=BACKSET(ISLASTBAR&&BARSLAST(HH)>BARSLAST(LL),HHVBARS(H,BARSLAST(LL))+1);
BM26:=BACKSET(ISLASTBAR&&BARSLAST(HH)<BARSLAST(LL),LLVBARS(L,BARSLAST(HH))+1);
DRAWTEXT(CROSS(AM26,0.5),H,'H0 ？ '),FONTSIZE18,RGB(200,200,0);//最后一笔（未完成）标注文字；
DRAWTEXT(CROSS(BM26,0.5),L,'L0 ？ '),VALIGN0,FONTSIZE18,RGB(200,200,0);//最后一笔（未完成）标注文字；
////可能的转折点标记文字；
ZQ126:=SUMBARS(CROSS(AM26,0.5),1);
TT126:=BACKSET(ISLASTBAR,LLVBARS(L,ZQ126)+1);
DRAWTEXT(CROSS(TT126,0.5),L,'☆'),ALIGN1,VALIGN0,FONTSIZE20,RGB(255,128,64);//////可能的转折低点标记文字；
ZQ226:=SUMBARS(CROSS(BM26,0.5),1);
TT226:=BACKSET(ISLASTBAR,HHVBARS(H,ZQ226)+1);
DRAWTEXT(CROSS(TT226,0.5),H,'☆'),ALIGN1,VALIGN2,FONTSIZE20,COLORGREEN;//////可能的转折高点标记文字；
//5.2、BOLL120横线；
X120:=BACKSET(ISLASTBAR,BARSLAST(CROSS(LX=1,0.5)||CROSS(HX=1,0.5))+1);
DRAWSL(CROSS(X120,0.5)&&CROSS(LX=1,0.5),L,0,999,2,RGB(168,168,168)),DASH;//画横线
DRAWSL(CROSS(X120,0.5)&&CROSS(HX=1,0.5),H,0,999,2,RGB(168,168,168)),DASH;//画横线
DRAWTEXT(ISLASTBAR&&BARSLAST(CROSS(LX=1,0.5))<BARSLAST(CROSS(HX=1,0.5)), VALUEWHEN(CROSS(LX=1,0.5),L), ' 本级别操作 (高1级别升笔起点)'),VALIGN2,RGB(168,168,168);//标注文字
DRAWTEXT(ISLASTBAR&&BARSLAST(CROSS(LX=1,0.5))>BARSLAST(CROSS(HX=1,0.5)), VALUEWHEN(CROSS(HX=1,0.5),H), ' 本级别操作 (高1级别降笔起点)'),VALIGN2,RGB(168,168,168);//标注文字
//中枢:=1;
//笔枢Ⅰ:=1;
//////////画笔中枢框;
HH2:=VALUEWHEN(BBB&&CROSS(HX=1,0.5)&&COUNT(CROSS(HX=1,0.5),BARSLASTCOUNT(BBB))=1,H);
HH1:=VALUEWHEN(BBB&&CROSS(HX=1,0.5)&&COUNT(CROSS(HX=1,0.5),BARSLASTCOUNT(BBB))=2,H);
LL2:=VALUEWHEN(BBB&&CROSS(LX=1,0.5)&&COUNT(CROSS(LX=1,0.5),BARSLASTCOUNT(BBB))=1,L);
LL1:=VALUEWHEN(BBB&&CROSS(LX=1,0.5)&&COUNT(CROSS(LX=1,0.5),BARSLASTCOUNT(BBB))=2,L);
//画笔中枢框;
NG:=BARSLASTCOUNT(HH2>0 || HH1>0 || LL2>0 || LL1>0)=1;
NGG:=BARSLASTCOUNT(HH2>0 && HH1>0 && LL2>0 && LL1>0)=1;
AA沿:BACKSET(中枢Ⅰ*NGG,SUMBARS(NG,1)),NODRAW,NOTEXT;
上沿:=IF(EXIST( BACKSET(中枢Ⅰ*NGG,SUMBARS(NG,1)),BARPOS),REFX1(VALUEWHEN(AA沿=1,MIN(HH2,HH1)),1000),NULL),RGB(128,128,255),NOTEXT;
下沿:=IF(EXIST( BACKSET(中枢Ⅰ*NGG,SUMBARS(NG,1)),BARPOS),REFX1(VALUEWHEN(AA沿=1,MAX(LL2,LL1)),1000),NULL),RGB(128,128,255),NOTEXT;
中间:=IF(EXIST( BACKSET(中枢Ⅰ*NGG,SUMBARS(NG,1)),BARPOS),(REFX1(VALUEWHEN(AA沿=1,MAX(LL2,LL1)),1000)+REFX1(VALUEWHEN(AA沿=1,MIN(HH2,HH1)),1000))/2,NULL),RGB(128,128,255),NOTEXT;

//画笔中枢框延伸部分;
L1缠:=CROSS(BACKSET(ISLASTBAR,BARSLAST(CROSS(LX=1,0.5))+1),0.5);
L2缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5),2)),0.5);
L3缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5),3)),0.5),ICON(1,'ICO2');
L4缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5),4)),0.5),ICON(1,'ICO2');
H1缠:=CROSS(BACKSET(ISLASTBAR,BARSLAST(CROSS(HX=1,0.5))+1),0.5);
H2缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(HX=1,0.5),2)),0.5);
H3缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(HX=1,0.5),3)),0.5);
H4缠:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(HX=1,0.5),4)),0.5),ICON(1,'ICO1');
笔期:=BARSLAST(CROSS(BBB,0.5)),RGB(255,0,255);
TJX笔升降:=CROSS(HX=1,0.5)||CROSS(LX=1,0.5),NODRAW;
HHX笔升降:=REFX1(VALUEWHEN(TJX笔升降,H),10000);
LLX笔升降:=REFX1(LLV(L,BARSLAST(TJX笔升降)+1),10000);
HH1X笔升降:=REFX1(HHV(H,BARSLAST(TJX笔升降)+1),10000);
笔降:=(C-HH1X笔升降 ),NODRAW,COLORLIGHTGREEN;
笔升:=(C-LLX笔升降 ),NODRAW,COLORRED;
升:=IF(笔升>笔降,笔升,NULL),COLORRED;
Ⅰ:=IF(笔升>笔降,笔降,NULL),COLORGREEN;
Ⅰ反:=IF(笔升<笔降,笔升,NULL),COLORYELLOW,NODRAW;
Ⅰ回:=IF(笔升<笔降,笔降,NULL),COLORCYAN,NODRAW;

//填充中枢；
HHH2:=REFX1(VALUEWHEN(BBB&&CROSS(HX=1,0.5)&&COUNT(CROSS(HX=1,0.5),BARSLASTCOUNT(BBB))=1,H),99999);
HHH1:=REFX1(VALUEWHEN(BBB&&CROSS(HX=1,0.5)&&COUNT(CROSS(HX=1,0.5),BARSLASTCOUNT(BBB))=2,H),99999);
LLL2:=REFX1(VALUEWHEN(BBB&&CROSS(LX=1,0.5)&&COUNT(CROSS(LX=1,0.5),BARSLASTCOUNT(BBB))=1,L),99999);
LLL1:=REFX1(VALUEWHEN(BBB&&CROSS(LX=1,0.5)&&COUNT(CROSS(LX=1,0.5),BARSLASTCOUNT(BBB))=2,L),99999);
AA:BACKSET(ISLASTBAR,MAX(BARSLAST(H2缠),BARSLAST(L2缠))+1),NODRAW,NOTEXT;
BB:BACKSET(ISLASTBAR,MIN(BARSLAST(H1缠),BARSLAST(L1缠))+1),NODRAW,NOTEXT;
ZXZ:(IF(ISNULL( AA),0,AA)+IF(ISNULL( BB),0,BB))=1|| REF((IF(ISNULL( AA),0,AA)+IF(ISNULL( BB),0,BB))=1,1),NODRAW,NOTEXT;
轮低高线显示开关:=轮低高;
//MA8:=1;
轮MA10:=MA(C,5);
轮MA20:=MA(C,21);
轮JX:=CROSS(轮MA10,轮MA20);
轮SX:=CROSS(轮MA20,轮MA10);
轮LL:=IF(REFX(轮JX,1),LLV(L,BARSLAST(轮SX)+1),NULL);
轮HH:=IF(REFX(轮SX,1),HHV(H,BARSLAST(轮JX)+1),NULL);
轮LD:=IF(轮MA10<轮MA20 AND L=REFX(轮LL,10),L,0);
轮HD:=IF(轮MA10>轮MA20 AND H=REFX(轮HH,10),H,0);
LC0:=REF(L,BARSLAST(轮LD));
轮LC1:=IF(SUM(轮LD>0,0)>=2,REF(LC0,BARSLAST(轮LD)+1),0);
LC2:=IF(SUM(轮LD>0,0)>=3,REF(轮LC1,BARSLAST(轮LD)+1),0);
LC3:=IF(SUM(轮LD>0,0)>=4,REF(LC2,BARSLAST(轮LD)+1),0);
LC4:=IF(SUM(轮LD>0,0)>=5,REF(LC3,BARSLAST(轮LD)+1),0);
LC5:=IF(SUM(轮LD>0,0)>=6,REF(LC4,BARSLAST(轮LD)+1),0);
LC6:=IF(SUM(轮LD>0,0)>=7,REF(LC5,BARSLAST(轮LD)+1),0);
LC7:=IF(SUM(轮LD>0,0)>=8,REF(LC6,BARSLAST(轮LD)+1),0);
LC8:=IF(SUM(轮LD>0,0)>=9,REF(LC7,BARSLAST(轮LD)+1),0);
HC0:=REF(H,BARSLAST(轮HD));
HC1:=IF(SUM(轮HD>0,0)>=2,REF(HC0,BARSLAST(轮HD)+1),0);
HC2:=IF(SUM(轮HD>0,0)>=3,REF(HC1,BARSLAST(轮HD)+1),0);
HC3:=IF(SUM(轮HD>0,0)>=4,REF(HC2,BARSLAST(轮HD)+1),0);
HC4:=IF(SUM(轮HD>0,0)>=5,REF(HC3,BARSLAST(轮HD)+1),0);
HC5:=IF(SUM(轮HD>0,0)>=6,REF(HC4,BARSLAST(轮HD)+1),0);
HC6:=IF(SUM(轮HD>0,0)>=7,REF(HC5,BARSLAST(轮HD)+1),0);
HC7:=IF(SUM(轮HD>0,0)>=8,REF(HC6,BARSLAST(轮HD)+1),0);
HC8:=IF(SUM(轮HD>0,0)>=9,REF(HC7,BARSLAST(轮HD)+1),0);
ZD0:=LC0,NODRAW;
ZD1:=IF(轮LC1<HC0 AND ZD0>0,轮LC1,0),NODRAW;
ZD2:=IF(LC2<MIN(HC0,HC1) AND ZD1>0,LC2,0),NODRAW;
ZD3:=IF(LC3<MIN(HC0,MIN(HC1,HC2)) AND ZD2>0,LC3,0),NODRAW;
ZD4:=IF(LC4<MIN(HC0,MIN(HC1,MIN(HC2,HC3))) AND ZD3>0,LC4,0),NODRAW;
ZD5:=IF(LC5<MIN(HC0,MIN(HC1,MIN(HC2,MIN(HC3,HC4)))) AND ZD4>0,LC5,0),NODRAW;
ZD6:=IF(LC6<MIN(HC0,MIN(HC1,MIN(HC2,MIN(HC3,MIN(HC4,HC5))))) AND ZD5>0,LC6,0),NODRAW;
ZD7:=IF(LC7<MIN(HC0,MIN(HC1,MIN(HC2,MIN(HC3,MIN(HC4,MIN(HC5,HC6)))))) AND ZD6>0,LC7,0),NODRAW;
ZD8:=IF(LC8<MIN(HC0,MIN(HC1,MIN(HC2,MIN(HC3,MIN(HC4,MIN(HC5,MIN(HC6,HC7))))))) AND ZD7>0,LC8,0),NODRAW;
ZD:=MAX(ZD0,MAX(ZD1,MAX(ZD2,MAX(ZD3,MAX(ZD4,MAX(ZD5,MAX(ZD6,MAX(ZD7,ZD8)))))))),NODRAW;
ZG0:HC0,NODRAW, NOTEXT;

ZG1:IF(HC1>MAX(LC0,轮LC1),HC1,9999),NODRAW, NOTEXT;
ZG2:IF(HC2-ZD>0 AND HC2>MAX(LC0,轮LC1) AND ZG1<>9999,HC2,9999),NODRAW, NOTEXT;
ZG3:=IF(HC3-ZD>0 AND HC3>MAX(LC0,MAX(轮LC1,LC2)) AND ZG2<>9999,HC3,9999),NODRAW;
ZG4:=IF(HC4-ZD>0 AND HC4>MAX(LC0,MAX(轮LC1,MAX(LC2,LC3))) AND ZG3<>9999,HC4,9999),NODRAW;
ZG5:=IF(HC5-ZD>0 AND HC5>MAX(LC0,MAX(轮LC1,MAX(LC2,MAX(LC3,LC4)))) AND ZG4<>9999,HC5,9999),NODRAW;
ZG6:=IF(HC6-ZD>0 AND HC6>MAX(LC0,MAX(轮LC1,MAX(LC2,MAX(LC3,MAX(LC4,LC5))))) AND ZG5<>9999,HC6,9999),NODRAW;
ZG7:=IF(HC7-ZD>0 AND HC7>MAX(LC0,MAX(轮LC1,MAX(LC2,MAX(LC3,MAX(LC4,MAX(LC5,LC6)))))) AND ZG6<>9999,HC7,9999),NODRAW;
ZG8:=IF(HC8-ZD>0 AND HC8>MAX(LC0,MAX(轮LC1,MAX(LC2,MAX(LC3,MAX(LC4,MAX(LC5,MAX(LC6,LC7))))))) AND ZG7<>9999,HC8,9999),NODRAW;
ZG:=MIN(ZG0,MIN(ZG1,MIN(ZG2,MIN(ZG3,MIN(ZG4,MIN(ZG5,MIN(ZG6,MIN(ZG7,ZG8))))))));
A压:=REF(ZG,BARSLAST(ZG<>REF(ZG,1)));
B压:=REF(ZD,BARSLAST(ZD<>REF(ZD,1)));
压力:=IF(1,A压,A压)*轮低高线显示开关*MA8,COLORYELLOW,DASHDOT,LINETHICK4, NOTEXT;
支撑:=IF(1,B压,B压)*轮低高线显示开关*MA8,COLORCYAN,DASHDOT,LINETHICK4, NOTEXT;
压W力:=IF(1,A压,A压)*区间*MA8,COLORYELLOW,DASHDOT,LINETHICK4, NOTEXT;
支W撑:=IF(1,B压,B压)*区间*MA8,COLORCYAN,DASHDOT,LINETHICK4, NOTEXT;
//STICKLINE1(压W力>支W撑,压W力,支W撑,5,0),RGB(53,53,0);
N:=1;
夜盘开关:=夜盘;
牛N:=1;
N牛牛:=(BACKSET(ISLASTBAR,SUMBARS(DAYBARPOS=1,牛N)))*夜盘开关*MA8,NODRAW,NOTEXT;
开盘价:=(IF(N牛牛,VALUEWHEN(DAYBARPOS=1,O),NULL))*夜盘开关*MA8,COLORMAGENTA;
DRAWSL(BACKSET(ISLASTBAR,BARSLAST(CROSS(C>开盘价,0.5))+1),VALUEWHEN(CROSS(C>开盘价,0.5), L),0,1,0,COLORRED),LINETHICK3;
DRAWSL(BACKSET(ISLASTBAR,BARSLAST(CROSS(C<开盘价,0.5))+1),VALUEWHEN(CROSS(C<开盘价,0.5), H),0,1,2,COLORGREEN),LINETHICK3;
N牛:(BACKSET(ISLASTBAR,SUMBARS(DAYBARPOS=1,N)))*夜盘开关*MA8,NODRAW,NOTEXT;
PR日:(IF(N牛,VALUEWHEN(DAYBARPOS=1,O)*夜盘开关*MA8,NULL))*夜盘开关*MA8,RGB(0,0,88),NOTEXT,NODRAW;
PR:=IF(N牛,(((VALUEWHEN(DAYBARPOS=3, HHV(H,3))+VALUEWHEN(DAYBARPOS=3, LLV(L,3)))/2)),NULL),COLORWHITE,NOTEXT;
PR日RR:=(IF(N牛,VALUEWHEN(DAYBARPOS=1,O)*MA8,NULL))*夜盘开关*MA8,COLORMAGENTA;
DRAWNUMBER(C<PR日 AND ISLASTBAR,PR日,PR日,2,COLORGREEN),ALIGN0,VALIGN1;
DRAWNUMBER(C>PR日 AND ISLASTBAR,PR日,PR日,2,COLORRED),ALIGN0,VALIGN1;
日AA:(DAYBARPOS=3)*夜盘开关*MA8,NODRAW,NOTEXT;

DRAWNUMBER(C<PR日 AND ISLASTBAR, 夜盘*MA8*VALUEWHEN(DAYBARPOS=3, HHV(H,3)),夜盘*MA8*VALUEWHEN(DAYBARPOS=3, HHV(H,3)),2,COLORCYAN),ALIGN2,VALIGN0;
DRAWNUMBER(C>PR日 AND ISLASTBAR,夜盘*MA8* VALUEWHEN(DAYBARPOS=3, HHV(H,3)),夜盘*MA8*VALUEWHEN(DAYBARPOS=3, HHV(H,3)),2,COLORRED),ALIGN2,VALIGN0;
//--------
DRAWSL(N牛&&DAYBARPOS*MA8*夜盘开关>=3*MA8*夜盘开关,VALUEWHEN(DAYBARPOS*MA8*夜盘开关=3*MA8*夜盘开关, LLV(L*MA8*夜盘开关,3*MA8*夜盘开关)),0,1,0,COLORYELLOW),LINETHICK1;
DRAWNUMBER(C<PR日 AND ISLASTBAR, 夜盘*MA8*VALUEWHEN(DAYBARPOS=3, LLV(L,3)),夜盘*MA8*VALUEWHEN(DAYBARPOS=3,LLV(L,3)),2,COLORWHITE),ALIGN2,VALIGN0;
DRAWNUMBER(C>PR日 AND ISLASTBAR, 夜盘*MA8*VALUEWHEN(DAYBARPOS=3, LLV(L,3)),夜盘*MA8*VALUEWHEN(DAYBARPOS=3,LLV(L,3)),2,COLORYELLOW),ALIGN2,VALIGN0;
CON天:=(C>=PR日)*夜盘开关*MA8;
FILLRGN(N牛&&(DAYBARPOS*MA8*夜盘开关>=3*MA8*夜盘开关||DAYBARPOS*MA8*夜盘开关=1*MA8*夜盘开关), VALUEWHEN(DAYBARPOS*MA8*夜盘开关=3*MA8*夜盘开关, HHV(H*MA8*夜盘开关,3*MA8*夜盘开关)),PR日*MA8*夜盘开关,RGB(89,89,0));
FILLRGN(N牛&&(DAYBARPOS*MA8*夜盘开关>=3*MA8*夜盘开关||DAYBARPOS*MA8*夜盘开关=1*MA8*夜盘开关), VALUEWHEN(DAYBARPOS*MA8*夜盘开关=3*MA8*夜盘开关, HHV(H*MA8*夜盘开关,3*MA8*夜盘开关)),PR日RR*MA8*夜盘开关,RGB(89,89,0));

PR日F:(IF(C>PR日*夜盘开关*MA8 , PR日*夜盘开关*MA8,NULL))*夜盘开关*MA8,COLORRED,NOTEXT;
PR日FF:(IF(C<PR日*夜盘开关*MA8 ,PR日*夜盘开关*MA8,NULL))*夜盘开关*MA8,COLORGREEN,NOTEXT;
空防守:(IF(C<VALUEWHEN(DAYBARPOS=3,HHV(H,3)) AND C<PR日RR ,VALUEWHEN(DAYBARPOS=3,HHV(H,3)),NULL))*夜盘开关*MA8,NODRAW,COLORWHITE;
多防守:(IF(C>VALUEWHEN(DAYBARPOS=3,LLV(L,3)) AND C>PR日RR,VALUEWHEN(DAYBARPOS=3,LLV(L,3)),NULL))*夜盘开关*MA8,NODRAW,COLORYELLOW;
FILLRGN(VALUEWHEN(DAYBARPOS=3,LLV(L,3))<PR日RR,PR日RR*MA8*夜盘开关,VALUEWHEN(DAYBARPOS=3,LLV(L,3))*MA8*夜盘开关,RGB(0,79,0));
FILLRGN(VALUEWHEN(DAYBARPOS=3,HHV(H,3))>PR日RR,PR日RR*MA8*夜盘开关,VALUEWHEN(DAYBARPOS=3,HHV(H,3))*MA8*夜盘开关,RGB(89,89,0));
空横:=IF(C>VALUEWHEN(DAYBARPOS=3,HHV(L,3)) AND C<PR日RR,VALUEWHEN(DAYBARPOS=3,HHV(L,3)),NULL),NODRAW,COLORGREEN;
多横:=IF(C<VALUEWHEN(DAYBARPOS=3,HHV(H,3)) AND C>PR日RR,VALUEWHEN(DAYBARPOS=3,HHV(H,3)),NULL),NODRAW,COLORRED;
入多点:(IF(C>PR日RR , PR日RR,NULL))*夜盘开关*MA8,COLORRED,NODRAW;
入空点:(IF(C<PR日RR , PR日RR,NULL))*夜盘开关*MA8,NODRAW,COLORGREEN;
赢多:=(C*MA8-入多点*MA8)*夜盘开关*MA8,NODRAW,COLORRED;
赢空:=(C*MA8-入空点*MA8)*夜盘开关*MA8,NODRAW,COLORGREEN;


//-------------------
日内开关:=白盘;

日AA1:(BARSLAST(CROSS(TIME>=0900&&TIME<1000,0.3))+1=3)*日内开关*MA8,NODRAW,NOTEXT;
日AAA1:(BARSLAST(CROSS(TIME>=0900&&TIME<1000,0.3))+1=3)*MA8*日内开关,NODRAW,NOTEXT;
DRAWLINE(日AA1,HHV(H,3),1,LLV(L,3),COLORMAGENTA),LINETHICK2,NODRAW;
DRAWLINE3(日AA1,HHV(H,3),2,1,LLV(L,3),2,0),COLORMAGENTA,LINETHICK2,NODRAW;
DRAWSL(日AA1,HHV(H,3),0,-2,0,COLORMAGENTA),LINETHICK2;
DRAWSL(日AA1,LLV(L,3),0,-2,0,COLORMAGENTA),LINETHICK2;
DRAWLINE(日AA1,HHV(H,3),1,LLV(L,3),COLORMAGENTA),LINETHICK1,NODRAW;
DRAWLINE3(日AA1,HHV(H,3),2,1,LLV(L,3),2,0),COLORMAGENTA,LINETHICK1,NODRAW;
DRAWSL(日AA1,HHV(H,3),0,-2,0,COLORMAGENTA),LINETHICK1,NODRAW;
DRAWSL(日AA1,LLV(L,3),0,-2,0,COLORMAGENTA),LINETHICK1,NODRAW;
A日:=(BACKSET(ISLASTBAR,SUMBARS(日AA1,2)))*日内开关*MA8;
AA日:=(BACKSET(ISLASTBAR,SUMBARS(日AAA1,2)))*MA8*日内开关;
DRAWSL(A日&&日AA1,(HHV(H,3)+LLV(L,3))/2,0,-2,2,COLORMAGENTA),LINETHICK3;
DRAWHORIZONTALLINE(日AA1,HHV(H,3)/2+LLV(L,3)/2,COLORYELLOW),LINETHICK5;
K半分:=(BACKSET(ISLASTBAR,SUMBARS(日AA1,1)));
半分:=IFELSE(K半分,VALUEWHEN(日AA1,HHV(H,3)/2+LLV(L,3)/2),NULL),COLORYELLOW,LINETHICK1,NOTEXT;
日内:=IFELSE(A日,VALUEWHEN(日AA1,REF(O,2)),NULL),RGB(0,0,118),LINETHICK3;
日内W:=IFELSE(AA日,VALUEWHEN(日AAA1,REF(O,2)),NULL),RGB(0,0,118),LINETHICK3;
DRAWNUMBER(C>日内 AND ISLASTBAR,日内,日内,2,COLORMAGENTA),ALIGN0,VALIGN1;
DRAWNUMBER(C<日内 AND ISLASTBAR,日内,日内,2,COLORCYAN),ALIGN0,VALIGN1;
N1白:=BACKSET(ISLASTBAR,BARSLAST(日AA1)+1),NOTEXT,NODRAW;
DRAWSL(CROSS(N1白,0.5),HHV(H,3),0,1,2,COLORMAGENTA),NODRAW,LINETHICK5,NODRAW;
DRAWSL(CROSS(N1白,0.5),LLV(L,3),0,1,2,COLORMAGENTA),NODRAW,LINETHICK5,NODRAW;
DRAWNUMBER(ISLASTBAR,VALUEWHEN(CROSS(N1白,0.5),HHV(H,3)),VALUEWHEN(CROSS(N1白,0.5),HHV(H,3)),0,COLORMAGENTA),ALIGN2,FONTSIZE16;
DRAWNUMBER(ISLASTBAR,VALUEWHEN(CROSS(N1白,0.5),LLV(L,3)),VALUEWHEN(CROSS(N1白,0.5),LLV(L,3)),0,COLORMAGENTA),ALIGN2,FONTSIZE16;
FILLRGN((N1白||DAYBARPOS=1), VALUEWHEN(CROSS(N1白,0.5),HHV(H,3)),日内,RGB(60,60,0));
FILLRGN(VALUEWHEN(CROSS(N1白,0.5),LLV(L,3))<日内,VALUEWHEN(CROSS(N1白,0.5),LLV(L,3)),日内,RGB(0,64,64));
开盘价线1:=(IFELSE(C>日内 , 日内*日内开关*MA8,NULL))*日内开关*MA8,DASHDOTDOT,COLORMAGENTA,NOTEXT;
开盘价线2:=(IFELSE(C<日内 , 日内*日内开关*MA8,NULL))*日内开关*MA8,DASHDOTDOT,COLORCYAN,NOTEXT;
短多:=IFELSE(C>日内 , 日内,NULL),DASHDOTDOT,COLORMAGENTA,NOTEXT;
短空:=IFELSE(C<日内 , 日内,NULL),DASHDOTDOT,COLORCYAN,NOTEXT;
日内A:=IFELSE(AA日,VALUEWHEN(日AA1,REF(O,2)),NULL),RGB(0,0,118),LINETHICK3;
短进:=IFELSE(C>日内W , 日内W*日内开关*MA8,NULL),DASHDOTDOT,COLORMAGENTA,NODRAW;
短入:=IFELSE(C<日内W , 日内W*日内开关*MA8,NULL),DASHDOTDOT,COLORCYAN,NODRAW;
多利:(C-短进)*日内开关*MA8,NODRAW,COLORMAGENTA,NODRAW;
空利:(C-短入)*日内开关*MA8,NODRAW,COLORCYAN,NODRAW;


//MACD26代码；
DIF26:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA26:=EMA(DIF26,9);
MACD26:=(DIF26-DEA26)*2,RGB(255,0,255),DOT;

趋势方向开关:=1;//趋势向;
NX:=((3*CLOSE+LOW+OPEN+HIGH)/6)*MA8;
牛线:=((20*NX+19*REF(NX,1)+18*REF(NX,2)+17*REF(NX,3)+16*REF(NX,4)
+15*REF(NX,5)+14*REF(NX,6)+13*REF(NX,7)+12*REF(NX,8)+11*REF(NX,9)
+10*REF(NX,10)+9*REF(NX,11)+8*REF(NX,12)+7*REF(NX,13)+6*REF(NX,14)
+5*REF(NX,15)+4*REF(NX,16)+3*REF(NX,17)
+2*REF(NX,18)+REF(NX,20))/210)*MA8,COLORYELLOW;
牛熊线:=(MA(牛线,6))*MA8,COLORGREEN,LINETHICK2,NOTEXT;
牛熊线1:(MA(牛线,6))*趋势方向开关*MA8,COLORGREEN,LINETHICK2,NOTEXT,NODRAW;
重心线:=((H+L+O+C*3)/6)*趋势方向开关*MA8,LINETHICK1,NODRAW;
(IF(牛熊线>=REF(牛熊线,1),牛熊线,NULL))*趋势方向开关*MA8,COLORRED,LINETHICK2,NOTEXT,NODRAW;
简底:=H>REF(H,1) AND REF(H,1)<REF(H,2) AND L>REF(L,1) AND REF(L,1)<REF(L,2);
简顶:=H<REF(H,1) AND REF(H,1)>REF(H,2) AND L<REF(L,1) AND REF(L,1)>REF(L,2);
包含1:=REF(H,1)>=REF(H,2) AND REF(L,1)<=REF(L,2);
包含2:=REF(H,1)<=REF(H,2) AND REF(L,1)>=REF(L,2);
包底1:=H>REF(H,2) AND REF(H,2)<REF(H,3) AND L>REF(L,1) AND REF(L,1)<REF(L,3);
包底2:=H>REF(H,1) AND REF(H,1)<REF(H,3) AND L>REF(L,2) AND REF(L,2)<REF(L,3);
包顶1:=H<REF(H,1) AND REF(H,1)>REF(H,3) AND L<REF(L,2) AND REF(L,2)>REF(L,3);
包顶2:=H<REF(H,2) AND REF(H,2)>REF(H,3) AND L<REF(L,1) AND REF(L,1)>REF(L,3);
复底:=IF(包含1,包底1,IF(包含2,包底2,简底));
复顶:=IF(包含1,包顶1,IF(包含2,包顶2,简顶));
底分型:=IF(BARSLAST(CROSS(牛熊线,重心线))>3,FILTER(BACKSET(FILTER(复底 AND 重心线<牛熊线,3),2),1),0);
顶分型:=IF(BARSLAST(CROSS(重心线,牛熊线))>3,FILTER(BACKSET(FILTER(复顶 AND 重心线>牛熊线,3),2),1),0);
//趋势方向开关:=1;//趋势向;
中方:=(MA(CLOSE,26))*趋势方向开关*MA8,PRECIS0,COLORMAGENTA,LINETHICK3;//MID:MA(CLOSE,26);M8布>中
M8布方:= (REF(中方,2))*趋势方向开关*MA8;
主趋势线:=(EMA(EMA(C,34),34))*趋势方向开关*MA8,COLORYELLOW,LINETHICK1, NOTEXT;
主趋势线A:=(EMA(EMA(C,34),34))*MA8,COLORYELLOW,LINETHICK1, NOTEXT;
B主趋:=(主趋势线>REF(主趋势线,1))*趋势方向开关*MA8;
RR主趋:=(IF(B主趋-1,主趋势线,NULL))*趋势方向开关*MA8,DOT,COLORBLUE,LINETHICK3, NOTEXT;
RR主趋A:=(IF(B主趋-1,主趋势线A,NULL))*趋势方向开关*MA8,DOT,COLORBLUE,LINETHICK3, NOTEXT;
AV主趋:=(IF(主趋势线>REF(主趋势线,2),主趋势线,1))*趋势方向开关*MA8,CROSSDOT, COLORRED, LINETHICK3, NOTEXT;
BV主趋:=(IF(主趋势线<REF(主趋势线,2),主趋势线,1))*趋势方向开关*MA8,CROSSDOT ,COLORGREEN ,LINETHICK3, NOTEXT;
DRAWTEXT(BARPOS=(2),(4),'+') ,COLORWHITE;
DRAWICON(BV主趋*趋势方向开关,主趋势线*1,'ICO10'),VALIGN0;
DRAWNUMBER(ISLASTBAR,主趋势线,主趋势线,1,COLORYELLOW),ALIGN0,FONTSIZE24;
DRAWICON(AV主趋*趋势方向开关,主趋势线+1.005,'ICO11'),VALIGN2;

DRAWTEXT(CROSS(BV主趋>1,0.5),L,'买'),FONTSIZE25,VALIGN0;
DRAWTEXT(CROSS(AV主趋>1,0.5),H,'卖'),FONTSIZE25;

趋势线:=(EMA(EMA(C,10),10))*趋势方向开关*MA8,RGB(128,0,0),LINETHICK2, NOTEXT;
趋势线A:=(EMA(EMA(C,10),10))*MA8,COLORRED,LINETHICK2, NOTEXT;
B线:=(趋势线>REF(趋势线,1))*趋势方向开关*MA8;
RR线:=(IF(B线-1,趋势线,NULL))*趋势方向开关*MA8,COLORLIGHTGREEN,LINETHICK2, NOTEXT;
RR线A:=(IF(B线-1,趋势线A,NULL))*趋势方向开关*MA8,COLORLIGHTGREEN,LINETHICK2, NOTEXT;
AV趋:=(IF(主趋势线>REF(主趋势线A,2),主趋势线,1))*趋势方向开关*MA8,CROSSDOT, COLORRED, LINETHICK3, NOTEXT;
BV趋:=(IF(主趋势线<REF(主趋势线A,2),主趋势线,1))*趋势方向开关*MA8,CROSSDOT ,COLORGREEN ,LINETHICK3, NOTEXT;
//1、蓝色基础K线,1为空心阳线,0为实心阴线。

DRAWCOLORKLINE(主趋势线A<REF(主趋势线A,2) AND 牛熊线<=REF(牛熊线,1) AND C*MA8>=O*MA8,COLORCYAN,1);
DRAWCOLORKLINE(主趋势线A<REF(主趋势线A,2) AND 牛熊线<=REF(牛熊线,1) AND O*MA8>=C*MA8,COLORCYAN,0);
DRAWCOLORKLINE(主趋势线A<REF(主趋势线A,2) AND 牛熊线>=REF(牛熊线,1) AND C*MA8<主趋势线A*MA8 AND C*MA8>=O*MA8,RGB(0,128,255),1);
DRAWCOLORKLINE(主趋势线A<REF(主趋势线A,2) AND 牛熊线>=REF(牛熊线,1) AND C*MA8<主趋势线A*MA8 AND O*MA8>=C*MA8,RGB(0,128,255),0);
DRAWCOLORKLINE(主趋势线A>REF(主趋势线A,2) AND 牛熊线<=REF(牛熊线,1) AND C*MA8>=O*MA8,RGB(38,147,255),1);
DRAWCOLORKLINE(主趋势线A>REF(主趋势线A,2) AND 牛熊线<=REF(牛熊线,1) AND O*MA8>=C*MA8,RGB(38,147,255),0);
DRAWCOLORKLINE(主趋势线A<REF(主趋势线A,2) AND 牛熊线>=REF(牛熊线,1) AND C*MA8>=O*MA8,RGB(38,147,255),1);
DRAWCOLORKLINE(主趋势线A<REF(主趋势线A,2) AND 牛熊线>=REF(牛熊线,1) AND O*MA8>=C*MA8,RGB(38,147,255),0);
DRAWCOLORKLINE( 主趋势线A>REF(主趋势线A,2) AND 主趋势线A<牛熊线 AND 牛熊线<=REF(牛熊线,1) AND C*MA8>=O*MA8,RGB(208,104,0),1);
DRAWCOLORKLINE( 主趋势线A>REF(主趋势线A,2) AND 主趋势线A<牛熊线 AND 牛熊线<=REF(牛熊线,1) AND O*MA8>=C*MA8,RGB(208,104,0),0);
DRAWCOLORKLINE(主趋势线A>REF(主趋势线A,2) AND 牛熊线>=REF(牛熊线,1) AND C*MA8>=O*MA8,COLORRED,1);
DRAWCOLORKLINE(主趋势线A>REF(主趋势线A,2) AND 牛熊线>=REF(牛熊线,1) AND O*MA8>=C*MA8,RGB(157,0,0),0);

//1、蓝色基础K线,1为空心阳线,0为实心阴线。
DRAWCOLORKLINE( C*MA8>=O*MA8,RGB(64,128,128),1);
DRAWCOLORKLINE( O*MA8>=C*MA8,RGB(64,128,128),0);
A3:=IF(L=LLV(L,25) AND L<REF(L,1) AND MACD26>REF(MACD26,1),1,0 );
DRAWCOLORKLINE(A3=1 AND C*MA8>=O*MA8,RGB(255,0,255),1);
DRAWCOLORKLINE(A3=1 AND O*MA8>C*MA8,RGB(255,0,255),0);
//MACD26柱子顶背驰，绿色；1为空心K阳线，0为实心K阴线；
A4:=IF(H=HHV(H,25) AND H>REF(H,1) AND MACD26<REF(MACD26,1),1,0 );
DRAWCOLORKLINE(A4=1 AND C*MA8>=O*MA8,RGB(0,255,64),1);
DRAWCOLORKLINE(A4=1 AND O*MA8>C*MA8,RGB(0,255,64),0);
//4、BOLL26外的有效背驰K线，在H/L处加黄色短横线；
//PARTLINE(A3=1 AND L<下轨26*MA8,LOW*MA8,RGB(255,255,0)),LINETHICK3;
//PARTLINE(A4=1 AND H>上轨26*MA8,H*MA8,RGB(255,255,0)),LINETHICK3;
//MACD120代码；
DIF120:=EMA(CLOSE,60)-EMA(CLOSE,120);
DEA120:=EMA(DIF120,9);
MACD120:=(DIF120-DEA120)*2;

//2.1、均线金叉用红线，死叉用绿线；
//DRAWCOLORLINE(DIF120>=DEA120,长线120*DIF120,RGB(255,0,0),RGB(0,128,255));
//DRAWCOLORLINE(DIF120<DEA120,长线120*DEA120,RGB(0,128,255),RGB(255,0,0));

JC金:=CROSS(DIF120,DEA120);
SC金:=CROSSDOWN(DIF120,DEA120);
N1:=BARSLAST(JC金)+1;
N2:=BARSLAST(SC金)+1;
//1、最后一次金叉，画红色垂直虚线，反之，绿色虚线；
VERTLINE(REFX(JC金*MA8&&BACKSET(ISLASTBAR,MIN(N1,N2)),2),COLORRED),DASH;//金叉画垂直线；
DRAWTEXT(REFX(JC金*MA8&&BACKSET(ISLASTBAR,MIN(N1,N2)),1), 牛熊线,'预判 高1级别金叉 底分型 '),RGB(150,150,150),VALIGN2,ALIGN2,FONTSIZE18;//金叉标注文字
VERTLINE(REFX(SC金*MA8&&BACKSET(ISLASTBAR,MIN(N1,N2)),2),COLORGREEN),DASH;//死叉画垂直线；
DRAWTEXT(REFX(SC金*MA8&&BACKSET(ISLASTBAR,MIN(N1,N2)),1), 牛熊线,'预判 高1级别下叉 顶分型 '),RGB(150,150,150),VALIGN2,ALIGN2,FONTSIZE18;//下叉标注文字；*/
//SJFH:=MA8;
日:=150;
昨前:=3;
CURRBARSCOUNT:=(REFX1(BARPOS,10000)-BARPOS+1)*SJFH;
CAPITAL:=GETPRICE1('流通股本');
AMOUNT:=AVPRICE*V;
高:=REF(HHV(H,日),昨前);
低:=REF(LLV(L,日),昨前);
H1:=高-(高-低)*1;
H2:=高-(高-低)*0.91;
H3:=高-(高-低)*0.85;
H4:=高-(高-低)*0.809;
H5:=高-(高-低)*0.777;
H6:=高-(高-低)*0.707;
H7:=高-(高-低)*0.666;
H8:=高-(高-低)*0.618;
H9:=高-(高-低)*0.563;
H10:=高-(高-低)*0.5;
H11:=高-(高-低)*0.424;
H12:=高-(高-低)*0.382;
H13:=高-(高-低)*0.309;
H14:=高-(高-低)*0.25;
H15:=高-(高-低)*0.191;
H16:=高-(高-低)*0.1375;
H17:=高-(高-低)*0.0807;
H18:=高-(高-低)*0.236;
H19:=高-(高-低)*0.764;
一:=IF(CURRBARSCOUNT<=150,REFX1(H2,10000),NULL),COLORBLUE,DOT, NOTEXT,NODRAW;
二:=REFX1(H3,10000),COLORYELLOW;
三:=IF(CURRBARSCOUNT<=150,REFX1(H4,10000),NULL)*SJFH,COLORLIGHTGREY,DOT, NOTEXT;
四:=REFX1(H5,10000),COLORRED;
五:=REFX1(H6,10000),COLORYELLOW;
六:=REFX1(H7,10000),COLORBLUE;
七:=IF(CURRBARSCOUNT<=150,REFX1(H8,10000),NULL)*SJFH,DOT,RGB(0,115,0), NOTEXT;
八:=REFX1(H9,10000),COLORYELLOW;
九:=IF(CURRBARSCOUNT<=150,REFX1(H10,10000),NULL)*SJFH,DOT,COLORGRAY, NOTEXT;
十:=REFX1(H11,10000),COLORRED;
十一:=IF(CURRBARSCOUNT<=150,REFX1(H12,10000),NULL)*SJFH,DOT,COLORBLUE, NOTEXT;
十二:=IF(CURRBARSCOUNT<=150,REFX1(H13,10000),NULL)*SJFH,DOT,COLORBLUE, NOTEXT;
十三:=REFX1(H14,10000),COLORRED;
十四:=IF(CURRBARSCOUNT<=150,REFX1(H15,10000),NULL)*SJFH,COLORLIGHTGREY,DOT, NOTEXT;

十五:=REFX1(H16,10000),COLORBLUE;
十六:IF(CURRBARSCOUNT<=150,REFX1(H17,10000),NULL)*SJFH,COLORYELLOW,DOT, NOTEXT,NODRAW;
十七:=IF(CURRBARSCOUNT<=150,REFX1(H18,10000),NULL)*SJFH,RGB(87,87,87),DOT, NOTEXT;
十八:=IF(CURRBARSCOUNT<=150,REFX1(H19,10000),NULL)*SJFH,RGB(87,87,87),DOT, NOTEXT;
标顶:=IF(CURRBARSCOUNT<=150,REFX1(高,10000),NULL)*SJFH,COLORRED,NODRAW;
标底:=IF(CURRBARSCOUNT<=150,REFX1(H1,10000),NULL)*SJFH,COLORGREEN,NODRAW;

DRAWKLINE1(HIGH,OPEN,LOW,CLOSE);
买:=CROSS(C,一);
卖:=CROSS(十六,C);
STICKLINE1(标底<一,一*SJFH,标底*SJFH,5,0),RGB(0,36,72);
STICKLINE1(标顶>十六,标顶*SJFH,十六*SJFH,5,0),COLOR003300;
N阻:=3;
FF:=(C-REF(C,N阻))/REF(C,N阻);
AH1:=MAX(GETPRICE('YCLOSE'),GETPRICE('HIGH'));
AL1:=MIN(GETPRICE('YCLOSE'),GETPRICE('LOW'));
AP1:=AH1-AL1;
阻力:=AL1+AP1*7/8;
支撑R:=AL1+AP1*0.5/8;
现价:=CLOSE;
DRAWTEXT(LONGCROSS(支撑R,现价,2),L,'买'),COLORCYAN,VALIGN0,LINETHICK5;
DRAWTEXT(LONGCROSS(现价,阻力,2),H,' 卖'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=130,REFX1(H1,10000),' 空单第一目标止盈区位'),ALIGN0,COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=130,REFX1(标顶,10000),' 多单第一目标止盈区位'),VALIGN0,ALIGN0,COLORRED;
DRAWNUMBER(CURRBARSCOUNT=130,REFX1(H1,10000),REFX1(H1,10000),2,COLORGREEN),ALIGN2;
DRAWNUMBER(CURRBARSCOUNT=130,REFX1(标顶,10000),REFX1(标顶,10000),2,COLORRED),VALIGN0,ALIGN2;

高1:=REF(HHV(H,日),昨前);
标顶1:=(REFX1(高1,10000))*MA8,DASHDOT,COLORRED,NOTEXT;
低1:=REF(LLV(L,日),昨前);
标底1:=(REFX1(低1,10000))*MA8,DASHDOT,COLORGREEN,NOTEXT;
绝顶A:=(REFX1(标顶,10000))*MA8,NODRAW;
跑:=绝顶A=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;
DRAWTEXT(跑,H,'跑减'),COLORCYAN;

DRAWCOLORKLINE(ISUP,COLORRED,1);//收盘价大于开盘价，绘制红色空心K线
DRAWCOLORKLINE(ISDOWN,COLORCYAN,0);//收盘价小于开盘价，绘制青色实心K线
DRAWCOLORKLINE(ISEQUAL,COLORWHITE,1);//收盘价