PercentChange.efs
EFSLibrary - Discussion Board
File Name: PercentChange.efs
Description:
Calculates a table of percentage changes in price of two symbols for various time periods.
Formula Parameters:
- Symbol 1: Defaults to chart symbol.
- Symbol 2: $INDU
- Column Width: 73 (pixels)
- Row Thickness: 1
- Font Size: 10
Notes:
Study requires version 7.9.1 or later. To ensure that the study has the proper data for calculating the longer time periods it is recommended to use this study with a dynamic time template.
Download File:
PercentChange.efs
EFS Code:
/***************************************
Provided By : eSignal (c) Copyright 2005
Note: Study requires version 7.9.1
(build 732) or later.
***************************************/
var bVersion = null;
var STATE_UNCHG = 0;
var STATE_UP = 1; // green
var STATE_DN = -1; // red
var nFontCY = 0;
var nFontCX = 0;
var nSymLoop = 2;
var nCol = new Array(7);
var nColWidth = 0;
var nRowThickness = 1;
var nFontSize = 10;
var aHdrLabels = new Array(7);
aHdrLabels[0] = "Symbol";
aHdrLabels[1] = "DAY";
aHdrLabels[2] = "WEEK";
aHdrLabels[3] = "MONTH";
aHdrLabels[4] = "MTH-TO-DATE";
aHdrLabels[5] = "YEAR";
aHdrLabels[6] = "YR-TO-DATE";
var aSym = new Array(nSymLoop);
aSym[0] = getSymbol();
aSym[1] = "$INDU";
var aPrcnt = new Array(nSymLoop);
var xCalc = new Array(nSymLoop);
var aUpdateFlags = new Array(nSymLoop);
var aLast = new Array(nSymLoop);
for (var i = 0; i < 7; i++) {
nCol[i] = 20;
if (i < nSymLoop) {
aLast[i] = 0;
aPrcnt[i] = new Array(6);
aUpdateFlags[i] = false;
}
}
function preMain() {
setStudyTitle("Percent Change Table ");
setShowCursorLabel(false);
setShowTitleParameters(false);
formatColumns();
nColWidth = nFontCX*11;
nColWidth -= 4;
var fp1 = new FunctionParameter("Sym1", FunctionParameter.STRING);
fp1.setName("Symbol 1");
fp1.setDefault("");
var fp2 = new FunctionParameter("Sym2", FunctionParameter.STRING);
fp2.setName("Symbol 2");
fp2.setDefault(aSym[1]);
var fp3 = new FunctionParameter("inputColWidth", FunctionParameter.NUMBER);
fp3.setName("Column Width");
fp3.setLowerLimit(0);
fp3.setDefault(nColWidth);
var fp4 = new FunctionParameter("inputRowThickness", FunctionParameter.NUMBER);
fp4.setName("Row Thickness");
fp4.setLowerLimit(0);
fp4.setDefault(1);
var fp5 = new FunctionParameter("inputFontSize", FunctionParameter.NUMBER);
fp5.setName("Font Size");
fp5.setLowerLimit(1);
fp5.setDefault(10);
}
var bInit = false;
var nY = 20;
function main(Sym1, Sym2, inputColWidth, inputRowThickness, inputFontSize) {
if (bVersion == null) bVersion = verify();
if (bVersion == false) return;
var nIndex = getCurrentBarIndex();
var nState = getBarState();
if (bInit == false) {
nColWidth = Math.round(inputColWidth);
nRowThickness = Math.round(inputRowThickness)*-1;
nFontSize = Math.round(inputFontSize);
for (var i = 0; i < nSymLoop; i++) {
if (i == 0 && (Sym1 == "" || Sym1 == null)) {
aSym[i] = getSymbol();
} else {
aSym[i] = eval("Sym"+(i+1));
}
xCalc[i] = efsInternal("calc", sym(aSym[i]+",D"));
for (var j = 0; j < 6; j++) {
aPrcnt[i][j] = getSeries(xCalc[i], j);
}
}
formatColumns();
bInit = true;
}
if (nState == BARSTATE_NEWBAR && nIndex >= -1) {
/////////////////////////////////////
// HEADERS
/////////////////////////////////////
for (var i = 0; i < 7; i++) {
drawTextPixel(nCol[i], nY,
aHdrLabels[i],
Color.black, Color.lightgrey,
Text.FRAME | Text.CENTER | Text.VCENTER | Text.BOLD,
null,
nFontSize,
"hdr"+i,
nColWidth, nRowThickness);
if (i < nSymLoop) {
aUpdateFlags[i] = true;
drawTextPixel(nCol[0], nY+((i+1)*nFontCY),
aSym[i],
Color.white, Color.black,
Text.CENTER | Text.VCENTER,
null,
nFontSize,
"nColSYM"+i,
nColWidth, nRowThickness);
}
}
}
// check for price change from last trade and set update flag
for (var i = 0; i < nSymLoop; i++) {
if (aSym[i] != null && aSym[i] != " ") {
var nLast = close(0, sym(aSym[i]));
if (nLast != null) {
// price changed from last trade, update table for this symbol.
if (nLast != aLast[i]) aUpdateFlags[i] = true;
aLast[i] = nLast;
}
}
if (aUpdateFlags[i] == true) redraw(i);
}
return;
}
/********************
Functions
*********************/
function getStateBG(vCheckState) {
if(vCheckState == STATE_UNCHG) return Color.lightgrey;
if(vCheckState == STATE_UP) return Color.darkgreen;
if(vCheckState == STATE_DN) return Color.maroon;
return Color.black;
}
function getStateFG(vCheckState) {
if(vCheckState == STATE_UNCHG) return Color.black;
if(vCheckState == STATE_UP) return Color.white;
if(vCheckState == STATE_DN) return Color.white;
return Color.black;
}
function getState(vNum) {
if(vNum > 0) {
return STATE_UP;
} else if(vNum < 0) {
return STATE_DN;
} else {
return STATE_UNCHG;
}
}
function formatColumns() {
nFontCY = getTextHeight("A", null, nFontSize)*(-nRowThickness);
nFontCX = getTextWidth("A", null, nFontSize);
nCol[0] = 20; //SYM
nCol[1] = nCol[0] + nColWidth; //DAY
nCol[2] = nCol[1] + nColWidth; //WEEK
nCol[3] = nCol[2] + nColWidth; //MTH
nCol[4] = nCol[3] + nColWidth; //MTHTODATE
nCol[5] = nCol[4] + nColWidth; //YEAR
nCol[6] = nCol[5] + nColWidth; //YEARTODATE
return;
}
function redraw(num) {
for (var i = 0; i < nSymLoop; i++) {
if (i == num) {
for (var j = 0; j < 6; j++) {
var nPrcnt = aPrcnt[i][j];
if (isNaN(nPrcnt)) {
drawTextPixel(nCol[j+1], nY+((i+1)*nFontCY),
"N/A",
Color.black, Color.lightgrey,
Text.CENTER | Text.VCENTER,
null,
nFontSize,
"nPrcnt"+i+j,
nColWidth, nRowThickness);
} else {
drawTextPixel(nCol[j+1], nY+((i+1)*nFontCY),
nPrcnt.getValue(0).toFixed(2)+"\%",
getStateFG(getState(nPrcnt)), getStateBG(getState(nPrcnt)),
Text.CENTER | Text.VCENTER,
null,
nFontSize,
"nPrcnt"+i+j,
nColWidth, nRowThickness);
}
}
}
}
aUpdateFlags[num] = false; // reset and wait for price change
return;
}
// clac globals
var bInitCalc = false;
var xcloseDay = null;
var xcloseWTD = null;
var closeWTD = null;
var closeM = null;
var closeMTD = null;
var closeY = null;
var closeYTD = null;
function calc(SymInv){
if (bInitCalc == false) {
xcloseDay = close();
xcloseWTD = close(inv("w"));
bInitCalc = true;
}
var nNew = xcloseDay.getValue(0);
var nOld = xcloseDay.getValue(-1);
closeWTD = xcloseWTD.getValue(-1);
var nDate = new Date();
var nDateM = (nDate.getMonth())*100 + nDate.getDate();
var nTestMNum = month(0)*100 + day(0);
if (nTestMNum <= nDateM) {
closeM = nNew;
}
if(month(0)!=month(-1)){
closeMTD = nOld;
}
var nDateY = (nDate.getMonth()+1)*100 + nDate.getDate();
var nTestYNum = month(0)*100 + day(0);
if (year(0) < nDate.getFullYear() && nTestYNum <= nDateY) {
closeY = nNew;
}
if(year(0)!=year(-1)){
closeYTD = nOld;
}
var chgDay = ((nNew/nOld)-1)*100;
var chgWTD = ((nNew/closeWTD)-1)*100;
var chgM = ((nNew/closeM)-1)*100;
var chgMTD = ((nNew/closeMTD)-1)*100;
var chgY = ((nNew/closeY)-1)*100;
var chgYTD = ((nNew/closeYTD)-1)*100;
return new Array(chgDay, chgWTD, chgM, chgMTD, chgY, chgYTD);
}
function verify() {
var b = false;
if (getBuildNumber() < 732) {
drawTextAbsolute(5, 35, "This study requires version 7.9.1 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;
}