改造一个龙系指标送给大家 注意红绿色的变幻以及趋势的变化 附上源码,各位可自行优化 //板块提示 DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,STKNAME+'\n'+STKLABEL+'\n'+BLKNAME)align4,COLORGREEN; //核心内容 龙胆:COST(LLV(LOW*0.0918,21)),colorgreen; 龙潭:COST(5),COLORBLUE; 龙盘:COST(13),COLORCCCC00; 龙脉:COST(25),COLORmagenta; 龙门:COST(60),COLORYELLOW; 龙行:COST(80),COLOR0066FF; 龙腾:COST(93.5),COLORRED; c1:=sma(ema(AMOUNT,1)/ema(v,1)/100,2,1); c3:=sma(ema(AMOUNT,3)/ema(v,3)/100,2,1); c6:=sma(ema(AMOUNT,6)/ema(v,6)/100,2,1); c7:=sma(ema(AMOUNT,7)/ema(v,7)/100,2,1); STICKLINE(c1>=c6,c1,c6,8,0),COLORRED; STICKLINE(c1>=c6,c7,c3,0,0),COLORRED; STICKLINE(c1<=c6,c1,c6,8,0),COLORGREEN; STICKLINE(c1<=c6,c7,c3,0,0),COLORGREEN; //背离分析 A1:=BARSLAST(ref(cross("macd.diff","macd.dea"),1)); B1:=ref(c,A1+1)>c and ref("macd.diff",A1+1)<"macd.diff" and cross("macd.diff","macd.dea"); DRAWTEXT(FILTER(B1>0,5),l-0.1,'MACD底背'),COLORGREEN; A2:=BARSLAST(ref(cross("kdj.k","kdj.d"),1)); B2:=ref(c,A2+1)>c and ref("kdj.k",A2+1)<"kdj.k" and cross("kdj.k","kdj.d"); DRAWTEXT(FILTER(B2>0,5),l-0.25,'KDJ底背'),COLORYELLOW; A3:=BARSLAST(ref(cross("RSI.RSI1","RSI.RSI2"),1)); B3:=ref(c,A3+1)>c and ref("RSI.RSI1",A3+1)<"RSI.RSI1" and cross("RSI.RSI1","RSI.RSI2"); DRAWTEXT(FILTER(B3>0,5),l-0.4,'RSI底背'),COLORCYAN; C1:=BARSLAST(ref(cross("macd.dea","macd.diff"),1)); D1:=ref(c,C1+1)<c and ref("macd.diff",C1+1)>"macd.diff" and cross("macd.dea","macd.diff"); DRAWTEXT(FILTER(D1>0,5),h+0.1,'MACD顶背'),COLORwhite; C2:=BARSLAST(ref(cross("kdj.d","kdj.k"),1)); D2:=ref(c,C2+1)<c and ref("kdj.k",C2+1)>"kdj.k" and cross("kdj.d","kdj.k"); DRAWTEXT(FILTER(D2>0,5),h+0.25,'KDJ顶背'),COLORwhite; C3:=BARSLAST(ref(cross("RSI.RSI2","RSI.RSI1"),1)); D3:=ref(c,C3+1)<c and ref("RSI.RSI1",C3+1)>"RSI.RSI1" and cross("RSI.RSI2","RSI.RSI1"); DRAWTEXT(FILTER(D3>0,5),h+0.4,'RSI顶背'),COLORMAGENTA; //交易系统 WR:="W&R"(14); ff:=DRAWICON(FILTER(CROSS(WR,-81),10),LOW,4); gg:=DRAWICON(FILTER(CROSS(-19,WR),10),HIGH,5); DRAWTEXT(FILTER(CROSS(wr,-81),21),LOW,'★\n★\nW&R'),ALIGN0; DRAWTEXT(FILTER(CROSS(-19,wr),21),HIGH+0.18,'★\n★\nW&R'),ALIGN0; cd:=CROSS("vkdj.j",龙胆); DRAWTEXT(FILTER(cd,21),LOW,'★\nkdj'),ALIGN0,colorgreen; //交易系统 LC:=REF(CLOSE,1); RSI:=SMA(MAX(CLOSE-LC,0),6,1)/ SMA(ABS(CLOSE-LC),6,1)*100; EN:=CROSS(RSI,20); EX:=CROSS(80,RSI); DRAWTEXT(FILTER(en,21),LOW-0.28,'★\nRSI'),ALIGN0; DRAWTEXT(FILTER(ex,21),HIGH+0.38,'★\nRSI'),ALIGN0; //主图成交量叠加! INPUT:N(5);//量柱高度调节! hh:=SYSPARAM(4);ll:=SYSPARAM(5); x:=ll-(hh-ll+MINDIFF)/n; y:=HHV(VOL,SYSPARAM(3)-SYSPARAM(2)+1); yvb:=y[SYSPARAM(3)]/(ll-x+MINDIFF); z:=VOL/yvb+x; STICKLINE(CLOSE>REF(CLOSE,1),x,z,7,1),Color0000FF; STICKLINE(CLOSE<=REF(CLOSE,1),x,z,7,0),ColorEAE000; MA(z,5); MA(z,10);股票论坛 www.55188.com |
|