A:=SUMBARS(V,CAPITAL*1);{累计换手=100%的周期} A2:=SUM(COST(20),A)/A;{在A周期里获利20%的平均价} A10:=SUM(COST(10),A)/A;{在A周期里获利10%的平均价} A3:=SUM(COST(30),A)/A;{在A周期里获利30%的平均价} A4:=SUM(COST(40),A)/A;{在A周期里获利40%的平均价} A5:=SUM(COST(50),A)/A;{在A周期里获利50%的平均价} E:=LLV(L,250)=L;{一年中最低价的位置} E1:=BARSLAST(E);{求得一年中最低价的位置到现在的周期} 庄家成本:(5*A10+4*A2+3*A3+2*A4+A5)/15, CIRCLEDOT,COLORRED;{求出启动点的价位} 持股成本线:=DMA(AMOUNT/V/100,V/CAPITAL),COLORRED,LINETHICK2; 水平面:MA(CLOSE,89),COLORFFA2FF; {MA(CLOSE,321),CIRCLEDOT;} BBI:(MA(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4; IF(BBI>REF(BBI,1),BBI,DRAWNULL),COLORRED,LINETHICK2; IF(BBI<REF(BBI,1),BBI,DRAWNULL),COLORYELLOW,LINETHICK2; MA3:MA(C,3),COLORBLUE,LINETHICK1; MA24:MA(CLOSE,24),COLOR00E300,LINETHICK1; MA3角度:(ATAN((MA3/REF(MA3,1)-1)*100)*180/3.1416),NODRAW; V2:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1); STICKLINE(V2>=1,O,C,1.2,0),COLORYELLOW; MA13:=MA(CLOSE,13); X1:=(C+L+H)/3; BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10; EMA8:=EMA(C,8); A1:=MIN(O,C); B1:=ABS(O-C); T1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10); STICKLINE(T1,A1,A1+B1/4,1.5,0),COLOR007575; STICKLINE(T1,A1+B1/4,A1+B1/2,1.5,0),COLORFF0000; STICKLINE(T1,A1+B1/2,A1+B1*3/4,1.5,0),COLOR007575; STICKLINE(T1,A1+B1*3/4,A1+B1,1.5,0),COLORFF0000; LC:=REF(CLOSE,1); RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100); FF:=EMA(CLOSE,3); MA15:=EMA(CLOSE,21); {DRAWTEXT(CROSS(FF,MA15),(LOW * 0.97),1),COLORA6E500; DRAWTEXT(CROSS(88,RSI),(HIGH * 1.04),2),COLOR1880FF;} STICKLINE(CROSS(FF,MA15),A1,A1+B1/2,1.5,0),COLOR7F017F; STICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,1.5,0),COLORGREEN; T2:=COUNT(CROSS(BBI,3),3)=1 AND CROSS(C,BBI); DRAWTEXT(T2,H*1.05,3),COLORWHITE; STICKLINE(T2,O,C,1.5,0),COLORRED; T12:=V2>=1; T0:=BARSLAST(T12); L1:=REF(L,T0); H1:=REF(H,T0); STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),H1,H1,6,-1),COLORWHITE; STICKLINE(REF(T12,1) OR REF(T12,2) OR REF(T12,3),L1,L1,6,-1),COLORWHITE; {T11:=REF(T12,3) AND COUNT(L<L1,4)=0 AND COUNT(L>H1,4)>1; DRAWTEXT(T11,H*1.05,4),COLORWHITE; STICKLINE(T11,O,C,2,0),COLORFF00FF;} {(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) }; L11:=MIN(REF(L,1),L); L10:=MIN(L11,REF(L,2)); L21:=MAX(REF(L,1),L); L20:=MAX(L21,REF(L,2)); T111:=(REF(V2>=1,3) OR REF(V2>=1,2) OR REF(V2>=1,1)) AND ((L10>L1 AND L20>H1) OR (L11>L1 AND L21>H1)); T11:=T111 AND REF(T111,1)=0; STICKLINE(T11,O,C,1.5,0),COLORFF00FF; 高:=REF(HHV(H,N),M); 低:REF(LLV(L,N),M),COLORBLUE; H19:=高-(高-低)*0.191; H38:=高-(高-低)*0.382; H中:=高-(高-低)*0.5; H61:=高-(高-低)*0.618; H80:高-(高-低)*0.809,COLORMAGENTA; 顶点:REFDATE(高,DATE),POINTDOT,LINETHICK2,COLORWHITE; %19.8:REFDATE(H19,DATE),POINTDOT,LINETHICK2,COLORYELLOW; %38.2:REFDATE(H38,DATE),POINTDOT,LINETHICK2,COLORGREEN; %50:REFDATE(H中,DATE),POINTDOT,LINETHICK2,COLORRED; %61.8:REFDATE(H61,DATE),POINTDOT,LINETHICK2,COLORMAGENTA; %80.9:REFDATE(H80,DATE),POINTDOT,LINETHICK2,COLORBLUE; 低点:REFDATE(低,DATE),POINTDOT,LINETHICK2,COLORWHITE; DRAWTEXT(ISLASTBAR,顶点,5),COLORWHITE; DRAWTEXT(ISLASTBAR,低点,6),COLORWHITE; STICKLINE(T1,A1,A1+B1/2,2,0),COLOR007575; STICKLINE(T1,A1+B1/2,A1+B1,2,0),COLORBLUE; STICKLINE(T11 AND T12,A1,A1+B1/2,2,0),COLORFF00FF; STICKLINE(T11 AND T12,A1+B1/2,A1+B1,1.2,0),COLORYELLOW; STICKLINE(T1 AND T12,A1+B1/3,A1+B1,1.2,0),COLORYELLOW; STICKLINE(T1 AND T12,A1,A1+B1/3,2,0),COLOR007575; STICKLINE(T1 AND T12,A1+B1/3,A1+B1*2/3,2,0),COLORBLUE; STICKLINE(T2 AND T12,A1+B1/2,A1+B1,2,0),COLORRED; STICKLINE(T2 AND T12,A1,A1+B1/2,1.2,0),COLORYELLOW; 【箱底】:TROUGH(CLOSE,10,1)*1.02,COLORWHITE; VAR111:=(C+H+O+L)/4; 卖出:=XMA(VAR111,20)*(1+80/1000),DOTLINE; 买入:=XMA(VAR111,32)*(1-100/1000),DOTLINE; STICKLINE(买入>LOW AND 买入<HIGH,买入,MIN(MIN(OPEN,CLOSE),买入),1.2,0),COLORMAGENTA; STICKLINE(买入>MIN(C,O) AND 买入<MAX(C,O),买入,MIN(OPEN,CLOSE),1.3,0),COLORMAGENTA; STICKLINE(买入>LOW AND 买入<HIGH,买入,LOW,0,0),COLORMAGENTA; STICKLINE(买入>HIGH,OPEN,CLOSE,1.3,0),COLORMAGENTA; STICKLINE(买入>HIGH,HIGH,LOW,0,0),COLORMAGENTA; VAR1:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2)); VARD:=(CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2)); VARE:=(REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VARF:=(REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VAR10:=(REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VAR11:=(REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VAR12:=(REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VAR13:=(REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VAR14:=(REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VAR15:=(REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VAR16:=(REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)); VAR17:=(REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)); VAR18:=(REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));MTM:=C-REF(C,1); DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6); YXF:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);RSV9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K1:=SMA(RSV9,3,1); DK1:=K1-REF(K1,1); 买:=IF(DK1>7 AND REF(DK1,1)<0 AND (DK1-REF(DK1,1))>9,50,0);DRAWICON(买=50 AND (FILTER(YXF=1,5) ) AND ((REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1)) AND VAR1) OR (REF("KDJ.J",1)<0 AND "KDJ.J">0) AND (FILTER(YXF=1,5) ) AND ((REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1)) AND VAR1) ,L*0.98,1);M1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0); M2:=MA(M1,30); D1:=(HHV(C,10)/C-1)*100; D2:=COUNT(M2>M1,10); V5:=MA(VOL,5); V60:=MA(VOL,60); D3:=COUNT(VOL>V60,10); D4:=SUM(VOL,8)/8; D5:=SUM(VOL,3)/3; ZF:=(C-REF(C,1))/REF(C,1)*100; V转:DRAWTEXT(HHV(D1,2)>15 AND D2=10 AND (D4>D5 OR LLV(VOL,10)<V60) AND C>=O AND ZF>=0,L,'转'),COLORGREEN; |