GSPT1:=SUM((WINNER(C)*100),30)/30*0.1;
GSPT2:=SUM((WINNER(C)*100),20)/20*0.4;GSPT3:=SUM((WINNER(C)*100),10)/10*0.3;GSPT4:=SUM((WINNER(C)*100),5)/5*0.1;GSPT5:=SUM((WINNER(C)*100),3)/3*0.1;GSPTZ:=GSPT1+GSPT2+GSPT3+GSPT4+GSPT5;赚钱效应:IF(GSPTZ>38,GSPTZ,GSPTZ*1.3),NODRAW;活跃度:IF(SUMBARS(VOL,CAPITAL)<100,100-SUMBARS(VOL,CAPITAL),1),NODRAW;获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW;DRAWKLINE(H,O,L,C);Z1:=STRCAT(HYBLOCK,' ');Z2:=STRCAT(Z1,DYBLOCK);Z3:=STRCAT(Z2,' ');DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;
MA5:MA(CLOSE,5),COLORWHITE;MA25:MA(CLOSE,25),COLORYELLOW;VM5:=MA(VOL,5);VM60:=MA(VOL,60);JCX:=CROSS(MA5,MA25);XG8:=MA25>REF(MA25,1) AND VM5>VM60 AND JCX;STICKLINE(XG8,C,O,1.5,0),COLORMAGENTA;DRAWTEXT(XG8,L*0.99,'关注'),COLORMAGENTA;
M13:=MA(C,13);M24:=MA(C,24);M55:=MA(C,55);A1:=M13>M24 AND M24>M55 AND M13>=REF(M13,1) AND M24>=REF(M24,1) AND M55>=REF(M55,1);A2:=V<REF(V,1) AND V<VM60 AND VM5>VM60;XG7:=A1 AND A2 AND CROSS(M24,C) OR A1 AND A2 AND CROSS(M24,L);STICKLINE(XG7,C,O,1.5,0),COLORYELLOW;DRAWTEXT(XG7,L*0.99,'回踩'),COLORYELLOW;
{止损价}CCC:=IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL);止损:0.977*CCC,LINETHICK1,COLORGREEN;DRAWTEXT(CURRBARSCOUNT=15,止损,STRCAT('止损: ',STRCAT(CON2STR(止损,2),' '))),LINETHICK1,COLORGREEN;
{庄家成本}AL0:=SUMBARS(V,CAPITAL*1);AL1:=SUM(COST(10),AL0)/AL0;AL2:=SUM(COST(20),AL0)/AL0;AL3:=SUM(COST(30),AL0)/AL0;AL4:=SUM(COST(40),AL0)/AL0;AL5:=SUM(COST(50),AL0)/AL0;庄家成本2:=(5*AL1+4*AL2+3*AL3+2*AL4+AL5)/15,COLOR0080FF,DOTLINE;庄家成本1:REFDATE(庄家成本2,DATE),COLORYELLOW,DOTLINE;DRAWTEXT(CURRBARSCOUNT=30,庄家成本1,STRCAT('庄本:',CON2STR(庄家成本1,2))),COLORYELLOW;
{快逃绿箭头}VAR30:=PEAKBARS(3,15,1)<10;VAR50:=IF(VAR30=1,2,0);顶1:= IF(VAR50=2,2,0);顶A:=IF(顶1>REF(顶1,1),2,0),COLORGREEN;DRAWICON(顶A=2,H*1.01,2);
{买点红箭头}AR1:=EMA(OPEN,7);AR2:=EMA(AR1,21);AR3:=CROSS(AR1,AR2);AR5:=EMA(SMA((CLOSE-LLV(LOW,20))/(HHV(HIGH,16)-LLV(LOW,20))*100,8,1),3);短买:=IF(TROUGHBARS(1,6,1)=0 AND HIGH>LOW+0,2,0),COLORRED;DRAWICON(短买=2,L*0.99,1);
顶点:IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORLIBLUE,DOTLINE;低点:IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORLIRED,DOTLINE;STICKLINE(CCI>=200 AND H>=顶点,C,O,1,0),COLORBLUE;STICKLINE(CCI<=100 AND L<=低点,C,O,1,0),COLORRED;DRAWTEXT(CCI>=200 AND H>=顶点,H*1.01,'▼'),COLORGREEN;DRAWTEXT(CCI<=100 AND L<=低点,L*0.99,'▲'),COLORRED;