★▼取自夏卫东老师的【变色龙】,具体危害不明,好像最近有人说他的源码里面未来什么的,个人感觉参考其他指标问题不大!
不错,在引入【变色龙】公式时,会提示“引用了未来数据”,这个“未来函数”来自“ZIG"。
那么,这个“ZIG”是什么意思呢?看看说明(附图),ZIG公式是以“收盘价”和“开盘价”为参数,找出某一时间段的最高价和最低价,这些数据都是公开的,而且也是已经过去的实际数据,不含任何欺骗性。
引用这个公式的目的在于:从已经过去的数据中寻找规律,预测未来的走势,究竟这种预测是否准确?我们虽然不知未来会如何,但我们可以看看过去,在已经过去的K线图上,明显的提示出“买”点和“卖”点,在【变色龙】上清清楚楚地显示出来,至于买卖点提示的准确性大家有目共睹,没有丝毫隐瞒,你可以不相信未来,但你必须相信过去,那是历史记载。
【变色龙】上的买卖提示,我找了许多公式,大智慧官方以 BS为卖点,我也进行了比较,大家也可以去比较
【杂交1号】夏卫东老师“变色龙”ZIG部分+坛内指标
【杂交1号】是我采用2位老师的原代码杂交、再组合,一切功劳来自理想、来自老师们,首次正式发帖,再次感谢理想。
: ①夏卫东老师“变色龙”中的“买、卖”一部分代码,含有未来ZIG部分,危害请咨询夏老师(呵呵)+②坛内指标(这个是主要部分 且无未来;忘记哪位老师了,恕罪!),详细见图:
(智慧产权归老师所有!) 如有损害老师权益,我立即删除!再次感谢理想论坛和老师们的无私贡献,一个月的时间感觉长进不少!
【源码】:
- {杂交1号}
- Var3:=LLV(H,240);
- Var4:=100*(C-Var3)/Var3;
- Var5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
- Var6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
- {Var7:=0;}
- Var8:=MA(HHV(C-ref(C,1),0),34)/MA(ABS(C-ref(C,1)),7)*100;
- Var9:=MA(HHV(C-ref(C,1),0),13)/MA(ABS(C-ref(C,1)),13)*100;
- VarA:=BARSCOUNT(C);
- VarB:=Var8<20 AND Var9<23 AND VarA>35;
- VarC:=VarB AND COUNT(VarB,1)=1;
- VarD:=EMA(C,21)-EMA(C,8);
- VarE:=EMA(VarD,5);
- VarF:=TROUGH(3,6,1)<4 AND CROSS(VarD,VarE);
- Var10:=IF(TROUGH(3,16,1)=0 AND H>L+0.04,4,0);
- Var11:=ZIG(3,6)>ref(ZIG(3,6),1) AND ref(ZIG(3,6),1)<=ref(ZIG(3,6),2) AND ref(ZIG(3,6),2)<=ref(ZIG(3,6),3);
- Var12:=ZIG(3,6)<ref(ZIG(3,6),1)AND ref(ZIG(3,6),1)>=ref(ZIG(3,6),2) AND ref(ZIG(3,6),2)>=ref(ZIG(3,6),3);
- Var13:=ZIG(3,22)>ref(ZIG(3,22),1)AND ref(ZIG(3,22),1)<=ref(ZIG(3,22),2)AND ref(ZIG(3,22),2)<=ref(ZIG(3,22),3);
- Var14:=ZIG(3,22)<ref(ZIG(3,22),1)AND ref(ZIG(3,22),1)>=ref(ZIG(3,22),2)AND ref(ZIG(3,22),2)>=ref(ZIG(3,22),3);
- Var15:=ZIG(3,51)>ref(ZIG(3,51),1)AND ref(ZIG(3,51),1)<=ref(ZIG(3,51),2) AND ref(ZIG(3,51),2)<=ref(ZIG(3,51),3);
- Var16:=ZIG(3,51)<ref(ZIG(3,51),1)AND ref(ZIG(3,51),1)>=ref(ZIG(3,51),2)AND ref(ZIG(3,51),2)>=ref(ZIG(3,51),3);
- CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
- WARNING('http://www.cxh99.com',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
- DRAWTEXTREL(10 ,10 ,'');
- Var17:=ZIG(3,72)>ref(ZIG(3,72),1) AND ref(ZIG(3,72),1)<=ref(ZIG(3,72),2)AND ref(ZIG(3,72),2)<=ref(ZIG(3,72),3);
- Var18:=ZIG(3,72)<ref(ZIG(3,72),1) AND ref(ZIG(3,72),1)>=ref(ZIG(3,72),2)AND ref(ZIG(3,72),2)>=ref(ZIG(3,72),3);
- 买点1:=Var10;
- 买点2:=(Var11+Var13+Var15+Var17);
- 卖点1:=(Var12+Var14+Var16+Var18);
- DRAWTEXT(买点1>0,L-0.15,'B'),LINETHICK4,ALIGN1,colorred;{B}
- DRAWTEXT(买点2>0,L-0.25,{'B'}'★'),LINETHICK4,ALIGN1,COLORyelLOW;{B}
- DRAWTEXT(卖点1>0,H+0.95,{'S'}'▼'),LINETHICK4,ALIGN1,COLORgreen;{S}
- JJ:=(CLOSE+HIGH+LOW)/3;
- A:=EMA(JJ,10);
- B:=ref(A,1);
- STICKLINE(A>B,A,B,5,0),COLORYELLOW;
- STICKLINE(A<B,A,B,5,0),COLORBLUE;
- M1:EMA(CLOSE,3);
- M2:EMA(CLOSE,8);
- M3:EMA(M2,13);
- M4:EMA(M2,55);
- VAR1:=EMA(M3,55);
- M5:EMA(M4,81), COLORRED,LINETHICK2;
- VAR2:=(ref(HIGH,1)+ref(LOW,1))/2;
- VAR23:=MA(CLOSE,21)+2*STD(CLOSE,21);
- DRAWICON(CROSS(VAR2,VAR23),HIGH*1.035,2);
- DRAWTEXT(CROSS(VAR2,VAR23),HIGH*1.02,'卖出'), COLORGREEN;
- VAR24:=ref(CLOSE,1);
- VAR25:=SMA(MAX(CLOSE-VAR24,0),7,1)/SMA(ABS(CLOSE-VAR24),7,1)*100;
- VAR26:=CROSS(79,VAR25);
- VAR27:=FILTER(VAR26,4);
- DRAWICON(VAR27,HIGH*1.035,2);
- DRAWTEXT(VAR27,HIGH*1.02,'卖出'), COLORGREEN;
- A7:=(2*C+H+L)/4;
- VAR30:=LLV(LOW,34);
- VAR31:=HHV(HIGH,34);
- SK:=EMA((A7-VAR1)/(VAR2-VAR1)*100,7);
- SD:=EMA(0.667*ref(SK,1)+0.333*SK,5);
- DRAWTEXT(IF(COUNT(CLOSE<ref(CLOSE,1),8)/8>6/10 AND VOL>=1.5*MA(VOL,5) AND
- COUNT(SK>=SD,3) AND ref(LOW,1)=LLV(LOW,120),1,0),LOW,'●买进') ,COLORRED;
- DRAWTEXT(IF(COUNT(CLOSE<ref(CLOSE,1),13)/13>6/10 AND
- COUNT(SK>SD,6) AND ref(LOW,5)=LLV(LOW,120) AND ref(CLOSE>=OPEN,4) AND
- ref(CLOSE>OPEN,3) AND ref(CLOSE>OPEN,2) AND ref(OPEN>CLOSE,1) AND
- OPEN>ref(CLOSE,1),1,0),LOW,'●买进'), COLORRED;
- D:=MA(CLOSE,80)-MA(CLOSE,10)/3;
- DRAWTEXT(IF(CLOSE<D AND VOL/240>MA(VOL,5)/240 AND CLOSE>ref(CLOSE,1)*1.08
- AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW,'●抄底'),COLORRED;
- DRAWTEXTABS(2,5,'所属板块:'+BKNAME),COLORFF50FF,LINETHICK1;
- 流通盘大小:=FINANCE2(37)/1000000*100;
- DRAWTEXTABS(2,20,'流通盘大小:'+NUMTOSTRN(流通盘大小,2)+'亿'+' 好好'),LINETHICK1,COLORRED;
- 每股收益:=FINANCE2(3);
- 每股市盈率:=DYNAINFO(39);
- 每股净资产:=FINANCE2(4);
- 销售毛利率:=FINANCE2(12);
- 主营收入同比:=FINANCE2(11);
- 净利润同比增长:=FINANCE2(10);
- DRAWTEXTABS(160,35,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),COLOR00FF00;
- DRAWTEXTABS(160,50,'每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),COLORRED;
- DRAWTEXTABS(160,65,'每股净资产:'+NUMTOSTRN(每股净资产,2)+'元'),COLORRED;
- DRAWTEXTABS(2,35,'销售毛利率:'+NUMTOSTRN(销售毛利率,2)+'%'),LINETHICK1,COLOR00FF00;
- DRAWTEXTABS(2,50,'主营收入同比增长:'+NUMTOSTRN(主营收入同比,2)+'%'),LINETHICK1,ColorYELLOW;
- DRAWTEXTABS(2,65,'净利润同比增长:'+NUMTOSTRN(净利润同比增长,2)+'%'),LINETHICK1,COLOR00FF00;
- DRAWTEXTABS(3,80,'历史最高价:'+HHV(HIGH,0)),Colorred;
- DRAWTEXTABS(3,95,'历史最低价:'+LLV(LOW,0)),ColorAFFF00;
- 今日换手率:=SUM(100*v/CAPITAL,1);
- DRAWTEXTABS(2,118,'今日换手:'+NUMTOSTRN(今日换手率,2)+'%'),ColoryelLOW,LINETHICK1;
- 五日换手率:=SUM(100*v/CAPITAL,5);
- DRAWTEXTABS(110,118,'5日: '+NUMTOSTRN(五日换手率,2)+'%'),Colorred,LINETHICK1;
- 十日换手率:=SUM(VOL,10)*100/CAPITAL;
- DRAWTEXTABS(200,118,'10日: '+NUMTOSTRN(十日换手率,2)+'%'),ColoryelLOW,LINETHICK1;
复制代码
|