{红钻突破主图源码如下}
STICKLINE(C>=O,H,L,0,1), COLORRED;
STICKLINE(C>=O,C,O,3,0), COLORRED;
STICKLINE(C< O,H,L,0,0), COLORFFFF00;
STICKLINE(C< O,C,O,3,0),COLORFFFF00;
X_1:=MA(CLOSE,5),COLORWHITE;
X_47:=MA(CLOSE,10),COLORYELLOW;
X_60:=MA(CLOSE,20),COLORMAGENTA,LINETHICK2;
X_34:=MA(CLOSE,30),COLORGREEN;
X_41:=MA(CLOSE,60),COLORLIGRAY;
X_5:=MA(CLOSE,120),COLORLIGRAY;
X_10:SLOPE(X_1,2)*100,NODRAW;
X_96:SLOPE(X_47,2)*100,NODRAW;
X_73:SLOPE(X_60,2)*100,NODRAW;
X_48:SLOPE(X_34,2)*100,NODRAW;
X_6:SLOPE(X_41,2)*100,NODRAW;
X_69:SLOPE(X_5,2)*100,NODRAW;
X_59:= X_69>0;
X_67:= X_60>=X_34 AND X_34>=X_41 AND X_41>=X_5;
X_44:= X_1>=X_47 AND X_47>=X_60 AND X_60>=X_34;
X_25:=ABS(100*(H-L)/REF(C,1))>3;
X_51:=EMA(CLOSE,8)-EMA(CLOSE,13);
X_42:=EMA(X_51,6);
X_9:=2*(X_51-X_42);
X_13:=CROSS(X_51,X_42);
X_54:=CROSS(X_42,X_51);
X_11:=REF(X_51,3)< REF(X_51,2)AND REF(X_51,2)< REF(X_51,1)AND REF(X_51,1)>X_51=REF(X_51,1);
X_58:=REF(X_51,3)< REF(X_51,2)AND REF(X_9,2)< REF(X_9,1)AND REF(X_9,1)>X_9=REF(X_9,1);
X_92:=MAX(X_11,X_58);
X_35:=EVERY(X_51>REF(X_51,1),BARSLASTCOUNT(X_51>X_42))AND X_51>X_42;
X_75:=EVERY(X_9>REF(X_9,1),BARSLASTCOUNT(X_51>X_42))AND X_51>X_42;
X_52:=MAX(X_35,X_75);
X_84:=REF(MAX(C,O),BARSLAST(X_35)+1);
X_70:=REF(MAX(C,O),BARSLAST(X_75)+1);
X_55:=IF(X_70>=X_84,X_70,X_84);
X_88:=HHV(IF(C>O,C,MAX(C,O)),BARSLASTCOUNT(X_55)+1)=HHV(IF(C>O,C,MAX(C,O)),BARSLASTCOUNT(BBI>REF(BBI,1)AND C>BBI));
X_14:=EVERY(X_51< REF(X_51,1),BARSLASTCOUNT(X_51< X_42))AND X_51< X_42;
X_4:=EVERY(X_9< REF(X_9,1),BARSLASTCOUNT(X_51< X_42))AND X_51< X_42;
X_22:=MIN(X_14,X_4);
X_61:=REF(MIN(C,O),BARSLAST(X_14)+1);
X_78:=REF(MIN(C,O),BARSLAST(X_4)+1);
X_29:=IF(X_78<=X_61,X_61,X_78);
X_33:=LLV(IF(C< O,C,MIN(C,O)),BARSLASTCOUNT(X_22)+1)=LLV(IF(C< O,C,MIN(C,O)),BARSLASTCOUNT(X_51< REF(X_51,1) AND BBI< REF(BBI,1) AND L< BBI));
X_20:=BARSLAST(X_88)=1;
X_80:=REF(MAX(C,O),BARSLAST(X_20)+1);
X_23:=CROSS(C,X_80),NODRAW,COLORWHITE;
X_100:=REF(X_51,BARSLAST(X_20)+1);
X_27:=X_23 AND X_51>X_100;
X_18:=BARSLAST(X_33)=1;
X_93:=REF(MIN(C,O),BARSLAST(X_18)+1);
X_40:CROSS(X_93,C),NODRAW,COLORLIGREEN;
X_21:=BARSLAST(X_40)=1;
X_46:=REF(O,BARSLAST(X_21)+1);
X_99:CROSS(C,X_46),NODRAW,COLORLIMAGENTA;
X_999:=((X_99 AND C>O AND X_9>REF(X_9,1)) OR X_27) AND X_59;
DRAWICON(X_999,L*0.99,25);
{红钻突破 副图源码如下}
{红钻突破 副图}
X_5:=MA(CLOSE,120);
X_69:=SLOPE(X_5,2)*100;
X_59:= X_69>0;
X_51:=EMA(CLOSE,8)-EMA(CLOSE,13);
X_42:=EMA(X_51,6);
X_9:=2*(X_51-X_42);
X_35:=EVERY(X_51>REF(X_51,1),BARSLASTCOUNT(X_51>X_42))AND X_51>X_42;
X_75:=EVERY(X_9>REF(X_9,1),BARSLASTCOUNT(X_51>X_42))AND X_51>X_42;
X_84:=REF(MAX(C,O),BARSLAST(X_35)+1);
X_70:=REF(MAX(C,O),BARSLAST(X_75)+1);
X_55:=IF(X_70>=X_84,X_70,X_84);
X_88:=HHV(IF(C>O,C,MAX(C,O)),BARSLASTCOUNT(X_55)+1)=HHV(IF(C>O,C,MAX(C,O)),BARSLASTCOUNT(BBI>REF(BBI,1)AND C>BBI));
X_14:=EVERY(X_51< REF(X_51,1),BARSLASTCOUNT(X_51< X_42))AND X_51< X_42;
X_4:=EVERY(X_9< REF(X_9,1),BARSLASTCOUNT(X_51< X_42))AND X_51< X_42;
X_22:=MIN(X_14,X_4);
X_33:=LLV(IF(C< O,C,MIN(C,O)),BARSLASTCOUNT(X_22)+1)=LLV(IF(C< O,C,MIN(C,O)),BARSLASTCOUNT(X_51< REF(X_51,1) AND BBI< REF(BBI,1) AND L< BBI));
X_20:=BARSLAST(X_88)=1;
X_80:=REF(MAX(C,O),BARSLAST(X_20)+1);
X_23:=CROSS(C,X_80);
X_100:=REF(X_51,BARSLAST(X_20)+1);
X_27:=X_23 AND X_51>X_100;
X_18:=BARSLAST(X_33)=1;
X_93:=REF(MIN(C,O),BARSLAST(X_18)+1);
X_40:=CROSS(X_93,C);
X_21:=BARSLAST(X_40)=1;
X_46:=REF(O,BARSLAST(X_21)+1);
X_99:=CROSS(C,X_46);
红钻突破选股:((X_99 AND C>O AND X_9>REF(X_9,1)) OR X_27) AND X_59;
