文华财经6 (支撑压力位自动划线源码)

DIFF := EMA(CLOSE,12) – EMA(CLOSE,26);

DEA := EMA(DIFF,9);

MACD:2*(DIFF-DEA),COLORSTICK,NODRAW;

JC:=CROSS(DIFF,DEA);

SC:=CROSS(DEA,DIFF);

P1:=REF(SUM(IF(NOT(ISDOWN),MACD,0),BARSLAST(JC)+1) ,1),NODRAW;

HH:=P1>=5.05 && (SC||ISLASTBAR&&DIFF>DEA)&&IF(ISLASTBAR&&JC,ISUP&&ABS(O-C)>20*MINPRICE,IF(SC&&REF(JC,1),REF(ISUP&&ABS(O-C)>20*MINPRICE,1) ,REF(ROUND( HHV(IF(ISUP,MAX(O,C),0),BARSLAST(JC)+1)-VALUEWHEN(ISUP&&COUNT(ISUP,BARSLAST(JC)+1)=1,MIN(O,C)),2)>=8*MINPRICE ,1)));

DRAWSL(HH,REF(HHV(H,BARSLAST(JC)+1),1),0,-SUMBARS(JC,1)+1,0,COLORRED),LINETHICK3;

DRAWSL(JC&&REF(VALUEWHEN(SC,HH),1),VALUEWHEN(SC,REF(HHV(H,BARSLAST(JC)+1),1)),0,-SUMBARS(SC,1)+1,0,COLORRED),LINETHICK3;

P2:=REF(SUM(IF(NOT(ISUP),MACD,0),BARSLAST(SC)+1) ,1),NODRAW;

LL:=ABS(P2)>=5.05 && (JC||ISLASTBAR&&DIFF<DEA)&&IF(ISLASTBAR&&SC,ISDOWN&&ABS(O-C)>20*MINPRICE,IF(JC&&REF(SC,1),REF(ISDOWN&&ABS(O-C)>20*MINPRICE,1), REF(ROUND( VALUEWHEN(ISDOWN&&COUNT(ISDOWN,BARSLAST(SC)+1)=1,MAX(O,C)) -LLV(IF(ISDOWN,MIN(O,C),999999),BARSLAST(SC)+1),2)>=8*MINPRICE,1)));

DRAWSL(LL,REF(LLV(L,BARSLAST(SC)+1),1),0,-SUMBARS(SC,1)+1,0,COLORGREEN),LINETHICK3;

DRAWSL(SC&&REF(VALUEWHEN(JC,LL),1),VALUEWHEN(JC,REF(LLV(L,BARSLAST(SC)+1),1)),0,-SUMBARS(JC,1)+1,0,COLORGREEN),LINETHICK3;

XH:=VALUEWHEN(HH,REF(HHV(H,BARSLAST(JC)+1),1));