复制内容到剪贴板
代码:
input:LONG(24,1,100),SHORT(13,1,100),M(6,1,100),N(6,1,100);
OBV:SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0);
ema(OBV,453);
ema(OBV,17);
ema(OBV,50);
DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.978,'★买'),stick,coloryellow;
买: IF(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.978,0),stick,colorred;
DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.02,'★卖'),stick,coloryellow;
卖: IF(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.02,0),stick,colorred;
DIF:EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA:EMA(DIF,M);
MACD:=2*(DIF-DEA);
JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
DRAWTEXT(二次金叉,0.4,' 金'),Coloryellow;
A4:=BARSLAST(ref(cross(dif,dea),1));
B1:=ref(c,A4+1)>c and ref(dif,A4+1)<dif and cross(dif,dea);
DRAWTEXT(FILTER(B1>0,5),dif+0.2,'背'),COLORyellow;
下:=ema((MA(LOW,3) * 0.96),30);
DRAWTEXT((((CROSS(DIF,DEA) AND ((下 - REF(下,1)) > 0)) AND (MACD >= REF(MACD,1))) AND (DIF <= 0)),0.3,'DIF金叉'),color0000FF;
均线30角度:=atan((MA(C,30)/ref(MA(C,30),3)-1)*100)*180/3.14159;
均线60角度:=atan((MA(C,60)/ref(MA(C,60),3)-1)*100)*180/3.14159;
均线125角度:=atan((MA(C,125)/ref(MA(C,125),3)-1)*100)*180/3.14159;
均线250角度:=atan((MA(C,250)/ref(MA(C,250),3)-1)*100)*180/3.14159;
DRAWTEXTREL(18,710,'■60天均线角度:'+NUMTOSTRN(均线60角度,2)+''),ColorRED;
DRAWTEXTREL(18,740,'■125天均线角度:'+NUMTOSTRN(均线125角度,2)+''),ColorRED;
DRAWTEXTREL(18,770,'■250天均线角度:'+NUMTOSTRN(均线250角度,2)+''),ColorRED;
dp:=if(c=INDEXC,0,1);
gj:=AMOUNT/v/100;
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);
STICKLINE(DISPSTATUS=2 and dp=1 and c>=今日阻力,今日阻力,今日阻力,30,0),Color0000FF;
STICKLINE(DISPSTATUS=2 and dp=1 and c<今日阻力,今日阻力,今日阻力,30,0),Color00FF00;
STICKLINE(DISPSTATUS=2 and dp=1 and c>=今日支撑,今日支撑,今日支撑,30,0),ColorFF00FF;
STICKLINE(DISPSTATUS=2 and dp=1 and c<今日支撑,今日支撑,今日支撑,30,0),ColorFF0000;
DRAWTEXTREL(5,105,' 今日支撑=：'+NUMTOSTRN(今日支撑 ,2 )),ColorFF00FF;
DRAWTEXTREL(5,205,' 明日支撑=：'+NUMTOSTRN(明日支撑 ,2 )),Color00FFFF;
DRAWTEXTREL(5,155,' 今日阻力=：'+NUMTOSTRN(今日阻力 ,2 )),ColorFFFF00;
DRAWTEXTREL(5,255,' 明日阻力=：'+NUMTOSTRN(明日阻力 ,2 )),Color00FF00;
RH:=H-L;
R:=DYNAINFO(13)*100;
DRAWTEXTREL(18,60,'■当天振幅:'+NUMTOSTRN(R,2)+'% ['+NUMTOSTRN(RH,2)+'元 ]'),Color00FF00;
获利盘:=WINNER(CLOSE)*100;
套牢盘:=100*(1-WINNER(C));
浮筹比:=(winner(c*1.1)-winner(c*0.9))/winner(hhv(h,0))*100;
DRAWTEXTREL(18,800,'浮筹比:'+浮筹比+'% '),LINETHICK1,Colora9a9a9;
DRAWTEXTREL(18,830,'获利盘:'+获利盘+'% '),LINETHICK1,Colora9a9a9;
DRAWTEXTABS( 18,10 ,'★ 注意:绿线趋势向上,粉线上穿可做,在下莫动 ★'),stick,coloryellow;
DIFF5:="MACD.DIFF#min5";
DEA5:="MACD.DEA#min5";
Ap1:=BARSLAST(ref(cross(DIFF5,DEA5),1));
Bp1:=(ref(c,Ap1+1)>c and ref(DIFF5,Ap1+2)<DIFF5 and cross(DIFF5,DEA5));
Cp1:=BARSLAST(ref(cross(DEA5,DIFF5),1));
Dp1:=ref(c,Cp1+1)<c and ref(DIFF5,Cp1+2)>DIFF5 and cross(DEA5,DIFF5);
DRAWICON(Bp1>0,C,12);
DRAWICON(Dp1>0,C,13);
ar1:=MA(CLOSE,5);
Var2:=999999999999999999999999999;
Var3:=999999999999999999999999999;
Var4:=999999999999999999999999999;
Var5:=MA(CLOSE,34);
Var6:=MA(CLOSE,60);
Var7:=999999999999999999999999999;
Var8:=999999999999999999999999999;
Var9:=999999999999999999999999999;
VarA:=REF(CLOSE,1);
VarB:=999999999999999999999999999;
VarC:=999999999999999999999999999;
VarD:=999999999999999999999999999;
VarE:=SMA(MAX(CLOSE-VarA,0),6,1)/SMA(ABS(CLOSE-VarA),6,1)*100;
DRAWTEXT(DATE>700101 AND CROSS(84,VarE),HIGH,'☆卖');
开:SMA(MAX(O-REF(O,1),0),6,1)/SMA(ABS(O-REF(O,1)),6,1)*100, LINETHICK0;
高:SMA(MAX(H-REF(H,1),0),6,1)/SMA(ABS(H-REF(H,1)),6,1)*100, LINETHICK0;
低:SMA(MAX(L-REF(L,1),0),6,1)/SMA(ABS(L-REF(L,1)),6,1)*100, LINETHICK0;
收:SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100, LINETHICK0;
Vars1:=REF(CLOSE,1);
Vars2:=SUM(IF(CLOSE> REF(CLOSE,1),VOL,IF(CLOSE< REF(CLOSE,1),0-VOL,0)),0);
Vars3:= REF(Vars2,1);
Vars4:=SMA(MAX(CLOSE-Vars1,0),7,1)/SMA(ABS(CLOSE-Vars1),7,1)*100;
Vars5:=SMA(MAX(CLOSE-Vars1,0),13,1)/SMA(ABS(CLOSE-Vars1),13,1)*100;
Vars6:=SMA(MAX(Vars2-Vars3,0),26,1)/SMA(ABS(Vars2-Vars3),26,1)*100;
Vars7:=DATE<1081231;
底部: IF(Vars4<15 AND Vars5<20 AND Vars6<50 AND BARSCOUNT(CLOSE)>25,20,0),stick,colorgreen;
DRAWTEXT(filter(底部=-100,5),20,'底'),linethick2,POINTDOT,colorwhite;
