'**********************************************************************
'*   VFI Level Stop 
'*     by Jeremy Williams
'*	   February 20,2006
'*
'*	Adapted from Technical Analysis of Stocks and Commodities
'*    June 2004 and July 2004
'*
'*  Summary: 
'*
'*      This stop was designed to be used with the VFI Zero
'*  crossover system VFILevel. 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
'*
'******************************************************************** 

#Stop
#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
	Signal = ExitSignal						      ' negative side, send an exit signal
end if