|
火眼金睛
源码分享
X_1:=ABS(CLOSE-REF(CLOSE,30));
X_2:=SUM(ABS(CLOSE-REF(CLOSE,1)),30);
X_3:=X_1/X_2;
X_4:=X_3*(0.8-2/24)+2/24;
X_5:=X_4*X_4;
X_6:=EMA(DMA(CLOSE,X_5),2);
X_7:=CLOSE>X_6 AND X_6>REF(X_6,1);
X_8:=CLOSE<X_6 AND X_6<=REF(X_6,1);
X_9:=CONST(IF(X_7,200,IF(X_8,0,DRAWNULL)));
X_10:=CONST(IF(X_7,0,IF(X_8,20,DRAWNULL)));
X_11:=CONST(IF(X_7,0,IF(X_8,0,DRAWNULL)));
DRAWGBK(CLOSE>0,RGB(X_9,X_10,X_11),RGB(0,120,120),0,54,0);
ZK1:XMA(XMA(HIGH,21),21)-(XMA(XMA(LOW,21),21)-XMA(XMA(HIGH,21),21)),DOTLINE,COLORFF9933;
ZD1:XMA(XMA(LOW,21),21)-(XMA(XMA(HIGH,21),21)-XMA(XMA(LOW,21),21)),DOTLINE,COLORFF9933;
EXP1:EMA(CLOSE,12),COLORWHITE,LINETHICK2;
EXP2:EMA(CLOSE,50),COLORYELLOW,LINETHICK2;
X_12:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100<(-14);
X_13:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
X_14:=REF(X_13,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
X_15:=REF(X_14,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_16:=REF(X_15,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
X_17:=REF(X_16,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_18:=REF(X_17,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
X_19:=REF(X_18,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_20:=REF(X_19,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
X_21:=REF(X_20,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_22:=REF(X_21,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
X_23:=REF(X_22,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_24:=REF(X_23,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
X_25:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
X_26:=REF(X_25,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_27:=REF(X_26,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
X_28:=REF(X_27,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_29:=REF(X_28,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
X_30:=REF(X_29,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_31:=REF(X_30,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
X_32:=REF(X_31,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_33:=REF(X_32,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
X_34:=REF(X_33,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_35:=REF(X_34,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
X_36:=REF(X_35,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
X_37:=REF(X_25 OR X_26 OR X_27 OR X_28 OR X_29 OR X_30 OR X_31 OR X_32 OR X_33 OR X_34 OR X_35 OR X_36,1) AND X_13;
X_38:=REF(X_13 OR X_14 OR X_15 OR X_16 OR X_17 OR X_18 OR X_19 OR X_20 OR X_21 OR X_22 OR X_23 OR X_24,1) AND X_25;
红持股:X_13 OR X_14 OR X_15 OR X_16 OR X_17 OR X_18 OR X_19 OR X_20 OR X_21 OR X_22 OR X_23 OR X_24,NODRAW,COLORRED;
青观望:X_25 OR X_26 OR X_27 OR X_28 OR X_29 OR X_30 OR X_31 OR X_32 OR X_33 OR X_34 OR X_35 OR X_36,NODRAW,COLORCYAN;
短买:X_37,NODRAW,COLOR33FFCC;
品红离场:X_38,NODRAW,COLORFF00DD;
STICKLINE(X_13 OR X_14 OR X_15 OR X_16 OR X_17 OR X_18 OR X_19 OR X_20 OR X_21 OR X_22 OR X_23 OR X_24,CLOSE,REF(CLOSE,1),2.6,0),COLOR000099;
STICKLINE(X_13 OR X_14 OR X_15 OR X_16 OR X_17 OR X_18 OR X_19 OR X_20 OR X_21 OR X_22 OR X_23 OR X_24,CLOSE,REF(CLOSE,1),2.4,0),COLOR0000AA;
STICKLINE(X_13 OR X_14 OR X_15 OR X_16 OR X_17 OR X_18 OR X_19 OR X_20 OR X_21 OR X_22 OR X_23 OR X_24,CLOSE,REF(CLOSE,1),2.2,0),COLOR0000BB;
STICKLINE(X_13 OR X_14 OR X_15 OR X_16 OR X_17 OR X_18 OR X_19 OR X_20 OR X_21 OR X_22 OR X_23 OR X_24,CLOSE,REF(CLOSE,1),2,0),COLOR0000CC;
STICKLINE(X_13 OR X_14 OR X_15 OR X_16 OR X_17 OR X_18 OR X_19 OR X_20 OR X_21 OR X_22 OR X_23 OR X_24,CLOSE,REF(CLOSE,1),1.8,0),COLOR0000DD;
STICKLINE(X_13 OR X_14 OR X_15 OR X_16 OR X_17 OR X_18 OR X_19 OR X_20 OR X_21 OR X_22 OR X_23 OR X_24,CLOSE,REF(CLOSE,1),1.5,0),COLOR0000EE;
STICKLINE(X_13 OR X_14 OR X_15 OR X_16 OR X_17 OR X_18 OR X_19 OR X_20 OR X_21 OR X_22 OR X_23 OR X_24,CLOSE,REF(CLOSE,1),1,0),COLORRED;
STICKLINE(X_13 OR X_14 OR X_15 OR X_16 OR X_17 OR X_18 OR X_19 OR X_20 OR X_21 OR X_22 OR X_23 OR X_24,LOW,HIGH,0,0),COLORRED;
STICKLINE(X_25 OR X_26 OR X_27 OR X_28 OR X_29 OR X_30 OR X_31 OR X_32 OR X_33 OR X_34 OR X_35 OR X_36,CLOSE,REF(CLOSE,1),2.6,0),COLOR999900;
STICKLINE(X_25 OR X_26 OR X_27 OR X_28 OR X_29 OR X_30 OR X_31 OR X_32 OR X_33 OR X_34 OR X_35 OR X_36,CLOSE,REF(CLOSE,1),2.4,0),COLORAAAA00;
STICKLINE(X_25 OR X_26 OR X_27 OR X_28 OR X_29 OR X_30 OR X_31 OR X_32 OR X_33 OR X_34 OR X_35 OR X_36,CLOSE,REF(CLOSE,1),2,2),COLORBBBB00;
STICKLINE(X_25 OR X_26 OR X_27 OR X_28 OR X_29 OR X_30 OR X_31 OR X_32 OR X_33 OR X_34 OR X_35 OR X_36,CLOSE,REF(CLOSE,1),1.8,0),COLORDDDD00;
STICKLINE(X_25 OR X_26 OR X_27 OR X_28 OR X_29 OR X_30 OR X_31 OR X_32 OR X_33 OR X_34 OR X_35 OR X_36,CLOSE,REF(CLOSE,1),1.5,0),COLOREEEE00;
STICKLINE(X_25 OR X_26 OR X_27 OR X_28 OR X_29 OR X_30 OR X_31 OR X_32 OR X_33 OR X_34 OR X_35 OR X_36,CLOSE,REF(CLOSE,1),1,0),COLORCYAN;
STICKLINE(X_25 OR X_26 OR X_27 OR X_28 OR X_29 OR X_30 OR X_31 OR X_32 OR X_33 OR X_34 OR X_35 OR X_36,LOW,HIGH,0,0),COLORCYAN;
STICKLINE(X_37,REF(CLOSE,1),REF(CLOSE,2),2.8,0),COLOR33AACC;
STICKLINE(X_37,REF(CLOSE,1),REF(CLOSE,2),2.4,0),COLOR33BBCC;
STICKLINE(X_37,REF(CLOSE,1),REF(CLOSE,2),2,2),COLOR33CCCC;
STICKLINE(X_37,REF(CLOSE,1),REF(CLOSE,2),2,0),COLOR33DDCC;
STICKLINE(X_37,REF(CLOSE,1),REF(CLOSE,2),1.8,0),COLOR33EECC;
STICKLINE(X_37,REF(CLOSE,1),REF(CLOSE,2),1.5,0),COLOR33FFCC;
DRAWTEXT(X_37,REF(CLOSE,1),55),COLOR33FFCC;
STICKLINE(X_38,REF(CLOSE,1),REF(CLOSE,2),2.8,0),COLORFF33FF;
STICKLINE(X_38,REF(CLOSE,1),REF(CLOSE,2),2,0),COLORFF55FF;
STICKLINE(X_38,REF(CLOSE,1),REF(CLOSE,2),1.8,0),COLORFF66FF;
STICKLINE(X_38,REF(CLOSE,1),REF(CLOSE,2),1.5,0),COLORFF77FF;
STICKLINE(X_38,REF(CLOSE,1),REF(CLOSE,2),1.3,0),COLORFF88FF;
STICKLINE(X_38,REF(CLOSE,1),REF(CLOSE,2),1,0),COLORFF99FF;
DRAWTEXT(X_38,REF(CLOSE,1)+0.1,56),COLORFF99FF;
X_39:=MA(CLOSE,3);
X_40:=(3*CLOSE+LOW+OPEN+HIGH)/6;
金线:(20*X_40+19*REF(X_40,1)+18*REF(X_40,2)+17*REF(X_40,3)+16*REF(X_40,4)+15*REF(X_40,5)+14*REF(X_40,6)+13*REF(X_40,7)+12*REF(X_40,8)+11*REF(X_40,9)+10*REF(X_40,10)+9*REF(X_40,11)+8*REF(X_40,12)+7*REF(X_40,13)+6*REF(X_40,14)+5*REF(X_40,15)+4*REF(X_40,16)+3*REF(X_40,17)+2*REF(X_40,18)+REF(X_40,20))/211,COLORRED;
银线:MA(CLOSE,26),COLORMAGENTA;
X_41:=IF(X_39>金线,金线,X_39);
IF(X_41>REF(X_41,1),X_41,DRAWNULL),COLORRED,LINETHICK2;
IF(金线>REF(金线,1),金线,DRAWNULL),COLORRED,LINETHICK2;
IF(金线<REF(金线,1),金线,DRAWNULL),COLORGREEN;
IF(银线>REF(银线,1),银线,DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(银线<REF(银线,1),银线,DRAWNULL),COLOR669933;
X_42:=STRCAT(57,STRCAT(STRCAT(STRCAT(58,HYBLOCK),STRCAT(59,DYBLOCK)),STRCAT(60,GNBLOCK)));
X_43:=STRCAT(STRCAT(61,CON2STR(TOTALCAPITAL/1000000,2)),62);
X_44:=STRCAT(STRCAT(63,CON2STR(CAPITAL/1000000,2)),62);
|
