Just wondering if there is an easy way to convert Trade Station code into AFL language?
I've struggled through some programming but this one is beyond me. Any help would be appreciated. Thanks, Randy This is the script I have (permission has been granted to use it): /******************************************************************** Title: Value Chart Indicator Script for eSignal 7.x By: Chris D. Kryza (Divergence Software, Inc.) Email: [EMAIL PROTECTED] Incept: 09/26/2003 Version: 1.0.0 ===================================================================== Fix History: 09/26/2003 - Initial Release 1.0.0 ===================================================================== Project Description: David Stenhahl's Value Chart Indicator. From the book "Dynamic Trading Indicators" by Mark Helweg and David Stendahl. If you come across any fixes or have any ideas on how to spruce it up, I would appreciate it if you would let me know ([EMAIL PROTECTED]). Dislaimer: For educational purposes only! Obviously, no guarantees whatsoever and use at your own risk. **********************************************************************/ //Global Variables var grID = 0; var nBarCounter = 0; var aFPArray = new Array(); var aArray = new Array(); var nVarP = null; var bInitialized = false; var nTotalBars = null; var nMaxBars = 200; var nStudyMin = -12; var nStudyMax = 12; //== PreMain function required by eSignal to set things up function preMain() { var x; setPriceStudy(false); setStudyTitle("Value Chart"); addBand( 8, PS_SOLID, 1, Color.red, -10 ); addBand( 4, PS_SOLID, 1, Color.teal, -11 ); addBand( -4, PS_SOLID, 1, Color.teal, -12 ); addBand( -8, PS_SOLID, 1, Color.red, -13 ); //unrem this if you don't want the labels in cursor window setShowCursorLabel(false); setStudyMin( nStudyMin ); setStudyMax( nStudyMax ); setComputeOnClose(); grID = 0; //initialize formula parameters x=0; aFPArray[x] = new FunctionParameter( "NumBars", FunctionParameter.NUMBER); with( aFPArray[x] ) { setName( "Input: Bars" ); setLowerLimit( 2 ); setUpperLimit( 1000 ); setDefault( 5 ); } x++; aFPArray[x] = new FunctionParameter( "MaxToDraw", FunctionParameter.NUMBER); with( aFPArray[x] ) { setName( "Max Bars to Draw" ); setLowerLimit( 20 ); setUpperLimit( 5000 ); setDefault( 100 ); } for ( x=0; x<50; x++ ) { aArray[x] = 0.0; } } //== Main processing function function main( NumBars, MaxToDraw ) { var x; var nVarA; var nVarB; var nVarC; var nVarD; var nVarE; var nVarR1; var nVarR2; var nVarR3; var nVarR4; var nVarR5; var nVarR0; var nOpen, nHigh, nLow, nClose; //script is initializing if ( getBarState() == BARSTATE_ALLBARS ) { return null; } if ( bInitialized == false ) { nVarP = Math.round( NumBars/5 ); nMaxBars = MaxToDraw*3; nMaxBars += (nMaxBars % 3)-1; nTotalBars = getNumBars(); bInitialized = true; } //called on each new bar if ( getBarState() == BARSTATE_NEWBAR ) { aArray.pop(); aArray.unshift(0); nBarCounter++; } if ( nBarCounter < (nTotalBars-(nMaxBars/3))-10 ) return; if ( NumBars > 7 ) { nVarA = Highest( nVarP, 0 ) - Lowest( nVarP, 0 ); if ( nVarA == 0 && nVarP ==1 ) nVarR1 = Math.abs( close()-close(-nVarP) ); else nVarR1 = nVarA; nVarB = Highest( nVarP, nVarP+1 ) - Lowest( nVarP, nVarP ); if ( nVarB == 0 && nVarP==1 ) nVarR2 = Math.abs( close(-nVarP)-close(-(nVarP*2))); else nVarR2 = nVarB; nVarC = Highest( nVarP, nVarP*2 ) - Lowest( nVarP, nVarP*2 ); if ( nVarC == 0 && nVarP==1 ) nVarR3 = Math.abs( close(-(nVarP*2))-close(-(nVarP*3))); else nVarR3 = nVarC; nVarD = Highest( nVarP, nVarP*3 ) - Lowest( nVarP, nVarP*3 ); if ( nVarD == 0 && nVarP==1 ) nVarR4 = Math.abs( close(-(nVarP*3))-close(-(nVarP*4))); else nVarR4 = nVarD; nVarE = Highest( nVarP, nVarP*4 ) - Lowest( nVarP, nVarP*4 ); if ( nVarE == 0 && nVarP==1 ) nVarR5 = Math.abs( close(-(nVarP*4))-close(-(nVarP*5))); else nVarR5 = nVarE; nLRange = ( ( nVarR1 + nVarR2 + nVarR3 + nVarR4 + nVarR5 ) / 5 ) * 0.20; } else { if ( Math.abs( close()-close(-1) ) > (high()-low())) nVar0 = Math.abs( close()-close(-1) ); else nVar0 = high()-low(); if ( high()==low() ) nVar0 = Math.abs( close()-close(-1) ); aArray[0] = nVar0; nLRange = Average( aArray, 5 ) * 0.20; } if ( nLRange <= 0 ) return; nOpen = ( open() - HLAverage( NumBars ) ) / nLRange; nHigh = ( high() - HLAverage( NumBars ) ) / nLRange; nLow = ( low() - HLAverage( NumBars ) ) / nLRange; nClose = ( close() - HLAverage( NumBars ) ) / nLRange; //adjust study window height, as necessary if ( nBarCounter > (nTotalBars-(nMaxBars/3))) { if ( nHigh > nStudyMax ) { nStudyMax = nHigh; setStudyMax( nStudyMax ); } if ( nLow < nStudyMin ) { nStudyMin = nLow; setStudyMin( nStudyMin ); } } //draw the OHLC bar in the study window drawBar( nOpen, nHigh, nLow, nClose ); } /************************************************* SUPPORT FUNCTIONS **************************************************/ function drawBar( nO, nH, nL, nC ) { drawLineRelative( 0, nL, 0, nH, PS_SOLID, 3, Color.navy, gID() ); drawLineRelative( 0, nO, 0, nO, PS_SOLID, 5, Color.lime, gID() ); drawLineRelative( 0, nC, 0, nC, PS_SOLID, 5, Color.red, gID() ); } function HLAverage( nBars ) { var x = 0; var nTmp = 0; while ( x<nBars ) { nTmp += ( high(-x) + low(-x) ) / 2; x++; } return( nTmp/nBars ); } function Average( Arr, nBars ) { var x = 0; var nTmp = 0; while ( x<nBars ) { nTmp += Arr[x]; x++; } return( nTmp/nBars ); } function Highest( nBars, nOffset ) { var x = nOffset; var nTmp = -9999999999.0; while ( x<nBars+nOffset ) { nTmp = Math.max( nTmp, high(-(x)) ); x++; } return( nTmp ); } function Lowest( nBars, nOffset ) { var x = nOffset; var nTmp = 9999999999.0; while ( x<nBars+nOffset ) { nTmp = Math.min( nTmp, low(-(x)) ); x++; } return( nTmp ); } //== gID function assigns unique identifier to graphic/text routines function gID() { grID ++; if ( grID>nMaxBars ) grID = 0; return( grID ); }