gspt01:=(C*2+H+L)/4*10;
gspt02:=EMA(gspt01,13)-EMA(gspt01,34);
gspt03:=EMA(gspt02,5);
gspt04:=REF(HHV(H,10),2);
gspt05:=REF(HHV(MAX(C,O),10),2);
gspt06:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
gspt07:=SMA(gspt06,3,1);
gspt08:=SMA(gspt07,3,1);
gspt09:=3*gspt07-2*gspt08;
gspt10:=REVERSE(gspt09);
gspt11:=REF(MA(C,1),10)>REF(MA(C,60),10);
gspt12:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
gspt13:=SMA(ABS(LOW-gspt12),13,1)/SMA(MAX(LOW-gspt12,0),10,1);
gspt14:=EMA(gspt13,10);
gspt15:=LLV(LOW,33);
gspt16:=EMA(IF(LOW<=gspt15,gspt14,0),3);
gspt17:=SMA(ABS(gspt12-H),13,1)/SMA(MAX(gspt12-H,0),10,1);
gspt18:=EMA(gspt17,10);
gspt19:=HHV(H,33);
gspt20:=EMA(IF(H>=gspt19,gspt18,0),3);
gspt21:=REF(CLOSE,2);
gspt22:=SMA(MAX(CLOSE-gspt21,0),7,1)/SMA(ABS(CLOSE-gspt21),7,1)*100;
gspt23:=C-REF(C,1);
gspt24:=EMA(CLOSE,12)-EMA(CLOSE,26);
gspt25:=EMA(gspt24,9);
gspt26:=2*(gspt24-gspt25);
gspt27:2*(gspt02-gspt03)*5.5;
gspt28:IF(gspt27>=0,gspt27,0),COLOR7F00FF,LINETHICK2;
gspt29:IF(gspt27<=0,gspt27,0),COLOR66FF00,LINETHICK1;
gspt30:8,COLORFF80FF,LINETHICK2,CROSSDOT;
gspt31:CROSS(C,gspt04) AND CROSS(gspt28,8);
gspt32:CROSS(C,gspt05) AND CROSS(gspt28,8);
STICKLINE(gspt31 OR gspt32,0,8,2,0),COLOR3131FF;
gspt33:(gspt31 OR gspt32) AND V/REF(V,1)>1.95,COLORYELLOW;
STICKLINE(gspt33,0,-8,5,0),COLORYELLOW;
gspt34:CROSS(gspt09,gspt10) AND gspt11;
STICKLINE(gspt34,0,30,6,0),COLORBLUE;
STICKLINE(gspt34,30,60,4,0),COLORWHITE;
STICKLINE(gspt34,60,80,2,0),COLORYELLOW;
DRAWTEXT(gspt34,70,'庄现'),COLORRED;
DRAWTEXT_FIX(C>O,0.01,0.96,0,'分析家公式网http://www.70822.com'),COLOR222222;
gspt35:IF(gspt16>REF(gspt16,1),gspt16,0),COLORRED,NODRAW;
STICKLINE(gspt16>REF(gspt16,1),0,gspt16,3,0),COLORRED;
STICKLINE(gspt16>REF(gspt16,1),0,gspt16,3,0),COLOR000055;
STICKLINE(gspt16>REF(gspt16,1),0,gspt16,3,0),COLOR000077;
STICKLINE(gspt16>REF(gspt16,1),0,gspt16,2.6,0),COLOR000099;
STICKLINE(gspt16>REF(gspt16,1),0,gspt16,2.1,0),COLOR0000BB;
STICKLINE(gspt16>REF(gspt16,1),0,gspt16,1.5,0),COLOR0000DD;
STICKLINE(gspt16>REF(gspt16,1),0,gspt16,0.9,0),COLOR0000FF;
gspt36:IF(gspt16<REF(gspt16,1),gspt16,0),COLORGREEN,NODRAW;
STICKLINE(gspt16<REF(gspt16,1),0,gspt16,3,0),COLORGREEN;
STICKLINE(gspt16<REF(gspt16,1),0,gspt16,3,0),COLOR005500;
STICKLINE(gspt16<REF(gspt16,1),0,gspt16,2.6,0),COLOR007700;
STICKLINE(gspt16<REF(gspt16,1),0,gspt16,2.1,0),COLOR009900;
STICKLINE(gspt16<REF(gspt16,1),0,gspt16,1.5,0),COLOR00BB00;
STICKLINE(gspt16<REF(gspt16,1),0,gspt16,0.9,0),COLOR00DD00;
STICKLINE(gspt16<REF(gspt16,1),0,gspt16,0.3,0),COLOR00FF00;
gspt37:IF(gspt20>REF(gspt20,1),gspt20,0),COLORFF00FF,NODRAW;
STICKLINE(gspt20>REF(gspt20,1),0,gspt20,3,0),COLORFF00FF;
STICKLINE(gspt20>REF(gspt20,1),0,gspt20,3,0),COLOR550055;
STICKLINE(gspt20>REF(gspt20,1),0,gspt20,2.6,0),COLOR770077;
STICKLINE(gspt20>REF(gspt20,1),0,gspt20,2.1,0),COLOR990099;
STICKLINE(gspt20>REF(gspt20,1),0,gspt20,1.5,0),COLORBB00BB;
STICKLINE(gspt20>REF(gspt20,1),0,gspt20,0.9,0),COLORDD00DD;
STICKLINE(gspt20>REF(gspt20,1),0,gspt20,0.3,0),COLORFF00FF;
gspt38:IF(gspt20<REF(gspt20,1),gspt20,0),COLORYELLOW,NODRAW;
STICKLINE(gspt20<REF(gspt20,1),0,gspt20,3,0),COLORYELLOW;
STICKLINE(gspt20<REF(gspt20,1),0,gspt20,3,0),COLOR005555;
STICKLINE(gspt20<REF(gspt20,1),0,gspt20,2.6,0),COLOR007777;
STICKLINE(gspt20<REF(gspt16,1),0,gspt20,2.1,0),COLOR009999;
STICKLINE(gspt20<REF(gspt20,1),0,gspt20,1.5,0),COLOR00BBBB;
STICKLINE(gspt20<REF(gspt20,1),0,gspt20,0.9,0),COLOR00DDDD;
STICKLINE(gspt20<REF(gspt20,1),0,gspt20,0.3,0),COLOR00FFFF;
gspt39:IF(gspt22<19,19,0),COLORWHITE;
gspt40:100*EMA(EMA(gspt23,8),8)/EMA(EMA(ABS(gspt23),8),8),COLORYELLOW;
gspt41:COUNT(gspt26<0,10)=10,COLORCYAN;
STICKLINE(gspt41,0,gspt26*(-0.1),2.8,0),LINETHICK6,,COLORCYAN;
DRAWICON(gspt41,gspt26*(-0.18),28);
DRAWICON(gspt41,gspt26*(-0.1),26);