GSPT1:=REF(HHV(HIGH,150),3);
GSPT2:=REFDATE(REFDATE(GSPT1,DATE),DATE);
GSPT3:=GSPT2=H AND ((C-L)<(O-C) OR (O-L)<(C-O));
GSPT4:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;
GSPT5:=(CLOSE/REF(CLOSE,1)-1)*100;
GSPT6:=IF(BETWEEN(GSPT4<20,0,5) AND L<=REF(C,GSPT4<20)AND GSPT5<=-5,20,0);
GSPT7:=IF(C>O AND REF(GSPT6,1)=20 AND REF(GSPT4,1)<20,60,0);
GSPT8:=SMA(ABS(L-REF(L,1)),13,1)/SMA(MAX(L-REF(L,1),0),13,1)*100;
GSPT9:=EMA(IF(CLOSE*1.2,GSPT8*13,GSPT8/13),13);
GSPT10:=IF(LLV(LOW,56),1,0);
GSPT11:=EMA(IF(LOW<=LLV(L,34),(GSPT9+HHV(GSPT9,34)*2)/2,0),3)/618*GSPT10;
GSPT12:=GSPT11>REF(GSPT11,1);
GSPT13:=REFDATE(REF(LLV(L,100),3),DATE);
GSPT14:=(GSPT12 AND L=GSPT13)>REF(GSPT12 AND L=GSPT13,1);
GSPT15:=GSPT14>REF(GSPT14,1);
GSPT16:=REFDATE(REF(LLV(L,90),3),DATE);
GSPT17:=(GSPT16=L AND ((C-L)>(0-C) OR (O-L)>(C-O)));
GSPT18:=EMA(CLOSE,12)-EMA(CLOSE,26);
GSPT19:=LLV(((GSPT18-EMA(GSPT18,9))*2),50)=((GSPT18-EMA(GSPT18,9))*2);
GSPT20:=GSPT19 AND FILTERX(GSPT19,20);
GSPT21:=EMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5);
GSPT22:=(HHV(HIGH,25)-LLV(LOW,25))/EMA((CLOSE-LLV(LOW,25)),5);
GSPT23:=REF(GSPT22,2)<REF(GSPT22,1) AND GSPT22<REF(GSPT22,1);
GSPT24:=COUNT(CROSS(GSPT22,GSPT21),7)>0 AND GSPT23;
GSPT25:=GSPT24 AND COUNT(GSPT24,5)=1;
GSPT26:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
GSPT27:=SMA(SMA(GSPT26,3,1),3,1);
GSPT28:=REVERSE((3*SMA(GSPT26,3,1)-2*GSPT27));
GSPT58:=REF(MA(CLOSE,1),10)>REF(MA(CLOSE,60),10);
GSPT59:=(CROSS((3*SMA(GSPT26,3,1)-2*GSPT27),GSPT28) AND GSPT58);
STICKLINE(GSPT3,2.1,0,2,0),COLORGREEN;
DRAWTEXT(GSPT3,1.9,'---逃顶'),COLORGREEN;
逃顶:0,COLORGREEN,LINETHICK1;
STICKLINE(GSPT7,1.7,0,2,0),COLORRED;
红柱:0,COLORRED,LINETHICK1;
STICKLINE(FILTER(GSPT15>=1,5),1.4,0,2,0),COLORYELLOW;
起爆:0,COLORYELLOW,LINETHICK1;
STICKLINE(FILTER(GSPT17>=1,5),1.1,0,2,0),COLORMAGENTA;
谷底:0,COLORMAGENTA,LINETHICK1;
STICKLINE(FILTER(GSPT20>=1,5),0.8,0,2,0),COLORWHITE;
买点:0,COLORWHITE,LINETHICK1;
DRAWTEXT_FIX(C>O,0,0.2,0,'gspt.com'),COLOR333333;
STICKLINE(FILTER(GSPT25>=1,5),0.5,0,2,0),COLORLIGREEN;
龙头:0,COLORLIGREEN,LINETHICK1;
STICKLINE(FILTER(GSPT59>=1,5),0.2,0,2,0),COLORDBDB70;
庄显:0,COLORDBDB70,LINETHICK1;
