X_1:=30; X_2:=3; X_3:=15; X_4:=3; UPPERL:MA(HIGH,X_1)*(1+X_3/100),COLORWHITE; UPPERS:MA(HIGH,X_2)*(1+X_4/100),COLORYELLOW; LOWERS:MA(LOW,X_2)*(1-X_4/100),COLORMAGENTA; LOWERL:MA(LOW,X_1)*(1-X_3/100),COLORGREEN; X_5:=REF(CLOSE,1)*1.1-CLOSE<0.01; STICKLINE(X_5,OPEN,CLOSE,3,0),COLORMAGENTA; X_6:=CLOSE/REF(CLOSE,1)<0.913 AND CLOSE=LOW; STICKLINE(X_6,OPEN,CLOSE,2,0),COLORBLUE; X_7:=HHV(HIGH,20); X_8:=LLV(LOW,20); X_9:=REF((X_7/X_8-1)*100<=30,1); X_10:=REF(CLOSE,1); X_11:=SMA(MAX(CLOSE-X_10,0),6,1)/SMA(Abs(CLOSE-X_10),6,1)*100; STICKLINE(crOSS(84,X_11),CLOSE,OPEN,2.8,0),COLORGREEN; X_12:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,23))/EMA(CLOSE,23)); X_13:=DMA((2.15*CLOSE+LOW+HIGH)/4,X_12); MA1:MA(CLOSE,5); X_14:=CLOSE*vol; X_15:=EMA((expma(X_14,23)/EXPMA(VOL,23)+EXPMA(X_14,54)/EXPMA(VOL,54)+EXPMA(X_14,108)/EXPMA(VOL,108)+EXPMA(X_14,316)/EXPMA(VOL,316))/4,34); X_16:=1.0668*X_15; X_17:=CROSS(CLOSE,X_16) AND REF(CLOSE,1)*1.05-CLOSE<0.005 AND CLOSE>OPEN*0.5; X_18:=VOL; X_19:=X_18>MA(VOL,89); X_20:=EXPMA(CLOSE,5); X_21:=EXPMA(CLOSE,29); X_22:=X_20>X_21; X_23:=REF(CLOSE,1); X_24:=SMA(MAX(CLOSE-X_23,0),12,1)/SMA(ABS(CLOSE-X_23),12,1)*100; X_25:=SMA(MAX(CLOSE-X_23,0),56,1)/SMA(ABS(CLOSE-X_23),56,1)*100; X_26:=X_24>X_25 AND X_22 AND X_19 AND CLOSE>REF(HHV(HIGH,40),1); DRAWTEXT(X_17 AND X_26 AND X_9,LOW*0.99,'黑马一号'),COLORRED; STICKLINE(X_17 AND X_26 AND X_9,CLOSE,OPEN,3,0),COLOR000099; STICKLINE(X_17 AND X_26 AND X_9,CLOSE,OPEN,2.2,0),COLOR0000CC; STICKLINE(X_17 AND X_26 AND X_9,CLOSE,OPEN,1.5,0),COLORRED; STICKLINE(X_17 AND X_26 AND X_9,CLOSE,OPEN,0.5,0),COLORCC66FF; STICKLINE(X_17 AND X_26 AND X_9,OPEN,CLOSE,0.5,0),COLORYELLOW; X_27:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),(-VOL)/CAPITAL*100,0)),0); X_28:=VOL*CLOSE/100; X_29:=SUM(IF(X_28/8>20 AND CLOSE>REF(CLOSE,1),X_28,0),0); X_30:=SUM(IF(X_28/8>20 AND CLOSE<REF(CLOSE,1),X_28,0),0); X_31:=SUM(IF(X_28/8<20 AND CLOSE>REF(CLOSE,1),X_28,0),0); X_32:=SUM(IF(X_28/8<20 AND CLOSE<REF(CLOSE,1),X_28,0),0); X_33:=X_29+X_30+X_31+X_32; X_34:=1; X_35:=STRCAT(STRCAT(51,CON2STR(100*X_29/X_33,0)),52); X_36:=STRCAT(STRCAT(53,CON2STR(100*X_30/X_33,0)),52); DRAWTEXT_FIX(X_34=1,0.9,0.9,0,X_35),COLORRED; DRAWTEXT_FIX(X_34=1,0.9,0.99,0,X_36),COLORGREEN; X_37:=MA(CLOSE,5); X_38:=MA(CLOSE,10); X_39:=MA(CLOSE,20); X_40:=MA(CLOSE,30); X_41:=MA(CLOSE,55); X_42:=OPEN<X_37 AND OPEN<X_38 AND OPEN<X_39 AND LOW<X_40 AND LOW<X_41; X_43:=CLOSE>X_37 AND CLOSE>X_38 AND HIGH>X_39 AND HIGH>X_40 AND HIGH>X_41; X_44:=X_42 AND X_43; STICKLINE(X_44,CLOSE,OPEN,3,0),COLOR000099; STICKLINE(X_44,CLOSE,OPEN,2.2,0),COLOR0000CC; STICKLINE(X_44,CLOSE,OPEN,1.5,0),COLORRED; STICKLINE(X_44,CLOSE,OPEN,0.5,0),COLORCC66FF; STICKLINE(X_44,OPEN,CLOSE,0.5,0),COLORYELLOW; DRAWTEXT(X_44,LOW*0.97,'一穿五'),COLORRED;
X_1:=30;
X_2:=3;
X_3:=15;
X_4:=3;
UPPERL:MA(HIGH,X_1)*(1+X_3/100),COLORWHITE;
UPPERS:MA(HIGH,X_2)*(1+X_4/100),COLORYELLOW;
LOWERS:MA(LOW,X_2)*(1-X_4/100),COLORMAGENTA;
LOWERL:MA(LOW,X_1)*(1-X_3/100),COLORGREEN;
X_5:=REF(CLOSE,1)*1.1-CLOSE<0.01;
STICKLINE(X_5,OPEN,CLOSE,3,0),COLORMAGENTA;
X_6:=CLOSE/REF(CLOSE,1)<0.913 AND CLOSE=LOW;
STICKLINE(X_6,OPEN,CLOSE,2,0),COLORBLUE;
X_7:=HHV(HIGH,20);
X_8:=LLV(LOW,20);
X_9:=REF((X_7/X_8-1)*100<=30,1);
X_10:=REF(CLOSE,1);
X_11:=SMA(MAX(CLOSE-X_10,0),6,1)/SMA(Abs(CLOSE-X_10),6,1)*100;
STICKLINE(crOSS(84,X_11),CLOSE,OPEN,2.8,0),COLORGREEN;
X_12:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,23))/EMA(CLOSE,23));
X_13:=DMA((2.15*CLOSE+LOW+HIGH)/4,X_12);
MA1:MA(CLOSE,5);
X_14:=CLOSE*vol;
X_15:=EMA((expma(X_14,23)/EXPMA(VOL,23)+EXPMA(X_14,54)/EXPMA(VOL,54)+EXPMA(X_14,108)/EXPMA(VOL,108)+EXPMA(X_14,316)/EXPMA(VOL,316))/4,34);
X_16:=1.0668*X_15;
X_17:=CROSS(CLOSE,X_16) AND REF(CLOSE,1)*1.05-CLOSE<0.005 AND CLOSE>OPEN*0.5;
X_18:=VOL;
X_19:=X_18>MA(VOL,89);
X_20:=EXPMA(CLOSE,5);
X_21:=EXPMA(CLOSE,29);
X_22:=X_20>X_21;
X_23:=REF(CLOSE,1);
X_24:=SMA(MAX(CLOSE-X_23,0),12,1)/SMA(ABS(CLOSE-X_23),12,1)*100;
X_25:=SMA(MAX(CLOSE-X_23,0),56,1)/SMA(ABS(CLOSE-X_23),56,1)*100;
X_26:=X_24>X_25 AND X_22 AND X_19 AND CLOSE>REF(HHV(HIGH,40),1);
DRAWTEXT(X_17 AND X_26 AND X_9,LOW*0.99,'黑马一号'),COLORRED;
STICKLINE(X_17 AND X_26 AND X_9,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(X_17 AND X_26 AND X_9,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(X_17 AND X_26 AND X_9,CLOSE,OPEN,1.5,0),COLORRED;
STICKLINE(X_17 AND X_26 AND X_9,CLOSE,OPEN,0.5,0),COLORCC66FF;
STICKLINE(X_17 AND X_26 AND X_9,OPEN,CLOSE,0.5,0),COLORYELLOW;
X_27:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),(-VOL)/CAPITAL*100,0)),0);
X_28:=VOL*CLOSE/100;
X_29:=SUM(IF(X_28/8>20 AND CLOSE>REF(CLOSE,1),X_28,0),0);
X_30:=SUM(IF(X_28/8>20 AND CLOSE<REF(CLOSE,1),X_28,0),0);
X_31:=SUM(IF(X_28/8<20 AND CLOSE>REF(CLOSE,1),X_28,0),0);
X_32:=SUM(IF(X_28/8<20 AND CLOSE<REF(CLOSE,1),X_28,0),0);
X_33:=X_29+X_30+X_31+X_32;
X_34:=1;
X_35:=STRCAT(STRCAT(51,CON2STR(100*X_29/X_33,0)),52);
X_36:=STRCAT(STRCAT(53,CON2STR(100*X_30/X_33,0)),52);
DRAWTEXT_FIX(X_34=1,0.9,0.9,0,X_35),COLORRED;
DRAWTEXT_FIX(X_34=1,0.9,0.99,0,X_36),COLORGREEN;
X_37:=MA(CLOSE,5);
X_38:=MA(CLOSE,10);
X_39:=MA(CLOSE,20);
X_40:=MA(CLOSE,30);
X_41:=MA(CLOSE,55);
X_42:=OPEN<X_37 AND OPEN<X_38 AND OPEN<X_39 AND LOW<X_40 AND LOW<X_41;
X_43:=CLOSE>X_37 AND CLOSE>X_38 AND HIGH>X_39 AND HIGH>X_40 AND HIGH>X_41;
X_44:=X_42 AND X_43;
STICKLINE(X_44,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(X_44,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(X_44,CLOSE,OPEN,1.5,0),COLORRED;
STICKLINE(X_44,CLOSE,OPEN,0.5,0),COLORCC66FF;
STICKLINE(X_44,OPEN,CLOSE,0.5,0),COLORYELLOW;
DRAWTEXT(X_44,LOW*0.97,'一穿五'),COLORRED;