当前位置：首页 > 分析家公式 > 内容

全套混沌操作法源码

作者：公式在线   更新时间：2009-10-12   点击：
C/C++ Code复制内容到剪贴板
  1. Var1:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);   
  2. Var2:=CROSS(Var1,0.9);   
  3. Var3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);   
  4. Var4:=CROSS(Var3,0.9);   
  5. STICKLINE(Var2,HIGH,HIGH*1.01,5,0),Color00E40E;   
  6. STICKLINE(Var4,LOW,LOW*0.99,5,0),Color00E40E;   
  7. Var5:=IF(Var2,HIGH,IF(Var4,LOW,0));   
  8. POLYLINE(Var5,Var5),Colorff00ff;   
  9. Var6:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);   
  10. Var7:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);   
  11. Var8:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)   
  12. AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);   
  13. Var9:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);   
  14. VarA:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);   
  15. VarB:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)   
  16. AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);   
  17. 坚定: STICKLINE(CROSS(Var6,0.9),HIGH,HIGH*1.01,5,0),Color0000FF;   
  18. STICKLINE(CROSS(Var9,0.9),LOW,LOW*0.99,5,0),Color0000FF;   
  19. 犹豫: STICKLINE(CROSS(Var7,0.9),HIGH,HIGH*1.01,5,0),Color00E5E9;   
  20. STICKLINE(CROSS(VarA,0.9),LOW,LOW*0.99,5,0),Color00E5E9;   
  21. 等待: STICKLINE(CROSS(Var8,0.9),HIGH,HIGH*1.01,5,0),ColorFF4100;   
  22. STICKLINE(CROSS(VarB,0.9),LOW,LOW*0.99,5,0),ColorFF4100;   
  23. 压力: REF(HIGH,BARSLAST(Var2)), POINTDOT,ColorEA91B5;   
  24. STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2)),REF(HIGH,BARSLAST(Var2)),5,0),ColorEA91B5;   
  25. 支撑: REF(LOW,BARSLAST(Var4)), POINTDOT,Color3791B5;   
  26. STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4)),REF(LOW,BARSLAST(Var4)),5,0),Color3791B5;   
  27.   
  28. 现价:CLOSE,POINTDOT,Color000F89;  








MFI：


 

C/C++ Code复制内容到剪贴板
  1.   
  2. 参数名：N     14    2    300   
  3.   
  4.   
  5. TYP := (HIGH + LOW + CLOSE)/3;   
  6. SUM(IF(TYP>REF(TYP,1),TYP*VOL,0),N)/SUM(IF(TYP<REF(TYP,1),TYP*VOL,0),N)  








5/34/5 MACD：




 

C/C++ Code复制内容到剪贴板
  1. ma(c,5)-ma(c,34) COLORSTICK ;   
  2.   
  3. ma(ma(c,5)-ma(c,34),5);   
  4.   
  5.   
  6. s:=EMA((ma(c,5)-ma(c,34)),3);   
  7. s1:=s<ref(s,1)and s>0;   
  8. s2:=s<ref(s,1)and s<0;   
  9.   
  10. STICKLINE(s>=0,0,s,8,1),COLORRED;   
  11. STICKLINE(s1,0,s,5,0),COLOR00ffff;   
  12. STICKLINE(s2,0,s,4,0),COLORffffff;  








四种视窗：






 

C/C++ Code复制内容到剪贴板
  1. MFI:(H-L)*100000/V;   
  2. MA5:MA(MFI,5);   
  3. A1:MFI>=REF(MFI,1)*1.1 AND V>=REF(V,1)*1.1;   
  4. A2:MFI<=REF(MFI,1)*0.9 AND V<=REF(V,1)*0.9;   
  5. A3:MFI>=REF(MFI,1)*1.1 AND V<=REF(V,1)*0.9;   
  6. A4:MFI<=REF(MFI,1)*0.9 AND V>=REF(V,1)*1.1;      
  7. DRAWTEXT(A2,4,'衰退'),linethick3;   
  8. DRAWTEXT(A1,1,'绿灯'),linethick3;   
  9. DRAWTEXT(A3,3,'伪装'),linethick3;   
  10. DRAWTEXT(A4,2,'蛰伏'),linethick3;   
  11. 0.1  









以下为《证券交易新空间》一书中的全部指标源码。





鳄鱼线：



 

C/C++ Code复制内容到剪贴板
  1.   
  2. Var1:=(H+L)/2;   
  3. 上唇:REF(SMA(Var1,5,1),3),COLORGREEN;   
  4. 牙齿:REF(SMA(Var1,8,1),5),COLORRED;   
  5. 下颚:REF(SMA(Var1,13,1),8),COLORBLUE;  







颚鱼分形：




 

C/C++ Code复制内容到剪贴板
  1.   
  2. Var1:=(H+L)/2;   
  3. 上唇:REF(SMA(Var1,5,1),3),COLORGREEN;   
  4. 牙齿:REF(SMA(Var1,8,1),5),COLORRED;   
  5. 下颚:REF(SMA(Var1,13,1),8),COLORBLUE;   
  6.   
  7. Var1:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);   
  8. Var2:=CROSS(Var1,0.9);   
  9. Var3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);   
  10. Var4:=CROSS(Var3,0.9);   
  11. drawicon(Var2,HIGH*1.01,4),Color00E40E;   
  12. drawicon(Var4,LOW*0.99,5),Color00E40E;   
  13. Var5:=IF(Var2,HIGH,IF(Var4,LOW,0));   
  14. {www.gszx.com.cnPOLYLINE(Var5,Var5),Colorff00ff;}   
  15. Var6:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);   
  16. Var7:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);   
  17. Var8:=BACKSET(REF(HIGH,2)=HHV(HIGH,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)   
  18. AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);   
  19. Var9:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW>REF(LOW,1) AND HIGH>REF(HIGH,1),3);   
  20. VarA:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND LOW<REF(LOW,1) AND HIGH<REF(HIGH,1),3);   
  21. VarB:=BACKSET(REF(LOW,2)=LLV(LOW,5) AND HIGH<REF(HIGH,1) AND LOW>REF(LOW,1)   
  22. AND REF(LOW,1)>REF(LOW,2) AND REF(HIGH,1)<REF(HIGH,2),3);   
  23.   
  24. 上向分形: REF(HIGH,BARSLAST(Var2)), POINTDOT,ColorEA91B5;   
  25. STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2)),REF(HIGH,BARSLAST(Var2)),5,0),COLORMAGENTA;   
  26. 向下分形: REF(LOW,BARSLAST(Var4)), POINTDOT,Color3791B5;   
  27. STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4)),REF(LOW,BARSLAST(Var4)),5,0),COLORYELLOW;  







AO：




 

C/C++ Code复制内容到剪贴板
  1. Var1:=(H+L)/2;   
  2. AO:SMA(Var1,5,1)-SMA(Var1,34,1),COLOR6699CC;   
  3. STICKLINE(AO>=REF(AO,1),0,AO,6,1),COLORRED;   
  4. STICKLINE(AO<=REF(AO,1),0,AO,6,1),COLORGREEN;   
  5. AO,COLOR000000;  








AC：



 

C/C++ Code复制内容到剪贴板
  1.   
  2. Var1:=(H+L)/2;   
  3. AO:=SMA(Var1,5,1)-SMA(Var1,34,1);   
  4. AC:SMA((AO-SMA(AO,5,1)),5,1),COLOR6699CC;   
  5. STICKLINE(AC>=REF(AC,1),0,AC,6,1),COLORRED;   
  6. STICKLINE(AC<=REF(AC,1),0,AC,6,1),COLORGREEN;   
  7. AC,COLOR000000;  







区域：




 

C/C++ Code复制内容到剪贴板
  1. Var1:=(H+L)/2;   
  2. AO:=SMA(Var1,5,1)-SMA(Var1,34,1);   
  3. AC:=SMA((AO-SMA(AO,5,1)),5,1);   
  4. AO>REF(AO,1) AND AC>REF(AC,1),COLORRED;   
  5. AO<REF(AO,1) AND AC<REF(AC,1),COLORGREEN;   
  6. AO>REF(AO,1) AND AC<REF(AC,1),COLORGRAY;   
  7. AO<REF(AO,1) AND AC>REF(AC,1),COLORGRAY;  








OSC：




 

C/C++ Code复制内容到剪贴板
  1. 参数名：SHORT         5    1    999   
  2.             LONG         35    1    999   
  3.   
  4.   
  5. MA1:=MA((HIGH+LOW)/2,SHORT);   
  6. MA2:=MA((HIGH+LOW)/2,LONG);   
  7. MA1-MA2,STICK,COLORgreen;  







OSCMACD：



 

C/C++ Code复制内容到剪贴板
  1.   
  2. 参数名：LONG         35    1    999   
  3.             SHORT         5    1    999   
  4.   
  5.   
  6.   
  7.   
  8. OSC: (MA(CLOSE,SHORT)-MA(CLOSE,LONG))/MA(CLOSE,SHORT)*100, COLORSTICK;   
  9. OSCMACD: MA(OSC,5);  

 

资源下载

相关文章

热门推荐

移动端首页 | PC端

© by gszx.com.cn Mobile Web