支撑压力突破+均线+高低点统计主图源码
如分享的源码如对您有帮助,希望您也能支持我们一下!
点击右下方三个按钮回礼和鼓励,让我们有继续创作的动力!


二、源码仅用于文华软件,新建主图类型
MA7:MA(C,7),COLORMAGENTA,LINETHICK2;
EMA30:EMA2(C,20),COLORWHITE,LINETHICK3;
EMA70:=EMA2(C,50),COLORRED,LINETHICK4;
EMA100:=EMA(C,100),COLORGREEN,LINETHICK4;
DIFF:=EMA(CLOSE,7) – EMA(CLOSE,16);
DEA:=EMA(DIFF,7);
MACD:=2*(DIFF-DEA);
//潮汐指标
CMI:=ABS(C-REF(C,15))/(HHV(H,16)-LLV(L,16))*100;
//ATR
TR : =MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR : =MA(TR,16);
BIAS1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;//
趋势度:=(C-VALUEWHEN(DAYBARPOS=1,O))/(HHV(H,DAYBARPOS)-LLV(L,DAYBARPOS));
LC:=REF(CLOSE,1); //取前一根K线的收盘价
VID:=SUM(VOL,2)/((HHV(HIGH,2)-LLV(LOW,2))*100); //2周期成交量相加,除以2周期最高价和最低价的差值乘以100
RC:=(CLOSE-LC)*VID;//收盘价与LC的差值,乘以VID
LONG:=SUM(RC,0); //将所有K线上RC的数值求和
LONGMA1:=SMA(LONG,10,1); //LONG的10个周期内的扩展指数加权移动平均
LONGMA2:=SMA(LONG,20,1); //LONG的20个周期内的扩展指数加权移动平均
LON:=LONGMA1-LONGMA2; //LONGMA1与LONGMA2做差
LONGMA:=MA(LON,10); //LON的N个周期均值
LONGT:=LON,COLORSTICK;
VOL1:=MA((VOL-REF(VOL,1))/REF(VOL,1),5);//取成交量与上一周期成交量的差值,除以上一周期成交量的五周期均值
JC2:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;//取收盘价与24周期均线的差值,除以24周期均线,取得的比值乘100
SHORT:=JC2*(1+VOL1);
SHORTMA:=MA(SHORT,5);//取SHORT的N周期均值
SHORTT:=SHORT,COLORSTICK;
DRAWTEXT(DEA>0&&MACD>0&&DIFF>0&&SHORTMA>0&&SHORT>0&&SHORT>SHORTMA&&C>MA7 &&C>EMA30 && C>HV(MAX(O,C),4) ,L,’↑’),VALIGN0,COLORRED,FONTSIZE40;
DRAWTEXT(DEA<0&&MACD<0&&DIFF<0&&SHORTMA<0&&SHORT<0&&SHORT<SHORTMA&&C<MA7&&C<EMA30 && C<LV(MIN(O,C),4 ),H,’↓’),COLORGREEN,FONTSIZE40;
// 反转 当前面4根K线任意 一根 出现高高预警时,当前K线低于前2根K线的最低价时,预警 涨不动
N1:=DEA>0&&MACD>0&&DIFF>0&&SHORTMA>0&&SHORT>0&&C>MA7 &&C>EMA30 &&SHORT>SHORTMA&& C>HV(MAX(O,C),4) ;
N2:=DEA<0&&MACD<0&&DIFF<0&&SHORTMA<0&&SHORT<0&&C<MA7&&C<EMA30 &&SHORT<SHORTMA && C<LV(MIN(O,C),4 );
//NN:=EXIST(N1,3) AND C<LV(L,2);
//PP:=EXIST(N2,3) AND C>HV(H,2);
NN:=REF(EXIST(N1,7),1) AND C<LV(L,5);
PP:=REF(EXIST(N2,7),1) AND C>HV(H,5);
DRAWICON(NN,H,2);
DRAWICON(PP,H,1);
CONDA1:=O>EMA70&&C>EMA100&&MA7>EMA30&&C>EMA70&&C>HV(MAX(O,C),4)&&C>REF(IF(EXIST(ISUP,20),HHV(IF(ISUP,C,0),20),HHV(C,3)),1)&&SHORT>0&&ISUP&&(SHORTMA>REF(SHORTMA,1)||SHORT>REF(SHORT,1))&&MACD>0&&DIFF>0&&趋势度>0.4;
CONDA2:=O<EMA70&&C<EMA100&&MA7<EMA30&&C<EMA70&&C<LV(MIN(O,C),4)&&C<REF(IF(EXIST(ISDOWN,20),LLV(IF(ISDOWN,C,10000000),20),LLV(C,3)),1)&&SHORT<0&&ISDOWN&&(SHORTMA<REF(SHORTMA,1)||SHORT<REF(SHORT,1))&&MACD<0&&DIFF<0&&趋势度<-0.4;
//金肯特
MOVAVGVAL:=MA((HIGH+LOW+CLOSE)/3,20);//三价均线
TRUEHIGH1:=IF(HIGH>REF(C,1),HIGH,REF(C,1));
TRUELOW1:=IF(LOW<=REF(C,1),LOW,REF(C,1));
TRUERANGE1:=IF(ISLASTBAR,H-L,TRUEHIGH1-TRUELOW1);
UPBAND:=MOVAVGVAL+MA(TRUERANGE1,3);//通道上轨
DNBAND:=MOVAVGVAL-MA(TRUERANGE1,3);//通道上轨
LIQUIDPOINT:=MOVAVGVAL;//出场条件
IF(L<LV(L,BARPOS),L,LV(L,BARPOS)),COLORWHITE,LINETHICK3;
IF(H>HV(H,BARPOS),H,HV(H,BARPOS)),COLORWHITE,LINETHICK3;
Q:=10;
QQ := C ;
A1:= REF ( QQ ,10)= HHV ( QQ ,2*10+1);
B1:= FILTER (A1,10);
C1:= BACKSET (B1,10+1);
HD := FILTER (C1,10);
A2:= REF ( QQ ,10)= LLV ( QQ ,2*10+1);
B2:= FILTER (A2,10);
C2:= BACKSET (B2,10+1);
LD := FILTER (C2,10);
A := REF ( C , BARSLAST ( HD ));
B := REF ( L , BARSLAST ( LD ));
T1:= BARSLAST ( HD )< BARSLAST ( LD ) AND NOT ( HD );
T2:= BARSLAST ( HD )> BARSLAST ( LD ) AND NOT ( LD );
压力: IF (T1, A , A ), COLORRED , LINETHICK5 , NODRAW ;
支撑: IF (T2, B , B ), COLORGREEN ,LINETHICK5, NODRAW ;
DRAWCOLORKLINE ( CROSS ( C ,压力)&&ISUP, COLORMAGENTA , 0 );//上涨颜色K线
DRAWCOLORKLINE ( CROSSDOWN ( C ,支撑)&&ISDOWN, COLORGREEN , 0 );//下跌颜色K线
DRAWCOLORKLINE ( CROSS ( C ,压力)&&ISUP,COLORMAGENTA , 0 );//上涨颜色K线
DRAWCOLORKLINE ( CROSSDOWN ( C ,支撑)&&ISDOWN, COLORBLUE , 0 );//下跌颜色K线
CROSS ( C ,压力)&&ISUP|| CROSSDOWN ( C ,支撑)&&ISDOWN, SOUND (‘ A ‘);
VALUEWHEN(压力<> REF (压力,1),压力),LINETHICK3,COLORRED;//上线
VALUEWHEN(支撑<> REF (支撑,1),支撑),LINETHICK3,COLORGREEN;//下线
N:=10;
AA10:=REF(H,N)=HHV(H,2*N+1);
AA11:=REF(L,N)=LLV(L,2*N+1);
QY10:=BACKSET(AA10,N+1);
QY11:=BACKSET(AA11,N+1);
CC10:=FILTER(QY10,N) AND H=HHV(H,N+1);
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
CC11:=FILTER(QY11,N) AND L=LLV(L,N+1);
DDD10:=BARSLAST(CC10);
DD11:=BARSLAST(CC11);
GDTS1:=IF(CC10,CURRBARSCOUNT,0);
DDTS10:=IF(CC11,CURRBARSCOUNT,0);
DINGBUTS10:=IF(DDD10,REF(GDTS1,DDD10),GDTS1);
DDTS11:=IF(DD11,REF(DDTS10,DD11),DDTS10);
GDCS10:=REFX1(DINGBUTS10,10000);
DDCS10:=REFX1(DDTS11,10000);
DINGBUTS11:=REF(DINGBUTS10,DDD10+1);
DDTS20:=REF(DDTS11,DD11+1);
GDCS2:=REFX1(DINGBUTS11,10000);
DDCS2:=REFX1(DDTS20,10000);
DRAWSL(ISLASTBAR&&C>REF(H,GDCS2-1),REF(H,GDCS2-1),0,-GDCS2+1,0,COLORRED),LINETHICK2;
DRAWSL(ISLASTBAR&&C<REF(H,GDCS2-1),REF(H,GDCS2-1),0,-GDCS2+1,0,COLORGREEN),LINETHICK2;
KTEXT(ISLASTBAR&&C>REF(H,GDCS2-1),-GDCS2+1,REF(H,GDCS2-1),1,COLORRED,’高1′),COLORRED;
KTEXT(ISLASTBAR&&C<REF(H,GDCS2-1),-GDCS2+1,REF(H,GDCS2-1),1,COLORGREEN,’高1′),COLORGREEN;
DRAWSL(ISLASTBAR&&C>REF(H,GDCS10-1),REF(H,GDCS10-1),0,-GDCS10+1,0,COLORRED),LINETHICK2;
DRAWSL(ISLASTBAR&&C<REF(H,GDCS10-1),REF(H,GDCS10-1),0,-GDCS10+1,0,COLORGREEN),LINETHICK2;
KTEXT(ISLASTBAR&&C>REF(H,GDCS10-1),-GDCS10+1,REF(H,GDCS10-1),1,COLORRED,’高2′),COLORRED;
KTEXT(ISLASTBAR&&C<REF(H,GDCS10-1),-GDCS10+1,REF(H,GDCS10-1),1,COLORGREEN,’高2′),COLORGREEN;
DRAWSL(ISLASTBAR&&C>REF(L,DDCS2-1),REF(L,DDCS2-1),0,-DDCS2+1,0,COLORRED),LINETHICK2;
DRAWSL(ISLASTBAR&&C<REF(L,DDCS2-1),REF(L,DDCS2-1),0,-DDCS2+1,0,COLORGREEN),LINETHICK2;
KTEXT(ISLASTBAR&&C>REF(L,DDCS2-1),-DDCS2+1,REF(L,DDCS2-1),1,COLORRED,’低1′),VALIGN0;
KTEXT(ISLASTBAR&&C<REF(L,DDCS2-1),-DDCS2+1,REF(L,DDCS2-1),1,COLORGREEN,’低1′),VALIGN0;
DRAWSL(ISLASTBAR&&C>REF(L,DDCS10-1),REF(L,DDCS10-1),0,-DDCS10+1,0,COLORRED),LINETHICK2;
DRAWSL(ISLASTBAR&&C<REF(L,DDCS10-1),REF(L,DDCS10-1),0,-DDCS10+1,0,COLORGREEN),LINETHICK2;
KTEXT(ISLASTBAR&&C>REF(L,DDCS10-1),-DDCS10+1,REF(L,DDCS10-1),1,COLORRED,’低2′),COLORRED,VALIGN0;
KTEXT(ISLASTBAR&&C<REF(L,DDCS10-1),-DDCS10+1,REF(L,DDCS10-1),1,COLORGREEN,’低2′),COLORGREEN,VALIGN0;
三、更好用的指标案例图:不公开发布代码!
1、主图:趋势波段王,幅图:支撑压力多分界线,幅图:macd多空反转

2、趋势趋势趋势类的指标,幅图是多空背离

3、主图:支撑压力转折多空,量化操作提示。幅图:多空量柱趋势变色线

声明:
源码供个人学习研究之用,不具备指导作用,依次操作,所有责任由您本人自行承担!
夜雨聆风