gspt1:=9;
gspt2:=IF(L=LLV(L,gspt1),L,DRAWNULL);
gspt3:=CONST(BARSLAST(gspt2!=DRAWNULL));
gspt4:=CONST(IF(gspt3=0,H,REF(H,gspt3)));
gspt5:=CONST(REF(BARSLAST(H>gspt4),gspt3+1)+gspt3+1);
gspt6:=CONST(IF(gspt5=0,H,REF(H,gspt5)));
gspt7:=CONST(REF(BARSLAST(H>gspt6),gspt5+1)+gspt5+1);
gspt8:IF(CURRBARSCOUNT<=gspt3+gspt1,CONST(IF(gspt7=0,H,REF(H,gspt7))),DRAWNULL);
STICKLINE(CURRBARSCOUNT<=gspt3+1&&L=LLV(L,gspt1),O,C,3,0),COLOR9F5F9F;
DRAWTEXT(ISLASTBAR,gspt8,'进场线'),COLOR9F5F9F;
gspt9:=IF(CURRBARSCOUNT<=gspt3+1,IF(L=LLV(L,gspt1),L,DRAWNULL),DRAWNULL),CIRCLEDOT;
gspt10:=IF(H=HHV(H,gspt1),H,DRAWNULL);
gspt11:=CONST(BARSLAST(gspt10!=DRAWNULL));
gspt12:=CONST(IF(gspt11=0,L,REF(L,gspt11)));
gspt13:=CONST(REF(BARSLAST(L< gspt12),gspt11+1)+gspt11+1);
gspt14:=CONST(IF(gspt13=0,L,REF(L,gspt13)));
gspt15:=CONST(REF(BARSLAST(L< gspt14),gspt13+1)+gspt13+1);
gspt16:IF(CURRBARSCOUNT<=gspt11+gspt1,CONST(IF(gspt15=0,L,REF(L,gspt15))),DRAWNULL);
gspt17:=IF(CURRBARSCOUNT<=gspt11+1,IF(H=HHV(H,gspt1),H,DRAWNULL),DRAWNULL),CIRCLEDOT;
DRAWTEXT_FIX(1,0.980,20,1,'公式平台,公式源码 http://www.gspt.com'),COLOR333333;
DRAWTEXT(ISLASTBAR,gspt16,'止损线'),COLORLIBLUE;
STICKLINE(CURRBARSCOUNT<=gspt11+1&&H=HHV(H,gspt1),O,C,3,0),COLORLIBLUE;
gspt18:MA(C,5);
gspt19:(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4,COLORWHITE,LINETHICK3;
IF(gspt19>REF(gspt19,1),gspt19,DRAWNULL),COLORRED,LINETHICK3;
IF(gspt19< REF(gspt19,1),gspt19,DRAWNULL),COLORGREEN,LINETHICK3;
gspt20:MA(CLOSE,24),COLORWHITE;
IF(gspt20>REF(gspt20,1),gspt20,DRAWNULL),COLORYELLOW,CIRCLEDOT;
IF(gspt20< REF(gspt20,1),gspt20,DRAWNULL),COLORWHITE,DOTLINE;
DRAWTEXT(ISLASTBAR,gspt20,'24日'),COLORYELLOW;
gspt21:MA(C,48),COLORYELLOW;
IF(gspt21>REF(gspt21,1),gspt21,DRAWNULL),COLORYELLOW,LINETHICK2;
IF(gspt21< REF(gspt21,1),gspt21,DRAWNULL),COLORWHITE,LINETHICK1;
DRAWTEXT(ISLASTBAR,gspt21,'48日'),COLORLIBLUE;
gspt22:MA(C,144),COLORMAGENTA;
IF(gspt22>REF(gspt22,1),gspt22,DRAWNULL),COLORMAGENTA,LINETHICK3;
IF(gspt22< REF(gspt22,1),gspt22,DRAWNULL),COLORLIMAGENTA,LINETHICK1;
DRAWTEXT(ISLASTBAR,gspt22,'144日'),COLORMAGENTA;
gspt23:gspt22*1.382,DOTLINE,COLORRED;
DRAWTEXT(ISLASTBAR,gspt23,'止盈线'),COLORRED;
gspt24:=HY_INDEXADV,NODRAW;
gspt25:=HY_INDEXDEC,NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.65,0.1,0,STRCAT('板块上涨家:',CON2STR(gspt24,0))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.1,0,STRCAT('板块下跌家:',CON2STR(gspt25,0))),COLORGREEN;
gspt26:="880006$C",NODRAW;
gspt27:="880006$O",NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.65,0.05,0,STRCAT('市场涨停数:',CON2STR(gspt26,0))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.05,0,STRCAT('市场跌停数:',CON2STR(gspt27,0))),COLORGREEN;
gspt28:=REF(HHV(INDEXH,20),1);
gspt29:=REF(LLV(INDEXL,10),1);
gspt30:=INDEXH>gspt28;
gspt31:=INDEXL< gspt29;
gspt32:=IF(gspt30,1,IF(gspt31,-1,0));
gspt33:=REF(gspt32,BARSLAST(gspt32));
gspt34:=gspt33=1;
gspt35:=REF(HHV(INDEXH,10),1);
gspt36:=REF(LLV(INDEXL,20),1);
gspt37:=INDEXL< gspt36;
gspt38:=INDEXH>gspt35;
gspt39:=IF(gspt37,1,IF(gspt38,-1,0));
gspt40:=REF(gspt39,BARSLAST(gspt39));
gspt41:=gspt40=1;
DRAWTEXT_FIX(ISLASTBAR&&gspt33=1,0.85,0,0,'盘牛'),COLORRED;
DRAWTEXT_FIX(ISLASTBAR&&gspt40=1,0.85,0,0,'盘熊'),COLORGREEN;
gspt42:=REF(HHV(HY_INDEXH,20),1);
gspt43:=REF(LLV(HY_INDEXL,10),1);
gspt44:=HY_INDEXH>gspt42;
gspt45:=HY_INDEXL< gspt43;
gspt46:=IF(gspt44,1,IF(gspt45,-1,0));
gspt47:=REF(gspt46,BARSLAST(gspt46));
gspt48:=gspt47=1;
gspt49:=REF(HHV(HY_INDEXH,10),1);
gspt50:=REF(LLV(HY_INDEXL,20),1);
gspt51:=HY_INDEXL< gspt50;
gspt52:=HY_INDEXH>gspt49;
gspt53:=IF(gspt51,1,IF(gspt52,-1,0));
gspt54:=REF(gspt53,BARSLAST(gspt53));
gspt55:=gspt54=1;
DRAWTEXT_FIX(ISLASTBAR&&gspt47=1,0.85,0.1,0,'板牛'),COLORRED;
DRAWTEXT_FIX(ISLASTBAR&&gspt54=1,0.85,0.1,0,'板熊'),COLORGREEN;
gspt56:=REF(HHV(H,20),1);
gspt57:=REF(LLV(L,10),1);
gspt58:=H>gspt56;
gspt59:=L< gspt57;
gspt60:=IF(gspt58,1,IF(gspt59,-1,0));
gspt61:=REF(gspt60,BARSLAST(gspt60));
gspt62:=gspt61=1;
gspt63:=REF(HHV(H,10),1);
gspt64:=REF(LLV(L,20),1);
gspt65:=L< gspt64;
gspt66:=H>gspt63;
gspt67:=IF(gspt65,1,IF(gspt66,-1,0));
gspt68:=REF(gspt67,BARSLAST(gspt67));
gspt69:=gspt68=1;
DRAWTEXT_FIX(ISLASTBAR&&gspt61=1,0.85,0.15,0,'股牛'),COLORRED;
DRAWTEXT_FIX(ISLASTBAR&&gspt68=1,0.85,0.15,0,'股熊'),COLORGREEN;
DRAWTEXT_FIX(1,0.01,0,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.05,0,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.10,0.0,0,'概念:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.15,0,0,GNBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.01,0.05,0,'风格:'),COLORGREEN;
DRAWTEXT_FIX(1,0.05,0.05,0,FGBLOCK),COLORGREEN;
gspt70:=(INDEXC-REF(INDEXC,1))/REF(INDEXC,1)*100,NODRAW;
gspt71:=(HY_INDEXC-REF(HY_INDEXC,1))/REF(HY_INDEXC,1)*100,NODRAW;
gspt72:="880006$CLOSE",NODRAW;
gspt73:="880006$OPEN",NODRAW;
gspt74:="880005$CLOSE",NODRAW;
gspt75:="880005$OPEN",NODRAW;
gspt76:=HY_INDEXADV,NODRAW;
gspt77:=HY_INDEXDEC,NODRAW;
gspt78:=gspt74/(gspt74+gspt75)*100;
gspt79:=gspt76/(gspt76+gspt77)*100;
gspt80:=gspt72/(gspt72+gspt73)*100;
gspt81:=gspt78+gspt79+gspt80+gspt70*10+gspt71*10;
gspt82:=EMA(gspt81,5),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.65,0.15,0,STRCAT('昨日情绪:',CON2STR(REF(gspt82,1),0))),COLORRED;
DRAWTEXT_FIX(1,0.980,20,1,'公式平台,公式源码 http://www.gspt.com'),COLOR333333;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.15,0,STRCAT('今日情绪:',CON2STR(gspt82,0))),COLORRED;