五線譜全部公式、源碼，和盤托出，牛熊通吃

相關(guān)標簽:

 

很榮幸有的同學喜歡偶的五線譜。在一個論壇上竟然有人要請人破解偶的指標，呵呵~榮幸之至！何需破解？這就免費發(fā)出來！！！是和盤托出哦。。。。。。在此還要感謝論壇上的一些前輩，本指標借用了好多他們的精華。。。。。。
不過，孟子曰：盡信書則不如無書。指標也是如此。。。。。。希望得到的同學三思而用之。。。。。。說實在話，偶用這個指標也沒賺到錢。。。。。。哈哈
{以下設(shè)置主圖主線}
RSV2:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
W1:=SMA(RSV2,3,1);
W2:=SMA(w1,3,1);
W3:=3*W1-2*w2;
W4:=LLV(w3,2)=LLV(w3,8);
W5:=IF(CROSS(w3,REF(w3+0.01,1)) AND w4 AND w3<20,30,0);
DRAWTEXT(CROSS(w3,REF(w3+0.01,1)) AND w4 AND w3<20,LOW-0.05,'龍'),ALIGN1,VALIGN0,COLORred;
{以下內(nèi)容設(shè)置五線譜}
{B:(ma(close,5)+ma(close,3))/2,colorwhite; }
A:=(ma(close,13)+ma(close,8))/2;
牛熊線:EMA(C,64),colorwhite,pointdot;
上軌:牛熊線*1.2,colorwhite,pointdot;
上軌2:牛熊線*1.41,colorwhite,pointdot;
下軌:牛熊線*0.8,colorwhite,pointdot;
下軌1:牛熊線*0.64,colorwhite,pointdot;
{以下設(shè)置操作線}
操作線:EMA((SLOPE(CLOSE,21)*20+CLOSE),42),colorwhite;
對照線:=ma(操作線,2);
partline(操作線,對照線<=操作線),colorred,linethick1;
支撐:= SMA(AMOUNT/VOL/100,5,1)*0.85;
壓力:= SMA(AMOUNT/VOL/100,5,1)*1.1;
超賣線:= SMA(AMOUNT/VOL/100,5,1)*0.79;
{以下定義開盤跌停}
DT:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;
跌停:=COUNT(DT<-9.98,1)=1;
大幅跌:=count(dt<-6.4,1)=1;
{以下定義超跌與搶反彈}
嚴重超跌:=cross(low,超賣線);
drawtext(嚴重超跌,low,'嚴重超跌');
超跌1:=low/超賣線<=1.048 and not(COUNT(DT<-9.98,1)=1)and not (count(dt<-7,1)=1);
drawtext(超跌1 ,low,'←超跌');
超跌3:=(cross(l,支撐) or low/超賣線<=1.03)and (low/下軌<=1.02 or low/下軌1<=1.02) and not(COUNT(DT<-9.98,1)=1)and not (count(dt<-6,1)=1);
drawtext(超跌3 ,low*0.98,'←搶反彈'),colorwhite;
超級短線:=(cross(l,支撐) or cross(low,超賣線) or low/支撐<=0.98 or low/超賣線<=0.98 ) and low/open>=0.95 and (count(dt<-8,1)=1) and not(COUNT(DT<-9.98,2)=2);
drawtext(超級短線,low,'←龍抓手');
{財神:=(操作線/low>=1.40);
drawtext(財神,low,'財'),colorgreen;
drawtext(財神,low*0.95,'神'),colorgreen;
drawtext(財神,low*0.9,'到'),colorgreen;}{以下定義主升}
drawtext((cross(a,操作線) and A>操作線),low,'【大蓄】'),colorwhite,ALIGN1,VALIGN0;
{以下設(shè)置老鼠倉};
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
老鼠倉:BB1 AND CC1 AND DD1 AND EE1,LINETHICK0,COLOR0099ff;
DRAWTEXT(老鼠倉,low,'☆'),ALIGN1,VALIGN0,COLOR0099ff;
{以下定義頂?shù)?/a>背離}
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.99),'底背離'),COLORA6E500;
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'頂背離'),COLOR1880FF;
{以下定義堅決買進}
var77:=ema(amount/vol/100,3);
var88:=ema(var77,88);
var99:=ema(var77,88)*0.85;
varah:=var99*0.87;
varbh:=low<varah and close>ref(close,1)*1.02;
drawtext(filter(varbh,6),l-0.08,'←買'),colorff00ff;
{以下設(shè)置強勢狙擊}
BB05:=atan(((MA(C,5))/ref((MA(C,5)),1)-1)*100)*180/3.1416;
BB10:=atan(((MA(C,10))/ref((MA(C,10)),1)-1)*100)*180/3.1416;
BB30:=atan(((MA(C,30))/ref((MA(C,30)),1)-1)*100)*180/3.1416;
強勢狙擊:=filter(BB30>30 and BB10>45 and cross(BB05,60),10);
drawtext(強勢狙擊,LOW*0.98,'←強勢'),colorwhite;{以下定義資金進場}
VAR3e:=100-(100-3*SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1),15,1));
VAR4e:=100-(100-3*SMA((OPEN-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,20,1),15,1));
VAR5e:=VAR3e>REF(VAR4e,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR5e AND COUNT(VAR5e,30)=1,low,'資金進場'),COLORYELLOW;
{以下設(shè)置K線顏色}
stickline((open >= close),close,open,9,7),colorff5b00;
stickline((open >= close),close,open,8,0),colorff6c00;
stickline((open >= close),close,open,7,0),colorff7b00;
stickline((open >= close),close,open,6,0),colorff9c00;
stickline((open >= close),close,open,5,0),colorffbe00;
stickline((open >= close),close,open,3.5,0),colorffcc00;
stickline((open >= close),close,open,1.5,0),colorffff00;
stickline((close >= open),close,open,9,0),color070084;
stickline((close >= open),close,open,8,0),color0000a3;
stickline((close >= open),close,open,7,0),color0000b7;
stickline((close >= open),close,open,6,0),color0000cd;
stickline((close >= open),close,open,5,0),color0000e9;
stickline((close >= open),close,open,3,0),color0754e9;
stickline((close >= open),close,open,1.5,0),color076ef3;
stickline((close >= open),close,open,1,0),color077bf3;
stickline((close > open),open,low,1,0),color0726ca;
stickline((close > open),close,high,1,0),color0726ca;
stickline((open > close),close,low,1,0),colorde9100;
stickline((open > close),open,high,1,0),colorde9100;
stickline(((((close / open) > 1.04) and (close < (sma(high,21,2) * 1.05))) and ((close - ref(close,1)) > 0)),close,open,9,0),color0090ff;
stickline(((((close / open) > 1.04) and (close < (sma(high,21,2) * 1.05))) and ((close - ref(close,1)) > 0)),close,open,8,0),color009fff;
stickline(((((close / open) > 1.04) and (close < (sma(high,21,2) * 1.05))) and ((close - ref(close,1)) > 0)),close,open,4,0),color00b5ff;
stickline(((((close / open) > 1.04) and (close < (sma(high,21,2) * 1.05))) and ((close - ref(close,1)) > 0)),close,open,2,0),color00e4ff;
stickline(((((close / open) > 1.04) and (close < (sma(high,21,2) * 1.05))) and ((close - ref(close,1)) > 0)),open,low,0.7,0),color00ffff;
stickline(((((close / open) > 1.04) and (close < (sma(high,21,2) * 1.05))) and ((close - ref(close,1)) > 0)),close,high,0.7,0),color00ffff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > (sma(high,21,2) * 1.05))) and (close < (sma(high,21,2) * 1.05))),open,low,0.7,0),colorff76ff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > (sma(high,21,2) * 1.05))) and (close < (sma(high,21,2) * 1.05))),close,high,0.7,0),colorff76ff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > (sma(high,21,2) * 1.05))) and (close < (sma(high,21,2) * 1.05))),close,open,9,0),colorff00ff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > (sma(high,21,2) * 1.05))) and (close < (sma(high,21,2) * 1.05))),close,open,6,0),colorff62ff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > (sma(high,21,2) * 1.05))) and (close < (sma(high,21,2) * 1.05))),close,open,4,0),colorff76ff;
stickline(((((close < ref(close,1)) and (close < ref(close,1))) and (high > (sma(high,21,2) * 1.05))) and (close < (sma(high,21,2) * 1.05))),close,open,2,0),colorffa8ff;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.tumamayizhan.com',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');