Can someone please help with the following code. I am
not getting the fractal shapes to plot.
THanks in advance.
COLOR = IIf(C > O, colorGreen,
colorRed);
// SetChartOptions(0,chartShowDates|chartShowArrows|chartLogarithmic|chartWrapTitle);
_N ( Title = StrFormat(
"{{NAME}} -
" + SectorID( 1 ) +
" - {{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", Color,
styleBar | styleThick | styleNoTitle );
_SECTION_BEGIN ("F");
// SetBarsRequired(200,0);
FD1 = IIf((H > Ref(H,2) AND H > Ref(H,1) AND H > Ref(H,-1) AND H > Ref(H,-2)),1,0);
FD2 = IIf((H > Ref(H,3) AND H > Ref(H,2) AND H=Ref(H,1) AND H > Ref(H,-1) AND H > Ref(H,-2)),1,0);
FD3 = IIf((H > Ref(H,4) AND H > Ref(H,3) AND H=Ref(H,2) AND H >= Ref(H,1) AND H > Ref(H,-1) AND H > Ref(H,-2)),1,0);
FU1 = IIf((L < Ref(L,2) AND L < Ref(L,1) AND L < Ref(L,-1) AND L < Ref(L,-2)),1,0);
FU2 = IIf((L < Ref(L,3) AND L < Ref(L,2) AND L = Ref(L,1) AND L < Ref(L,-1) AND L < Ref(L,-2)),1,0);
FU3 = IIf((L < Ref(L,4) AND L < Ref(L,3) AND L = Ref(L,2) AND L <= Ref(L,1) AND L < Ref(L,-1) AND L < Ref(L,-2)),1,0);
PlotShapes ( IIf(FD1 OR
FD2 OR FD3, shapeSmallCircle,0) ,
colorOrange,0,H,10);
PlotShapes ( IIf(FU1 OR
FU2 OR FU3, shapeSmallCircle,0) ,
colorLime,0,L,-10);
_SECTION_END ();
__._,_.___
**** IMPORTANT PLEASE READ ****
This group is for the discussion between users only.
This is *NOT* technical support channel.
TO GET TECHNICAL SUPPORT send an e-mail directly to
SUPPORT {at} amibroker.com
TO SUBMIT SUGGESTIONS please use FEEDBACK CENTER at
http://www.amibroker.com/feedback/
(submissions sent via other channels won't be considered)
For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG:
http://www.amibroker.com/devlog/
![]()
__,_._,___
|