[kamakazy]

Hi i would like to set an alert up when the squeeze fires off but only for buycolour1 and sellcour1..

here is the squeeze code im using

Inputs: Price(Close), price2(close),Price3(H/3+L/3+C/3),
	 Length(20),
	 Length2(13),
	 Length3(21),
	 Length4(9),
	 Style(1),
	 nK(1.5), 
	 nBB(2), 
 	 AlertLine( 1 ),
	 BuyColor1(blue), BuyColor2(darkblue),
	 SellColor1(red), SellColor2(darkred),
	 NormalColor(Red),AlertColor(Blue),
	 CounterTrend(true); 

vars:FastVal1(0), SlowVal1(0), Diff1(0),
     FastVal2(0), SlowVal2(0), Diff2(0),
     FastVal3(0), SlowVal3(0), Diff3(0),
     FastVal4(0), SlowVal4(0), Diff4(0),
     AvgDiff(0), AvgDif(0), poles(4),
     CCIValue(0),DownCT(0),UpCT(0),SDev(0),ATR(0),LHMult(0),Denom(0),BBS_Ind(0);

if Style = 0 then begin
	{Zero Line - BB Squeeze}
	if ( barnumber=1 ) then 
	Begin
	  If minmove <> 0 then
	    LHMult = pricescale/minmove;
	end;

	{-- Calculate BB Squeeze ----------------------}
	ATR = AvgTrueRange(Length);
	SDev = StandardDev(Price, Length, 1);

	Denom = (nK*ATR);
	If Denom <> 0 then BBS_Ind = (nBB * SDev) /Denom; 

	If BBS_Ind < Alertline then
	  SetPlotColor(1, NormalColor)
	else
	  SetPlotColor(1, AlertColor);

	{-- Plot Index & Alert Line -------------------------}
	Plot1(0, "Squeeze");
end;

if Style = 1 then begin
	{Zero Line - Gauss filter}
	value1 = Gauss(Price3,Length3,3);

	if (Value1) > (Value1[1]) then 
	SetPlotColor(1, BuyColor1);
	if (Value1) < (Value1[1]) then 
	SetPlotColor(1, SellColor1);
	//SetPlotWidth(1,7);
	Plot1(0, "Squeeze");
end;


{Histogram} 
FastVal1 = Gauss(price, 8, poles);
SlowVal1 = Gauss(price, 21, poles);
Diff1 = FastVal1 - SlowVal1;
FastVal2 = Gauss(price, 13, poles);
SlowVal2 = Gauss(price, 34, poles);
Diff2 = FastVal2 - SlowVal2;
FastVal3 = Gauss(price, 21, poles);
SlowVal3 = Gauss(price, 55, poles);
Diff3 = FastVal3 - SlowVal3;
FastVal4 = Gauss(price, 34, poles);
SlowVal4 = Gauss(price, 89, poles);
Diff4 = FastVal4 - SlowVal4;
AvgDiff = (Diff1+Diff2+Diff3+Diff4)/4;

plot2(AvgDiff,"DiffHisto") ;
//setplotwidth(2,7);
if AvgDiff > 0 then 
  if AvgDiff > AvgDiff[1] then 
    setplotcolor(2,BuyColor1)
  else
    setplotcolor(2,BuyColor2) ;

if AvgDiff < 0 then 
  if AvgDiff < AvgDiff[1] then setplotcolor(2,SellColor1)
else
  setplotcolor(2,SellColor2);



{+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++}
{ Counter Trend Mode}
if CounterTrend = true then begin
	CCiValue = CCI(13);

	Condition1 = ccivalue[1] > 50;
	Condition2 = CCivalue < 50;
	Condition3 = CCivalue[1] < 100;
	Condition4 = CCiValue > 100;
	Condition5 = AvgDiff > 0;
	Condition6 = AvgDiff[1] > 0;
	Condition7 = AvgDiff[2] > 0;
	Condition8 = ccivalue < 100;

	if Condition1 and Condition2 and Condition5 and condition6 and condition7 then begin
	  setplotcolor(2,SellColor2);
	  DownCT = 1;
	end;

	if DownCT = 1 and AvgDiff < 0 then DownCT =0;

	if DownCT = 1 and Condition8 and Condition5 then setplotcolor(2,SellColor2);

	if DownCT = 1 and Condition3 and Condition4 then begin
	  setplotcolor(2,BuyColor1);
	  DownCT = 0;
	end;

	Condition11 = ccivalue[1] < -50;
	Condition12 = CCivalue > -50;
	Condition13 = CCivalue[1] >- 100;
	Condition14 = CCiValue < -100;
	Condition15 = AvgDiff < 0;
	Condition16 = AvgDiff[1] < 0;
	Condition17 = AvgDiff[2] < 0;
	Condition18 = ccivalue >-100;

	if Condition11 and Condition12 and Condition15 and condition16 and condition17 then begin
	  setplotcolor(2,BuyColor2) ;
	  UpCT = 1;
	end;

	if UpCT = 1 and AvgDiff > 0 then UpCT =0;
	if UpCT = 1 and Condition18 and Condition15 then setplotcolor(2,BuyColor2) ;
	if UpCT = 1 and Condition13 and Condition14 then begin
	  setplotcolor(2,SellColor1);
	  UpCT = 0;
	end;
08704870334
end;

I have tried the following

if AvgDiff < AvgDiff[1] then Alert ( "Short" );

but its not working, anyone know how to alert for this?

Thanks

[Tams]

I don't see the alert in your code.

[kamakazy]

sorry its not in that i added it to the bottom, i just wanted to put up the original code before i added the alert!

I added

if AvgDiff < AvgDiff[1] then Alert ( "Short" );

to the bottom of the file before the, end;

[Tams]

Originally Posted by kamakazy »

...
but its not working, anyone know how to alert for this?

Thanks

go to Format Study,

make sure the alert is ENABLED.

[kamakazy]

yes its enabled and firing off!!!!

BUT

It fires off even when the squeeze is the wrong colour!

If its green i still get a short alert!

[Tams]

Originally Posted by kamakazy »

yes its enabled and firing off!!!!

BUT

It fires off even when the squeeze is the wrong colour!

If its green i still get a short alert!

write out your logic on paper...

covering ALL the permutations,
including all the ON conditions and OFF conditions.


you will see the "hole" once you have done that.

[kamakazy]

yea have been for 2 weeks¬

if your talking about if AvgDiff > 0 then

I have tried that it does nothing different!

[kamakazy]

hmm though it seems to work ok if i turn off countertrtend mode!!