Announcement

Collapse
No announcement yet.

Smoothed RSI Diff

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

  • Smoothed RSI Diff

    File Name: SmoothedRSI_Diff.efs

    Description:
    Smoothed RSI Diff

    Formula Parameters:
    Length RSI1 : 14
    Length RSI2 : 28


    Notes:


    Download File:
    SmoothedRSI_Diff.efs



    EFS Code:
    PHP Code:
    /*********************************
    Provided By:  
        eSignal (Copyright c eSignal), a division of Interactive Data 
        Corporation. 2009. 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:        
        Smoothed RSI Diff
        
    Version:            1.0  11/03/2009
     
    Formula Parameters:                     Default:
        Length RSI1                         14
        Length RSI2                         28
        
    Notes:
        
    **********************************/
    var fpArray = new Array();
    var 
    bInit false;

    function 
    preMain(){
        
    setPriceStudy(false);
        
    setShowCursorLabel(true);
        
    setShowTitleParameters(false);
        
    setStudyTitle("Smoothed RSI Diff");
        
    setCursorLabelName("RSI Diff"0);
        
    setPlotType(PLOTTYPE_LINE0);
        
    setDefaultBarFgColor(Color.green0);
        var 
    0;
        
    fpArray[x] = new FunctionParameter("LengthRSI1"FunctionParameter.NUMBER);
        
    with(fpArray[x++]) {
            
    setLowerLimit(1);
            
    setDefault(14);
        }    
        
    fpArray[x] = new FunctionParameter("LengthRSI2"FunctionParameter.NUMBER);
        
    with(fpArray[x++]) {
            
    setLowerLimit(1);
            
    setDefault(28);
        }        
    }

    var 
    xRSI_Diff null;

    function 
    main(LengthRSI1LengthRSI2) {
    var 
    nBarState getBarState();
    var 
    nRSI_Diff 0;    
        if (
    nBarState == BARSTATE_ALLBARS) {
            if(
    LengthRSI1 == nullLengthRSI1 14;
            if(
    LengthRSI1 == nullLengthRSI1 28;
        }
        if (
    bInit == false) {
            
    xRSI_Diff efsInternal("Calc_RSI_Diff"LengthRSI1LengthRSI2);
            
    addBand(0PS_SOLID1Color.black"Zero");    
            
    bInit true;
        }
        
    nRSI_Diff xRSI_Diff.getValue(0);
        if (
    nRSI_Diff == null) return;
        return 
    nRSI_Diff;
    }

    var 
    bSecondInit false;
    var 
    xMARSI_Diff null;

    function 
    Calc_RSI_Diff(LengthRSI1LengthRSI2) {
    var 
    nRes 0;
    var 
    nMARSI_Diff 0;
        if (
    bSecondInit == false) {
            
    xMARSI_Diff sma(LengthRSI1efsInternal("Calc_RSI"LengthRSI1LengthRSI2))
            
    bSecondInit true;
        }
        
    nMARSI_Diff xMARSI_Diff.getValue(0);
        if (
    nMARSI_Diff == null) return;
        return 
    nMARSI_Diff;
    }

    var 
    xRSI1 null;
    var 
    xRSI2 null;
    var 
    bThirdInit false;

    function 
    Calc_RSI(LengthRSI1LengthRSI2) {
    var 
    nRes 0;
    var 
    nRSI1 0;
    var 
    nRSI2 0;
        if (
    bThirdInit == false) {
            
    xRSI1 rsi(LengthRSI1);
            
    xRSI2 rsi(LengthRSI2);
            
    bThirdInit true;
        }
        
    nRSI1 xRSI1.getValue(0);
        
    nRSI2 xRSI2.getValue(0);
        if (
    nRSI1 == null || nRSI2 == null) return;
        
    nRes nRSI1 nRSI2;
        return 
    nRes;

    Last edited by eSignal; 11-16-2009, 12:19 AM.
Working...
X