DALE    ?  !!RSI Wilder
! Coded by Rich Denning 8/1/2001; revised 7/13/04

!The built-in [RSI Wilder] uses recursive averaging and has a default of 14 days
!To convert Wilder Averaging (recursive) to Exponential Averaging use this formula:
	!ExponentialPeriods = 2 * WilderPeriod - 1.

	U 	is [close]-val([close],1).
	D 	is val([close],1)-[close].

	W1	is 3.
	L1	is 2 * W1 - 1.
	AvgU 	is ExpAvg(iff(U>0,U,0),L1).
	AvgD 	is ExpAvg(iff(D>=0,D,0),L1).
	rsi3 	is 100-(100/(1+(AvgU/AvgD))).

	W2	is 14.               !This is the default setting
	L2	is 2 * W2 - 1.
	AvgU2 	is ExpAvg(iff(U>0,U,0),L2).
	AvgD2 	is ExpAvg(iff(D>=0,D,0),L2).
	rsi14 	is 100-(100/(1+(AvgU2/AvgD2))).

	W3	is 21.
	L3	is 2 * W3 - 1.
	AvgU3 	is ExpAvg(iff(U>0,U,0),L3).
	AvgD3 	is ExpAvg(iff(D>=0,D,0),L3).
	rsi21 	is 100-(100/(1+(AvgU3/AvgD3))).   Rule Libraryےے  	 CCodeView    ےےےے            