gspt1:=9;
gspt2:=3;
gspt3:=3;
gspt4:100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)),COLOR0080FF;
gspt5:100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)),COLORGREEN;
gspt6:100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20)),COLORFF8000;
gspt7:100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)),COLOR00FFFF;
gspt8:=(CLOSE-LLV(LOW,gspt1))/(HHV(HIGH,gspt1)-LLV(LOW,gspt1))*100;
gspt9:=SMA(gspt8,gspt2,1);
gspt10:=SMA(gspt9,gspt3,1);
gspt11:=3*gspt9-2*gspt10;
gspt12:=LLV(LOW,26);
gspt13:=HHV(HIGH,34);
gspt14:=EMA((CLOSE-gspt12)/(gspt13-gspt12)*4,4)*25;
DRAWTEXT(gspt14< 10,10,'底'),COLORWHITE;
DRAWTEXT(gspt14>90,90,'顶'),COLORGREEN;
gspt15:=(C-MA(C,6))/MA(C,6)*100;
gspt16:=(C-MA(C,24))/MA(C,24)*100;
gspt17:=(C-MA(C,32))/MA(C,32)*100;
gspt18:=(gspt15+gspt16+gspt17)/3;
gspt19:=EMA(gspt18,5);
gspt20:=MA(100*(C-LLV(C,34))/(HHV(H,34)-LLV(L,34)),5)-20;
gspt21:=SMA(SMA(100-3*(C-LLV(C,75))/(HHV(H,75)-LLV(L,75))*100,20,1)+SMA(2*(C-LLV(C,75))/(HHV(H,75)-LLV(L,75))*100,20,1),15,1);
gspt22:=gspt21< REF(gspt21,1) AND V>REF(V,1) AND C>REF(C,1);
gspt23:=EMA(gspt19,5)*4;
gspt24:=EMA(gspt23,5),COLORMAGENTA,LINETHICK2;
gspt25:=gspt23*3-gspt24*2,COLORYELLOW,LINETHICK2;
gspt26:IF(LLV(gspt20,3)< gspt20,-15,DRAWNULL),LINETHICK2,COLORRED;
gspt27:IF(gspt20=LLV(gspt20,3),-15,DRAWNULL),LINETHICK2,COLORGREEN;
gspt28:IF(gspt25>gspt24,-10,DRAWNULL),LINETHICK2,COLORCC66FF;
gspt29:IF(gspt22>0,-5,DRAWNULL),LINETHICK2,COLORYELLOW;
gspt30:IF(gspt25< gspt24,-10,DRAWNULL),LINETHICK2,COLORFF9900;
gspt31:IF(gspt22=0,-5,DRAWNULL),LINETHICK2,COLOR6B8E23;
gspt32:=((-((100)*(HHV(H,14) - C))/(HHV(HIGH,14) - LLV(L,14))));
gspt33:=MA(C,18);
gspt34:=(C-gspt33)/gspt33*100>=-9.9 AND C< gspt33;
gspt35:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
gspt36:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*1;
gspt37:=EMA(SMA(gspt36,3,1),2);
gspt38:=SMA(gspt37,3,1);
gspt39:=SMA(gspt35,3,1);
gspt40:=SMA(gspt39,3,1);
gspt41:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
gspt42:=EMA(C-L,5) ;
gspt43:=MA((C+REF(C,1)+REF(C,1))/3+gspt42,5);
gspt44:=MA(REF(C,1)-gspt42,5);
gspt45:=MA(C,20);
gspt46:=MA(C,2);
gspt47:=MA(C,10);
gspt48:=MA(C,20);
gspt49:=EXIST(CROSS(gspt46,gspt47) AND CROSS(gspt46,gspt48),1);
gspt50:=(HIGH+LOW+CLOSE)/3;
gspt51:=(gspt50-MA(gspt50,14))*1000/(15*AVEDEV(gspt50,14)),COLORRED;
gspt52:=(gspt50-MA(gspt50,36))*1000/(15*AVEDEV(gspt50,36)),COLORGREEN;
DRAWTEXT(CROSS(gspt32,-2) AND CROSS(gspt39,gspt40) AND CROSS(gspt37,gspt38),50,'低位启动'),COLOR0000FF;
DRAWTEXT(gspt34 AND C/REF(C,1)>1.080,50,'起涨点'),COLORRED;
DRAWTEXT(gspt41>O AND O>gspt44 AND C>gspt43 AND C>gspt45 AND C>gspt41 AND gspt49 AND CROSS(gspt39,gspt40) AND CROSS(gspt37,gspt38),50,'突破'),COLORGREEN;
DRAWTEXT(CROSS(gspt51,gspt52) AND REF(gspt51,1)=LLV(gspt51,25) AND CROSS(gspt9,gspt10),0.4,'抄底王'),COLORYELLOW;
gspt53:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
gspt54:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
gspt55:=SMA(gspt53,3,1);
gspt56:=SMA(gspt55,3,1);
gspt57:=EMA(SMA(gspt54,3,1),2);
gspt58:=SMA(gspt57,3,1);
DRAWTEXT(CROSS(gspt55,gspt56) AND CROSS(gspt57,gspt58),35,'短线启动'),COLOR00FFFF;
STICKLINE(CROSS(gspt55,gspt56) AND CROSS(gspt57,gspt58),0,35,1,0),COLORMAGENTA;
DRAWTEXT_FIX(1,0.980,20,1,'公式平台,公式源码 http://www.gspt.com'),COLOR333333;
gspt59:=(CLOSE+HIGH+LOW)/3;
gspt60:=EMA(gspt59,10);
gspt61:=REF(gspt60,1);
STICKLINE(gspt60>gspt61,-20,-25,5,0),COLORYELLOW;
STICKLINE(gspt60< gspt61,-22,-25,5,0),COLORBLUE;
gspt62:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
gspt63:=REF(gspt62,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
gspt64:=REF(gspt63,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
gspt65:=REF(gspt64,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
gspt66:=REF(gspt65,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
gspt67:=REF(gspt66,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
gspt68:=REF(gspt67,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
gspt69:=REF(gspt68,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
gspt70:=REF(gspt69,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
gspt71:=REF(gspt70,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
gspt72:=REF(gspt71,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
gspt73:=REF(gspt72,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
gspt74:=CLOSE< REF(CLOSE,1) AND CLOSE< REF(CLOSE,2);
gspt75:=REF(gspt74,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
gspt76:=REF(gspt75,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
gspt77:=REF(gspt76,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
gspt78:=REF(gspt77,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
gspt79:=REF(gspt78,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
gspt80:=REF(gspt79,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
gspt81:=REF(gspt80,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
gspt82:=REF(gspt81,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
gspt83:=REF(gspt82,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
gspt84:=REF(gspt83,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
gspt85:=REF(gspt84,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
gspt86:=REF(gspt74 OR gspt75 OR gspt76 OR gspt77 OR gspt78 OR gspt79 OR gspt80 OR gspt81 OR gspt82 OR gspt83 OR gspt84 OR gspt85,1) AND gspt62;
gspt87:=REF(gspt62 OR gspt63 OR gspt64 OR gspt65 OR gspt66 OR gspt67 OR gspt68 OR gspt69 OR gspt70 OR gspt71 OR gspt72 OR gspt73,1) AND gspt74;
DRAWTEXT(gspt86,20,'底托'),COLORYELLOW;
gspt88:=1;
gspt89:=(2*CLOSE+HIGH+LOW)/4;
gspt90:=IF(YEAR>=2099 AND MONTH>2,0,1);
gspt91:=LLV(LOW,5);
gspt92:=HHV(HIGH,4);
gspt93:=EMA((gspt89-gspt91)/(gspt92-gspt91)*100,4)*gspt90*gspt88;
gspt94:=EMA(0.667*REF(gspt93,1)+0.333*gspt93,2)*gspt90*gspt88;
DRAWTEXT(CROSS(gspt93,gspt94) AND gspt93< 50 AND 29< gspt93,40,'短进'),COLORRED;
DRAWTEXT(CROSS(gspt93,gspt94) AND gspt93< 30,50,'低吸'),COLOR3399CC;
DRAWTEXT(CROSS(gspt94,gspt93) AND gspt93>70,95,'高抛'),COLORMAGENTA;