复制内容到剪贴板
代码:
Y:=(HIGH+LOW)/2;
BLUE:=SMA(Y,13,1);
RED:=SMA(Y,8,1);
GREEN:=SMA(Y,5,1);
B2:=REF(BLUE,8);
R2:=REF(RED,5);
G2:=REF(GREEN,3);
KU1:=IF(HIGH=HHV(HIGH,3),1,0);
KD1:=IF(LOW=LLV(LOW,3),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)));
KU:=IF(CLOSE>B2 AND CLOSE>R2 AND CLOSE>G2,1,0);
KD:=IF(CLOSE<B2 AND CLOSE<R2 AND CLOSE<G2,-1,0);
KK:=IF(BARSLAST(KU=1 AND REF(KU,1)=0)<BARSLAST(KD=-1 AND REF(KD,1)=0),1,-1);
AO:=MA(Y,5)-MA(Y,34);
AC:=AO-MA(AO,5);
AC1:=REF(AC,1);
AO1:=REF(AO,1);
AO转:(170*MA(Y,5)-170*MA(Y,34)+165*MA(Y,33)-136*MA(Y,4))/29,LINETHICK0;
AO零:(165*MA(Y,33)-136*MA(Y,4))/29,LINETHICK0;
AC转:(5*34*5*AO-5*34*5*MA(AO,5)+5*34*4*MA(AO,4)+5*4*33*MA(Y,33)-4*34*4*MA(Y,4))/116,LINETHICK0;
AC零:(5*34*MA(AO,4)-34*4*MA(Y,4)+5*33*MA(Y,33))/29,LINETHICK0;
KAC:=IF(AC>AC1 AND AO>AO1,1,0);
KAO:=IF(AC<AC1 AND AO<AO1,-1,0);
蓝:SMA(Y,13,1),SHIFT8,colorFF0000;
红:SMA(Y,8,1),SHIFT5,colorFF;
绿:SMA(Y,5,1),SHIFT3,colorFF00;
上碎型:IF(HIGH>=R2,UL,REF(UL,BARSLAST(HIGH>R2))),LINETHICK0,colorFF00FF;
下碎型:IF(LOW<=R2,DL,REF(DL,BARSLAST(LOW<=R2))),LINETHICK0,colorFFFF;
STICKLINE(BARSLAST(ABS(上碎型-REF(上碎型,1)))<BARSLAST(CLOSE>上碎型 AND REF(CLOSE,1)<REF(上碎型,1)),上碎型,上碎型,3,1),colorFF00FF;
STICKLINE(BARSLAST(ABS(下碎型-REF(下碎型,1)))<BARSLAST(CLOSE<下碎型 AND REF(CLOSE,1)>REF(下碎型,1)),下碎型,下碎型,3,1),colorFFFF;
OL:=(170*MA(Y,5)-170*MA(Y,34)+165*MA(Y,33)-136*MA(Y,4))/29;
CL:=(165*MA(Y,33)-136*MA(Y,4)+170*(4*MA(AO,4)+5*(REF(AO,4)-MA(REF(AO,4),5)))/4)/29;
H1:=REF(HIGH,4);
H2:=REF(HIGH,3);
H3:=REF(HIGH,2);
H4:=REF(HIGH,1);
H5:=HIGH;
L1:=REF(LOW,4);
L2:=REF(LOW,3);
L3:=REF(LOW,2);
L4:=REF(LOW,1);
L5:=LOW;
∥:=H3>H2 AND H3>H1 AND H3>H4 AND H3>H5;
∥FRACTAL:=IF(∥,1,0);
∥VAR1:=BACKSET(∥FRACTAL,3);
∥VAR2:=FILTER(∥VAR1,2);
∥VAR3:=BACKSET(∥FRACTAL,5);
∣:=L3<L2 AND L3<L1 AND L3<L4 AND L3<L5;
∣FRACTAL:=IF(∣,1,0);
∣VAR1:=BACKSET(∣FRACTAL,3);
∣VAR2:=FILTER(∣VAR1,2);
∣VAR3:=BACKSET(∣FRACTAL,5);
DRAWICON(∥VAR2,HIGH*1.001,'S14');
DRAWICON(∣VAR2,LOW,'S14');
DRAWICON(CLOSE>上碎型 AND REF(CLOSE,1)<REF(上碎型,1),HIGH*1.015,4);
DRAWICON(CLOSE<下碎型 AND REF(CLOSE,1)>REF(下碎型,1),LOW*0.99,5);
DRAWICON(KU=1 AND REF(KU,1)=0 AND CLOSE<0,LOW,4);
DRAWICON(KD=-1 AND REF(KD,1)=0 AND CLOSE<0,HIGH*1.01,5);
DRAWICON(KU=0 AND REF(KU,1)=1 AND CLOSE<0,HIGH*1.01,7);
DRAWICON(KD=0 AND REF(KD,1)=-1 AND CLOSE<0,LOW,6);
STICKLINE(KAC=1 AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF;
STICKLINE(KAO=-1 AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF00;
STICKLINE(KAO=0 AND KAC=0 AND CLOSE>=OPEN,OPEN,CLOSE,8,1),color808080;
STICKLINE(CLOSE>=OPEN,HIGH,CLOSE,0.4,1),colorFF;
STICKLINE(CLOSE>=OPEN,OPEN,LOW,0.4,1),colorFF;
STICKLINE(KAC=1 AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFF;
STICKLINE(KAO=-1 AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFF00;
STICKLINE(KAO=0 AND KAC=0 AND CLOSE<OPEN,OPEN,CLOSE,8,0),color808080;
STICKLINE(OPEN>CLOSE,HIGH,OPEN,0.4,1),colorFFFF00;
STICKLINE(OPEN>CLOSE,CLOSE,LOW,0.4,1),colorFFFF00;
DU0:=CROSS(AO,0);
UD0:=CROSS(0,AO);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
UDGLINE:IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3)),colorFFD400;
JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0;
JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0;
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
DRAWTEXT(JDU2,LOW*0.98,'\n空\n转\n多'),ALIGN4;
DRAWTEXT(JUD2,HIGH*1.03,'\n多\n转\n空'),ALIGN5;
DRAWTEXT(JDU3,LOW*0.98,'\n多\n续\n多'),ALIGN4;
DRAWTEXT(JUD3,HIGH*1.03,'\n空\n续\n空'),ALIGN5;
BSLINE:=IF(BARSLAST(JDU2)<BARSLAST(JUD2),IF(REF(CROSS(0,AC),1) OR REF(CROSS(0,AO),1),LLV(LOW,2),REF(LLV(LOW,2),BARSLAST(REF(CROSS(0,AC),1) OR REF(CROSS(0,AO),1)))),IF(REF(CROSS(AC,0) OR REF(CROSS(AO,0),1),1),HHV(HIGH,2),REF(HHV(HIGH,2),BARSLAST(REF(CROSS(AC,0),1) OR REF(CROSS(AO,0),1)))));
DRAWICON(JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1),CLOSE,10),ALIGN4;
DRAWICON(JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1),CLOSE,11),ALIGN5;