gspt7Y:EMA(C,21)COLORBLUE,LINETHICK3;
gspt0U:=gspt7Y< REF(gspt7Y,1);
IF(gspt0U-1,gspt7Y,DRAWNULL)COLORRED,LINETHICK3;
gsptSM:=EMA(C,3) > EMA(C,21);
gsptO2:=EMA(C,3) < EMA(C,21);
gsptJE:=CLOSE< OPEN;
gsptN2:= EMA(C,3) > EMA(C,8);
gsptV6:=EMA(C,3) < EMA(C,8);
STICKLINE(gsptSM,H,L,0,0),COLOR007FFF;
STICKLINE(gsptSM,O,C,3,1),COLOR007FFF;
STICKLINE(gsptSM AND gsptJE,O,C,3,0),COLOR007FFF;
STICKLINE(gsptO2,H,L,0,0),COLORGREEN;
STICKLINE(gsptO2,O,C,3,1),COLORGREEN;
STICKLINE(gsptO2 AND gsptJE,O,C,3,0),COLORGREEN;
STICKLINE(gsptO2 AND gsptN2,H,L,0,1),COLORMAGENTA;
STICKLINE(gsptO2 AND gsptN2,O,C,3,1),COLORMAGENTA;
STICKLINE(gsptO2 AND gsptN2 AND gsptJE,O,C,3,0),COLORMAGENTA;
STICKLINE(gsptSM AND gsptV6,H,L,0,0),COLORBLUE;
STICKLINE(gsptSM AND gsptV6,O,C,3,1),COLORBLUE;
STICKLINE(gsptSM AND gsptV6 AND gsptJE,O,C,3,0),COLORBLUE;
gsptQF:=MA(CLOSE,9),LINETHICK2;
gspt03:=MA(CLOSE,20);
gsptE8:=CROSS(gsptQF,gspt03);
gsptXN:=CROSS(gspt03,gsptQF);
DRAWTEXT(gsptE8,L-0.1,'潜龙')COLORYELLOW;
DRAWTEXT(gsptXN,H+0.1,'空仓');
gsptE3:=(C-REF(C,1))/REF(C,1)*100< 1.02;
gsptM0:=H>MA(C,5)*1.12;
gsptBV:= gsptE3 AND gsptM0;
DRAWTEXT(gsptBV,H*1.05,'卖点'),COLORWHITE;
gsptDX:=EMA(C,13),COLOR0000FF,LINETHICK2;
gsptST:=EMA(C,34),COLORYELLOW;
gsptLM:=EMA(C,55),COLORFF00FF;
gspt6W:=EMA(C,120),COLORFFCC66;
gsptYW:=gsptLM>gsptST AND gsptST>gsptDX;
gspt1Y:=BARSLAST((C-gsptDX)/gsptDX*100< -6);
gsptPY:=gsptDX>=REF(gsptDX,2);
gsptPP:=COUNT(CROSS(C,gsptDX),gspt1Y)=1;
gsptOU:=gsptYW AND gspt1Y AND gsptPY AND gsptPP;
gspt1C:=gsptOU AND FILTER(gsptOU,10);
DRAWTEXT(gspt1C,L-0.09,'捉妖'),COLORYELLOW;
STICKLINE(gspt1C,H,L,3,0),LINETHICK2,COLORYELLOW;
gspt32:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5;
gsptZT:=ABS((gsptDX-gsptST)+(gsptST-gsptLM))/C< 0.2;
gspt2W:=C>gsptLM AND (REF(C,1)< REF(gsptLM,1) OR REF(C,2)< REF(gsptLM,2) OR REF(C,3)< REF(gsptLM,3) OR REF(C,4)< REF(gsptLM,4) OR REF(C,5)< REF(gsptLM,5));
gsptZP:=gspt32 AND gsptZT AND gspt2W;
DRAWTEXT(gsptZP AND FILTER(gsptZP,10),L-0.09,'潜龙捉妖'),COLOR00C5FF;
STICKLINE(gsptZP AND FILTER(gsptZP,10),O,C,3,1),LINETHICK2,COLOR00C5FF;
gsptHO:=(C-REF(C,1))/REF(C,1)*100>0.5;
gsptKL:=V>MA(V,5)*0.6;
gsptD9:=COUNT(CROSS(gsptDX,gsptLM),3)=1;
gsptOD:=ABS(gsptST-gsptLM)/gsptLM< 0.03;
gsptMM:=gsptLM<=gspt6W AND gsptLM>=REF(gsptLM,1);
gsptY0:=FILTER(gsptHO AND gsptKL AND gsptD9 AND gsptOD AND gsptMM,2);
gsptYD:=gsptDX>gsptST AND gsptST< gsptLM;
gsptD3:=BARSLAST(CROSS(C,gsptLM) );
gsptWD:=H=HHV(H,gsptD3);
gsptFD:=BARSLAST(gsptWD);
gsptJZ:=COUNT(O>C AND C< REF(C,1) AND C>gsptLM AND BETWEEN((C-gsptLM)/gsptLM,0,0.02),gsptFD)=1;
DRAWTEXT_FIX(1,0.980,20,1,'公式平台,公式源码 http://www.gspt.com'),COLOR333333;
gspt45:=C>REF(C,1) ;
gspt2N:= gsptYD AND gsptJZ AND gspt45 ;
gsptXL:=gspt2N AND FILTER(gspt2N ,10);
gsptI8:=BARSLAST(REF(CROSS(gsptST,gsptDX),1)) AND CROSS(gsptDX,gsptST);
DRAWTEXT(gsptI8,L-0.09,'加仓'),COLORWHITE;
gspt8G:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5) );
gsptMF:=gsptDX>gsptST AND gsptST>gsptLM AND gsptDX>REF(gsptDX,1);
gsptKS:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,gspt8G),gspt8G);
gsptJN:=H=HHV(H,gspt8G);
gspt5P:="MACD.MACD"(12,26,9)< REF("MACD.MACD"(12,26,9),1);
gsptF2:=gsptMF AND gsptKS AND gsptJN;
gsptP7:=gsptMF AND gsptKS AND gsptJN AND gspt5P;
DRAWTEXT(gsptF2 AND gsptP7,H+0.13,'了结'),COLOR00FF00;
gspt4O:=gsptDX>=REF(gsptDX,3) AND gsptST>=REF(gsptST,1) AND gsptLM>=REF(gsptLM,1) AND CROSS(C,gsptDX) AND CROSS(C,gsptST) AND CROSS(C,gsptLM);
DRAWTEXT(gspt4O AND FILTER(gspt4O,10),H*1.025,'潜龙捉妖'),COLORYELLOW;
STICKLINE(gspt4O AND FILTER(gspt4O,10),O,C,3,1),LINETHICK2,COLORFFC8FF;
gsptBT:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
gspt57:=CROSS(gsptBT,0.9);
gspt6M:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
gsptXI:=CROSS(gspt6M,0.9);
gsptU0:= REF(HIGH,BARSLAST(gspt57)), POINTDOT,COLOREA91B5;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(gspt57)),REF(HIGH,BARSLAST(gspt57)),2,1),COLOREA91B5,LINETHICK3;
gspt6G:= REF(LOW,BARSLAST(gsptXI)), POINTDOT,COLOR00B4FF;
STICKLINE(CLOSE,REF(LOW,BARSLAST(gsptXI)),REF(LOW,BARSLAST(gsptXI)),2,1),COLOR00B4FF,LINETHICK3;
gsptHA:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
gsptDP:=SMA(gsptHA,3,1);
gsptRK:=SMA(gsptDP,3,1);
STICKLINE(CLOSE>OPEN,OPEN,CLOSE,5,0),COLORFF00FF;
STICKLINE(CLOSE>OPEN,OPEN,CLOSE,1,1),COLORFF6600,DOTLINE;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,5,0),COLOR00FF00;
STICKLINE(CLOSE< OPEN,OPEN,CLOSE,1,1),COLOR00FFFF,DOTLINE;
STICKLINE(CLOSE=OPEN,OPEN,CLOSE,5,0),COLOR00FF99;
STICKLINE(CLOSE=OPEN,OPEN,CLOSE,1,1),COLORCC00FF,DOTLINE;
gsptIE:=((3 * gsptDP) - (2 * gsptRK));
gsptBR:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
gsptBF:=SMA(gsptBR,3,1);
gspt15:=SMA(gsptBF,3,1);
gsptEX:=((3 * gsptBF) - (2 * gspt15));
gsptRX:=IF(CROSS(gsptEX,gsptIE),HIGH,REF(HIGH,BARSLAST(CROSS(gsptEX,gsptIE))));
gsptKB:=IF(ISLASTBAR ,gsptRX,DRAWNULL);
gsptNW:=LLV(HIGH,30);
gsptLZ:=IF(ISLASTBAR ,gsptNW,DRAWNULL);
STICKLINE(ISLASTBAR ,gsptKB,gsptKB,100,1),LINETHICK1,COLORFFFFFF;
STICKLINE(ISLASTBAR ,gsptLZ,gsptLZ,80,1),COLOR00FF00,LINETHICK1;