这些是操盘王的指标原码,请高手,老师改为大智慧的.谢谢
5137 5
操盘王全部源码
风险栅栏的原码(采用龙帝兄弟的原码) a:="1a0001$close";//D b:=WMA(A,20);//DMIY b1:=MA(b,3); b2:=MA(b,5); b3:=MA(b,21); b4:=MA(b,34);//下面也可简化,懒了 x:=REF(CLOSE,1)<REF(CLOSE,2) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(VOL,1)>REF(MA(VOL,20),1)*1.1; y:=IF(x,MIN(REF(LOW,1),LOW),0); z1:REF(y,BARSLAST(x)),Linethick5,colorffef40; x1:=REF(CLOSE,1)<REF(OPEN,1) and REF(VOL,1)>MAX(REF(MA(VOL,5),1),MAX(REF(MA(VOL,10),1),REF(MA(VOL,20),1))) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1) or REF(CLOSE,1)<REF(OPEN,1) and REF(AMOUNT,1)=REF(HHV(AMOUNT,20),1); y1:=IF(x1,REF(CLOSE,1),0); z2:REF(y1,BARSLAST(x1)),COLORred,Linethick5,colorffff; STICKLINE(CLOSE>0 and (MAX(z1,z2)-MIN(z1,z2))/MIN(z1,z2)*100<3 and MAX(B1,B2)>MIN(B3,B4),z1,z2,5,0),COLORred; ---------------------------------------------------------- 资金曲线原码(就是操盘王的遍地黄金) {n1=5,n2=13,n3=34,n4=250} DRAWGBK(c>0 , COLORRgb(0,0,0), COLORRGB(0,0,0),1); DRAWGBK(CLOSE>0, COLORRGB(1,8888,8888), COLORRGB(1,3333,6666),3); Var1:=SMA("1a0002$AMOUNT"+"399107$AMOUNT",10,1)/1000000; Var2:=REF(Var1,1); Var3:=MA("1a0002$CLOSE"+"399107$CLOSE"*3,5); 收盘:=Var1*("1a0002$CLOSE"+"399107$CLOSE"*3)/Var3*1/10,POINTDOT; 开盘:=Var1*("1a0002$OPEN"+"399107$OPEN"*3)/Var3*1/10,POINTDOT,COLOR009900,LINETHICK0; 最高:=Var1*("1a0002$HIGH"+"399107$HIGH"*3)/Var3*1/10,POINTDOT,COLOR009900,LINETHICK0; 最低:=Var1*("1a0002$LOW"+"399107$LOW"*3)/Var3*1/10,POINTDOT,COLOR009900,LINETHICK0; 昨收盘:=REF(收盘,1),POINTDOT,COLOR009900,LINETHICK0; 涨跌:=(收盘-REF(收盘,1))/REF(收盘,1)*100,POINTDOT,COLOR009900,LINETHICK0; 大盘生命线:=EMA(收盘,N1),; xx2:=EMA(收盘,N2),COLOR00FF00; xx3:=EMA(收盘,N3),COLORblue,linethick2; xx4:=EMA(收盘,N4),COLORred; 温度计:(收盘-xx3)/xx3,linethick3; 1.15,colorred,linethick2; 0.88,coloryellow,linethick2; 0,colorgreen,linethick2; -0.25,colorffef40,linethick2; drawicon(cross(温度计,0),0,8); ---------------------------------------------------------- 双线止损: Var1:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*(-100); EMA(Var1/5+EMA(CLOSE,20),3),LINEDOT , -------------------------------------------------------------------------------- 个股6七彩魔柱 lc:=ref(c,1); a1:=sma(max(c-lc,0),6,1)/sma(abs(c-lc),6,1)*100; a2:=sma(max(c-lc,0),24,1)/sma(abs(c-lc),24,1)*100; stickline(a1>=a2,0.5,0,8,0),colorff; stickline(a1>=70 and a1>=a2 and a1<80,1,0,8,0),colorffff00; stickline(a1>=70 and a1>=a2 and a1<80,0.7,0,8,0),colorff00; stickline(a1>=70 and a1>=a2 and a1<80,0.5,0,8,0),colorffff; stickline(a1>=70 and a1>=a2 and a1<80,0.3,0,8,0),color80; stickline(a1>=70 and a1>=a2 and a1<80,0.1,0,8,0),colorff; stickline(a1>=80 and a1>a2,1.5,0,8,0),colorff00ff; stickline(a1>=80 and a1>a2,1.2,0,8,0),colorff0000; stickline(a1>=80 and a1>a2,1,0,8,0),colorffff00; stickline(a1>=80 and a1>a2,0.8,0,8,0),colorff00; stickline(a1>=80 and a1>a2,0.6,0,8,0),colorffff; stickline(a1>=80 and a1>a2,0.4,0,8,0),color80; stickline(a1>=80 and a1>a2,0.2,0,8,0),colorff; drawicon(a1>=70 and a1>a2 and v<ref(v,1) and c<ref(c,1)*1.03,0.8,1); stickline(a1<a2,-0.5,0,8,0),colorffffff; ---------------------------------------------------------- 操盘王的真假作空就是机构K线,而这个指标的设计思路就是指南针的CI指标.对高控盘票可以使用,对波段庄股不要使用. c1:=10000*close/indexc; h1:=10000*high/indexh; l1:=10000*low/indexl; o1:=10000*open/indexo; STICKLINE(c1>=o1,c1,o1,6,0.2),COLORRED; STICKLINE(c1>=o1,l1,h1,0.2,0.2),COLORRED; STICKLINE(c1<o1,c1,o1,6,0.2),colorcyan; STICKLINE(c1<o1,l1,h1,0.2,0.2),colorcyan; MA1:MA(C1,5); MA2:MA(C1,10); MA3:MA(C1,20); MA4:MA(C1,30); ---------------------------------------------------------- 谁在作多: VAR2:=SUM(IF(CLOSE>OPEN,VOL,0),34)/SUM(VOL,34)*100; VAR3:=100-SUM(IF(CLOSE>OPEN,VOL,0),34)/SUM(VOL,34)*100; 散户跟风意愿: VAR3,LINETHICK4; 主力作盘意愿: VAR2,LINETHICK4; 标准: 60,LINETHICK2; -------------------------------------------------------------------------------- 黄金通道: 上:HHV(H,20); 下:LLV(L,20),colorgreen; GD1:=REF(H,HHVBARS(H,20))+REF(L,LLVBARS(L,20)); GD2:=REF(H,HHVBARS(H,20))-REF(L,LLVBARS(L,20)); 中:GD1/2,COLORRED,LINETHICK1; 黄:REF(L,LLVBARS(L,20))+GD2*0.382,COLOR00FFFF,; 金:REF(L,LLVBARS(L,20))+GD2*0.618,COLORffef40,; -------------------------------------------------------------------------------- 初级要塞的原码: 专用标:c,linethick0; a:=ma(c,14) a1:=a*1.1; a4:=a*0.9; a2:=a1-(a1-a4)*0.191; a3:=a1-(a1-a4)*0.618; a5:=a1-(a1-a4)*0.809; 初级要塞1:if(h*1.01>a2 or ref(h,1)>ref(a2,1),a1,a4),circledot,Linethick6,colorff; 初级要塞2:if(h*1.01>a2 or ref(h,1)>ref(a2,1),a2,a4),circledot,Linethick6,colorffffff; 初级要塞3:if(c>a3 and c<a2 or ref(c,1)>ref(a3,1) and ref(c,1)<ref(a2,1),a3,a4),crossdot,Linethick3,colorffff; 初级要塞4:if(c<a3 or ref(c,1)<ref(a3,1),a4,a4),Linethick8,colorff00; -------------------------------------------------------------------------------- 个股2高级要塞 a1:"XT4.B1##month",colorffffff; a2:"XT4.B2##month",colorffffff; b1:"XT4.B3##month",colorffff00; b2:"XT4.B4##month",colorffff00; b3:="XT4.B5##month"; b:if(b3>max(a1,max(a2,max(b1,b2))),b3,b2),colorff; fillrgn(a1>a2,a1,a2),colorff00ff; fillrgn(a1<a2,a1,a2),colorffffff; fillrgn(b1>b2,b1,b2),colorffff; fillrgn(b1<b2,b1,b2),colorffff00; fillrgn(b3>max(a1,max(a2,max(b1,b2))),b3,max(a1,max(a2,max(b1,b2)))),color808080; stickline(c>=ref(c,1),c,o,8,0),colorff; stickline(c>=ref(c,1),c,h,0,0),colorff; stickline(c>=ref(c,1),c,l,0,0),colorff; stickline(c<ref(c,1),c,o,8,0),colorff00; stickline(c<ref(c,1),c,l,0,0),colorff00; stickline(c<ref(c,1),c,h,0,0),colorff00; ---------------------------------------------------------- 操盘王的个股5三线玄机 rsv:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))*100; k:=sma(rsv,3,1); d:=sma(k,3,1); j:=3*k-2*d; a:=((100-2*ref(k,1)+2*k+4*ref(d,1)/3)/3*(hhv(h,9)-llv(l,9))+100*llv(l,9))/100; b:=((-(2*ref(k,1))+2*k+4*ref(d,1)/3)/3*(hhv(h,9)-llv(l,9))+100*llv(l,9))/100; a1:=if(cross(d,k),l,0); a2:=if(cross("551885.R1","551885.R3") and count(cross(50,d),barslast(cross(d,k)))=1 and c<hhv(c,11) and count(cross("551885.R1","551885.R3"),barslast(cross(55,d)))=1 or cross("551885.R2","551885.R1") and count(cross(55,d),barslast(cross(d,k)))=1 and c<hhv(c,10) and count(cross("551885.R2","551885.R1"),barslast(cross(55,d)))=1 or cross(50,d) and ref(c,1)>a and ref(c,1)>ref(o,1),1,0); b1:ref(a,barslast(a2)),Linethick5,colorff; b2:if("DR4.B3"<"DR4.B4",ref(b,barslast(a1)),ref(a,barslast(a1))),Linethick5,colorffff; fillrgn(b1>=b2 and (b1-b2)/b2*100<2,b1,b2),colorffffff; fillrgn(b1<b2 and abs(b1-b2)/b2*100<2,b1,b2),colorffffff; stickline(b1<b2 and c>b1 and b1<b2*0.962,b2,b2*0.962,0,0),colorff00; b3:if(b1<b2 and c>b1 and b1<b2*0.962,b2*0.962,ref(a,barslast(a2))),Linethick5,colorff00ff; ---------------------------------------------------------- 551885 a:ma(c,14); lc:=ref(c,1); r1:sma(max(c-lc,0),2,1)/sma(abs(c-lc),2,1)*100; r3:sma(max(c-lc,0),34,1)/sma(abs(c-lc),34,1)*100; r2:2; fillrgn(c>0,999999995904,0),color10000; ---------------------------------------------------------- 谁在作多: VAR2:=SUM(IF(CLOSE>OPEN,VOL,0),34)/SUM(VOL,34)*100; VAR3:=100-SUM(IF(CLOSE>OPEN,VOL,0),34)/SUM(VOL,34)*100; 散户跟风意愿: VAR3,LINETHICK4; 主力作盘意愿: VAR2,LINETHICK4; 标准: 60,LINETHICK2; ---------------------------------------------------------- 黄金通道: 上:HHV(H,20); 下:LLV(L,20),colorgreen; GD1:=REF(H,HHVBARS(H,20))+REF(L,LLVBARS(L,20)); GD2:=REF(H,HHVBARS(H,20))-REF(L,LLVBARS(L,20)); 中:GD1/2,COLORRED,LINETHICK1; 黄:REF(L,LLVBARS(L,20))+GD2*0.382,COLOR00FFFF,; 金:REF(L,LLVBARS(L,20))+GD2*0.618,COLORffef40,; ---------------------------------------------------------- {优化操盘王的遍地黄金} {n1=5,n2=13,n3=34,n4=250} n1:=5; n2:=13; n3:=34; n4:=250; DRAWGBK(c>0 , COLORRgb(0,0,0), COLORRGB(0,0,0),1); DRAWGBK(CLOSE>0, COLORRGB(1,8888,8888), COLORRGB(1,3333,6666),3); Var1:=SMA("1a0002$AMOUNT"+"399107$AMOUNT",10,1)/1000000; Var2:=REF(Var1,1); Var3:=MA("1a0002$CLOSE"+"399107$CLOSE"*3,5); 收盘:=Var1*("1a0002$CLOSE"+"399107$CLOSE"*3)/Var3*1/10,POINTDOT; 开盘:=Var1*("1a0002$OPEN"+"399107$OPEN"*3)/Var3*1/10,POINTDOT,COLOR009900,LINETHICK0; 最高:=Var1*("1a0002$HIGH"+"399107$HIGH"*3)/Var3*1/10,POINTDOT,COLOR009900,LINETHICK0; 最低:=Var1*("1a0002$LOW"+"399107$LOW"*3)/Var3*1/10,POINTDOT,COLOR009900,LINETHICK0; 昨收盘:=REF(收盘,1),POINTDOT,COLOR009900,LINETHICK0; 涨跌:=(收盘-REF(收盘,1))/REF(收盘,1)*100,POINTDOT,COLOR009900,LINETHICK0; 大盘生命线:=EMA(收盘,N1),; xx2:=EMA(收盘,N2),COLOR00FF00; xx3:=EMA(收盘,N3),COLORblue,linethick2; xx4:=EMA(收盘,N4),COLORred; 生命禁区:1.15,colorred,linethick2; 0.88,coloryellow,linethick2; 股价泥潭:0,colorgreen,linethick2; -0.25,colorffef40,linethick2; FILLRGN(n1>0,生命禁区,0.88),COLORRED; FILLRGN(n1>0,股价泥潭,-0.25),COLORBLUE; 大盘温度计:(收盘-xx3)/xx3,colorwhite,linethick4; drawicon(cross(大盘温度计,0),0,8); |
游客,您是(游客)级别,无法查看回复内容,请登录论坛并到新手区学习升级之后才能查看。升级指南请看... |
游客,您是(游客)级别,无法查看回复内容,请登录论坛并到新手区学习升级之后才能查看。升级指南请看... |
游客,您是(游客)级别,无法查看回复内容,请登录论坛并到新手区学习升级之后才能查看。升级指南请看... |
游客,您是(游客)级别,无法查看回复内容,请登录论坛并到新手区学习升级之后才能查看。升级指南请看... |
游客,您是(游客)级别,无法查看回复内容,请登录论坛并到新手区学习升级之后才能查看。升级指南请看... |
楼主 |
2楼 |
3楼 |
4楼 |
5楼 |
6楼 |