Free Indicator To All If Someone Converts 
November 2nd, 2009, 11:26 AM  #1 (permalink) 
Elite Member
Lafayette, CO/ USA
Futures Experience: Intermediate
Platform: NinjaTrader, Tradestation, Market Delta
Broker/Data: Global Futures/Esignal
Favorite Futures: ES
Posts: 7 since Aug 2009
Thanks: 2 given,
1
received

Free Indicator To All If Someone Converts
Hello Everyone,
I was wondering if someone could convert the following Tradestation Code To Ninja Trader? If someone thinks its easy and doesn't mind converting it then posting the executable ninja script on the thread for us all I would appreciate it greatly! Basically its an indicator of all indicators like stos, rsi, macd dstoch, etc all rolled into one! It's really good with helping confirm when a market is extremely ob/os. Instead of looking at several indicators you can get it all from one! If coded hopefully it will help everyone out here! Hope you guys find use out of it, I know I have when I used it on tradestation. Thanks in advance for the code help! Warm Regards, Brian Original TS Code Below: input: sdlen(14),sklen(14),rsilen(14),ccilen(4),macdlen(7); input: dbuy(20),dsell(80),kbuy(20),ksell(80); input: rsell(65), rbuy(35), sline(90),bline(10); input: baseline(49); value1=SlowD(sdlen); value2=SlowK(sklen); value3=RateOfChange(c,10);value4=xaverage (RateOfChange(c,10),3); value5=xaverage(RateOfChange(c,10),8); value6=RSI(c,rsilen); value7=CCI(12); value13=Midoriup(5); value11=Midoridn(5); value17=xaverage(cci(12),ccilen); value8=macd(c,12,26); value9=xaverage(MACD(c,12,26),macdlen); value12=Etchujimaosc(20); value10=0; If value1 > dsell then value10=value10 +9; If value2 > ksell then value10=value10 + 9; If value1 < dbuy then value10=value10  9; If value2 < kbuy then value10=value10  9; If value4 < 0 and value5 < 0 and value4 < value5 then value10 = value10  9; If value4 > 0 and value5 > 0 and value4 > value5 then value10 = value10 + 9; If value6 > rsell then value10 = value10 + 9; If value6 < rbuy then value10 = value10  9; If value8 > 0 and value9 > 0 and value8 > value9 then value10 = value10 +9; If value8 < 0 and value9 < 0 and value8 < value9 then value10 = value10  9; If value7 > 100 and value17 > 100 and value7 > value17 then value10 = value10 + 9; If value7 < 100 and value17 < 100 and value7 < value17 then value10 = value10 9 ; If value11<value7[2]and value7[2] <value7[3] then value10 = value109; If value13>value7[2]and value7[2]>value7[3] then value10 = value10+9; If value12 > 85 then value10=value10 + 7; If value12 < 15 then value10= value10  7; value10=value10+60; plot1(value10,"Loser's"); plot2(sline,"sell"); plot3(bline,"buy"); plot4(baseline,"baseline"); {end; end; end; } ______________________________________________________________________________________________ Midoriup Function Code: Inputs: Len(NumericSimple); {Lookback period} Vars: k(0), x(0), counter(0), AverageRange(0); k = 0; x = 0; If CurrentBar <> 0 then Begin k = LowestBar(Low,Len); For counter = 0 to k  1 Begin x = Rangerover(H,L,C)[counter] + x; End; If k <> 0 then AverageRange = x / k; If AverageRange * SquareRoot(k) <> 0 then Midoriup = (High[0]  Lowest(Low,Len)) / (AverageRange * SquareRoot(k)); End; _________________________________________________________________________ Midoridn Function Code: Inputs: Len(NumericSimple); {Lookback period} Vars: k(0), x(0), counter(0), AverageRange(0); k = 0; x = 0; If CurrentBar <> 0 then Begin k = HighestBar(High,Len); For counter = 0 to k 1 Begin x = RangeRover(H,L,C)[counter] + x; End; If k <> 0 then AverageRange = x / k; If AverageRange * SquareRoot(k) <> 0 then Midoridn = (Highest(High,Len)  Low[0]) / (AverageRange * SquareRoot(k)); End; _________________________________________________________________________________________________ ETCHUJIMAOsc Function Code: input:length(numericsimple); Value1=average(c,length)  close; ETCHUJIMAOSC=value1; Last edited by marketprofiletrader; November 3rd, 2009 at 10:23 AM. Reason: Wanted To Show Picture OF How Indicator Should Look When Coded 