Ensign Volatility Stop

alexwang7777

1. _SECTION_BEGIN("Ensign Volatility Stop");
   
2. 
   
3. // Ensign Volatility Stop
   
4. // get the multiple of 9 period EMA of ATR_Ensign
   
5. k=Param("multiplication factor", 1,0.5,5,0.1);
   
6. 
   
7. period=k*9;
   
8. VS_raw = 2.5 * EMA(ATR(1), period);
   
9. 
   
10. // for longs, VS line is below price
    
11. loline = VS_below_price = HHV(Close, period) - VS_raw;
    
12. 
    
13. // for shorts, VS line is above price
    
14. hiline = VS_above_price = LLV(Close, period) + VS_raw;
    
15. between = IIf (C < hiline AND C > loline, 1, 0);
    
16. up = IIf(C > hiline OR (H > Ref(H, -1) AND H > hiline), 1, 0);
    
17. dn = IIf(C < loline OR (L < Ref(L, -1) AND L < loline), 1, 0);
    
18. upcond = IIf(between AND BarsSince(up) < BarsSince(dn) , 1, 0);
    
19. dncond = IIf(between AND BarsSince(dn) < BarsSince(up) , 1, 0);
    
20. upline = IIf(up OR upcond, loline, Null);
    
21. dnline = IIf(dn OR dncond, hiline, Null);
    
22. 
    
23. Plot(C, "", colorLightGrey, styleBar);
    
24. Plot(upline, "", colorRed, styleStaircase) ;
    
25. Plot(dnline, "", colorGreen, styleStaircase) ;
    
26. 
    
27. Buy=upline;
    
28. Sell=dnline;
    
29. Buy=ExRem(Buy,Sell);
    
30. Sell=ExRem(Sell,Buy);
    
31. 
    
32. PlotShapes(Buy*shapeUpArrow,colorGreen);
    
33. PlotShapes(Sell*shapeDownArrow,colorRed);
    

複製代碼

金双盈

回復 1# alexwang7777


   建議把最下面兩行的語法顏色修改成適合台灣使用的箭頭顏色

1. 
   
2. PlotShapes(Buy*shapeUpArrow,colorRed);
   
3. PlotShapes(Sell*shapeDownArrow,colorGreen);
   

複製代碼

alexwang7777

^^忘了改顏色

aaqqww93

呵~改一下比較習慣
不錯呢謝謝分享