GSPT1:EMA(CLOSE,20),COLORWHITE,LINETHICK2;
GSPT2:=REF(LLV(GSPT1,12),1);
(IF(GSPT2>GSPT1,GSPT1,GSPT2)),LINETHICK2,COLORGREEN;
GSPT3:((MA(CLOSE,42)) * 0.9),COLORYELLOW;
GSPT4:((MA(CLOSE,42)) * 1.1),COLORYELLOW;
GSPT5:=(MA(C,7));
GSPT6:=(FORCAST(GSPT5,7));
GSPT7:=(FORCAST(GSPT5,14));
GSPT8:=(FORCAST(GSPT5,70));
GSPT9:=(FORCAST(GSPT8,28));
GSPT10:=(FORCAST(GSPT8,56));
GSPT11:=(BARSCOUNT(C));
GSPT12:=(MOD(GSPT11,2));
GSPT13:=((MA(C,42)) * 0.45);
GSPT14:=BARSCOUNT(C)=1;
GSPT15:=BARSLAST(GSPT14);
GSPT16:=MOD(GSPT15+1,2);
GSPT17:=(IF(GSPT6 < GSPT13,GSPT13,GSPT6));
GSPT18:=(IF(GSPT7 < GSPT13,GSPT13,GSPT7));
GSPT19:=(IF(GSPT8 < GSPT13,GSPT13,GSPT8));
GSPT20:=(IF(GSPT9 < GSPT13,GSPT13,GSPT9));
GSPT21:=(IF(GSPT10 < GSPT13,GSPT13,GSPT10));
GSPT22:=IF(GSPT16 = 1 AND GSPT20>GSPT21,GSPT21,GSPT20);
GSPT23:=IF(GSPT16 = 1 AND GSPT19< GSPT20 AND GSPT19>GSPT21,GSPT19,GSPT20);
GSPT24:=IF(GSPT16 = 1 AND GSPT19< GSPT21 AND GSPT19>GSPT20,GSPT19,GSPT20);
GSPT25:=IF(GSPT19< GSPT20 AND GSPT19>GSPT21,GSPT23,GSPT22);
GSPT26:=IF(GSPT19< GSPT21,GSPT24,GSPT22);
IF(GSPT26< IF(GSPT21>GSPT20,GSPT21,GSPT25),GSPT26,IF(GSPT21>GSPT20,GSPT21,GSPT25)), COLOREC7600;
IF(GSPT21>GSPT20,GSPT21,GSPT25),COLORMAGENTA,LINETHICK1;
GSPT27:=DATE=1210104;
GSPT28:=CONST(BARSSINCE(GSPT27));
GSPT29:=BARSSINCE(GSPT27);
GSPT30:=SUM(VOL,0);
GSPT31:=REF(GSPT30,GSPT29);
GSPT32:=(GSPT30-GSPT31)/CAPITAL*100;
GSPT33:=CONST(HHV(H,GSPT28));
GSPT34:=CONST(LLV(L,GSPT28));
GSPT35:=(GSPT33-GSPT34);
GSPT36:=AMOUNT/V/100;
GSPT37:=GSPT34+GSPT35*0/11;
GSPT38:=GSPT34+GSPT35*1.0505/11;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
GSPT39:=EMA(EMA(CLOSE,5),4);
GSPT40:=EMA(EMA(CLOSE,5),6);
GSPT41:=EMA(EMA(CLOSE,5),8);
GSPT42:=EMA(EMA(EMA(CLOSE,5),10),2);
GSPT43:=EMA(EMA(EMA(CLOSE,5),10),4);
GSPT44:=EMA(EMA(EMA(CLOSE,5),10),6);
GSPT45:=EMA(EMA(EMA(CLOSE,5),10),10);
GSPT46:=EMA(EMA(EMA(CLOSE,5),10),20),COLORMAGENTA;
GSPT47:=EMA(EMA(EMA(CLOSE,5),10),18);
GSPT48:=EMA(EMA(EMA(CLOSE,5),10),60),COLOR800080;
GSPT49:=EMA(EMA(EMA(CLOSE,5),10),63);
GSPT50:=EMA(CLOSE,60),COLOR40FF00;
GSPT51:=EMA(CLOSE,63),COLOR800080;
GSPT52:=EMA(CLOSE,120);
GSPT53:=EMA(CLOSE,130);
GSPT54:=EMA(CLOSE,240),COLORFFFFFF;
GSPT55:=EMA(CLOSE,250),COLORFFFFFF;
GSPT56:=EMA(CLOSE,470);
GSPT57:=EMA(CLOSE,490);
GSPT58:=GSPT46-REF(GSPT46,2);
GSPT59:=GSPT44-REF(GSPT44,2);
GSPT60:=((HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100)-70;
GSPT61:=SMA(GSPT60,9,1);
GSPT62:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
GSPT63:=SMA(GSPT62,3,1);
GSPT64:=SMA(GSPT63,3,1);
GSPT65:=(GSPT64-GSPT61);
GSPT66:=140-GSPT65;
GSPT67:=EMA(GSPT65,15);
GSPT68:=EMA(GSPT66,15);
GSPT69:=REF(-GSPT65,1);
GSPT70:=REF(-GSPT66,1);
GSPT71:=GSPT65-REF(GSPT65,1);
GSPT72:=((HHV(HIGH,120)-GSPT41)/(HHV(HIGH,120)-LLV(LOW,120))*100)-70;
GSPT73:=SMA(GSPT72,60,8);
GSPT74:=(GSPT41-LLV(LOW,120))/(HHV(HIGH,120)-LLV(LOW,120))*100;
GSPT75:=SMA(GSPT74,20,8);
GSPT76:=SMA(GSPT75,20,8);
GSPT77:=(GSPT76-GSPT73);
GSPT78:=EMA(GSPT77,160);
GSPT79:=GSPT77-GSPT78;
GSPT80:=((HHV(HIGH,450)-GSPT46)/(HHV(HIGH,450)-LLV(LOW,450))*100)-70;
GSPT81:=SMA(GSPT80,270,30);
GSPT82:=(GSPT46-LLV(LOW,450))/(HHV(HIGH,450)-LLV(LOW,450))*100;
GSPT83:=SMA(GSPT82,60,30);
GSPT84:=SMA(GSPT83,60,30);
GSPT85:=(GSPT84-GSPT81);
GSPT86:=EMA(GSPT85,600);
GSPT87:=GSPT85-GSPT86;
DRAWTEXT(CROSS(GSPT50,GSPT48) AND GSPT50< GSPT56,GSPT48,'--反弹'),COLORFFFF00;
DRAWTEXT(CROSS(GSPT48,GSPT50) AND GSPT50>GSPT56,GSPT48,'--调整'),COLORFF00FF;
DRAWTEXT(CROSS(GSPT50,GSPT48) AND GSPT50>GSPT56,GSPT48,'--↑升'),COLOR000000;
DRAWTEXT(CROSS(GSPT48,GSPT50) AND GSPT50< GSPT56,GSPT48,'--↓跌'),COLORFFFFFF;
DRAWTEXT(CROSS(H,GSPT50) AND GSPT79>0 AND GSPT78< 70,L,'↑下穿60即买↑'),COLORFFFFFF;
DRAWTEXT(CROSS(GSPT50,L) AND GSPT79< 0 AND GSPT78>70,H,'↑上穿60即卖↓'),COLOR000000;
DRAWTEXT(CROSS(GSPT79,0) AND GSPT50< L AND GSPT78< 70,L,'↑下穿60即买↑'),COLORFFFFFF;
DRAWTEXT(CROSS(0,GSPT79) AND GSPT50>H AND GSPT78>70,H,'↑上穿60即卖↓'),COLOR000000;
DRAWTEXT_FIX(1,0.980,20,1,'公式平台,公式源码 http://www.gspt.com'),COLOR333333;
DRAWTEXT(CROSS(GSPT56,L) AND GSPT56< GSPT52,L,'下穿480即买'),COLORFFFFFF;
DRAWTEXT(CROSS(H,GSPT56) AND GSPT56>GSPT52,H,'上穿480即卖'),COLOR000000;
DRAWTEXT(CROSS(GSPT54,L) AND GSPT52>GSPT56 AND GSPT87>0 ,L,'下穿240即买'),COLOR00FFFF;
DRAWTEXT(CROSS(H,GSPT54) AND GSPT52< GSPT56 AND GSPT87< 0 ,H,'上穿240即卖'),COLORFF0000;
DRAWTEXT(CROSS(H,GSPT50) AND GSPT50< REF(GSPT50,1) AND GSPT50< GSPT52 AND GSPT79>0 AND GSPT52< GSPT56,H,'不卖60'),COLORFF00FF;
DRAWTEXT(CROSS(GSPT50,L) AND GSPT50>REF(GSPT50,1) AND GSPT50>GSPT52 AND GSPT79< 0 AND GSPT52>GSPT56,L,'不买60'),COLOR00FF00;
DRAWTEXT(CROSS(H,GSPT50) AND GSPT50< REF(GSPT50,1) AND GSPT50< GSPT52 AND GSPT79< 0 AND GSPT52< GSPT56,H,'短卖60'),COLORFF00FF;
DRAWTEXT(CROSS(GSPT50,L) AND GSPT50>REF(GSPT50,1) AND GSPT50>GSPT52 AND GSPT79>0 AND GSPT52>GSPT56,L,'短买60'),COLOR00FF00;
DRAWTEXT(CROSS(H,GSPT50) AND GSPT50< REF(GSPT50,1) AND GSPT50< GSPT52 AND GSPT79>10,H,'不--卖'),COLORFF00FF;
DRAWTEXT(CROSS(GSPT50,L) AND GSPT50>REF(GSPT50,1) AND GSPT50>GSPT52 AND GSPT79< -10,L,'不--买'),COLOR00FF00;
DRAWTEXT(CROSS(GSPT52,GSPT54) AND GSPT79>0 ,GSPT50,'--大升2-'),COLORFF0000;
DRAWTEXT(CROSS(GSPT54,GSPT52) AND GSPT79< 0 ,GSPT50,'--大跌2'),COLOR8000FF;
DRAWTEXT(CROSS(GSPT50,GSPT52) AND GSPT79>0 ,GSPT48,'--大升1'),COLORFF0000;
DRAWTEXT(CROSS(GSPT52,GSPT50) AND GSPT79< 0 ,GSPT48,'--大跌1'),COLOR8000FF;
DRAWTEXT(CROSS(CLOSE,GSPT50) AND GSPT50>GSPT54 ,GSPT50,'--可能升'),COLORFF0000;
DRAWTEXT(CROSS(GSPT50,CLOSE) AND GSPT50< GSPT54 ,GSPT50,'--可能跌'),COLOR8000FF;
DRAWTEXT(CROSS(GSPT45,GSPT46) AND GSPT54>GSPT56 ,GSPT46,'--大升'),COLOR0000FF;
DRAWTEXT(CROSS(GSPT46,GSPT45) AND GSPT54< GSPT56 ,GSPT46,'--大跌'),COLOR00FF00;
DRAWTEXT(CROSS(GSPT71,0) AND GSPT67< 21,L,'平仓买-↑'),COLOR0000FF;
DRAWTEXT(CROSS(0,GSPT71) AND GSPT68< 21,H,'平仓卖-↓'),COLORFF0000;
DRAWTEXT(CROSS(0,GSPT65),H,'超卖-进入底部'),COLORFF0080;
DRAWTEXT(CROSS(0,GSPT66),H,'超买-进入顶部'),COLORFF8000;
DRAWTEXT(CROSS(GSPT65,0),CLOSE,'见底'),COLORFFFFFF;
DRAWTEXT(CROSS(GSPT66,0),CLOSE,'见顶'),COLORFFFF80;