Squeeze Alert Help

[chrisleonard 10]

Hi Guys :crap:

 

I am modifying the sqeeze to alert me when its on buycolour 1 and buycolour2

 

 

here is the squeeze im using from here!!

 

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),LHMul t(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; 

end; 

 

I have added this into the squeeze

 

 

if Style = 1 then

begin

{Zero Line - Gauss filter}

value1 = Gauss(Price3,Length3,3);

 

if (Value1) > (Value1[1]) then

BEGIN

SetPlotColor(1, BuyColor1);

ALERT("BUYCOLOR1");

END;

if (Value1) < (Value1[1]) then

BEGIN

SetPlotColor(1, SellColor1);

ALERT("BUYCOLOR2");

END;

//SetPlotWidth(1,7);

Plot1(0, "Squeeze");

end;

 

but i still get alerts when it fires red sometimes, there must be a way to get this only to fire if the histogram is BUYCOLOR1 or BUYCOLOR2.

 

Im going round in circles

 

Heres and example of where it fired where it should not.. There is a yellow dot where it fired!

Its also done it on red on the downside...

 

 

thanks for any help, i have tried to be as specific as i can in the problem im having!

Thanks f

Edited September 17, 2009 by chrisleonard

[Tams 20]

...

Heres and example of where it fired where it should not.. There is a yellow dot where it fired!

Its also done it on red on the downside...

 

 

thanks for any help, i have tried to be as specific as i can in the problem im having!

Thanks f

 

 

you have to be VERY specific

 

put the chart on Paint, use lines and arrows and notes to point out the following: (pls answer ALL questions one by one)

 

1. what is the code doing right now.

2. which is the good trigger?

3. which is the wrong trigger?

4. what do you want the code to do?

5. what do you NOT want the code to do?

 

right now i see a yellow dot... but I don't understand your mumble jumble.

 

you have asked a lot of questions in the past,

I have always give one suggestion, which you have not considered:

 

write out your thoughts ONE LINE at a time,

write out your actions ONE LINE at a time,

 

if your write more than one action in one line,

you are guaranteed to get confused.

Edited September 17, 2009 by Tams

[chrisleonard 10]

Hi

 

Sorry i didn try to explain properly and i did do what you said.

 

Seriously i have got so fat since the Text on Chart post and you have really helped!

 

I have also written out my logic step by step which has got me this far but im still haveing this problem!!

 

The yellow dot in the poicture i did using paintbrush to show where i was getting an alert in the wrong place!!

 

 

The problem is it fires in all the right places but still fires sometimes where i have pointed out with the yello dot!!

 

 

Here is the code i have written into the original squeeze code from here!!

 

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),LHMul t(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; 


------------------------- this is where i made changes!!!--------------------------------------------
if Style = 1 then begin 
{Zero Line - Gauss filter} 
value1 = Gauss(Price3,Length3,3); 

if (Value1) > (Value1[1]) then
BEGIN
SetPlotColor(1, BuyColor1);
ALERT("BUYCOLOR1"); <-----------------------------------------here
END;
if (Value1) < (Value1[1]) then
BEGIN
SetPlotColor(1, SellColor1);
ALERT("BUYCOLOR2"); < ----------------------------------------here 
END;
//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; 

end;

[Tams 20]

....

 

The yellow dot in the poicture i did using paintbrush to show where i was getting an alert in the wrong place!!

 

 

The problem is it fires in all the right places but still fires sometimes where i have pointed out with the yello dot!!

....

 

 

I still don not understand...

does the yellow dot show the WRONG trigger?

or the yellow dot show the correct trigger?

in your previous post, you were complaining about the wrong places as the green.

where are the correct places?

 

do this:

make 2 charts

 

chart 1. make arrows and lines and notes to show where you want the triggers.

(this is your mock up. without this chart, you do not have clarity of what you want)

 

chart 2. make arrows and lines and notes to show the wrong triggers given by your code.

(this is the diagnostics)

Edited September 17, 2009 by Tams

[chrisleonard 10]

i hope this is what you meant !!!

 

 

Thanks

 

Chris

[Tams 20]

i hope this is what you meant !!!

 

Thanks

 

Chris

 

 

 

arrrhhhh... can you see your thoughts better now? (compared to the yellow dot?)

[chrisleonard 10]

yes thats a nice way to troubleshoot!

 

but for some reason no matter what i do i get the same results....

 

yes it fires mostly correct one but still some wrong!!!

[chrisleonard 10]

hmmmmm

 

ok this is my new squeeze,

 

 

 

FastVal1 = ProSqFunc(price, 8, poles);

SlowVal1 = ProSqFunc(price, 21, poles);

Diff1 = FastVal1 - SlowVal1;

FastVal2 = ProSqFunc(price, 13, poles);

SlowVal2 = ProSqFunc(price, 34, poles);

Diff2 = FastVal2 - SlowVal2;

FastVal3 = ProSqFunc(price, 21, poles);

SlowVal3 = ProSqFunc(price, 55, poles);

Diff3 = FastVal3 - SlowVal3;

FastVal4 = ProSqFunc(price, 34, poles);

SlowVal4 = ProSqFunc(price, 89, poles);

Diff4 = FastVal4 - SlowVal4;

AvgDiff = (Diff1+Diff2+Diff3+Diff4)/4;

 

if AvgDiff > 0 then

if AvgDiff > AvgDiff[1] then begin

ALERT("BUYCOLOR1");

end;

 

I thought this would take out the majority of problems but it is still alerting on reds!!!

 

here is an egsample of it being wrong!!

 

Edited September 17, 2009 by chrisleonard