[amibroker] Does anyone care to port this indicator?

["nikkunayar" <nikkunayar@xxxxxxxxx>]

Hi guys

Here's something from Elite Trader that someone here would be 
interested in, I'm sure of it. Problem is, it's in Easy Language Code 
(That's the TradeStation code, right?), and I don't know how to port 
this. 

This looks like a very useful bit of code for people trading intra day. 
To see what thsi code does, please go to this page at EliteTrader and 
click on the link within the post at the top of the screen. It's 
benign, just a screenshot. 

http://www.elitetrader.com/vb/showthread.php?
s=&postid=1544028#post1544028

Note the small horizontal red and blue lines that indicate local highs 
and lows on the chart. 

That is something I would love to have on my charts...

Too bad I don't know EL. So... is there anyone here who would want that 
on their chart and would be able to port this code? Or, does anyone 
know of some available AFL code that does this same thing? 

Thanks a LOT to anyone willing and able to take this on. All I can 
offer in return is a bit of code from Jose Silva, something that he 
made for Metastock but he ported it for me; it calculates the slope of 
a line in a way that sort of makes it independent of scaling. I find it 
useful... 


--------------------------------------------------------------

[LegacyColorValue = true]; 


{ _SHME_Dynamic_SR - draw dynamic s/rlines for the period - periods 
auto calculated }


{Programmer: Avery T. Horton, Jr. aka TheRumpledOne}

inputs:


iMode("No"), { if "auto" code sets xPeriods, if not "auto" code uses 
iPeriods}

iPeriods(05),
HighColor( red), 
LowColor( blue) ;

variables:

xPeriods(60),
xInterval(0),
sFirstPass(true),
HavePrevLines( false ), 
TLHigh( 0 ), 
TLLow( 0 ), 
PushHigh( 0 ), 
PushLow( 0 ),
OldPushHigh( 0 ), 
OldPushLow( 0 ),
PrevPushHigh( 0 ), 
PrevPushLow( 0 ) ;


{first time through}

if sFirstPass
then begin

sFirstPass = false;

{bar test}

If bartype = 4
then xInterval = 94
else
If bartype = 3
then xInterval = 93
else
If bartype = 2
then xInterval = 92
else
If bartype = 1
then begin
xInterval = BarInterval;
end; { If bartype = 1 }

{mode test}

If iMode <> "Auto" and iMode <> "auto" and iMode <> "AUTO"
then xPeriods = iPeriods
else xPeriods = _fPushPeriods(xInterval);

end; {if sFirstPass}

{save old values}

If PushHigh <> PrevPushHigh
then OldPushHigh = PrevPushHigh;

If PushLow <> PrevPushLow 
then OldPushLow = PrevPushLow ;

OldPushHigh = PrevPushHigh ;
OldPushLow = PrevPushLow ;

PrevPushHigh = PushHigh ;
PrevPushLow = PushLow ;

{ high / low for period }

PushHigh = Highest( H, xPeriods);
PushLow = Lowest( L, xPeriods) ;

If PushHigh <> H
and PushHigh < PrevPushHigh
then PushHigh = PrevPushHigh;

If PushLow <> L
and PushLow > PrevPushLow
then PushLow = PrevPushLow;

plot1(PushLow, "PushLow", LowColor);

plot2(PushHigh, "PushHigh", HighColor);






Please note that this group is for discussion between users only.

To get support from AmiBroker please send an e-mail directly to 
SUPPORT {at} amibroker.com

For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG:
http://www.amibroker.com/devlog/

For other support material please check also:
http://www.amibroker.com/support.html
 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/amibroker/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/amibroker/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:amibroker-digest@xxxxxxxxxxxxxxx 
    mailto:amibroker-fullfeatured@xxxxxxxxxxxxxxx

<*> To unsubscribe from this group, send an email to:
    amibroker-unsubscribe@xxxxxxxxxxxxxxx

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/