Hi Brian
Thanks for the support on this but I am not having much luck getting this code
to work.
Can you see anything wrong with what I have done?
Many thanks
Ken
_SECTION_BEGIN( "Price");
TimeFrameSet( in5Minute );
SetChartOptions( 0,chartShowArrows| chartShowDates );
_N(Title = StrFormat("{ {NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g,
Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C,
SelectedValue( ROC( C, 1 )) ));
Plot( C, "Close", ParamColor(" Color", colorBlack ), styleNoTitle |
ParamStyle(" Style") | GetPriceStyle( ) );
if( ParamToggle( "Tooltip shows", "All Values|Only Prices" ) )
{
ToolTip=StrFormat( "Open: %g\nHigh: %g\nLow: %g\nClose: %g (%.1f%%)\nVolume:
"+NumToStr( V, 1 ), O, H, L, C, SelectedValue( ROC( C, 1 )));
//HHV( ARRAY, periods )
ORB = (1000 - 0950)/(Interval( )/60);//OpeningRangeBars
Plot(ORB,"OpeningRa ngeBars", 1,1);
ORH = HHV( H, ORB );//OpeningRangeHig h
TM = IIf(TimeNum( ) == 095000, ORH,Null);// TimeMarker
Plot(ValueWhen( TM > 0,TM,1),"LatchedTimeMarker", colorBrightGreen ,1);
_SECTION_END();
--- On Fri, 29/5/09, brian_z111 <[email protected]> wrote:
From: brian_z111 <[email protected]>
Subject: [amibroker] Re: Intraday - Open 10 Minute Price Marker
To: [email protected]
Received: Friday, 29 May, 2009, 3:07 PM
Verify Syntax :-)
//P_IntradayMarkers _HL
//Example 1.
//HighestSince( EXPRESSION, ARRAY, Nth = 1 )
LND = Cum(DateNum( ) !=Ref(DateNum( ),-1));// LatchedNewDay
Plot(LND == Ref(LND,-1), "LatchedNewDay" ,1,1);
IDH = HighestSince( LND != Ref(LND,-1), H, 1 );
Plot(IDH,"IntradayH igh",colorBright Green,1);
//////////// ///////// ///////// ///////// ///////// ///////// /
//Example 2.
/*Overlay on intraday charts to show High after defined time (0950 in this
example).
The OpeningRange == 0950 - 0930 (this assumes the market day starts at 0930).
The Plot will adjust automatically when the chart time is changed via the chart
icons.
Only use chart timeframes that are whole number divisors of the Opening Range.
For example 0950 - 0930 == 20 minutes/5 minute bars == 4 == O.K..
but 0950 - 0930 == 20 minutes/15 minute bars == 1.333 != O.K.
Manually enter the opening range times.
*/
//HHV( ARRAY, periods )
ORB = (0950 - 0930)/(Interval( )/60);//OpeningR angeBars
Plot(ORB,"OpeningRa ngeBars", 1,1);
ORH = HHV( H, ORB );//OpeningRangeHig h
TM = IIf(TimeNum( ) == 095000, ORH,Null);// TimeMarker
Plot(ValueWhen( TM > 0,TM,1),"LatchedTim eMarker", colorBrightGreen ,1);
--- In amibro...@yahoogrou ps.com, "brian_z111" <brian_z111@ ...> wrote:
>
> Example 2 assumes that you will not have missing data bars in your chosen
> timeframe e.g. 5 mins - this should be true for the ASX indexes but possibly
> not for a ASX midcap - smaller timeframes increase the chance of no trade
> time bars with low liquidity stock.
>
>
> If you want to use it with lightly traded stock then it might work in a chart
> if you use padded data.
>
>
> http://zboard. wordpress. com/2009/ 02/28/display- padded-data/
>
>
>
>
>
> //P_IntradayMarkers _HL
>
> //Example 1.
>
> //HighestSince( EXPRESSION, ARRAY, Nth = 1 )
>
> LND = Cum(DateNum( ) !=Ref(DateNum( ),-1));// LatchedNewDay
>
> //Plot(LND == Ref(LND,-1), 1,1);
>
> IDH = HighestSince( LND != Ref(LND,-1), H, 1 );
>
> //Plot(NDH," IntradayHigh" ,colorBrightGree n,1);
>
> //////////// ///////// ///////// ///////// ///////// ///////// /
>
> //Example 2.
>
> /*Overlay on intraday charts to show High after defined time (0950 in this
> example).
> The OpeningRange == 0950 - 0930 (this assumes the market day starts at 0930).
> The Plot will adjust automatically when the chart time is changed via the
> chart icons.
> Only use chart timeframes that are whole number divisors of the Opening Range.
> For example 0950 - 0930 == 20 minutes/5 minute bars == 4 == O..K.
> but 0950 - 0930 == 20 minutes/15 minute bars == 1.333 != O.K.
> Manually enter the opening range times.
>
> */
>
> //HHV( ARRAY, periods )
>
> ORB = (0950 - 0930)/(Interval( )/60);//OpeningR angeBars
>
> //Plot(ORB," OpeningRangeBars ",1,1);
>
> ORH = HHV( H, ORB );
>
> P = IIf(TimeNum( ) == 095000, ORH,Null);
> Plot(ValueWhen( P > 0,P,1),"IntradayHig h",colorBrightGr een,1);
>
>
>
>
>
>
>
>
> //HighestSince( EXPRESSION, ARRAY, Nth = 1 )
>
>
>
>
> --- In amibro...@yahoogrou ps.com, "brian_z111" <brian_z111@ > wrote:
> >
> > Hello Ken,
> >
> > I think RazBarry is in bed at the moment.
> > In the interim here are a couple of examples of intraday HL's.
> >
> >
> > They show how I go about it:
> >
> > - copy/paste function from the AFL reference to show me the way (they also
> > come up automatically in the Formula Editor but sometimes I find the
> > permanent reference helpful the first few times I use a function).
> >
> > - plot every line (as far as possible) to get a visual on the output from
> > the code
> >
> > - try to write the code to produce the plotted lines that I want.
> >
> >
> > Try example 2 - there are other and possibly better ways to do it but I
> > think that is what you want.
> >
> >
> >
> >
> >
> > --- In amibro...@yahoogrou ps.com, Ken H <sfehendo@> wrote:
> > >
> > > Hi
> > >
> > > I have modified the code as layed out below but am getting a sytax error
> > > after the important time line of code. This is set at 9.50am so as
> > > to align with the Australian SPI open.
> > >
> > > Ken
> > >
> > > _SECTION_BEGIN( "Price");
> > > TimeFrameSet( in5Minute );
> > > SetChartOptions( 0,chartShowArrows| chartShowDates );
> > > _N(Title = StrFormat("{ {NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g,
> > > Lo %g, Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H,
> > > L, C, SelectedValue( ROC( C, 1 )) ));
> > > Plot( C, "Close", ParamColor(" Color", colorBlack ), styleNoTitle |
> > > ParamStyle(" Style") | GetPriceStyle( ) );
> > > if( ParamToggle( "Tooltip shows", "All Values|Only Prices" ) )
> > > {
> > > ToolTip=StrFormat( "Open: %g\nHigh: %g\nLow: %g\nClose: %g
> > > (%.1f%%)\nVolume: "+NumToStr( V, 1 ), O, H, L, C, SelectedValue( ROC( C,
> > > 1 )));
> > > }
> > > newday = Day() != Ref(Day(), -1);
> > > highofday = Ref(HighestSince( newday, H, 1), -1);
> > > Lowofday = Ref(LowestSince( newday, L, 1), -1);
> > > Rangeofday=highofda y-lowofday;
> > > importanttime= 95000;
> > > 10minuteORhigh = ValueWhen( Cross(TimeNum( ),95000), highofday, 1);
> > > 10minuteORlow= .....;
> > > StrFormat("newday = %g \nhighofday = %1.4f \nLowofday = %1.4f \n10MinHi =
> > > %1.4f", newday, highofday, Lowofday, HighOr10Min );
> > > Plot(HighOr10Min , "10 Day", colorRed);
> > >
> > >
> > > Need a Holiday? Win a $10,000 Holiday of your choice. Enter
> > > now.http://us. lrd.yahoo. com/_ylc= X3oDMTJxN2x2ZmNp BF9zAzIwMjM2MTY2
> > > MTMEdG1fZG1lY2gD VGV4dCBMaW5rBHRt X2xuawNVMTEwMzk3 NwR0bV9uZXQDWWFo
> > > b28hBHRtX3BvcwN0 YWdsaW5lBHRtX3Bw dHkDYXVueg- -/SIG=14600t3ni/ **http%3A/
> > > /au.rd.yahoo. com/mail/ tagline/creative holidays/ *http%3A/ /au..docs.
> > > yahoo.com/ homepageset/ %3Fp1=other% 26p2=au%26p3= mailtagline
> > >
> >
>
Need a Holiday? Win a $10,000 Holiday of your choice. Enter
now.http://us.lrd.yahoo.com/_ylc=X3oDMTJxN2x2ZmNpBF9zAzIwMjM2MTY2MTMEdG1fZG1lY2gDVGV4dCBMaW5rBHRtX2xuawNVMTEwMzk3NwR0bV9uZXQDWWFob28hBHRtX3BvcwN0YWdsaW5lBHRtX3BwdHkDYXVueg--/SIG=14600t3ni/**http%3A//au.rd.yahoo.com/mail/tagline/creativeholidays/*http%3A//au.docs.yahoo.com/homepageset/%3Fp1=other%26p2=au%26p3=mailtagline
