Announcement

Collapse
No announcement yet.

PFE - Polarized Fractal Efficiency

Collapse
This topic is closed.
X
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • PFE - Polarized Fractal Efficiency

    File Name: PFE.efs

    Description:
    PFE - Polarized Fractal Efficiency

    Formula Parameters:


    Notes:
    The Polarized Fractal Efficiency (PFE) indicator measures the efficiency
    of price movements by drawing on concepts from fractal geometry and chaos
    theory. The more linear and efficient the price movement, the shorter the
    distance the prices must travel between two points and thus the more efficient
    the price movement.


    Download File:
    PFE.efs



    EFS Code:
    PHP Code:
    /*********************************
    Provided By:  
        eSignal (Copyright c eSignal), a division of Interactive Data 
        Corporation. 2008. All rights reserved. This sample eSignal 
        Formula Script (EFS) is for educational purposes only and may be 
        modified and saved under a new file name.  eSignal is not responsible
        for the functionality once modified.  eSignal reserves the right 
        to modify and overwrite this EFS file with each new release.

    Description:        
        PFE (Polarized Fractal Efficiency)

    Version:            1.0  10/14/2008

    Notes:
        The Polarized Fractal Efficiency (PFE) indicator measures the efficiency 
        of price movements by drawing on concepts from fractal geometry and chaos 
        theory. The more linear and efficient the price movement, the shorter the 
        distance the prices must travel between two points and thus the more efficient 
        the price movement.



    Formula Parameters:                     Default:
    **********************************/

    var bInit false;

    function 
    preMain() {
        
    setStudyTitle("Polarized Fractal Efficiency");
        
    setCursorLabelName("EMA"0);
        
    setDefaultBarFgColor(Color.aqua0);

        
    addBand(50PS_SOLID1Color.blue);    
        
    addBand(-50PS_SOLID1Color.red);        
       
    }

    var 
    xEMA null;
    var 
    xFracEff null;


    function 
    main() {
    var 
    nBarState getBarState();
    var 
    nEMA 0;
        
        if ( 
    bInit == false ) { 
            
    xFracEff efsInternal("Calc_FracEff");
            
    xEMA ema(5xFracEff)
            
    bInit true
        } 

        
    nEMA xEMA.getValue(0);
        if (
    nEMA == null) return;
        
        return 
    nEMA;
    }


    function 
    Calc_FracEff(){
    var 
    PFE 0;
    var 
    C2C 0;
    var 
    Counter 0;
    var 
    FracEff 0;
        
    PFE Math.sqrt(Math.pow((close(0) - close(-9)),2) + 100);
        for (
    Counter 1Counter 10Counter++)    {
            
    C2C += Math.sqrt(Math.pow((close(-Counter 1) - close(-Counter)), 2) + 1);
        }
        if ((
    close(0) - close(-9)) > 0FracEff Math.round((PFE C2C) * 100);
        else 
    FracEff Math.round(-(PFE C2C) * 100);
        if (
    FracEff == nullFracEff 1;
        return 
    FracEff;

Working...
X