The codes are written underneath,
while TradeStation ELS files (attached) can be Imported into TradeStation or SuperCharts.  (AIQ will follow later).

ACCELERATION BANDS
TradeStation
UpperBand =
Average((high*(1+2*((((high-low)/((high+low)/2))*1000)*.001))),20)

MidPoint = Average(close,20)

LowerBand =
Average((low*(1-2*((((high-low)/((high+low)/2))*1000)*.001))),20) 

MetaStock
{For upper band}
Upperband:=(H*(1+2*((((H-L)/((H+L)/2))*1000)*0.001)));
Mov(Upperband, 20, S );
{For lower band}
Lowerband:=(L*(1-2*((((H-L)/((H+L)/2))*1000)*0.001)));
Mov(Lowerband, 20, S );

MOMENTUM DIVERGENCE
TradeStation
Input: FastMA(12),SlowMA(26),MacdMA(9),Input2(40),BuyZone(30),SellZone(90);
Value1=IFF(Highest(MACD(Close,FastMA,SlowMA),Input2) - Lowest(MACD(Close,FastMA,SlowMA),Input2)<>0,Highest(MACD(Close,FastMA,SlowMA),Input2) - Lowest(MACD(Close,FastMA,SlowMA),Input2),50);
Value2=IFF(Highest(c,Input2) - Lowest(c,Input2)<>0,Highest(c,Input2) - Lowest(c,Input2),50);
Plot1(100*(c-Lowest(c,Input2))/Value2,"Close%");
Plot2(100*(MACD(Close,FastMA,SlowMA) - Lowest(MACD(Close,FastMA,SlowMA),Input2))/Value1,"MACD%");
Plot3(BuyZone, "BuyZone");
Plot4(SellZone, "SellZone");

(see attached Word fille "114 Translation" for Momentum Divergence for MetaStock)



114 Translation.doc <http://mail02.mail.com/getattach/114%20Translation.doc?folder=INBOX&msg_uid=1044907962&filename=114%20Translation.doc&partsno=2>


MDIVERGENCE.ELS <http://mail02.mail.com/getattach/MDIVERGENCE.ELS?folder=INBOX&msg_uid=1044907962&filename=MDIVERGENCE.ELS&partsno=3>


ACCELBAND.ELS <http://mail02.mail.com/getattach/ACCELBAND.ELS?folder=INBOX&msg_uid=1044907962&filename=ACCELBAND.ELS&partsno=4>
Top of Form 1
		

             		
Bottom of Form 1