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:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
DRAWTEXT(REF(C,gspt13+1)>C AND REF("MACD.DIF",gspt13+1)< "MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA")>0,L-0.02,'M底背离'),COLOR00FFFF;
gspt14:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
DRAWTEXT(REF(C,gspt14+1)>C AND REF("KDJ.K",gspt14+1)< "KDJ.K" AND CROSS("KDJ.K","KDJ.D"),L-0.10,'K底背离'),COLORFF00FF;
gspt15:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
DRAWTEXT(REF(C,gspt15+1)>C AND REF("RSI.RSI1",gspt15+1)< "RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2")>0,L-0.18,'R底背离'),COLOR0000FF;
gspt16:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
DRAWTEXT(REF(C,gspt16+1)< C AND REF("MACD.DIF",gspt16+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF")>0,H+0.16,'★M顶背离'),COLOR00FF00;
gspt17:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
DRAWTEXT(REF(C,gspt17+1)< C AND REF("KDJ.K",gspt17+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K")>0,H+0.08,'★K顶背离'),COLORFFFFCC;
gspt18:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
DRAWTEXT(REF(C,gspt18+1)< C AND REF("RSI.RSI1",gspt18+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1")>0,H+0.04,'★R顶背离'),COLORFF9900;
gspt19:=(C+0.618*REF(C,1)+0.382*REF(C,1)+0.236*REF(C,3)+0.146*REF(C,4))/2.382;
gspt23:EMA(CLOSE,5),LINETHICK1,COLORYELLOW;
gspt24:IF(gspt23>REF(gspt23,1),gspt23,DRAWNULL),COLORRED,LINETHICK1;
gspt25:IF(gspt23< REF(gspt23,1),gspt23,DRAWNULL),COLORGREEN,LINETHICK1;
DRAWTEXT(ISLASTBAR,gspt23,'雷达线'),COLORRED;
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;
gspt26:=MA(REF(HHV((C+L+O+H)/4,10),1),3);
STICKLINE(REF(COUNT(C< gspt26,5)=5,1) AND C>gspt26 AND C>O,C,O,1.3,0),COLORBLUE;
gspt27:=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);
gspt28:=LOW< REF(LOW,1) AND REF(LOW,2)< REF(LOW,1) AND HIGH< REF(HIGH,1) AND REF(HIGH,2)< REF(HIGH,1) AND MA(CLOSE,5)>MA(CLOSE,10);
DRAWTEXT(gspt27,L-0.4,'底方买进'),COLORMAGENTA;
DRAWTEXT(gspt28,H+0.4,'高方卖出'),COLORGREEN;
