[大智慧指标] [转载]特送自用主图【混沌布林】

1. DRAWTEXTABS(100,20,'红色K线为多头区域'),colorred;
   
2. DRAWTEXTABS(100,40,'蓝色K线为混沌区域'),colorff0000;
   
3. DRAWTEXTABS(100,60,'绿色K线为空头区域'),color00ff00;
   
4. Y:=(HIGH+LOW)/2;
   
5. AO:=sMA(Y ,5,1 )-sMA(Y ,34,1 );
   
6. AC:=AO-sMA( AO,5,1);
   
7. ac1:=ref(AC,1);
   
8. Yy:=(HIGH+LOW)/2;
   
9. AOo:=sMA(Yy ,5,1 )-sMA(Yy ,34,1 );
   
10. ao1:=ref(aoo,1);
    
11. kk:=if(ac>ac1 and ao>ao1,5,if(ac<ac1 and ao<ao1,-5,0));
    
12. stickline(kk=5,h,l,0.5,0),colorred;
    
13. stickline(kk=5 and c>=o,c,o,10,1),colorred;
    
14. stickline(kk=5 and c<o,c,o,10,0),colorred;
    
15. stickline(kk=0,h,l,0.5,0),colorff9900;
    
16. stickline(kk=0 and c<O,c,o,10,0),colorff9900;
    
17. stickline(kk=0 and c>=O,c,o,10,1),colorff9900;
    
18. stickline(kk=-5,h,l,0.5,0),color00ff00;
    
19. stickline(kk=-5 and c>=o,c,o,10,1),color00ff00;
    
20. stickline(kk=-5 and c<o,c,o,10,0),color00ff00;
    
21. MID:=ema(c,21);
    
22. 中:MID,colorwhite,linethick0;
    
23. PARTLINE(mid,mid>ref(mid,1),RGB(255,0,0),mid<ref(mid,1),RGB(0,255,0),1,RGB(0,0,255)),linethick2;
    
24. m3:ema(c,3),linethick0;
    
25. m8:ema(c,8),linethick0;
    
26. FILLRGN(m3,m8,m3>m8,rgb(200,100,0),m3<m8,rgb(0,200,100));
    
27. 【布上】:ema(c,21)+2*STDDEV(c ,20),color00ff00;
    
28. 【布下】:ema(c,21)-2*STDdev(c ,20),color00ff00;
    
29. Var1:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
    
30. Var2:=CROSS(Var1,0.9);
    
31. Var3:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
    
32. Var4:=CROSS(Var3,0.9);
    
33. drawicon(Var2,HIGH*1.01,6),Color00E40E;
    
34. drawicon(Var4,LOW*0.99,5),Color00E40E;
    
35. 上分形:=REF(HIGH,BARSLAST(Var2));
    
36. STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2)),REF(HIGH,BARSLAST(Var2)),5,0),COLORMAGENTA;
    
37. 下分形:=REF(LOW,BARSLAST(Var4));
    
38. STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4)),REF(LOW,BARSLAST(Var4)),5,0),COLORYELLOW;
    
39. 相对高低:=(c-下分形)/(上分形-下分形)*100;
    
40. 分形振幅:=(上分形-下分形)/下分形*100;
    
41. DRAWTEXTREL(800,800,'向上分形:'+NUMTOSTRN(上分形,2)+'元'),colorwhite;
    
42. DRAWTEXTREL(800,850,'向下分形:'+NUMTOSTRN(下分形,2)+'元'),coloryellow;
    
43. DRAWTEXTREL(800,750,'相对高低:'+NUMTOSTRN(相对高低,2)+'%'),coloryellow;
    
44. DRAWTEXTREL(800,900,'分形振幅:'+NUMTOSTRN(分形振幅,2)+'%'),color00ff00;

复制代码

下载 (424.17 KB)

2018-10-19 11:43