/*********************************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: ARSI, The Asymmetrical RSI by Sylvain VervoortVersion: 1.0 08/07/2008Notes: October 2008 issue of Stocks & Commodities MagazineFormula Parameters: Default: Period 14 Upper Band 70 Lower Band 30 ARSI Color Blue RSI Color Red Show Parameters False**********************************/var fpArray = new Array();function preMain() { setPriceStudy(false); setStudyTitle("ARSI "); setCursorLabelName("ARSI", 0); setCursorLabelName("RSI", 1); setDefaultBarFgColor(Color.blue, 0); setDefaultBarFgColor(Color.red, 1); setPlotType(PLOTTYPE_LINE, 0); setPlotType(PLOTTYPE_LINE, 1); setDefaultBarThickness(1, 0); setDefaultBarThickness(1, 1); askForInput(); var x=0; fpArray[x] = new FunctionParameter("Period", FunctionParameter.NUMBER); with(fpArray[x++]){ setName("Period"); setLowerLimit(1); setUpperLimit(100); setDefault(14); } fpArray[x] = new FunctionParameter("Color1", FunctionParameter.COLOR); with(fpArray[x++]){ setName("ARSI Color"); setDefault(Color.blue); } fpArray[x] = new FunctionParameter("Color2", FunctionParameter.COLOR); with(fpArray[x++]){ setName("RSI Color"); setDefault(Color.red); } fpArray[x] = new FunctionParameter("Upper", FunctionParameter.NUMBER); with(fpArray[x++]){ setName("Upper Band"); setLowerLimit(0); setDefault(70); } fpArray[x] = new FunctionParameter("Lower", FunctionParameter.NUMBER); with(fpArray[x++]){ setName("Lower Band"); setLowerLimit(0); setDefault(30); } fpArray[x] = new FunctionParameter("ShowParam", FunctionParameter.BOOLEAN); with(fpArray[x++]){ setName("Show Parameters"); setDefault(false); } }var xSum1 = nullvar xSum2 = null;var xSum3 = null;var xSum4 = null;var xRSI = null;var bInit = false;var bVersion = null;function main(Period, Upper, Lower, Color1, Color2, ShowParam){ if (bVersion == null) bVersion = verify(); if (bVersion == false) return; if(getCurrentBarCount()= 0) { nSum += 1; } } var UpCount = nSum; var DnCount = Period-UpCount; var UpMove = xMom.getValue(0)>=0?xMom.getValue(0):0; var DnMove = xMom.getValue(0)<0?Math.abs(xMom.getValue(0)):0; return new Array(UpCount,DnCount,UpMove,DnMove);}function verify() { var b = false; if (getBuildNumber() < 779) { drawTextAbsolute(5, 35, "This study requires version 8.0 or later.", Color.white, Color.blue, Text.RELATIVETOBOTTOM|Text.RELATIVETOLEFT|Text.BOLD|Text.LEFT, null, 13, "error"); drawTextAbsolute(5, 20, "Click HERE to upgrade.@URL=http://www.esignal.com/download/default.asp", Color.white, Color.blue, Text.RELATIVETOBOTTOM|Text.RELATIVETOLEFT|Text.BOLD|Text.LEFT, null, 13, "upgrade"); return b; } else { b = true; } return b;} |
