指南針指標(biāo)公式源碼

NS 2013-01-31

展開全文

dy_多空博弈
ssl:=ema(c,3);
ssl,colorgreen;
mm:ema((slope(c,22)*20+c),55),colorwhite;
stickline(ssl>mm,ssl,mm,1,0),colormagenta;
stickline(ssl<=mm,ssl,mm,1,0),colorgreen;
stickline(c>=o,c,o,8,0),colorred;
stickline(c>=o,h,l,0,0),colorred;
stickline(c<=o,c,o,8,0),colorgreen;
stickline(c<=o,h,l,0,0),colorgreen;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
dy_輔成交量
mid:=(high+low+close)/3;
cr26:=sum(max(0,high-ref(mid,1)),26)/sum(max(0,ref(mid,1)-l),26)*100;
chiu:=sma(cr26,25,1);
chiu1:=ema(cr26,5);
chiu2:=ema(cr26,10);
chiu1,colorred;
chiu,coloryellow;
chiu2,colorwhite;
stickline(chiu1>0,chiu1,0,5,0),colorred;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
dy_輔助判市
b53:=(ma(close,9)-ref(ma(close,9),1))/ref(ma(close,9),1)*100;
jx:=atan(b53)/3.1416*180;
dysmk1:=sma(jx,10,1);
dysmd1:=sma(dysmk1,5,1);
dysmd:dysmd1,colorgreen;
dysmk:dysmk1,coloryellow;
stickline(dysmk>dysmd,dysmk,dysmd,2,0),colorred;
stickline(dysmk<=dysmd,dysmk,dysmd,2,0),colorgreen;
20;
-20;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
dy_神密波段
kav:=(2*close+high+low)/4;
ak:=ema((kav-llv(low,34))/(hhv(high,34)-llv(low,34))*100,34);
dd:=ema(0.667*ref(ak,1)+0.333*ak,5);
mk:=ema((kav-llv(low,34))/(hhv(high,34)-llv(low,34))*100,5);
nk:=ema(mk,5);
nk,colorgreen;
dd,colorwhite;
ak,coloryellow;
stickline(mk>nk,mk,nk,5,0),colorred;
stickline(mk<=nk,mk,nk,5,0),colorgreen;
13;
35;
79;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
z出手就贏
dy11:=(2*close+high+low)/4;
dy22:=llv(low,34);
dy33:=hhv(high,34);
a11:=ema((dy11-dy22)/(dy33-dy22)*100,9);
b11:=ema((0.667*ref(a11,1)+0.333*a11),2);
dya:=ema((dy11-dy22)/(dy33-dy22)*100,30);
dyb:=ema(dya,5);
stickline(dyb>=a11,dyb,a11,6,0),coloryellow;
stickline(dyb>=a11,b11,dya,0,0),coloryellow;
stickline(dyb<=a11,dyb,a11,6,0),colorred;
stickline(dyb<=a11,b11,dya,0,0),colorred;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
z飛越巔峰
生命線:0,colorwhite;
散戶:=sma((((hhv(h,9)-c)/(hhv(h,9)-llv(l,9))*200)-125),9,1);
a:=((c-llv(l,9))/(hhv(h,9)-llv(l,9))*200)-105;
b:=sma(a,3,1);
主力:sma(b,3,1),coloryellow;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
z海底捕金
var1:=amount/vol/100;
var2:=(3*high+low+open+2*close)/7;
var3:=sum(amount,5)/var1/100;
dcyc:=dma(var2,(-1)*vol/var3);
上天攬月[s:5]close-dcyc)/dcyc*100,coloryellow;
下海捉鱉[s:5]1-winner(c))*100,color339933;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
z金山銀山（主圖疊加）
diff:=ema(close,12)-ema(close,26);
dea:=ema(diff,9);
ma(c,8),colorwhite;
ma(c,21),coloryellow;
多頭:stickline(diff>dea,c,o,8,0),colorred;
stickline(diff>dea,h,l,0,0),colorred;
空頭:stickline(diff<=dea,c,o,8,0),colorcyan;
stickline(diff<=dea,h,l,0,0),colorcyan;
drawtext(cross(diff,dea),l-0.2,'買入'),colorwhite;
drawtext(cross(dea,diff),h+0.2,'賣出'),colorgreen;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
z戰(zhàn)無不勝
危機線:85,colorred;
中間線:50,colorwhite;
安全線:15,colorgreen;
v1:=(2*close+high+low)/4;
v2:=llv(low,34);
va:=hhv(high,34);
防線b:=ema((v1-v2)/(va-v2)*100,13);
防線bb:=ema((0.667*ref(防線b,1)+0.333*防線b),2);
戰(zhàn)術(shù)線:防線b,coloryellow,pointdot;
戰(zhàn)略線:ema(0.382*ref(防線b,2)+0.618*防線b,12),coloryellow;
stickline(防線b>防線bb,防線b,防線bb,6,0),colorred;
stickline(防線b<=防線bb,防線b,防線bb,6,0),colorcyan;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
z走向輝煌
var1:=amount/vol/100;
var2:=(3*high+low+open+2*close)/7;
var3:=sum(amount,3)/var1/100;
var4:=sum(amount,10)/var1/100;
cyc3:=dma(var2,vol/var3);
cyc10:=dma(var2,vol/var4);
cyc10,coloryellow;
stickline(cyc3>cyc10,cyc3,cyc10,6,0),colorred;
stickline(cyc3<=cyc10,cyc3,cyc10,6,0),colorgreen;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
F全盤穿越
套牢盤:100*(1-WINNER(C)),colorgreen;
vr1:=BARSLAST(cross(90,套牢盤));
穿越天數(shù):vr1,,LINETHICK0;
drawicon(cross(10,套牢盤),6,12),;
a1:=sum(VOL,13)/CAPITAL;
cyf:100-(100/(1+a1)),colorred,linethick2;
a2:=AMOUNT/(100*vol);
中線成本均線:=ma(a2,13);
cys:100*(c-中線成本均線)/中線成本均線+50,coloryellow,;
stickline(cys>50,50,cys,4,0),coloryellow,;
stickline(cys<50,50,cys,4,0),colorf0f000,;
10,colorccff66;
20,colorwhite;
90,colorccff66;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
0amv原碼
Var1:=移動平均(成交額,10,1)/1000000;
Var2:=向前引用(Var1,1);
Var3:=簡單移動平均(向前引用(收盤價,1),5);
收盤:Var1*收盤價/Var3*1/10,COLOR009900,LINETHICK0,點狀線;
開盤:Var1*開盤價/Var3*1/10,點狀線,COLOR009900,LINETHICK0;
最高:Var1*最高價/Var3*1/10,點狀線,COLOR009900,LINETHICK0;
最低:Var1*最低價/Var3*1/10,點狀線,COLOR009900,LINETHICK0;
生命線:指數(shù)平滑移動平均(收盤,12),COLORCYAN;
昨收盤:=向前引用(收盤,1),點狀線,COLOR009900,LINETHICK0;
漲跌:=(收盤-向前引用(收盤,1))/向前引用(收盤,1)*100,點狀線,COLOR009900,LINETHICK0;
畫柱線(收盤>開盤,收盤,開盤,5,0),COLORRED;
畫柱線(收盤>開盤,最高,最大值(收盤,開盤),0,1),COLORRED;
畫柱線(收盤>開盤,最小值(收盤,開盤),最低,0,1),COLORRED;
畫柱線(收盤<開盤,收盤,開盤,5,0),COLORGREEN;
畫柱線(收盤<開盤,最高,最大值(收盤,開盤),0,1),COLORGREEN;
畫柱線(收盤<開盤,最小值(收盤,開盤),最低,0,1),COLORGREEN;