gspt1:=EMA(C,12)-EMA(C,26);
gspt2:=EMA(gspt1,9);
gspt3:=8*(gspt1-gspt2);
gspt4:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*247.2-123.6;
gspt5:=(C-MA(CLOSE,13))*10;
gspt6:=EMA(MA(gspt5,7),1);
gspt7:=EMA(gspt6,7);
gspt8:=(gspt6-gspt7)*2;
STICKLINE(gspt8>0 AND gspt8>REF(gspt8,1),gspt8,0,0.1,0),COLORRED;
STICKLINE(gspt8>0 AND gspt8< REF(gspt8,1),gspt8,0,0.1,0),COLORWHITE;
STICKLINE(gspt8< 0 AND gspt8< REF(gspt8,1),gspt8,0,0.1,0),COLORBLUE;
STICKLINE(gspt8< 0 AND gspt8>REF(gspt8,1),gspt8,0,0.1,0),COLORBROWN;
gspt9:=SMA(SMA( gspt4,3,1),3,1),COLORWHITE;
gspt10:=MA(EMA(gspt9,3),3),COLORYELLOW;
gspt11:=3*gspt9-2*gspt10,COLORMAGENTA;
DRAWICON((CROSS(gspt9,gspt10) AND gspt9< 0),REF(gspt9,1),11);
DRAWICON((CROSS(gspt10,gspt9) AND gspt9>0),gspt10*1.05,12);
DRAWICON(gspt11< (REF(gspt11,1))AND gspt9>(REF(gspt9,1)) AND gspt10>(REF(gspt10,1) AND gspt11>0),REF(gspt11,1),2);
DRAWICON(gspt11>REF(gspt11,1) AND gspt9< REF(gspt9,1) AND gspt10< REF(gspt10,1) AND gspt11< 0,REF(gspt11,1),1);
DRAWTEXT_FIX(1,0.980,20,1,'分析家公式网http://www.70822.com'),COLOR333333;
DRAWICON(gspt8< REF(gspt8,1) AND REF(gspt8,1)>REF(gspt8,2) AND gspt8>0,gspt8,2);
DRAWICON(gspt8>REF(gspt8,1) AND REF(gspt8,1)< REF(gspt8,2) AND gspt8<=0,gspt8,1);
gspt12:((7)*(SMA(((CLOSE-LLV (LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(30),4,1))-(3)*(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(30),4,1),3,1))-SMA(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(30),4,1),3,1),2,1)),COLOR0000FF;
gspt13:(EMA(MA(gspt12,5),7)),COLORF0F000;
STICKLINE((gspt12>78) AND (gspt12>=gspt13),78,gspt12,5,1),COLOR00FF00;
STICKLINE((gspt13<=gspt12),gspt13,gspt12,3,0),COLOR0000FF;
STICKLINE((gspt13>gspt12),gspt12,gspt13,3,0),COLORF0F000;
STICKLINE((gspt13< 14) AND (gspt13>gspt12),gspt12,20,3,0),COLOR00FFFF;
gspt14:=FILTER((gspt13< 14) AND (gspt13>gspt12),6);
DRAWTEXT(gspt14,40,'低吸'),COLORFFFFFF;
gspt15:(gspt13< 12) AND (gspt13<=gspt12),COLOR00FFFF;
gspt16:CROSS(gspt12,gspt13) AND (gspt13< 22),COLOR0000FF;
gspt17:=CROSS(83,RSI);
STICKLINE( gspt17,75,85,4,0),COLOR00FF00;
DRAWTEXT(gspt17,72,' 逃顶');
gspt18:=REF(CLOSE,1);
gspt19:=((SMA(MAX((CLOSE - gspt18),0),5,1) / SMA(ABS((CLOSE - gspt18)),5,1)) * 100);
gspt20:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);
gspt21:=(HIGH - REF(HIGH,1));
gspt22:=(REF(LOW,1) - LOW);
gspt23:=SUM(IF(((gspt21 > 0) AND (gspt21 > gspt22)),gspt21,0),10);
gspt24:=SUM(IF(((gspt22 > 0) AND (gspt22 > gspt21)),gspt22,0),10);
gspt25:=((gspt23 * 100) / gspt20);
gspt26:=((gspt24 * 100) / gspt20);
gspt27:=MA(((ABS((gspt26 - gspt25)) / (gspt26 + gspt25)) * 100),5);
gspt28:=(gspt19 + gspt27);
gspt29:=(((gspt27 + REF(gspt27,5)) / 2) + gspt19);
gspt30:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));
gspt31:=(gspt19 - gspt30);
gspt32:=(gspt28 + gspt31);
gspt33:IF(CROSS(gspt32,0),61,0),STICK,COLORRED,LINETHICK4;
DRAWTEXT(CROSS(gspt32,0),62,'入场点'),COLOR00FFFF;
gspt34:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5;
gspt35:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5;
gspt36:=EMA(gspt34,2);
gspt37:=EMA(gspt35,5);
gspt38:=CROSS(gspt36,gspt37);
gspt39:=EMA(C,3);
gspt40:=EMA(C,5);
gspt41:=EMA(gspt40,5);
gspt42:=CROSS(gspt39,gspt40);
gspt43:=gspt39>REF(gspt39,1);
gspt44:=(C+L+H)/3;
gspt45:=ATAN(EMA(gspt44,5)-REF(EMA(gspt44,5),1))*3.1416*10;
gspt46:=EMA(C,3);
gspt47:=gspt45>1 AND EMA(gspt44,5)>REF(EMA(gspt44,3),1);
STICKLINE(gspt42 AND gspt43 AND gspt38 AND gspt47,0,20,4,0)COLOR009999;
STICKLINE(gspt42 AND gspt43 AND gspt38 AND gspt47,0,35,3,0)COLOR00BBBB;
STICKLINE(gspt42 AND gspt43 AND gspt38 AND gspt47,0,45,1.5,0)COLOR00DDDD;
STICKLINE(gspt42 AND gspt43 AND gspt38 AND gspt47,0,50,0.6,0)COLOR00FFFF;
DRAWTEXT(gspt42 AND gspt43 AND gspt38 AND gspt47,48,'老K全仓'),COLORRED;
gspt48:IF(CROSS('老K全仓',0),0.9,0),STICK,COLORRED;
DRAWTEXT(CROSS(gspt12,gspt13) AND (gspt13< 22),30,'金股'),COLOR00FFFF;
