波浪支撑压力自动画线箱顶箱底–波段顶底K变色–文华财经主图指标公式源码:
SHORT:=7;
LONG:=19;
T:=PERIOD;
D:=IF(T=0,30,
IF(T=1,25,
IF(T=8,25,
IF(T=2,20,
IF(T=3,20,
IF(T=4,20,
IF(T=5,10,
IF(T=6,10,
IF(T=7,10,
IF(T=9,10,
IF(T=10,10,10)))))))))));
RMA:=EMA(CLOSE,SHORT),COLORGRAY;
NMA:=EMA(CLOSE,LONG),COLORMAGENTA;
RISK:=IF(NMA>RMA,NMA,NULL),COLORGREEN;
UP:=TRENDLINES(L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1)
AND L=LLV(L,D) AND RMA<=NMA,L,H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1) AND H=HHV(H,D) AND RMA>=NMA,H);
DOWN:=TRENDLINES(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1) AND H=HHV(H,D) AND RMA>=NMA,H,L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1) AND L=LLV(L,D) AND RMA<=NMA,L);
箱顶:REFX1(REF(HHV(H,96),5),9999),LINETHICK3,COLORGREEN;
箱低:REFX1(REF(LLV(L,96),5),9999),LINETHICK3,COLORYELLOW;
箱腰:((箱顶)+(箱低))/2.01,LINETHICK2,COLORMAGENTA;
MA8:=1,NODRAW;//*MA8,,RGB(191,6,30),NOTEXT
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),COLORRED,LINETHICK2;
DRAWLINE1(CROSS(MA8*BACKSET(LV1,BARSLAST(HHV1)+1),0.5),HIGH,CROSS(MA8*BACKSET(HHV1,BARSLAST(LV1)+1),0.5),LOW,0),COLORGREEN,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;
DRAWCOLORKLINE(VALUEWHEN(HH12||LL12,LL12),COLORMAGENTA,0);
DRAWCOLORKLINE(VALUEWHEN(HH12||LL12,HH12),RGB(0,128,255),0);
//1、本级别 (BOLL20)笔:
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位小数;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2,COLORSTICK;
//DRAWNUMBER1(笔*REFX(LX,0),REFX(L,0),SUM(IF(MACD>0,MACD,0),BARSLAST(HX)+1),2),ALIGN2,VALIGN0,RGB(128,128,255);//向下笔(已完成)长度,保留2位小数;
//DRAWNUMBER1(笔*REFX(HX,0),REFX(H,0),SUM(IF(MACD<0,ABS(MACD),0),BARSLAST(LX)+1),2),ALIGN2,VALIGN2,RGB(128,128,255);//向上笔(已完成)长度,保留2位小数;