X_1:=2;
X_2:=BARSLAST(CURRBARSCOUNT=100);X_3:=CONST(IF(ISLASTBAR=1,LLV(LOW,X_2),0));X_4:=IF(AMOUNT/CLOSE/(HHV(AMOUNT,20)/HHV(CLOSE,20))*100>100,100,AMOUNT/CLOSE/(HHV(AMOUNT,20)/HHV(CLOSE,20))*100);AA10:MA(CLOSE,0),COLORRED;AA12:MA(CLOSE,0),COLORRED;X_5:=ATAN(AA10-REF(AA10,1))*3.1416*10;X_6:=ATAN(AA12-REF(AA12,1))*3.1416*10;X_7:=MA(CLOSE,13);X_8:=(CLOSE+LOW+HIGH)/3;X_9:=ATAN(EMA(X_8,13)-REF(EMA(X_8,13),1))*3.1416*10;X_10:=EMA(CLOSE,8);DRAWBAND(IF(CURRBARSCOUNT<=100,X_3+MACD.DIF*1.5,DRAWNULL),RGB(230,12,12),X_3,RGB(10,30,230));DRAWBAND(IF(CURRBARSCOUNT<=100,X_3+MACD.DIF*1.5,DRAWNULL),RGB(230,30,12),X_3,RGB(10,200,30));IF(CURRBARSCOUNT< 100,X_3+MACD.DIF*1.5,DRAWNULL),COLORYELLOW;X_11:=EMA(EMA(CLOSE,2),2);AZ1:EMA(HHV(X_11,1),2),COLORWHITE;AZ2:EMA(HHV(AZ1,X_1),1),COLORFF99FF;AZ3:EMA(HHV(AZ2,X_1),2),COLORFF77FF;AZ4:EMA(HHV(AZ3,X_1),3),COLORFF55FF;AZ5:EMA(HHV(AZ4,X_1),4),COLORFF33FF;AZ6:EMA(HHV(AZ5,X_1),5),COLORFF11FF;AZ7:EMA(HHV(AZ6,X_1),6),COLORMAGENTA;STICKLINE(OPEN>=CLOSE,HIGH,LOW,0,0),COLORCYAN;STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),COLORCYAN;STICKLINE(CLOSE>OPEN,LOW,HIGH,0,0),COLORRED;STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,1),COLORRED;IF(AZ1< REF(AZ1,1),AZ1,DRAWNULL),COLORDD1100;IF(AZ2< REF(AZ2,1),AZ2,DRAWNULL),COLORDD2200;IF(AZ3< REF(AZ3,1),AZ3,DRAWNULL),COLORDD3300;IF(AZ4< REF(AZ4,1),AZ4,DRAWNULL),COLORDD4400;IF(AZ5< REF(AZ5,1),AZ5,DRAWNULL),COLORDD5500;IF(AZ6< REF(AZ6,1),AZ6,DRAWNULL),COLORDD6600;IF(AZ7< REF(AZ7,1),AZ7,DRAWNULL),COLORDD7700;WWW70822COM:DRAWNULL,COLORRED;X_12:=EMA(CLOSE,5);X_13:=EMA(CLOSE,13);X_14:=EMA(CLOSE,34);X_15:=EMA(CLOSE,55);X_16:=EMA(CLOSE,89);X_17:=MAX(MAX(MAX(X_12,X_13),X_14),X_15)/MIN(MIN(MIN(X_12,X_13),X_14),X_15)<=1.01 AND X_13>REF(X_13,1) AND X_14>REF(X_14,1) AND X_15>REF(X_15,1);X_18:=MAX(MAX(X_12,X_13),X_14)/MIN(MIN(X_12,X_13),X_14)<=1.01 AND X_12>REF(X_12,1) AND X_13>REF(X_13,1) AND X_14>REF(X_14,1);X_19:=MAX(MAX(X_12,X_13),X_16)/MIN(MIN(X_12,X_13),X_16)<=1.01 AND X_13>REF(X_13,1);X_20:=MAX(MAX(X_13,X_14),X_15)/MIN(MIN(X_13,X_14),X_15)<=1.01 AND X_13>REF(X_13,1);X_21:=X_17 OR X_18 OR X_19 OR X_20;STICKLINE(X_21,LLV(CLOSE,5)*0.998,LLV(CLOSE,5)*0.995,50,0),COLOR33CCDD;X_22:=MA(CLOSE,60)>REF(MA(CLOSE,60),1) AND CLOSE>MA(CLOSE,60) AND AZ1>REF(AZ1,1) AND AZ2>REF(AZ2,1) AND AZ3>REF(AZ3,1) AND AZ4>REF(AZ4,1) AND AZ5>REF(AZ5,1) AND AZ6>REF(AZ6,1) AND AZ7>REF(AZ7,1);X_23:=30;X_24:=10;X_25:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);X_26:=SUM(IF(CLOSE=REF(CLOSE,1),0,X_25),0);X_27:=MA(OBV,X_23);X_28:=REF(X_26,X_24)=HHV(X_26,2*X_24+1);X_29:=FILTER(X_28,X_24);X_30:=BACKSET(X_29,X_24+1);X_31:=FILTER(X_30,X_24);X_32:=REF(OBV,BARSLAST(X_31));X_33:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));X_34:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;X_35:=IF(CLOSE>OPEN,X_33*(HIGH-LOW),IF(CLOSE< OPEN,X_33*(HIGH-OPEN+(CLOSE-LOW)),VOL/2));X_36:=SMA(X_34,3,1);X_37:=SMA(X_36,3,1);X_38:=3*X_36-2*X_37;X_39:=EMA(X_38,6);X_40:=100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34));X_41:=IF(CLOSE>OPEN,X_28*(HIGH-CLOSE+(OPEN-LOW)),IF(CLOSE< OPEN,X_28*(HIGH-LOW),VOL/2));X_42:=SMA(X_40,3,1);X_43:=SMA(X_42,3,1);X_44:=3*X_42-2*X_43;X_45:=EMA(X_44,6);X_46:=IF(CROSS(X_39,X_45),100,0);DRAWICON(X_46=100,LOW*0.975,25);DRAWICON(CROSS(OBV,X_32),LOW*0.985,27);DRAWICON(FILTER(X_9>1 AND EMA(X_8,13)>REF(EMA(X_8,8),1),10),LOW*0.975,23);IF(X_22,MA(CLOSE,60),DRAWNULL),CIRCLEDOT,COLORYELLOW;DRAWTEXT_FIX(ISLASTBAR,0,0,0,2),COLORYELLOW;JJ:MA(CLOSE,60),COLORRED,LINETHICK2;X_47:=BACKSET(JJ< REF(JJ,1),2);IF(X_47,JJ,DRAWNULL),COLORA53412,LINETHICK2;IF(JJ< REF(JJ,1),JJ,DRAWNULL),COLORCYAN;STICKLINE(OPEN>CLOSE,CLOSE,OPEN,3,0),COLORFF7700;STICKLINE(OPEN>CLOSE,CLOSE,OPEN,2.2,0),COLORFF9900;STICKLINE(OPEN>CLOSE,CLOSE,OPEN,1.5,0),COLORFFBB00;STICKLINE(OPEN>CLOSE,CLOSE,OPEN,0.5,0),COLORCYAN;STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000099;STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLOR0000CC;STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLORRED;STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;STICKLINE(CLOSE=OPEN,CLOSE,OPEN,3,0),COLORWHITE;STICKLINE(CLOSE=OPEN,CLOSE,OPEN,2.2,0),COLORWHITE;STICKLINE(CLOSE=OPEN,CLOSE,OPEN,1.5,0),COLORWHITE;STICKLINE(CLOSE=OPEN,CLOSE,OPEN,0.5,0),COLORWHITE;X_48:=CLOSE/REF(CLOSE,1)>=1.05 AND NOT(CLOSE>=INTPART(REF(CLOSE,1)*1.1*100)/100);STICKLINE(X_48,CLOSE,OPEN,4,(-1)),COLORLIRED;STICKLINE(X_48,CLOSE,OPEN,3,(-1)),COLORYELLOW;STICKLINE(X_48,OPEN,CLOSE,2.5,0),COLORRED;STICKLINE(X_48,OPEN,CLOSE,1,0),COLORMAGENTA;X_49:=REF(CLOSE,1)/CLOSE<=1.099 AND REF(CLOSE,1)/CLOSE>=1.05;STICKLINE(X_49,CLOSE,OPEN,4,(-1)),COLORGREEN;STICKLINE(X_49,CLOSE,OPEN,3,(-1)),COLORFF9900;STICKLINE(X_49,OPEN,CLOSE,2.5,0),COLORFFBB00;STICKLINE(X_49,OPEN,CLOSE,1,0),COLORCYAN;X_50:=NAMELIKE(4) OR NAMELIKE(5);X_51:=CLOSE/REF(CLOSE,1)>=1.095 AND CLOSE=HIGH OR (CLOSE/REF(CLOSE,1)>=1.09 AND CLOSE=OPEN AND OPEN=LOW AND HIGH=LOW) OR (CLOSE/REF(CLOSE,1)>=1.048 AND X_50=1 AND CLOSE=HIGH) OR (CLOSE/REF(CLOSE,1)>=1.045 AND CLOSE=OPEN AND OPEN=LOW AND HIGH=LOW AND X_50=1);STICKLINE(X_51,CLOSE,OPEN,4,(-1)),COLORYELLOW;STICKLINE(X_51,OPEN,CLOSE,3.5,0),COLORRED;STICKLINE(X_51,OPEN,CLOSE,2.5,1),COLOR007FFF;STICKLINE(X_51,OPEN,CLOSE,1,0),COLORYELLOW;X_52:=REF(CLOSE,1)/CLOSE>=1.095 AND CLOSE=LOW OR (REF(CLOSE,1)/CLOSE>=1.09 AND CLOSE=OPEN AND OPEN=LOW AND HIGH=LOW) OR (REF(CLOSE,1)/CLOSE>=1.048 AND X_50=1 AND CLOSE=LOW) OR (REF(CLOSE,1)/CLOSE>=1.045 AND CLOSE=OPEN AND OPEN=LOW AND HIGH=LOW AND X_50=1);STICKLINE(X_52,CLOSE,OPEN,4,(-1)),COLORGREEN;STICKLINE(X_52,OPEN,CLOSE,3.5,0),COLORBLUE;STICKLINE(X_52,OPEN,CLOSE,2.5,1),COLORLICYAN;STICKLINE(X_52,OPEN,CLOSE,1,0),COLORGREEN;STICKLINE(CLOSE>OPEN AND HIGH/CLOSE>=1.03,HIGH,CLOSE,0,0),COLORGREEN,LINETHICK2;STICKLINE(CLOSE>OPEN AND OPEN/LOW>=1.03,OPEN,LOW,0,0),COLORYELLOW,LINETHICK2;STICKLINE(CLOSE< OPEN AND HIGH/OPEN>=1.03,HIGH,OPEN,0,0),COLORGREEN,LINETHICK2;STICKLINE(CLOSE< OPEN AND CLOSE/LOW>=1.03,CLOSE,LOW,0,0),COLORYELLOW,LINETHICK2;
