浅笑综合A——主图指标源码

这是早期的源码，那时候刚开始写，喜欢功能多。像一锅大杂烩，现在年纪大了，喜欢清爽简单的源码。

效果如下：

源码如下：

文字源码如下：（我手机发布会有乱码）

以图片的为准，图片的一定正确。

VAR4:=(3*CLOSE+LOW+OPEN+HIGH)/6;
N:=VAR4;
多头线:=WMA(N,20);
空头线:=MA(多头线,8),DOTLINE,NODRAW;
JC:=CROSS(多头线,空头线);
SC:=CROSSDOWN(多头线,空头线);
WRSI:=SMA(MAX(CLOSE-REF(CLOSE,1),0),14,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),14,1)*100;
QX_A:=(C+HIGH+LOW)/3;
QX_B:=EMA(QX_A,14);
QX_C:=REF(QX_B,1);
分界线:QX_C,COLORMAGENTA;
M2:=EMA(C,6);
趋势:=EMA(M2,14),COLORRED,LINETHICK2,DOT;
主趋线:=EMA(M2,21),LINETHICK3,COLORRED,DOT;
MA5:=MA(C,5),COLORWHITE,LINETHICK1;
MA10:=MA(C,10),COLORBLUE,LINETHICK3;
//MA250:=EMA(C,250),COLORBLUE,LINETHICK3;
QX_2A:=EMA(QX_A,14);
QX_3A:=REF(QX_2A,1);
QX_4A:=EMA(QX_A,6),COLORMAGENTA,LINETHICK4;
趋势线:=EMA(EMA(EMA(EMA(C,2),2),2),2),LINETHICK2,COLORFF9A75,DOT;

//IF(QX_B>QX_C,QX_C,NULL),DOT,COLORRED,LINETHICK3;
//IF(QX_B<qx_c,qx_b,null),dot,colorgreen,linethick3; n1:=”C”>MAX(QX_C,QX_B);
N2:=C<min(qx_c,qx_b); drawcolorkline(barslast(n1)
DRAWCOLORKLINE(BARSLAST(N1)BARSLAST(N2) AND ISDOWN,COLORGREEN,0);

波段:=EMA(REF(趋势线,1),2),LINETHICK2,COLOR00FFFF;

多空线pro:=EMA(EMA(C,13),13),COLORWHITE,LINETHICK2;  //要么10，要么20日
B8:=多空线pro>REF(多空线pro,1); //这根才是显示的，
//IF(B8-1,多空线pro,NULL),COLORWHITE,LINETHICK3;
//IF(C>=多空线pro,多空线pro,NULL),COLORRED,LINETHICK3;
//IF(C<多空线pro,多空线pro,NULL),COLORGREEN,LINETHICK3;

HH:=HHV(HIGH,34);
LL:=LLV(LOW,34);
HH1:=BARSLAST((HH>REF(HH,1)));
LL1:=BARSLAST((LL=中长趋势线,中长趋势线,NULL),COLORMAGENTA,LINETHICK5;
//IF(C<中长趋势线,中长趋势线,NULL),COLORYELLOW,LINETHICK5;
//抛物线红状态:=中长趋势线=XCLOSE,NODRAW;
//抛物线转红:=CROSS(中长趋势线<xclose,0.5),nodraw; qx_n:=”IF(PERIOD=5,60,IF(PERIOD=30,30,IF(PERIOD=101,15,20)));” qx_m:=”IF(PERIOD=5,5,IF(PERIOD=30,6,IF(PERIOD=101,12,6)));” qx_tr1:=”MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));” qx_up:=”(HIGH+LOW)/2+MA(QX_TR1,QX_N)*QX_M;” qx_dn:=”(HIGH+LOW)/2-MA(QX_TR1,QX_N)*QX_M;” qx_l1:=”REF(QX_UP,BARSLAST(QX_UP<=REF(QX_UP,1)));” qx_l2:=”LLV(QX_UP,QX_N*1.5);” qx_ll:=”IF(QX_L2=REF(QX_L2,1)” and=”” qx_l1<ref(qx_l1,1),qx_l1,if(qx_l1=”qx_l2,qx_l1,qx_l2));” qx_s1:=”BARSLAST(CROSS(0.5,QX_UP=QX_LL))+1;” qx_s2:=”CROSS(COUNT((CROSS(CLOSE,QX_LL)” or=”” qx_up=””>QX_LL,QX_S1),0.5);
QX_A6:=BARSLAST(QX_S2);
QX_B6:=BARSLAST(CROSS(HHV(QX_DN,QX_A6+1),CLOSE));
QX_BY:=CROSS(QX_B6,QX_A6);
QX_SL:=CROSS(QX_A6,QX_B6);
QX_SUPERTREN:=IF(QX_B6>QX_A6,HHV(QX_DN,BARSLAST(QX_BY)+1),LLV(QX_UP,BARSLAST(QX_SL)+1));

HH_TMP:=HHV(HIGH,1)/10+HHV(HIGH,2)/10+HHV(HIGH,2)/10+HHV(HIGH,4)/10+HHV(HIGH,4)/10+HHV(HIGH,8)/10+HHV(HIGH,8)/10+HHV(HIGH,13)/10+HHV(HIGH,40)/10+HHV(HIGH,20)/10;
LL_TMP:=LLV(LOW,1)/10+LLV(LOW,2)/10+LLV(LOW,2)/10+LLV(LOW,4)/10+LLV(LOW,4)/10+LLV(LOW,8)/10+LLV(LOW,8)/10+LLV(LOW,13)/10+LLV(LOW,40)/10+LLV(LOW,20)/10;
H1:=IFELSE(HH_TMP<ref(hh_tmp,1)&&ll_tmpCLOSE&&OPEN>CLOSE,REF(HH_TMP,2),0);
L1:=IFELSE(LL_TMP>REF(LL_TMP,1)&&HH_TMP>REF(HH_TMP,1)&&REF(OPEN,1)<close&&open0,H1),LINETHICK2;
L2:=VALUEWHEN(L1>0,L1),LINETHICK2;
K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE0,K1);
TMP:=K2,LINETHICK2;

//DRAWCOLORKLINE(CROSS(多头线,空头线) OR D,COLORYELLOW,1);
//DRAWCOLORKLINE(CROSSDOWN(多头线,空头线) OR W,COLORYELLOW,1);
DRAWCOLORKLINE(CROSS(WRSI,15),COLORYELLOW,1);
DRAWCOLORKLINE(CROSS(80,WRSI),COLORYELLOW,1);
//DRAWCOLORKLINE(CROSS(TMP,0),COLORYELLOW,1);
//DRAWCOLORKLINE(CROSS(0,TMP),COLORYELLOW,1);
DRAWCOLORKLINE(CROSS(ZIGZAG(C,10,1),REF(ZIGZAG(C,10,1),1)),COLORYELLOW,1);
DRAWCOLORKLINE(CROSS(REF(ZIGZAG(C,10,1),1),ZIGZAG(C,10,1)),COLORYELLOW,1);

//信号输出
DRAWTEXT(FILTER(CROSS(WRSI,15),10),L,’★平空’),COLORYELLOW,FONTSIZ18;
DRAWTEXT(FILTER(CROSS(80,WRSI),10),H,’★平多’),COLOR00FF00,FONTSIZE18;

//多空条件判断
多条件1:=CROSS(多头线,空头线);
多条件2:=CROSS(QX_4A,趋势) AND 趋势线>波段 AND C>趋势线;
多条件3:=CROSS(LL1,HH1)&&C>=中长趋势线;
多条件4:=CROSS(多空线pro,中长趋势线);
多条件5:=CROSS(0,TMP);

空条件1:=CROSSDOWN(多头线,空头线);
空条件2:=CROSSDOWN(QX_4A,趋势) AND 趋势线<波段 AND C<趋势线;
空条件3:=CROSS(HH1,LL1)&&C<中长趋势线;
空条件4:=CROSSDOWN(多空线pro,中长趋势线);
空条件5:=CROSS(TMP,0);
多A:=多条件1 OR 多条件2 OR 多条件3 OR 多条件4 OR 多条件5;
空A:=空条件1 OR 空条件2 OR 空条件3 OR 空条件4 OR 空条件5;
多:=FILTER(多A,8);
空:=FILTER(空A,8);
//出字的K染色
DRAWCOLORKLINE(空,COLOR00FF00,1);
DRAWCOLORKLINE(多,COLORYELLOW,1);

//输出多空
DRAWTEXT(多,L,’★多’),COLORYELLOW,FONTSIZE16;

DRAWTEXT(空,H,’★空 ‘),COLOR00FF00,FONTSIZE16;

DRAWTEXT(FILTER(D=1,5),LOW,’★趋势买 ‘),FONTSIZE16,COLORMAGENTA;
DRAWTEXT(W=1,HIGH,’★趋势卖 ‘),FONTSIZE16,COLORGREEN;
//DRAWTEXT(CROSS(ZIGZAG(C,10,1),REF(ZIGZAG(C,10,1),1)),LOW-15,’抄大底 ‘),COLORMAGENTA,FONTSIZE25;
//DRAWTEXT(CROSS(REF(ZIGZAG(C,10,1),1),ZIGZAG(C,10,1)),HIGH+15,’逃大顶 ‘),COLORYELLOW,LINETHICK3,FONTSIZE25;

//KTEXT(CROSS(TMP,0),-BARSLAST(SC),H+5,1,COLORYELLOW,’空 66′),FONTSIZE22;
//KTEXT(CROSS(0,TMP),-BARSLAST(JC),L-5,1,COLORMAGENTA,’多 73′),FONTSIZE22,VALIGN0;

//关闭抛物线
//DRAWLASTBARTEXT(IF(中长趋势线</close&&open</ref(hh_tmp,1)&&ll_tmp</ref(qx_l1,1),qx_l1,if(qx_l1=”qx_l2,qx_l1,qx_l2));”></qx_c,qx_b,null),dot,colorgreen,linethick3;>

<qx_c,qx_b,null),dot,colorgreen,linethick3; n1:=”C”><min(qx_c,qx_b); drawcolorkline(barslast(n1)<xclose,0.5),nodraw; qx_n:=”IF(PERIOD=5,60,IF(PERIOD=30,30,IF(PERIOD=101,15,20)));” qx_m:=”IF(PERIOD=5,5,IF(PERIOD=30,6,IF(PERIOD=101,12,6)));” qx_tr1:=”MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));” qx_up:=”(HIGH+LOW)/2+MA(QX_TR1,QX_N)*QX_M;” qx_dn:=”(HIGH+LOW)/2-MA(QX_TR1,QX_N)*QX_M;” qx_l1:=”REF(QX_UP,BARSLAST(QX_UP<=REF(QX_UP,1)));” qx_l2:=”LLV(QX_UP,QX_N*1.5);” qx_ll:=”IF(QX_L2=REF(QX_L2,1)” and=”” qx_l1<ref(qx_l1,1),qx_l1,if(qx_l1=”qx_l2,qx_l1,qx_l2));” qx_s1:=”BARSLAST(CROSS(0.5,QX_UP=QX_LL))+1;” qx_s2:=”CROSS(COUNT((CROSS(CLOSE,QX_LL)” or=”” qx_up=””><ref(hh_tmp,1)&&ll_tmp<close&&open</close&&open</ref(hh_tmp,1)&&ll_tmp</ref(qx_l1,1),qx_l1,if(qx_l1=”qx_l2,qx_l1,qx_l2));”></qx_c,qx_b,null),dot,colorgreen,linethick3;>

用//注释掉的功能，可以去掉//，就启用啦