gspt1:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
gspt2:=SMA(gspt1,3,1);
gspt3:=SMA(gspt2,3,1);
gspt4:=3*gspt2-2*gspt3;
gspt5:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
gspt6:=SMA(gspt5,3,1);
gspt7:=SMA(gspt6,3,1);
gspt8:=3*gspt6-2*gspt7;
gspt9:IF(CROSS(gspt8,gspt4),H,REF(H,BARSLAST(CROSS(gspt8,gspt4)))),COLOR00FF33,LINETHICK1;
gspt10:IF(CROSS(gspt4,gspt8),L,REF(L,BARSLAST(CROSS(gspt4,gspt8)))),COLORCC33CC,LINETHICK1;
gspt11:LLV(LOW,23) ,COLOR7FFF00,LINETHICK2;
gspt12:HHV(HIGH,23),COLORFF9900, LINETHICK2;
gspt13:=EMA(CLOSE,12)-EMA(CLOSE,26);
gspt14:=EMA(gspt13,9);
gspt15:=(gspt13-gspt14)*2;
gspt16:=REF(CLOSE,1);
gspt17:=SMA(MAX(CLOSE-gspt16,0),6,1)/SMA(ABS(CLOSE-gspt16),6,1)*100;
gspt18:=SMA(MAX(CLOSE-gspt16,0),12,1)/SMA(ABS(CLOSE-gspt16),12,1)*100;
gspt19:=BARSLAST(REF(CROSS(gspt13,gspt14),1));
DRAWTEXT(REF(C,gspt19+1)>C AND REF(gspt13,gspt19+1)< gspt13 AND CROSS(gspt13,gspt14)>0,L-0.02,'★M底背离'),COLOR00FFFF;
gspt20:=BARSLAST(REF(CROSS(gspt2,gspt3),1));
DRAWTEXT(REF(C,gspt20+1)>C AND REF(gspt2,gspt20+1)< gspt2 AND CROSS(gspt2,gspt3),L-0.10,'◎K底背离'),COLORFF00FF;
gspt21:=BARSLAST(REF(CROSS(gspt17,gspt18),1));
DRAWTEXT(REF(C,gspt21+1)>C AND REF(gspt17,gspt21+1)< gspt17 AND CROSS(gspt17,gspt18)>0,L-0.18,'◆R底背离'),COLOR0000FF;
gspt22:=BARSLAST(REF(CROSS(gspt14,gspt13),1));
DRAWTEXT(REF(C,gspt22+1)< C AND REF(gspt13,gspt22+1)>gspt13 AND CROSS(gspt14,gspt13)>0,H+0.16,'★M顶背离'),COLOR00FF00;
gspt23:=BARSLAST(REF(CROSS(gspt3,gspt2),1));
DRAWTEXT(REF(C,gspt23+1)< C AND REF(gspt2,gspt23+1)>gspt2 AND CROSS(gspt3,gspt2)>0,H+0.08,'◎K顶背离'),COLORFFFFCC;
gspt24:=BARSLAST(REF(CROSS(gspt18,gspt17),1));
DRAWTEXT(REF(C,gspt24+1)< C AND REF(gspt17,gspt24+1)>gspt17 AND CROSS(gspt18,gspt17)>0,H+0.04,'◆R顶背离'),COLORFF9900;
gspt25:=(C+0.618*REF(C,1)+0.382*REF(C,1)+0.236*REF(C,3)+0.146*REF(C,4))/2.382;
CPX:EMA(((SLOPE(C,22)*20)+C),55),COLORYELLOW,LINETHICK4;
HJX:IF(gspt25>=CPX,CPX,DRAWNULL),COLORRED,LINETHICK2;
KCX:IF(gspt25< CPX,CPX,DRAWNULL),COLORCYAN,LINETHICK2;
DRAWTEXT(ISLASTBAR,CPX,'CPX'),COLORRED;
gspt29:EMA(CLOSE,5),LINETHICK1,COLORYELLOW;
gspt30:IF(gspt29>REF(gspt29,1),gspt29,DRAWNULL),COLORRED,LINETHICK1;
gspt31:IF(gspt29< REF(gspt29,1),gspt29,DRAWNULL),COLORGREEN,LINETHICK1;
STICKLINE(REF(COUNT(C< MA(REF(HHV((C+L+O+H)/4,40),1),3),5)=5,1) AND C>MA(REF(HHV((C+L+O+H)/4,40),1),3) AND C>O,C,O,1.3,0),COLORYELLOW;
gspt32:=MA(REF(HHV((C+L+O+H)/4,10),1),3);
STICKLINE(REF(COUNT(C< gspt32,5)=5,1) AND C>gspt32 AND C>O,C,O,1.3,0),COLORBLUE;
DRAWTEXT(HIGH>REF(HIGH,1) AND REF(HIGH,2)>REF(HIGH,1) AND LOW>REF(LOW,1) AND REF(LOW,2)>REF(LOW,1) AND MA(CLOSE,5)< MA(CLOSE,10),gspt11,'买进'),COLORMAGENTA;
gspt33:=REF(COUNT(C > gspt32, 5) = 5, 1) AND C < gspt32 AND C < O;
gspt34:=HIGH < REF(HIGH, 1) AND REF(HIGH, 2) < REF(HIGH, 1) AND LOW < REF(LOW, 1) AND REF(LOW, 2) < REF(LOW, 1) AND MA(CLOSE, 5) > MA(CLOSE, 10);
STICKLINE(gspt33, C, O, 1.3, 0), COLORRED;
DRAWTEXT(gspt34, gspt12, '卖出'), COLORGREEN;