M:=5;
gspt1:=MA(CLOSE,M);
gspt2:=gspt1+2*STD(CLOSE,M);
gspt3:=gspt1-2*STD(CLOSE,M);
gspt4:=C/REF(C,1)>1.099 AND H=C AND H>L;
gspt5:=SMA(MAX(CLOSE-REF(CLOSE,1),0),2,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),2,1)*100;
gspt6:=CROSS(gspt5,50) AND BARSLAST(gspt4)<=10 AND BARSLAST(gspt4)>0;
gspt7:=CROSS(gspt5,50) AND BARSLAST(gspt4)=0 AND COUNT(gspt4,10)=2;
gspt8:=gspt6 OR gspt7;
gspt9:=MA(C,3);
gspt10:=C>MA(C,10);
gspt11:=gspt9>REF(gspt9,1) AND gspt9>REF(gspt9,2) AND V>0;
gspt12:=REF(gspt11,1) AND gspt9<=REF(gspt9,1) AND gspt9>=REF(gspt9,2);
gspt13:=REF(gspt12,1) AND gspt9>=REF(gspt9,1) AND gspt9<=REF(gspt9,2);
gspt14:=REF(gspt13,1) AND gspt9<=REF(gspt9,1) AND gspt9<=REF(gspt9,2);
gspt15:=REF(gspt14,1) AND gspt9>=REF(gspt9,1) AND gspt9<=REF(gspt9,2);
gspt16:=REF(gspt15,1) AND gspt9<=REF(gspt9,1) AND gspt9>=REF(gspt9,2);
gspt17:=REF(gspt16,1) AND gspt9>=REF(gspt9,1) AND gspt9<=REF(gspt9,2);
gspt18:=REF(gspt17,1) AND gspt9<=REF(gspt9,1) AND gspt9>=REF(gspt9,2);
gspt19:=REF(gspt18,1) AND gspt9>=REF(gspt9,1) AND gspt9<=REF(gspt9,2);
gspt20:=REF(gspt19,1) AND gspt9<=REF(gspt9,1) AND gspt9>=REF(gspt9,2);
gspt21:=REF(gspt20,1) AND gspt9>=REF(gspt9,1) AND gspt9<=REF(gspt9,2);
gspt22:=REF(gspt21,1) AND gspt9<=REF(gspt9,1) AND gspt9>=REF(gspt9,2);
gspt23:=gspt9<REF(gspt9,1) AND gspt9<REF(gspt9,2);
gspt24:=REF(gspt23,1) AND gspt9>=REF(gspt9,1) AND gspt9<=REF(gspt9,2);
gspt25:=REF(gspt24,1) AND gspt9<=REF(gspt9,1) AND gspt9>=REF(gspt9,2);
gspt26:=REF(gspt25,1) AND gspt9>=REF(gspt9,1) AND gspt9<=REF(gspt9,2);
gspt27:=REF(gspt26,1) AND gspt9<=REF(gspt9,1) AND gspt9>=REF(gspt9,2);
gspt28:=REF(gspt27,1) AND gspt9>=REF(gspt9,1) AND gspt9<=REF(gspt9,2);
gspt29:=REF(gspt28,1) AND gspt9<=REF(gspt9,1) AND gspt9>=REF(gspt9,2);
gspt30:=REF(gspt29,1) AND gspt9>=REF(gspt9,1) AND gspt9<=REF(gspt9,2);
gspt31:=REF(gspt30,1) AND gspt9<=REF(gspt9,1) AND gspt9>=REF(gspt9,2);
gspt32:=REF(gspt31,1) AND gspt9>=REF(gspt9,1) AND gspt9<=REF(gspt9,2);
gspt33:=REF(gspt32,1) AND gspt9<=REF(gspt9,1) AND gspt9>=REF(gspt9,2);
gspt34:=REF(gspt23 OR gspt24 OR gspt25 OR gspt26 OR gspt27 OR gspt28 OR gspt29 OR gspt30 OR gspt31 OR gspt32 OR gspt33,1) AND gspt11;
gspt35:=gspt11 OR gspt12 OR gspt13 OR gspt14 OR gspt15 OR gspt16 OR gspt17 OR gspt18 OR gspt19 OR gspt20 OR gspt21 OR gspt22;
gspt36:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
gspt37:=HIGH-REF(HIGH,1);
gspt38:=REF(LOW,1)-LOW;
gspt39:=SUM(IF(gspt37>0&&gspt37>gspt38,gspt37,0),14);
gspt40:=SUM(IF(gspt38>0&&gspt38>gspt37,gspt38,0),14);
gspt41:=gspt39*100/gspt36;
gspt42:=gspt40*100/gspt36;
gspt43:=gspt41-gspt42>=0;
gspt44:=gspt41-gspt42<0;
gspt45:=(gspt41-gspt42);
gspt46:=gspt45>=0;
gspt47:=BARSLASTCOUNT(gspt45>0 AND (gspt11 OR gspt12 OR gspt13 OR gspt14 OR gspt15 OR gspt16 OR gspt17 OR gspt18 OR gspt19 OR gspt20 OR gspt21 OR gspt22))=1;
gspt48:=(HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)<0.2;
gspt49:=CLOSE/REF(CLOSE,1)<1.07 AND CLOSE/REF(CLOSE,1)>1.02;
gspt50:=(C-REF(C,1))/REF(C,1)*100,NODRAW;
gspt51:=BARSLAST(gspt4)*10,NODRAW;
gspt52:=gspt50+gspt51+gspt5;
gspt53:=gspt52>=120;
gspt54:=VOL/REF(VOL,1)<=1.3;
gspt55:=gspt8 AND gspt48 AND gspt53 AND gspt49 AND H<gspt2 AND gspt54 AND MA(CLOSE,60)>MA(CLOSE,120) AND C>MA(CLOSE,30);
gspt55 COLORYELLOW,LINETHICK2;
DRAWICON(gspt55,1,25);
gspt56:=REF(C,BARSLAST(gspt55)),COLORYELLOW,NODRAW;
gspt57:=REF(H,BARSLAST(gspt55)-1),COLORFF00FF,NODRAW;
gspt58:=((gspt57-gspt56)/gspt56)*100,COLORRED,NODRAW;
STICKLINE(REF(gspt55=1,1) ,0,0.50,2,0),COLORGREEN;
STICKLINE(REF(gspt55=1,1) AND gspt57/gspt56>=1.01,0,0.50,2,0),COLORRED;
DRAWICON(REF(gspt55=1,1) AND gspt58>=1,0.68,5);
DRAWICON(REF(gspt55=1,1) AND gspt58<1,0.68,4);
DRAWNUMBER(REF(gspt55,1),0.85,gspt58),COLORYELLOW;
DRAWTEXT(REF(gspt55,1),0.78,' %'),COLORYELLOW;