Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
HG:=(3*CLOSE+OPEN+LOW+HIGH)/6;
HGGS:(20*HG+19*REF(HG,1)+18*REF(HG,2)+17*REF(HG,3)+16*REF(HG,4)+15*REF(HG,5)+14*REF(HG,6) +13*REF(HG,7)+12*REF(HG,8)+11*REF(HG,9)+10*REF(HG,10)+9*REF(HG,11)+8*REF(HG,12) +7*REF(HG,13)+6*REF(HG,14)+5*REF(HG,15)+4*REF(HG,16)+3*REF(HG,17)+2*REF(HG,18)+ REF(HG,20))/210,COLORYELLOW;
HHJSJDC:MA(HGGS,5),COLORRED;
GSPT1:=MA(CLOSE,5);
GSPT2:=MA(CLOSE,8);
GSPT3:=MA(CLOSE,34);
GSPT4:=MA(CLOSE,120);
GSPT5:=REF(CLOSE,1)< REF(GSPT1,1) AND OPEN< GSPT1 AND GSPT1>GSPT4;
GSPT6:=REF(GSPT5,1)=0 AND GSPT5;
GSPT7:=EMA(HHV(HIGH,1),8);
GSPT8:=EMA(CLOSE,8);
GSPT9:=GSPT8< REF(GSPT8,1) AND CLOSE< GSPT8;
CA_10:=IF(GSPT7< REF(GSPT7,1) OR GSPT9,1,0);
CA_11:=(COUNT(CA_10=1,4)=3 AND CA_10=0)*89;
CA_12:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
CA_13:=IF(CLOSE>OPEN,CA_12*(HIGH-LOW),IF(CLOSE< OPEN,CA_12*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF(CLOSE>OPEN,0-CA_12*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE< OPEN,0-CA_12*(HIGH-LOW),0-VOL/2));
GSPT14:=CA_13/20/1.15;
GSPT15:=GSPT14*0.55+REF(GSPT14,1)*0.33+REF(GSPT14,2)*0.22;
GSPT16:=EMA(GSPT15,3);
GSPT17:=GSPT16< 100;
GSPT18:=COUNT(GSPT17,9)< 2;
GSPT19:=CLOSE/REF(CLOSE,1)>1.09;
GSPT20:=CLOSE=HIGH;
GSPT21:=REF(GSPT19,1) AND REF(GSPT20,1);
ZA_22:=COUNT(GSPT21,11)>0;
ZA_23:=MA(CLOSE,3);
ZA_24:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
ZA_25:=(HIGH-REF(CLOSE,1))/REF(CLOSE,1)*100;
GSPT26:=REF(HHV(VOL,10),1);
GSPT27:=MA(CLOSE,20);
GSPT28:=(ZA_23+GSPT1)/2;
GSPT29:=COUNT(COUNT(ZA_24>9.9 AND CLOSE=HIGH,1)>=1,30)>0;
GSPT30:=COUNT(COUNT(ZA_24>9.9 AND CLOSE=HIGH,1)>=1,60)>0;
GSPT31:=GSPT27>REF(GSPT27,1) AND VOL< GSPT26 AND GSPT29 AND ZA_25>3 AND OPEN<=GSPT1 AND CLOSE>GSPT1 AND (COUNT(GSPT28>REF(GSPT28,1),3)>=3 OR COUNT(GSPT1>REF(GSPT1,1),3)>=3) AND COUNT(GSPT27>REF(GSPT27,1),25)>=16;
GSPT32:=(CLOSE-OPEN)/OPEN*100;
GSPT33:=GSPT30 AND VOL< 1.3*REF(VOL,1) AND COUNT(GSPT32>0.5,6)>=5 AND COUNT(ZA_23>GSPT1,5)>=5 AND COUNT(HIGH>REF(HIGH,1),6)>=5 AND ZA_25>4.5 AND OPEN<=ZA_23 AND CLOSE>ZA_23 AND OPEN>GSPT1;
GSPT34:=GSPT31 OR GSPT33;
BA_35:=GSPT34=1 AND COUNT(GSPT34,15)=1;
BA_36:=AMOUNT/VOL/7;
BA_37:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
GSPT38:=SUM(AMOUNT,10)/BA_36/7;
GSPT39:=DMA(BA_37,VOL/GSPT38);
GSPT40:=(CLOSE-GSPT39)/GSPT39*100;
GSPT41:=-GSPT40;
GSPT42:=GSPT40>GSPT41;
GSPT43:=CROSS(GSPT40,0.6) AND GSPT42;
JA_44:=EMA(CLOSE/REF(CLOSE,1),5);
DA_45:=EMA(CLOSE/REF(CLOSE,1),10);
NA_4G:=CROSS(JA_44,DA_45);
GSPT47:=GSPT43 AND NA_4G;
GSPT48:=GSPT47 AND BA_35;
GSPT49:=COUNT(BA_35,10)>0;
GSPT50:=GSPT47 AND GSPT49 AND ZA_22;
GSPT51:=GSPT47 AND ZA_22 AND CA_11;
GSPT52:=GSPT48 AND ZA_22;
GSPT53:=GSPT50 OR GSPT52 OR GSPT51;
GSPT54:=(EMA(CLOSE,12)-EMA(CLOSE,26))/EMA(CLOSE,26)*100;
GSPT55:=EMA(GSPT54,9);
GSPT56:=(GSPT54-GSPT55)*100;
GSPT57:=GSPT56-REF(GSPT56,1);
GSPT58:=CROSS(GSPT57,50);
CA_59:=EMA(EMA(EMA(CLOSE,12),12),12);
OA_60:=(CA_59-REF(CA_59,1))/REF(CA_59,1)*100;
MA_61:=MA(OA_60,9);
GSPT62:=OA_60>MA_61;
GSPT63:=CLOSE/REF(CLOSE,1)>1.09;
GSPT64:=CLOSE=HIGH;
GSPT65:=REF(GSPT63,1) AND REF(GSPT64,1);
GSPT66:=COUNT(GSPT65,4)>0;
GSPT67:=COUNT(GSPT65,5)>0;
GSPT68:=(3*CLOSE+LOW+OPEN+HIGH)/6;
GSPT69:=(20*GSPT68+19*REF(GSPT68,1)+18*REF(GSPT68,2)+17*REF(GSPT68,3)+16*REF(GSPT68,4)+15*REF(GSPT68,5)+14*REF(GSPT68,6)+13*REF(GSPT68,7)+12*REF(GSPT68,8)+11*REF(GSPT68,9)+10*REF(GSPT68,10)+9*REF(GSPT68,11 )+8*REF(GSPT68,12)+7*REF(GSPT68,13)+6*REF(GSPT68,14)+5*REF(GSPT68,15)+4*REF(GSPT68,16)+3*REF(GSPT68,17)+2*REF(GSPT68,18)+REF(GSPT68,20))/210;
GSPT70:=MA(GSPT69,6);
GSPT71:=GSPT69>GSPT70;
GSPT72:=CLOSE>1.02*REF(CLOSE,1);
GSPT73:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100< (-6);
GSPT74:=REF(CLOSE,1)>(REF(CLOSE,BARSLAST(GSPT72))+REF(CLOSE,BARSLAST(GSPT72)+1))/2 AND CLOSE< (REF(CLOSE,BARSLAST(GSPT72))+REF(CLOSE,BARSLAST(GSPT72)+1))/2;
GSPT75:=REF(CLOSE,1)< (REF(CLOSE,BARSLAST(GSPT73))+REF(CLOSE,BARSLAST(GSPT73)+1))/2 AND CLOSE>(REF(CLOSE,BARSLAST(GSPT73))+REF(CLOSE,BARSLAST(GSPT73)+1))/2;
GSPT76:=BARSLAST(GSPT73)<=7 AND GSPT72 AND GSPT75 AND COUNT(GSPT72,BARSLAST(GSPT73))=1 AND NOT(HIGH=LOW) AND REF(NOT(HIGH=LOW),BARSLAST(GSPT73))=1;
GSPT77:=COUNT(GSPT76,7)>0;
GSPT78:=((CLOSE-REF(MA(CLOSE,6),1))/6+MA(CLOSE,6))*1.004;
GSPT79:=CROSS(CLOSE,GSPT78) AND GSPT78>REF(GSPT78,1);
GSPT80:=((CLOSE-REF(MA(CLOSE,18),1))/18+MA(CLOSE,18))*1.004;
GSPT81:=CROSS(CLOSE,GSPT80) AND GSPT80>REF(GSPT80,1);
GSPT82:=GSPT79 AND GSPT81 AND GSPT76 AND GSPT71 AND GSPT62;
GSPT83:=GSPT66 AND GSPT76 AND GSPT71 AND GSPT62;
GSPT84:=GSPT82 OR GSPT83;
GSPT85:=GSPT18 AND GSPT53;
GSPT86:=GSPT84 OR GSPT85;
STICKLINE(GSPT86,LOW,HIGH,0.3,0),COLORYELLOW;
STICKLINE(GSPT86,OPEN,CLOSE,3,0),COLORLIMAGENTA;