[amibroker] hlep me in this formula

[ziad aljalsi <zjalsi@xxxxxxxxx>]

i have vere nice formula it give me  buy and sell signal

i added 3 formula in one so it give me nice rusalt

i am not belive the buy or sell signal until boht of conditon give me buy or sell

some time both of them give me buy  in same day so i blive it but if one of them give me buy and other conditon was still in sell positon  i dont want to see buy signal untial the other give buy and i do not want  to see any buy or sell untill

both  are in same position

 

exampl:

first conditon give buy signal today and other conditon  stell  in sell position do not show any buy signal .

until  the secand give buy  then put the buy signal in the day wich second is give the buy

and the sell also.

here is the formula and i make red high light on what i want

 

_SECTION_BEGIN("VOLATILITY SYSTEM");

EntrySignal = C > ( LLV( L, 20 ) + 2 * ATR( 10 ) );

ExitSignal = C < ( HHV( H, 20 ) - 2 * ATR( 10 ) );

Color = IIf( EntrySignal, colorBlue, IIf( ExitSignal, colorOrange, colorGrey50 ));

TrailStop = HHV( C - 2 * ATR(10), 15 );

ProfitTaker = EMA( H, 13 ) + 2 * ATR(10);

/* plot price chart and stops */

Plot( TrailStop, "Trailing stop", colorBrown, styleThick | styleLine );

Plot( ProfitTaker, "Profit taker", colorLime, styleThick );

Plot( C, "Price", Color, styleBar | styleThick );

/* plot color ribbon */

Plot( 1, "", Color, styleArea | styleOwnScale | styleNoLabel, -0.1, 50 );

_SECTION_END();

 

_SECTION_BEGIN("good");

period = Param("Period", 13, 1, 240, 1);

mult = Param("Multiplier", 1.7, 1, 240, 0.1);

f=ATR(period);

VS[0] = Close[0];

trend[0] = 0;

HighC[0]=0;

Lowc[0]=0;

for( i = period+1; i < BarCount; i++ )

{

vs[i] = vs[i-1];

trend[i] = trend[i-1];

highC[i] = HighC[i-1];

lowc[i] = lowc[i-1];

if ((trend[i]>=0) && ( C[i] <VS[i] ))

{

trend[i] =-1;

HighC[i] = C[i];

lowc[i] = C[i];

}

if ((trend[i]<=0) && (C[i] >VS[i]))

{

trend[i]=1;

HighC[i] = C[i];

lowc[i] = C[i];

}

if (trend[i]==-1)

{

if (C[i]<lowc[i]) lowc[i] = C[i];

VS[i]= lowc[i]+ (mult*f[i]);

}

 

if (trend[i]==1)

{

if (C[i]>HighC[i]) HighC[i] = C[i];

VS[i]= HighC[i]-(mult*f[i]);

}

}

 

Buy= Cross(Trend,0) +Cross( Close ,TrailStop );

Sell=Cross(0, Trend) + Cross( TrailStop ,Close);

Plot( C, "Close", ParamColor("Color", colorBlack), ParamStyle("Styel",styleLine,styleCandle|styleBar|styleThick));

Plot(VS, "Vol Stop",IIf(trend==1,10,11 ),styleThick);

mkol = IIf( Trend==1, 10, 11);

Plot(5, "ribbon", mkol, styleNoRescale|styleArea|styleNoLabel, 0, -5); // Weekly trend

PlotShapes((Buy*1)+(Sell*2),IIf(Buy,colorGreen,colorRed) );

shape = Buy * shapeUpArrow + Sell * shapeDownArrow;

 

 

 

// Suppor / Resistance Lines

// zezo July-23-2007

//********************************

_SECTION_BEGIN("Price");

SetChartOptions(0,chartShowArrows|chartShowDates);

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 )));

}

Plot( C, "Close", ParamColor("Color", colorBlack), ParamStyle("Styel",styleLine,styleCandle|styleBar|styleThick));

_SECTION_END();

_SECTION_BEGIN("Sup / Res Lines");

SRswitch = ParamToggle("Sup / Res Lines","On,Off");

CHLswitch = ParamToggle("Hi Low / Close","Hi Low,Close");

NoLines = Param("No of Lines",1,1,30,1);

Sen = Param("Sensitivity",.01,.01,100,.01);

Rcolor=ParamColor( "Res Color", colorRed );

Rstyle=ParamStyle( "Res Style", styleLine);

Scolor=ParamColor( "Sup Color", colorLime );

Sstyle=ParamStyle( "Sup Style", styleLine );

y=0;

x=0;

for( i = 1; i < NoLines+1 ; i++ )

{

Y[i]=LastValue(Peak(IIf(CHLswitch,C,H),Sen,i));

x[i]=BarCount - 1 - LastValue(PeakBars(IIf(CHLswitch,C,H),Sen,i));

Line = LineArray( x[i], y[i], Null, y[i], 1 );

Plot( IIf(SRswitch,Null,Line), "", Rcolor, Rstyle );

Y[i]=LastValue(Trough(IIf(CHLswitch,C,L),Sen,i));

x[i]=BarCount - 1 - LastValue(TroughBars(IIf(CHLswitch,C,L),Sen,i));

Line = LineArray( x[i], y[i], Null, y[i], 1 );

Plot( IIf(SRswitch,Null,Line), "", Scolor, Sstyle );

}

_SECTION_END();

Chng = StrFormat("Change (%.2f%)", C - Ref(C,-1));

Per = StrFormat(" Per: (%.1f%%)", SelectedValue( ROC( C, 1 )));

Title = Name() + " {{INTERVAL}}" + " " + Date() +

EncodeColor( colorBlack ) + " Open: " + O +

EncodeColor( colorDarkGreen ) + " High: " + H +

EncodeColor( colorDarkRed ) + " Low: " + L +

EncodeColor( colorDarkBlue ) + " Close: " + C +

EncodeColor( colorBlack ) + " Vol: " + WriteVal( V, 1.0 ) + "\n" +

Chng + Per + " " +

EncodeColor( colorBlack ) + FullName();

Send instant messages to your online friends http://uk.messenger.yahoo.com __._,_.___

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

Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___