'**********************************************************************
'*   VFI Level System  (VFILevel)
'*     by Jeremy Williams
'*	   February 20,2006
'*
'*	Adapted from Technical Analysis of Stocks and Commodities
'*    June 2004 and July 2004
'*
'*  Summary: 
'*
'*      This system uses the Volume Flow Indicator (VFI) Zero Crossover
'*  to generate long signals. It requires the VFI indicator.
'*  For more information see "Using Money Flow to Stay with the Trend",
'*  and "Volume Flow Indicator Performance" in the June 2004 and 
'*  July 2004 editions of Technical Analysis of Stocks and
'*  Commodities.
'*
'*  Parameters:
'*
'*  Period= Specifies the number of Periods used for VFI calculation
'*
'*  Coef = Specifies the fixed scaling factor for the VFI calculation
'*
'*  VolCoef= Specifies the cutoff for maximum volume in the VFI calculation
'*             
'*  Smoothing= Specifies the number of periods used in the short moving average
'*
'******************************************************************** 

#System
#Param "Period",130
#Param "Coef", .2
#Param "VolCoef",2.5
#Param "SD_period",30
#Param "Smoothing",3

Dim myVFI As Single

myVFI = VFI(Period,Coef,VolCoef,SD_period,smoothing)

If myVFI > 0 and myVFI[1] <= 0 then       ' If the VFI crosses zero to the positive
	Signal = LongSignal				 	  ' side, send a long signal
end if