shi_channel_mod_535

Download script
Author: Copyright � 2004, Shurka & Kevin
shi_channel_mod_535

This script is a technical analysis tool designed to automatically identify and draw a dynamic "channel" on your trading charts. It identifies market trends by finding specific price patterns and projecting them forward, providing visual cues about the market's momentum and structural changes.

Core Logic & Functionality

1. Identifying Key Market Points (Fractals) The script scans historical price data to find significant "highs" and "lows." It specifically looks for points where the price has turned around—mathematically identifying peaks and valleys. Once it finds two significant opposing points (a high and a low), it uses them as the foundation to anchor its channel.

2. Channel Construction & Projection Once the two primary points are identified, the script calculates the "step" or slope between them. It then projects these lines forward into the future. This creates a visual corridor on your chart that represents the current path of the price action:

  • Upper Boundary: Represents the ceiling of the current movement.
  • Lower Boundary: Represents the floor of the current movement.
  • Mid-Line: A dashed line representing the center point of the channel.

3. Dynamic Adjustment & Violation Detection The script is "smart" in how it handles price breaks. If the current price moves outside the boundaries of the projected channel, the script recognizes this as a potential structural shift. It identifies these breaches to adjust the pricing of the lines, ensuring the channel stays relevant to recent price action.

4. Visual Feedback & Alerts The tool provides immediate visual feedback based on the market's behavior:

  • Color Coding: The color of the lines changes depending on the timeframe you are viewing (e.g., different colors for M1, H1, D1) and whether the channel meets certain width requirements.
  • Alert System: It monitors for significant structural changes. If the channel begins to widen significantly, narrow down, or if the trend direction flips (from up to down or vice versa), the script can trigger an alert to notify you of the change in market dynamics.
  • On-Screen Data: The script displays a live "Comment" box on your chart. This provides real-time statistics including the current upper and lower boundaries, the center point, the total width of the channel, and the specific angle of the slope.

5. Timeframe Awareness The logic is built to be context-aware. It automatically adjusts its scanning depth (how many bars it looks back) based on the timeframe you are using (from 1-minute charts up to Weekly charts), ensuring that the "fractals" it finds are appropriate for the specific speed of that market period.

Miscellaneous
Implements a curve of type %1It issuies visual alerts to the screen
9 Views
0 Downloads
0 Favorites
shi_channel_mod_535 
//+------------------------------------------------------------------+ 
//|                                                  SHI_Channel.mq4 | 
//|                                 Copyright © 2004, Shurka & Kevin | 
//|                                                                  | 
//+------------------------------------------------------------------+ 
#property copyright "Copyright © 2004, Shurka & Kevin" 
#property link "" 

#property indicator_chart_window 
#property indicator_buffers 6 
#property indicator_color1 Red 
double ExtMapBuffer1[]; 
double LBuffer[];
double HBuffer[];
double MBuffer[];
double CBuffer[];
double SBuffer[];
int B4,B5;

//---- input parameters 
extern int AllBars=240; 
extern int BarsForFract=0; 
int CurrentBar=0; 
double Step=0; 
int B1=-1,B2=-1; 
int UpDown=0; 
double P1=0,P2=0,PP=0; 
int i=0,AB=300,BFF=0; 
int ishift=0; 
double iprice=0; 
datetime T1,T2; 

double OldChannelWidth,OldSlopeAngle;
int alertTag;
extern int ChannelAlert=50;
extern int SlopeAlert=25;
extern bool ChannelTalk=true;
int firsttime=0;
//+------------------------------------------------------------------+ 
//| Custom indicator initialization function | 
//+------------------------------------------------------------------+ 
int init() 
{ 
//---- indicators 
SetIndexStyle(0,DRAW_ARROW); 
SetIndexArrow(0,164); 
SetIndexBuffer(0,ExtMapBuffer1); 
SetIndexEmptyValue(0,0.0); 
   
   SetIndexBuffer(1,LBuffer);
   SetIndexBuffer(2,HBuffer);
   SetIndexBuffer(3,MBuffer);
   SetIndexBuffer(4,CBuffer);
   SetIndexBuffer(5,SBuffer);
//---- 


return(0); 
} 
//+------------------------------------------------------------------+ 
//| Custor indicator deinitialization function | 
//+------------------------------------------------------------------+ 
int deinit() 
{ 
//---- 

//---- 
return(0); 
} 

void DelObj() 
{ 
ObjectDelete("TL1"); 
ObjectDelete("TL2"); 
ObjectDelete("MIDL"); 
} 

//+------------------------------------------------------------------+ 
//| Custom indicator iteration function | 
//+------------------------------------------------------------------+ 
int start() 
{ 
int counted_bars=IndicatorCounted();
int X = (Ask-P1);
int X2 = (Bid-P2);
string symbolTxt;
string PeriodTxt;
string WhatTxt;
if (Symbol()=="EURUSD") { symbolTxt = "Euro Dollar"; }
if (Symbol()=="EURJPY") { symbolTxt = "Euro Yen "; }
if (Symbol()=="EURAUD") { symbolTxt = "Euro Aussie "; }
if (Symbol()=="EURCAD") { symbolTxt = "Euro Canadian"; }
if (Symbol()=="EURCHF") { symbolTxt = "Euro Swiss"; }
if (Symbol()=="GBPUSD") { symbolTxt = "Cable Dollar"; }
if (Symbol()=="GBPJPY") { symbolTxt = "Cable Yen "; }
if (Symbol()=="GBPCHF") { symbolTxt = "Cable Swiss"; }
if (Symbol()=="AUDUSD") { symbolTxt = "Aussie"; }
if (Symbol()=="USDCHF") { symbolTxt = "Swiss Dollar"; }
if (Symbol()=="USDCAD") { symbolTxt = "Canada"; }
if (Symbol()=="USDJPY") { symbolTxt = "Yen Dollar"; } 
if (Symbol()=="CHFJPY") { symbolTxt = "Swiss Yen "; }
if (Symbol()=="GOLD") { symbolTxt = "Gold"; }
if (Period()==1){PeriodTxt= "One minute";}
if (Period()==5){PeriodTxt= "Five minutes";} 
if (Period()==15){PeriodTxt= "Fifteen minutes"; } 
if (Period()==30){PeriodTxt= "Thirty minutes"; } 
if (Period()==60){PeriodTxt= "One hour"; } 
if (Period()==240){PeriodTxt= "Four hours";} 
if (Period()==1440){PeriodTxt= "Day";} 
if (Period()==10080){PeriodTxt= "Week";} 


//---- 
if ((AllBars==0) || (Bars<AllBars)) AB=Bars; else AB=AllBars; //AB-êîëè÷åñòâî îáñ÷èòûâàåìûõ áàðîâ 
if (BarsForFract>0) 
BFF=BarsForFract; 
else 
{ 
switch (Period()) 
{ 
case 1: BFF=12; break; 
case 5: BFF=48; break; 
case 15: BFF=24; break; 
case 30: BFF=24; break; 
case 60: BFF=12; break; 
case 240: BFF=15; break; 
case 1440: BFF=10; break; 
case 10080: BFF=6; break; 
default: DelObj(); return(-1); break; 
X = P1;
} 
} 
CurrentBar=2; //ñ÷èòàåì ñ òðåòüåãî áàðà, ÷òîáû ôðàêòàë "çàêðåïèëñÿ 
B1=-1; B2=-1; UpDown=0; 
while(((B1==-1) || (B2==-1)) && (CurrentBar<AB)) 
{ 

//UpDown=1 çíà÷èò ïåðâûé ôðàêòàë íàéäåí ñâåðõó, UpDown=-1 çíà÷èò ïåðâûé ôðàêòàë 
//íàéäåí ñíèçó, UpDown=0 çíà÷èò ôðàêòàë åù¸ íå íàéäåí. 
//Â1 è Â2 - íîìåðà áàðîâ ñ ôðàêòàëàìè, ÷åðåç íèõ ñòðîèì îïîðíóþ ëèíèþ. 
//Ð1 è Ð2 - ñîîòâåòñòâåííî öåíû ÷åðåç êîòîðûå áóäåì ëèíèþ ïðîâîäèòü 

      if((UpDown<1) && (CurrentBar==Lowest(Symbol(),Period(),MODE_LOW,BFF*2+1,CurrentBar-BFF))) 
      { 
         if(UpDown==0) { UpDown=-1; B1=CurrentBar; P1=Low[B1]; } 
         else { B2=CurrentBar; P2=Low[B2];} 
      } 
   
      if((UpDown>-1) && (CurrentBar==Highest(Symbol(),Period(),MODE_HIGH,BFF*2+1,CurrentBar-BFF))) 
      { 
         if(UpDown==0) { UpDown=1; B1=CurrentBar; P1=High[B1]; } 
         else { B2=CurrentBar; P2=High[B2]; } 
      } 
   CurrentBar++; 
   } 
   if((B1==-1) || (B2==-1))
   {DelObj(); return(-1);} // Çíà÷èò íå íàøëè ôðàêòàëîâ ñðåäè 300 áàðîâ  
   Step=(P2-P1)/(B2-B1);//Âû÷èñëèëè øàã, åñëè îí ïîëîæèòåëüíûé, òî êàíàë íèñõîäÿùèé 
   P1=P1-B1*Step; B1=0;//ïåðåñòàâëÿåì öåíó è ïåðâûé áàð ê íóëþ 
   
   //À òåïåðü îïîðíóþ òî÷êó ïðîòèâîïîëîæíîé ëèíèè êàíàëà. 
   ishift=0; iprice=0; 
   if(UpDown==1) 
   { 
   PP=Low[2]-2*Step; 
   for(i=3;i<=B2;i++) 
   { 
   if(Low[i]<PP+Step*i)
      { PP=Low[i]-i*Step; } 
   } 

   if(Low[0]<PP)
      {ishift=0; iprice=PP;} 
      
   if(Low[1]<PP+Step)
      {ishift=1; iprice=PP+Step;} 
      
   if(High[0]>P1)
      {ishift=0; iprice=P1;} 
      
   if(High[1]>P1+Step)
      {ishift=1; iprice=P1+Step;} 
   
   } 
   else 
   { 
   
      PP=High[2]-2*Step; 
      for(i=3;i<=B2;i++) 
   { 
   if(High[i]>PP+Step*i)
      { PP=High[i]-i*Step;} 
   } 

   if(Low[0]<P1)
      {ishift=0; iprice=P1;} 

   if(Low[1]<P1+Step)
      {ishift=1; iprice=P1+Step;} 

   if(High[0]>PP)
      {ishift=0; iprice=PP;} 

   if(High[1]>PP+Step)
      {ishift=1; iprice=PP+Step;} 
   } 
   //Òåïåðü ïåðåñòàâèì êîíå÷íóþ öåíó è áàð íà ÀÂ, ÷òîáû ëèíèè êàíàëà ðèñîâàëèñü ïîäëèííåå 
   P2=P1+AB*Step; 
   T1=Time[B1];
   T2=Time[AB]; 

   //Åñëè íå áûëî ïåðåñå÷åíèÿ êàíàëà, òî 0, èíà÷å ñòàâèì ïñèñó. 
   if(iprice!=0)
   ExtMapBuffer1[ishift]=iprice; 
   DelObj(); 

   double ChannelWidth=MathAbs(PP - P1)/Point;
   double SlopeAngle=MathFloor((-Step/Point)*100);

   if(Period()==1){
   
   ObjectCreate("M1-TL1",OBJ_TREND,0,T2,PP+Step*AB,T1,PP); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("M1-TL1",OBJPROP_COLOR,Navy);}
   else {ObjectSet("M1-TL1",OBJPROP_COLOR,Red); }
   ObjectSet("M1-TL1",OBJPROP_WIDTH,1); 
   ObjectSet("M1-TL1",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("M1-TL2",OBJ_TREND,0,T2,P2,T1,P1); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("M1-TL2",OBJPROP_COLOR,Navy); }
   else{ObjectSet("M1-TL2",OBJPROP_COLOR,Red);}
   ObjectSet("M1-TL2",OBJPROP_WIDTH,1); 
   ObjectSet("M1-TL2",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("M1-MIDL",OBJ_TREND,0,T2,(P2+PP+Step*AB)/2,T1,(P1+PP)/2); 
   if(ChannelWidth >= ChannelAlert && MathAbs(SlopeAngle) >= SlopeAlert) {ObjectSet("M1-MIDL",OBJPROP_COLOR,Navy); }
   else{ObjectSet("M1-MIDL",OBJPROP_COLOR,Red);}
   ObjectSet("M1-MIDL",OBJPROP_WIDTH,1); 
   ObjectSet("M1-MIDL",OBJPROP_STYLE,STYLE_DOT); 
   }
   
   if(Period()==5){
   
   ObjectCreate("M5-TL1",OBJ_TREND,0,T2,PP+Step*AB,T1,PP); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("M5-TL1",OBJPROP_COLOR,SeaGreen);}
   else {ObjectSet("M5-TL1",OBJPROP_COLOR,Red); }
   ObjectSet("M5-TL1",OBJPROP_WIDTH,1); 
   ObjectSet("M5-TL1",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("M5-TL2",OBJ_TREND,0,T2,P2,T1,P1); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("M5-TL2",OBJPROP_COLOR,SeaGreen); }
   else{ObjectSet("M5-TL2",OBJPROP_COLOR,Red);}
   ObjectSet("M5-TL2",OBJPROP_WIDTH,1); 
   ObjectSet("M5-TL2",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("M5-MIDL",OBJ_TREND,0,T2,(P2+PP+Step*AB)/2,T1,(P1+PP)/2); 
   if(ChannelWidth >= ChannelAlert && MathAbs(SlopeAngle) >= SlopeAlert) {ObjectSet("M5-MIDL",OBJPROP_COLOR,SeaGreen); }
   else{ObjectSet("M5-MIDL",OBJPROP_COLOR,Red);}
   ObjectSet("M5-MIDL",OBJPROP_WIDTH,1); 
   ObjectSet("M5-MIDL",OBJPROP_STYLE,STYLE_DOT); 
   }

   if(Period()==15){
   
   ObjectCreate("M15-TL1",OBJ_TREND,0,T2,PP+Step*AB,T1,PP); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("M15-TL1",OBJPROP_COLOR,DarkOrange);}
   else {ObjectSet("M15-TL1",OBJPROP_COLOR,Red); }
   ObjectSet("M15-TL1",OBJPROP_WIDTH,1); 
   ObjectSet("M15-TL1",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("M15-TL2",OBJ_TREND,0,T2,P2,T1,P1); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("M15-TL2",OBJPROP_COLOR,DarkOrange); }
   else{ObjectSet("M15-TL2",OBJPROP_COLOR,Red);}
   ObjectSet("M15-TL2",OBJPROP_WIDTH,1); 
   ObjectSet("M15-TL2",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("M15-MIDL",OBJ_TREND,0,T2,(P2+PP+Step*AB)/2,T1,(P1+PP)/2); 
   if(ChannelWidth >= ChannelAlert && MathAbs(SlopeAngle) >= SlopeAlert) {ObjectSet("M15-MIDL",OBJPROP_COLOR,DarkOrange); }
   else{ObjectSet("M15-MIDL",OBJPROP_COLOR,Red);}
   ObjectSet("M15-MIDL",OBJPROP_WIDTH,1); 
   ObjectSet("M15-MIDL",OBJPROP_STYLE,STYLE_DOT); 
   }

   if(Period()==30){
   
   ObjectCreate("M30-TL1",OBJ_TREND,0,T2,PP+Step*AB,T1,PP); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("M30-TL1",OBJPROP_COLOR,Bisque);}
   else {ObjectSet("M30-TL1",OBJPROP_COLOR,Red); }
   ObjectSet("M30-TL1",OBJPROP_WIDTH,1); 
   ObjectSet("M30-TL1",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("M30-TL2",OBJ_TREND,0,T2,P2,T1,P1); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("M30-TL2",OBJPROP_COLOR,Bisque); }
   else{ObjectSet("M30-TL2",OBJPROP_COLOR,Red);}
   ObjectSet("M30-TL2",OBJPROP_WIDTH,1); 
   ObjectSet("M30-TL2",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("M30-MIDL",OBJ_TREND,0,T2,(P2+PP+Step*AB)/2,T1,(P1+PP)/2); 
   if(ChannelWidth >= ChannelAlert && MathAbs(SlopeAngle) >= SlopeAlert) {ObjectSet("M30-MIDL",OBJPROP_COLOR,Bisque); }
   else{ObjectSet("M30-MIDL",OBJPROP_COLOR,Red);}
   ObjectSet("M30-MIDL",OBJPROP_WIDTH,1); 
   ObjectSet("M30-MIDL",OBJPROP_STYLE,STYLE_DOT); 
   }

   if(Period()==60){
   
   ObjectCreate("H1-TL1",OBJ_TREND,0,T2,PP+Step*AB,T1,PP); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("H1-TL1",OBJPROP_COLOR,Yellow);}
   else {ObjectSet("H1-TL1",OBJPROP_COLOR,Red); }
   ObjectSet("H1-TL1",OBJPROP_WIDTH,1); 
   ObjectSet("H1-TL1",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("H1-TL2",OBJ_TREND,0,T2,P2,T1,P1); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("H1-TL2",OBJPROP_COLOR,Yellow); }
   else{ObjectSet("H1-TL2",OBJPROP_COLOR,Red);}
   ObjectSet("H1-TL2",OBJPROP_WIDTH,1); 
   ObjectSet("H1-TL2",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("H1-MIDL",OBJ_TREND,0,T2,(P2+PP+Step*AB)/2,T1,(P1+PP)/2); 
   if(ChannelWidth >= ChannelAlert && MathAbs(SlopeAngle) >= SlopeAlert) {ObjectSet("H1-MIDL",OBJPROP_COLOR,Yellow); }
   else{ObjectSet("H1-MIDL",OBJPROP_COLOR,Red);}
   ObjectSet("H1-MIDL",OBJPROP_WIDTH,1); 
   ObjectSet("H1-MIDL",OBJPROP_STYLE,STYLE_DOT); 
   }

   if(Period()==240){
   
   ObjectCreate("H4-TL1",OBJ_CHANNEL,0,T2,PP+Step*AB,T1,PP); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("H4-TL1",OBJPROP_COLOR,LightSkyBlue);}
   else {ObjectSet("H4-TL1",OBJPROP_COLOR,Red); }
   ObjectSet("H4-TL1",OBJPROP_WIDTH,1); 
   ObjectSet("H4-TL1",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("H4-TL2",OBJ_CHANNEL,0,T2,P2,T1,P1); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("H4-TL2",OBJPROP_COLOR,LightSkyBlue); }
   else{ObjectSet("H4-TL2",OBJPROP_COLOR,Red);}
   ObjectSet("H4-TL2",OBJPROP_WIDTH,1); 
   ObjectSet("H4-TL2",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("H4-MIDL",OBJ_CHANNEL,0,T2,(P2+PP+Step*AB)/2,T1,(P1+PP)/2); 
   if(ChannelWidth >= ChannelAlert && MathAbs(SlopeAngle) >= SlopeAlert) {ObjectSet("H4-MIDL",OBJPROP_COLOR,LightSkyBlue); }
   else{ObjectSet("H4-MIDL",OBJPROP_COLOR,Red);}
   ObjectSet("H4-MIDL",OBJPROP_WIDTH,1); 
   ObjectSet("H4-MIDL",OBJPROP_STYLE,STYLE_DOT); 
   }

   if(Period()==1440){
   
   ObjectCreate("D1-TL1",OBJ_TREND,0,T2,PP+Step*AB,T1,PP); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("D1-TL1",OBJPROP_COLOR,Ivory);}
   else {ObjectSet("D1-TL1",OBJPROP_COLOR,Red); }
   ObjectSet("D1-TL1",OBJPROP_WIDTH,1); 
   ObjectSet("D1-TL1",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("D1-TL2",OBJ_TREND,0,T2,P2,T1,P1); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("D1-TL2",OBJPROP_COLOR,Ivory); }
   else{ObjectSet("D1-TL2",OBJPROP_COLOR,Red);}
   ObjectSet("D1-TL2",OBJPROP_WIDTH,1); 
   ObjectSet("D1-TL2",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("D1-MIDL",OBJ_TREND,0,T2,(P2+PP+Step*AB)/2,T1,(P1+PP)/2); 
   if(ChannelWidth >= ChannelAlert && MathAbs(SlopeAngle) >= SlopeAlert) {ObjectSet("D1-MIDL",OBJPROP_COLOR,Ivory); }
   else{ObjectSet("D1-MIDL",OBJPROP_COLOR,Red);}
   ObjectSet("D1-MIDL",OBJPROP_WIDTH,1); 
   ObjectSet("D1-MIDL",OBJPROP_STYLE,STYLE_DOT); 
   }

   if(Period()==10080){
   
   ObjectCreate("W1-TL1",OBJ_TREND,0,T2,PP+Step*AB,T1,PP); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("W1-TL1",OBJPROP_COLOR,Lime);}
   else {ObjectSet("W1-TL1",OBJPROP_COLOR,Red); }
   ObjectSet("W1-TL1",OBJPROP_WIDTH,1); 
   ObjectSet("W1-TL1",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("W1-TL2",OBJ_TREND,0,T2,P2,T1,P1); 
   if(ChannelWidth >= ChannelAlert) {ObjectSet("W1-TL2",OBJPROP_COLOR,Lime); }
   else{ObjectSet("W1-TL2",OBJPROP_COLOR,Red);}
   ObjectSet("W1-TL2",OBJPROP_WIDTH,1); 
   ObjectSet("W1-TL2",OBJPROP_STYLE,STYLE_SOLID); 


   ObjectCreate("W1-MIDL",OBJ_TREND,0,T2,(P2+PP+Step*AB)/2,T1,(P1+PP)/2); 
   if(ChannelWidth >= ChannelAlert && MathAbs(SlopeAngle) >= SlopeAlert) {ObjectSet("W1-MIDL",OBJPROP_COLOR,Lime); }
   else{ObjectSet("W1-MIDL",OBJPROP_COLOR,Red);}
   ObjectSet("W1-MIDL",OBJPROP_WIDTH,1); 
   ObjectSet("W1-MIDL",OBJPROP_STYLE,STYLE_DOT); 
   }
   
   GlobalVariableSet("ST1",T2);//ST1,B4
   GlobalVariableSet("ST2",T1);//ST2,B5
   GlobalVariableSet("Bar1",B4);
   GlobalVariableSet("Bar2",B5);	
   ObjectCreate("Dot1",OBJ_ARROW,0,T1,(P1+PP)/2);
   ObjectSet("Dot1",	SYMBOL_CHECKSIGN,Gold);
//---- 
WhatTxt="Change";
if (OldChannelWidth<ChannelWidth) WhatTxt="is widening";
if (OldChannelWidth>ChannelWidth) WhatTxt="is narrowing";
if (OldSlopeAngle<0 && SlopeAngle>0 )WhatTxt="Changed direction to up";
if (OldSlopeAngle>0 && SlopeAngle<0 )WhatTxt="Changed direction to down";


if(firsttime && ChannelTalk && alertTag != Time[0]&& OldChannelWidth!=ChannelWidth || OldSlopeAngle!=SlopeAngle)
{
Alert(Symbol()," ",Period(),"Shi Channel Change");
//SpeechText("chee channel"+ WhatTxt+" "+symbolTxt+" "+PeriodTxt);
alertTag = Time[0];

}




OldChannelWidth=ChannelWidth;
OldSlopeAngle=SlopeAngle;
firsttime=firsttime+1;
if (SlopeAngle<0){
Comment("\n"," ",Symbol()," - M",Period()," (Bid = ",Bid," Ask = ",Ask,")","\n"," Âåðõíÿÿ ãðàíèöà = ",PP,"\n"," Ñåðåäèíà = ",(P1+PP)/2,"\n"," Íèæíÿÿ ãðàíèöà = ",P1,"\n",
        " Ðàçìåð êàíàëà = ", DoubleToStr(ChannelWidth,0),"\n"," Íàêëîí = ", DoubleToStr(SlopeAngle,0));
}
if (SlopeAngle>0){
Comment("\n"," ",Symbol()," - M",Period()," (Bid = ",Bid," Ask = ",Ask,")","\n"," Âåðõíÿÿ ãðàíèöà = ",P1,"\n"," Ñåðåäèíà = ",(P1+PP)/2,"\n"," Íèæíÿÿ ãðàíèöà = ",PP,"\n",
        " Ðàçìåð êàíàëà = ", DoubleToStr(ChannelWidth,0),"\n"," Íàêëîí = ", DoubleToStr(SlopeAngle,0));
}

   LBuffer[B1]=P1;
   HBuffer[B1]=PP;
   MBuffer[B1]=(P1+PP)/2;
   CBuffer[B1]=ChannelWidth;
   SBuffer[B1]=SlopeAngle;
//----
return(0); 
} 
//+------------------------------------------------------------------+

Similar scripts

Shi_cannel_for oll chart

This indicator dynamically constructs a multi-period trend channel by identifying high and low fractals to calculate slope angles, channel widths, and real-time volatility expansion.

SHI Channel11_v2

This indicator identifies trend direction and slope by projecting linear boundaries based on the most recent fractal highs and lows.

SHI Channel11_v1

Identifies significant price swing extremes to project a linear progression channel based on calculated slope and historical volatility boundaries.

SHI_Channel1_v1

This indicator identifies local price extrema using fractal patterns to project a linear trend channel and calculates dynamic slope values for momentum analysis.

SHI_Channel_true_v4

This indicator identifies local price extrema via fractal geometry to project a linear trend corridor and calculate dynamic price slope.

SHI Channel_v1

This indicator identifies dual fractal extremes to project a dynamic trend channel with an automated slope calculation and breach detection.

Price_Channel_v1

SHI Channel11

This indicator identifies significant price extremes using fractal geometry to project a linear trend channel with dynamic boundary offsets based on slope calculation.

SHI_Channel1

This indicator identifies local highs and lows via fractal analysis to project a dynamic linear trend channel with calculated slopes and midline equilibrium.

MaksiGen_KaHaJI_CkaJIneP_v2

Identifies and plots specific price extremes within user-defined time windows to establish dynamic supply and demand corridors.

Comments